Procedure

UpdatePatientInfoForAlert

Module

fFrame

Last Modified

3/11/2015 8:41:44 AM

Scope

Local

Local subprogram to

mnuFileNextClick

Declaration

procedure UpdatePatientInfoForAlert;

Calls Hierarchy


UpdatePatientInfoForAlert
 ├TEncounter.SetInpatient
 ├TEncounter.SetLocation
 ├TEncounter.SetDateTime
 ├TEncounter.SetVisitCategory
 ├TEncounter.SetProvider
 └TfrmFrame.SetupPatient
   ├TfrmFrame.ClearPatient
   │ ├TfrmCover.ClearPtData
   │ │ ├StopCoverSheet
   │ │ └TfrmPage.ClearPtData
   │ ├TfrmProblems.ClearPtData
   │ │ ├TfrmPage.ClearPtData
   │ │ └TfrmProblems.ClearGrid
   │ ├TfrmMeds.ClearPtData
   │ │ ├TfrmPage.ClearPtData
   │ │ ├TfrmMeds.ClearChildODList
   │ │ └ClearMedList
   │ ├TfrmOrders.ClearPtData
   │ │ ├TfrmPage.ClearPtData
   │ │ ├TfrmOrders.ClearOrderSheets
   │ │ ├ClearOrders
   │ │ └ClearFillerAppList
   │ ├TfrmNotes.ClearPtData
   │ │ ├TfrmPage.ClearPtData
   │ │ ├TfrmNotes.ClearEditControls
   │ │ │ ├TPCEData.Clear
   │ │ │ │ ├ClearList
   │ │ │ │ ├TPCEProc.Clear
   │ │ │ │ │ └TPCEItem.Clear
   │ │ │ │ │   └TPCEItem.SetComment
   │ │ │ │ └TPCEProviderList.Clear
   │ │ │ │   └TPCEProviderList.GetPrimaryIdx
   │ │ │ └TfrmNotes.SetEditingIndex
   │ │ │   ├KillReminderDialog
   │ │ │   │ └TfrmRemDlg.ResetProcessing
   │ │ │   │   ├TfrmRemDlg.ClearControls
   │ │ │   │   │ ├WipeOutControls
   │ │ │   │   │ │ └..(rec)..
   │ │ │   │   │ └TfrmRemDlg.GetBox
   │ │ │   │   ├TfrmRemDlg.PositionTrees
   │ │ │   │   └TfrmRemDlg.KillDlg
   │ │ │   └TfrmReminderTree.EnableActions
   │ │ │     ├ReminderDialogActive
   │ │ │     ├NewRemCoverSheetListActive
   │ │ │     └CanEditAllRemCoverSheetLists
   │ │ │       └HasMenuOptionAccess
   │ │ ├KillDocTreeObjects
   │ │ │ └ResetDocTreeObjectStrings
   │ │ ├TPCEData.Clear...
   │ │ └TfrmDrawers.ResetTemplates
   │ │   └GetUserTemplateDefaults
   │ ├TfrmConsults.ClearPtData
   │ │ ├TfrmPage.ClearPtData
   │ │ ├TfrmConsults.ClearEditControls
   │ │ │ ├TPCEData.Clear...
   │ │ │ ├TfrmConsults.SetEditingIndex
   │ │ │ │ ├KillReminderDialog...
   │ │ │ │ └TfrmReminderTree.EnableActions...
   │ │ │ └TfrmConsults.ShowPCEControls
   │ │ ├KillDocTreeObjects...
   │ │ ├TPCEData.Clear...
   │ │ └TfrmDrawers.ResetTemplates...
   │ ├TfrmDCSumm.ClearPtData
   │ │ ├TfrmPage.ClearPtData
   │ │ ├TfrmDCSumm.ClearEditControls
   │ │ │ ├TPCEData.Clear...
   │ │ │ └TfrmDCSumm.SetEditingIndex
   │ │ ├KillDocTreeObjects...
   │ │ ├TPCEData.Clear...
   │ │ └TfrmDrawers.ResetTemplates...
   │ ├TfrmSurgery.ClearPtData
   │ │ ├TfrmPage.ClearPtData
   │ │ ├TfrmSurgery.ClearEditControls
   │ │ │ ├TPCEData.Clear...
   │ │ │ └TfrmSurgery.SetEditingIndex
   │ │ │   ├KillReminderDialog...
   │ │ │   └TfrmReminderTree.EnableActions...
   │ │ ├KillCaseTreeObjects
   │ │ │ └ResetCaseTreeObjectStrings
   │ │ ├TPCEData.Clear...
   │ │ └TfrmDrawers.ResetTemplates...
   │ ├TfrmLabs.ClearPtData
   │ │ ├TfrmPage.ClearPtData
   │ │ ├TfrmLabs.BlankWeb
   │ │ └TfrmLabs.HideTabControl
   │ ├TfrmGraphData.ClearPtData
   │ │ ├TfrmGraphData.ClearMemos
   │ │ ├TfrmGraphData.ClearGtsl
   │ │ ├rpcGetTypes
   │ │ │ └onoff
   │ │ └rpcFastTask
   │ │   └onoff
   │ ├TfrmReports.ClearPtData
   │ │ ├TfrmPage.ClearPtData
   │ │ ├TfrmReports.BlankWeb
   │ │ ├TfrmGraphs.Initialize
   │ │ │ ├TfrmGraphs.InitialData
   │ │ │ │ ├FMNow
   │ │ │ │ ├GraphTurboOn
   │ │ │ │ ├TfrmGraphs.Switch
   │ │ │ │ │ ├rpcFastItems
   │ │ │ │ │ │ └onoff
   │ │ │ │ │ ├rpcFastData
   │ │ │ │ │ │ └onoff
   │ │ │ │ │ ├rpcFastLabs
   │ │ │ │ │ │ └onoff
   │ │ │ │ │ └TfrmGraphs.FastLab
   │ │ │ │ │   └TfrmGraphs.SaveTestData
   │ │ │ │ │     ├TfrmGraphs.ItemName
   │ │ │ │ │     └TfrmGraphs.LabData
   │ │ │ │ │       ├rpcGetItemData
   │ │ │ │ │       │ └onoff
   │ │ │ │ │       ├TfrmGraphs.SpecRefCheck
   │ │ │ │ │       │ └TfrmGraphs.RefUnits
   │ │ │ │ │       │   └TfrmGraphs.SelectRef
   │ │ │ │ │       │     └CheckRef
   │ │ │ │ │       ├TfrmGraphs.SpecRefSet
   │ │ │ │ │       │ └MultiRef
   │ │ │ │ │       ├TfrmGraphs.FileNameX
   │ │ │ │ │       ├TfrmGraphs.LabCheck
   │ │ │ │ │       ├TfrmGraphs.DateRangeMultiItems
   │ │ │ │ │       └TfrmGraphs.LabAdd
   │ │ │ │ ├TfrmGraphs.TypeIsLoaded
   │ │ │ │ └rpcGetItems
   │ │ │ │   └onoff
   │ │ │ ├TfrmGraphs.SourceContext
   │ │ │ ├TfrmGraphs.LoadListView
   │ │ │ │ ├TfrmGraphs.FileNameX
   │ │ │ │ ├TfrmGraphs.UpdateView
   │ │ │ │ ├TfrmGraphs.lvwItemsTopColumnClick
   │ │ │ │ └TfrmGraphs.lvwItemsBottomColumnClick
   │ │ │ ├rpcReportParams
   │ │ │ │ └onoff
   │ │ │ ├TfrmGraphs.chkDualViewsClick
   │ │ │ │ ├TfrmGraphs.lvwItemsTopClick
   │ │ │ │ │ ├GraphTurboOn
   │ │ │ │ │ ├TfrmGraphs.Switch...
   │ │ │ │ │ └TfrmGraphs.ItemsClick
   │ │ │ │ │   ├TfrmGraphs.CheckExpandedLabs
   │ │ │ │ │   │ └TfrmGraphs.cboDateRangeChange
   │ │ │ │ │   │   ├TfrmGraphs.SelCopy
   │ │ │ │ │   │   ├TfrmGraphs.HideGraphs
   │ │ │ │ │   │   ├TfrmGraphs.DateSteps
   │ │ │ │ │   │   ├TfrmGraphs.FilterListView
   │ │ │ │ │   │   │ ├TfrmGraphs.TypeIsDisplayed
   │ │ │ │ │   │   │ ├TfrmGraphs.DateRangeItems
   │ │ │ │ │   │   │ │ ├rpcDateItem
   │ │ │ │ │   │   │ │ │ └onoff
   │ │ │ │ │   │   │ │ ├TfrmGraphs.FileNameX
   │ │ │ │ │   │   │ │ ├TfrmGraphs.UpdateView
   │ │ │ │ │   │   │ │ └TfrmGraphs.DateRangeMultiItems
   │ │ │ │ │   │   │ ├TfrmGraphs.FileNameX
   │ │ │ │ │   │   │ ├TfrmGraphs.UpdateView
   │ │ │ │ │   │   │ └TfrmGraphs.SortListView
   │ │ │ │ │   │   │   ├TfrmGraphs.lvwItemsTopColumnClick
   │ │ │ │ │   │   │   ├TfrmGraphs.lvwItemsBottomColumnClick
   │ │ │ │ │   │   │   └TfrmGraphs.AssignProfile
   │ │ │ │ │   │   │     └TfrmGraphs.SetProfile
   │ │ │ │ │   │   │       └TfrmGraphs.ProfileName
   │ │ │ │ │   │   │         └TfrmGraphs.DCName
   │ │ │ │ │   │   │           └rpcClass
   │ │ │ │ │   │   │             └onoff
   │ │ │ │ │   │   ├TfrmGraphs.SelReset
   │ │ │ │ │   │   ├TfrmGraphs.DisplayData
   │ │ │ │ │   │   │ ├TfrmGraphs.SetFontSize
   │ │ │ │ │   │   │ ├TfrmGraphs.ItemsClick...
   │ │ │ │ │   │   │ ├TfrmGraphs.MakeSeparate
   │ │ │ │ │   │   │ │ ├TfrmGraphs.chartBaseMouseMove
   │ │ │ │ │   │   │ │ │ └TfrmGraphs.InactivateHint
   │ │ │ │ │   │   │ │ ├TfrmGraphs.MakeSeparateItems
   │ │ │ │ │   │   │ │ │ ├TfrmGraphs.GraphTypeNum
   │ │ │ │ │   │   │ │ │ ├TfrmGraphs.TitleInfo
   │ │ │ │ │   │   │ │ │ │ └TfrmGraphs.RefUnits...
   │ │ │ │ │   │   │ │ │ ├TfrmGraphs.MakeChart
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.HideDates
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.ChartOnZoom
   │ │ │ │ │   │   │ │ │ │ │ ├TfrmGraphs.SizeDates
   │ │ │ │ │   │   │ │ │ │ │ │ ├TfrmGraphs.GraphFooter
   │ │ │ │ │   │   │ │ │ │ │ │ └TfrmGraphs.SeriesForLabels
   │ │ │ │ │   │   │ │ │ │ │ └TfrmGraphs.ZoomUpdateInfo
   │ │ │ │ │   │   │ │ │ │ │   ├TfrmGraphs.InfoMessage
   │ │ │ │ │   │   │ │ │ │ │   └TfrmGraphs.MergedLabsSelected
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.ChartOnUndoZoom
   │ │ │ │ │   │   │ │ │ │ │ ├TfrmGraphs.SizeDates...
   │ │ │ │ │   │   │ │ │ │ │ ├TfrmGraphs.InfoMessage
   │ │ │ │ │   │   │ │ │ │ │ └TfrmGraphs.MergedLabsSelected
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.chartBaseClickSeries
   │ │ │ │ │   │   │ │ │ │ │ ├TfrmGraphs.InactivateHint
   │ │ │ │ │   │   │ │ │ │ │ └TfrmGraphs.SeriesClicks
   │ │ │ │ │   │   │ │ │ │ │   ├TfrmGraphs.ValueText
   │ │ │ │ │   │   │ │ │ │ │   │ ├TfrmGraphs.NonNumText
   │ │ │ │ │   │   │ │ │ │ │   │ │ ├TfrmGraphs.FileNameX
   │ │ │ │ │   │   │ │ │ │ │   │ │ ├TfrmGraphs.ItemName
   │ │ │ │ │   │   │ │ │ │ │   │ │ └TfrmGraphs.SetRefNonNum
   │ │ │ │ │   │   │ │ │ │ │   │ │   └TfrmGraphs.RefUnits...
   │ │ │ │ │   │   │ │ │ │ │   │ ├TfrmGraphs.ItemCheck
   │ │ │ │ │   │   │ │ │ │ │   │ ├TfrmGraphs.CheckMedNum
   │ │ │ │ │   │   │ │ │ │ │   │ ├TfrmGraphs.FileNameX
   │ │ │ │ │   │   │ │ │ │ │   │ ├TfrmGraphs.ValueDates
   │ │ │ │ │   │   │ │ │ │ │   │ ├TfrmGraphs.ResultValue
   │ │ │ │ │   │   │ │ │ │ │   │ │ ├TfrmGraphs.serDatelineTopGetMarkText
   │ │ │ │ │   │   │ │ │ │ │   │ │ └TfrmGraphs.BPValue
   │ │ │ │ │   │   │ │ │ │ │   │ └TfrmGraphs.OtherInfo
   │ │ │ │ │   │   │ │ │ │ │   │   └TfrmGraphs.SetRef
   │ │ │ │ │   │   │ │ │ │ │   │     └TfrmGraphs.RefUnits...
   │ │ │ │ │   │   │ │ │ │ │   ├TfrmGraphs.LabNameResults
   │ │ │ │ │   │   │ │ │ │ │   └TfrmGraphs.AllTypeDate
   │ │ │ │ │   │   │ │ │ │ │     ├TfrmGraphs.CheckToAddData
   │ │ │ │ │   │   │ │ │ │ │     │ ├TfrmGraphs.LabData...
   │ │ │ │ │   │   │ │ │ │ │     │ └rpcGetItemData...
   │ │ │ │ │   │   │ │ │ │ │     ├TfrmGraphs.TempData
   │ │ │ │ │   │   │ │ │ │ │     │ ├TfrmGraphs.ItemName
   │ │ │ │ │   │   │ │ │ │ │     │ └TfrmGraphs.SetRef...
   │ │ │ │ │   │   │ │ │ │ │     └ReportBox
   │ │ │ │ │   │   │ │ │ │ │       └CreateReportBox
   │ │ │ │ │   │   │ │ │ │ │         └TfrmBase508Form.Create
   │ │ │ │ │   │   │ │ │ │ │           ├TfrmBase508Form.UpdateAccessibilityActions
   │ │ │ │ │   │   │ │ │ │ │           ├UnfocusableControlEnter
   │ │ │ │ │   │   │ │ │ │ │           └AdjustControls
   │ │ │ │ │   │   │ │ │ │ │             ├TfrmBase508Form.ModifyUnfocusableControl
   │ │ │ │ │   │   │ │ │ │ │             └..(rec)..
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.chartBaseClickLegend
   │ │ │ │ │   │   │ │ │ │ │ └TfrmGraphs.ItemDateRange
   │ │ │ │ │   │   │ │ │ │ │   ├TfrmGraphs.ValueText...
   │ │ │ │ │   │   │ │ │ │ │   └ReportBox...
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.mnuPopGraphDetailsClick
   │ │ │ │ │   │   │ │ │ │ │ ├TfrmGraphs.ItemCheck
   │ │ │ │ │   │   │ │ │ │ │ ├TfrmGraphs.HSAbbrev
   │ │ │ │ │   │   │ │ │ │ │ ├TfrmGraphs.ValueText...
   │ │ │ │ │   │   │ │ │ │ │ ├TfrmGraphs.LabNameResults
   │ │ │ │ │   │   │ │ │ │ │ ├TfrmGraphs.AllTypeDate...
   │ │ │ │ │   │   │ │ │ │ │ ├TfrmGraphs.OneDayTypeDetails
   │ │ │ │ │   │   │ │ │ │ │ │ ├TfrmGraphs.FileNameX
   │ │ │ │ │   │   │ │ │ │ │ │ ├TfrmGraphs.ItemName
   │ │ │ │ │   │   │ │ │ │ │ │ ├rpcDetailDay
   │ │ │ │ │   │   │ │ │ │ │ │ │ └onoff
   │ │ │ │ │   │   │ │ │ │ │ │ ├TfrmGraphs.NotifyApps
   │ │ │ │ │   │   │ │ │ │ │ │ └ReportBox...
   │ │ │ │ │   │   │ │ │ │ │ └TfrmGraphs.AllDetails
   │ │ │ │ │   │   │ │ │ │ │   ├TfrmGraphs.HSAbbrev
   │ │ │ │ │   │   │ │ │ │ │   ├rpcDetailSelected
   │ │ │ │ │   │   │ │ │ │ │   │ └onoff
   │ │ │ │ │   │   │ │ │ │ │   ├TfrmGraphs.NotifyApps
   │ │ │ │ │   │   │ │ │ │ │   ├ReportBox...
   │ │ │ │ │   │   │ │ │ │ │   └TfrmGraphs.ItemDateRange...
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.chartBaseMouseDown
   │ │ │ │ │   │   │ │ │ │ │ ├TfrmGraphs.InactivateHint
   │ │ │ │ │   │   │ │ │ │ │ └TfrmGraphs.MouseClicks
   │ │ │ │ │   │   │ │ │ │ │   └TfrmGraphs.LabelClicks
   │ │ │ │ │   │   │ │ │ │ │     ├TfrmGraphs.mnuPopGraphDetailsClick...
   │ │ │ │ │   │   │ │ │ │ │     ├TfrmGraphs.ValueText...
   │ │ │ │ │   │   │ │ │ │ │     ├TfrmGraphs.LabNameResults
   │ │ │ │ │   │   │ │ │ │ │     └TfrmGraphs.AllTypeDate...
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.chartBaseMouseUp
   │ │ │ │ │   │   │ │ │ │ └TfrmGraphs.chartBaseMouseMove...
   │ │ │ │ │   │   │ │ │ ├TfrmGraphs.PadLeftEvent
   │ │ │ │ │   │   │ │ │ ├TfrmGraphs.MakeLineSeries
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesInfo
   │ │ │ │ │   │   │ │ │ │ │ ├TfrmGraphs.GetData
   │ │ │ │ │   │   │ │ │ │ │ │ └TfrmGraphs.FMCorrectedDate
   │ │ │ │ │   │   │ │ │ │ │ └TfrmGraphs.NextColor
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.NextPointerStyle
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.BPCheck
   │ │ │ │ │   │   │ │ │ │ │ └TfrmGraphs.MakeSeriesBP
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.FMCorrectedDate
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.HighLow
   │ │ │ │ │   │   │ │ │ │ │ └TfrmGraphs.FMToDateTime
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.BPAdd
   │ │ │ │ │   │   │ │ │ │ │ └TfrmGraphs.BorderValue
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.NumAdd
   │ │ │ │ │   │   │ │ │ │ │ ├TfrmGraphs.StdDev
   │ │ │ │ │   │   │ │ │ │ │ ├TfrmGraphs.BorderValue
   │ │ │ │ │   │   │ │ │ │ │ └TfrmGraphs.InvVal
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.NonNumSave
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesRef
   │ │ │ │ │   │   │ │ │ │ │ └TfrmGraphs.BorderValue
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesPoint
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.PainAdd
   │ │ │ │ │   │   │ │ │ │ └TfrmGraphs.FixedDates
   │ │ │ │ │   │   │ │ │ ├TfrmGraphs.MakeBarSeries
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesPoint
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesInfo...
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.NextPointerStyle
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.FMCorrectedDate
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.HighLow...
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.InfoMessage
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.MergedLabsSelected
   │ │ │ │ │   │   │ │ │ │ └TfrmGraphs.FixedDates
   │ │ │ │ │   │   │ │ │ ├TfrmGraphs.MakeVisitGanttSeries
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesPoint
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesInfo...
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.FMCorrectedDate
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.HighLow...
   │ │ │ │ │   │   │ │ │ │ └TfrmGraphs.FixedDates
   │ │ │ │ │   │   │ │ │ ├TfrmGraphs.MakePointSeries
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesInfo...
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.NextPointerStyle
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.FMCorrectedDate
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.HighLow...
   │ │ │ │ │   │   │ │ │ │ └TfrmGraphs.TempCheck
   │ │ │ │ │   │   │ │ │ ├TfrmGraphs.MakeGanttSeries
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesPoint
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.MakeSeriesInfo...
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.FMCorrectedDate
   │ │ │ │ │   │   │ │ │ │ ├TfrmGraphs.HighLow...
   │ │ │ │ │   │   │ │ │ │ └TfrmGraphs.FixedDates
   │ │ │ │ │   │   │ │ │ └TfrmGraphs.MakeOtherSeries
   │ │ │ │ │   │   │ │ │   ├TfrmGraphs.MakeNonNumerics
   │ │ │ │ │   │   │ │ │   │ ├TfrmGraphs.PadNonNum
   │ │ │ │ │   │   │ │ │   │ │ ├TfrmGraphs.StackNonNum
   │ │ │ │ │   │   │ │ │   │ │ └TfrmGraphs.MakeSeriesPoint
   │ │ │ │ │   │   │ │ │   │ ├TfrmGraphs.MakeSeriesPoint
   │ │ │ │ │   │   │ │ │   │ ├TfrmGraphs.PadLeftNonNumeric
   │ │ │ │ │   │   │ │ │   │ ├TfrmGraphs.ChartOnUndoZoom...
   │ │ │ │ │   │   │ │ │   │ └TfrmGraphs.MakeNonNumSeries
   │ │ │ │ │   │   │ │ │   │   └TfrmGraphs.MakeSeriesPoint
   │ │ │ │ │   │   │ │ │   ├TfrmGraphs.DisplayFreeText
   │ │ │ │ │   │   │ │ │   └TfrmGraphs.MakeComments
   │ │ │ │ │   │   │ │ │     └TfrmGraphs.MakeSeriesPoint
   │ │ │ │ │   │   │ │ └TfrmGraphs.AdjustTimeframe
   │ │ │ │ │   │   │ │   └TfrmGraphs.BottomAxis
   │ │ │ │ │   │   │ │     └..(rec)..
   │ │ │ │ │   │   │ ├TfrmGraphs.MakeTogetherMaybe
   │ │ │ │ │   │   │ │ ├TfrmGraphs.MakeSeparate...
   │ │ │ │ │   │   │ │ └TfrmGraphs.MakeTogether
   │ │ │ │ │   │   │ │   ├TfrmGraphs.GraphTypeNum
   │ │ │ │ │   │   │ │   ├TfrmGraphs.MakeChart...
   │ │ │ │ │   │   │ │   ├TfrmGraphs.PortionSize
   │ │ │ │ │   │   │ │   ├TfrmGraphs.SizeTogether
   │ │ │ │ │   │   │ │   ├TfrmGraphs.MakeTogetherNoLines
   │ │ │ │ │   │   │ │   │ ├TfrmGraphs.GraphTypeNum
   │ │ │ │ │   │   │ │   │ └TfrmGraphs.MakeDateline
   │ │ │ │ │   │   │ │   │   ├TfrmGraphs.MakeBarSeries...
   │ │ │ │ │   │   │ │   │   ├TfrmGraphs.MakeVisitGanttSeries...
   │ │ │ │ │   │   │ │   │   ├TfrmGraphs.MakePointSeries...
   │ │ │ │ │   │   │ │   │   └TfrmGraphs.MakeGanttSeries...
   │ │ │ │ │   │   │ │   ├TfrmGraphs.MakeTogetherOnlyLines
   │ │ │ │ │   │   │ │   │ ├TfrmGraphs.TitleInfo...
   │ │ │ │ │   │   │ │   │ ├TfrmGraphs.MakeLineSeries...
   │ │ │ │ │   │   │ │   │ └TfrmGraphs.DisplayFreeText
   │ │ │ │ │   │   │ │   ├TfrmGraphs.MakeTogetherAnyLines
   │ │ │ │ │   │   │ │   │ ├TfrmGraphs.SingleLabTest
   │ │ │ │ │   │   │ │   │ ├TfrmGraphs.TitleInfo...
   │ │ │ │ │   │   │ │   │ ├TfrmGraphs.GraphTypeNum
   │ │ │ │ │   │   │ │   │ ├TfrmGraphs.MakeLineSeries...
   │ │ │ │ │   │   │ │   │ ├TfrmGraphs.DisplayFreeText
   │ │ │ │ │   │   │ │   │ └TfrmGraphs.MakeDateline...
   │ │ │ │ │   │   │ │   ├TfrmGraphs.MakeOtherSeries...
   │ │ │ │ │   │   │ │   └TfrmGraphs.GraphBoundry
   │ │ │ │ │   │   │ │     ├TfrmGraphs.chartBaseMouseMove...
   │ │ │ │ │   │   │ │     └TfrmGraphs.AdjustTimeframe...
   │ │ │ │ │   │   │ └TfrmGraphs.DisplayDataInfo
   │ │ │ │ │   │   │   ├TfrmGraphs.ChangeStyle
   │ │ │ │ │   │   │   │ ├TfrmGraphs.ChartStyle
   │ │ │ │ │   │   │   │ │ └TfrmGraphs.HideDates
   │ │ │ │ │   │   │   │ └TfrmGraphs.ChartColor
   │ │ │ │ │   │   │   ├TfrmGraphs.InfoMessage
   │ │ │ │ │   │   │   └TfrmGraphs.MergedLabsSelected
   │ │ │ │ │   │   ├TfrmGraphs.lstViewsTopChange
   │ │ │ │ │   │   │ └TfrmGraphs.ViewsChange
   │ │ │ │ │   │   │   ├TfrmGraphs.InactivateHint
   │ │ │ │ │   │   │   ├TfrmGraphs.DisplayData...
   │ │ │ │ │   │   │   ├TfrmGraphs.CheckProfile
   │ │ │ │ │   │   │   │ ├GetGraphProfiles
   │ │ │ │ │   │   │   │ │ └rpcGetGraphProfiles
   │ │ │ │ │   │   │   │ │   └onoff
   │ │ │ │ │   │   │   │ ├GetATestGroup
   │ │ │ │ │   │   │   │ │ └rpcATestGroup
   │ │ │ │ │   │   │   │ ├TfrmGraphs.ExpandTax
   │ │ │ │ │   │   │   │ │ └rpcTaxonomy
   │ │ │ │ │   │   │   │ │   └onoff
   │ │ │ │ │   │   │   │ └TfrmGraphs.LoadDisplayCheck
   │ │ │ │ │   │   │   │   ├TfrmGraphs.TypeIsLoaded
   │ │ │ │ │   │   │   │   ├TfrmGraphs.LoadType
   │ │ │ │ │   │   │   │   │ ├TfrmGraphs.FileNameX
   │ │ │ │ │   │   │   │   │ └rpcGetItems...
   │ │ │ │ │   │   │   │   ├TfrmGraphs.TypeIsDisplayed
   │ │ │ │ │   │   │   │   └TfrmGraphs.DisplayType
   │ │ │ │ │   │   │   │     └TfrmGraphs.FileNameX
   │ │ │ │ │   │   │   ├TfrmGraphs.cboDateRangeChange...
   │ │ │ │ │   │   │   ├TfrmGraphs.ViewDefinition
   │ │ │ │ │   │   │   ├TfrmGraphs.AssignProfile...
   │ │ │ │ │   │   │   ├TfrmGraphs.lvwItemsTopColumnClick
   │ │ │ │ │   │   │   ├TfrmGraphs.lvwItemsBottomColumnClick
   │ │ │ │ │   │   │   └TfrmGraphs.AutoSelect
   │ │ │ │ │   │   │     ├TfrmGraphs.lvwItemsTopClick...
   │ │ │ │ │   │   │     └TfrmGraphs.lvwItemsBottomClick
   │ │ │ │ │   │   │       ├GraphTurboOn
   │ │ │ │ │   │   │       ├TfrmGraphs.Switch...
   │ │ │ │ │   │   │       └TfrmGraphs.ItemsClick...
   │ │ │ │ │   │   └TfrmGraphs.lstViewsBottomChange
   │ │ │ │ │   │     └TfrmGraphs.ViewsChange...
   │ │ │ │ │   ├TfrmGraphs.HideGraphs
   │ │ │ │ │   ├TfrmGraphs.CheckToAddData...
   │ │ │ │ │   ├TfrmGraphs.DisplayData...
   │ │ │ │ │   └TfrmGraphs.ZoomUpdate
   │ │ │ │ │     ├TfrmGraphs.ZoomTo
   │ │ │ │ │     │ └TfrmGraphs.SizeDates...
   │ │ │ │ │     └TfrmGraphs.ZoomUpdateInfo...
   │ │ │ │ └TfrmGraphs.lvwItemsBottomClick...
   │ │ │ ├TfrmGraphs.lstViewsTopChange...
   │ │ │ ├TfrmGraphs.lvwItemsTopClick...
   │ │ │ ├TfrmGraphs.lstViewsBottomChange...
   │ │ │ ├TfrmGraphs.lvwItemsBottomClick...
   │ │ │ └TfrmGraphs.cboDateRangeChange...
   │ │ └TfrmGraphs.DisplayData...
   │ ├TfrmFrame.PageIDToTab
   │ ├TfrmFrame.tabPageChange
   │ │ ├TfrmFrame.TabToPageID
   │ │ ├TfrmFrame.SwitchToPage
   │ │ └SpeakPatient
   │ ├ClearReminderData
   │ │ └ProcessingChangeString
   │ │   └TReminderDialog.Processing
   │ │     └CheckItem
   │ │       ├ChildrenChecked
   │ │       │ └CheckItem...
   │ │       └TRemDlgElement.Add2PN
   │ │         ├TRemDlgElement.ElemType
   │ │         └TRemDlgElement.AddData
   │ │           ├TRemDlgElement.Historical
   │ │           ├TPCEData.VisitDateTime
   │ │           │ └TPCEData.IsSecondaryVisit
   │ │           ├TRemData.AddData
   │ │           │ ├Add
   │ │           │ │ ├Code2DataType
   │ │           │ │ ├TRemDlgElement.Historical
   │ │           │ │ ├TRemPrompt.GetValue
   │ │           │ │ │ ├TRemDlgElement.Historical
   │ │           │ │ │ ├TPCEData.VisitDateTime...
   │ │           │ │ │ ├TRemPrompt.RemDataActive
   │ │           │ │ │ │ └TRemPrompt.CompareActiveDate
   │ │           │ │ │ └TRemPrompt.RemDataChoiceActive
   │ │           │ │ ├TPCEData.VisitDateTime...
   │ │           │ │ ├ValidateGAFDate
   │ │           │ │ │ ├TPatient.GetDateDied
   │ │           │ │ │ │ └DateOfDeath
   │ │           │ │ │ └FMToday
   │ │           │ │ │   └FMNow
   │ │           │ │ ├TPCEProviderList.PCEProvider
   │ │           │ │ │ ├Check
   │ │           │ │ │ │ └TPCEProviderList.IndexOfProvider
   │ │           │ │ │ └TPCEProviderList.PrimaryIEN
   │ │           │ │ │   └TPCEProviderList.GetPrimaryIdx
   │ │           │ │ ├AddPrompt
   │ │           │ │ │ ├TRemPrompt.PromptType
   │ │           │ │ │ │ └Code2PromptType
   │ │           │ │ │ ├TPCEProviderList.PCEProvider...
   │ │           │ │ │ ├TPCEData.VisitDateTime...
   │ │           │ │ │ ├TRemPrompt.VitalValue
   │ │           │ │ │ │ └TRemPrompt.GetValue...
   │ │           │ │ │ ├TRemPrompt.VitalType
   │ │           │ │ │ │ ├Code2VitalType
   │ │           │ │ │ │ └TRemData.InternalValue
   │ │           │ │ │ ├TRemPrompt.VitalUnitValue
   │ │           │ │ │ │ ├TRemPrompt.VitalType...
   │ │           │ │ │ │ └TRemPrompt.GetValue...
   │ │           │ │ │ ├ConvertVital
   │ │           │ │ │ ├FormatVitalForNote
   │ │           │ │ │ │ └ConvertVitalData
   │ │           │ │ │ ├TRemPrompt.GetValue...
   │ │           │ │ │ └TRemDlgElement.Historical
   │ │           │ │ └GetPCEDataText
   │ │           │ │   └GetDiagnosisText
   │ │           │ ├TRemDlgElement.Historical
   │ │           │ └TPCEData.VisitDateTime...
   │ │           ├TRemDlgElement.ElemType
   │ │           └..(rec)..
   │ ├TSigItems.Clear
   │ ├TChanges.Clear
   │ │ ├UnlockDocument
   │ │ ├GetConsultIENforNote
   │ │ ├GetConsultOrderIEN
   │ │ └UnlockOrderIfAble
   │ │   └UnlockOrder
   │ ├ClearFlag
   │ ├HidePatientSelectMessages
   │ ├TfrmGraphs.Initialize...
   │ ├TfrmGraphs.DisplayData...
   │ └TfrmFrame.GetTimedOut
   │   └TimedOut
   ├TPatient.GetCombatVet
   │ └TCombatVet.Create
   │   └TCombatVet.UpdateData
   │     └TCombatVet.ClearProperties
   ├TfrmFrame.SetUpCIRN
   │ ├TRemoteSiteList.ChangePatient
   │ │ ├TRemoteSiteList.Clear
   │ │ ├HasRemoteData
   │ │ └TRemoteSiteList.Add
   │ │   └TRemoteSite.Create
   │ │     └StrToFMDateTime
   │ ├AutoRDV
   │ └TfrmFrame.lstCIRNLocationsClick
   │   ├CheckHL7TCPLink
   │   ├TRemoteSite.SetSelected
   │   ├TRemoteSite.ReportClear
   │   ├TRemoteSite.LabClear
   │   ├TfrmReports.tvReportsClick
   │   │ ├SaveColumnSizes
   │   │ ├TfrmReports.BlankWeb
   │   │ ├TfrmReports.DisplayHeading
   │   │ │ └ValidDateTimeStr
   │   │ ├ColumnHeaders
   │   │ ├TRowObject.Clear
   │   │ ├TRemoteSite.ReportClear
   │   │ ├TfrmReports.GraphPanel
   │   │ │ ├StrToFMDateTime
   │   │ │ ├TfrmGraphs.DateDefaults
   │   │ │ └TfrmReports.lstDateRangeClick
   │   │ │   └TfrmGraphs.cboDateRangeChange...
   │   │ ├TfrmReports.Graph
   │   │ │ ├TfrmBase508Form.Create...
   │   │ │ ├TfrmGraphs.Initialize...
   │   │ │ ├TfrmGraphs.DisplayData...
   │   │ │ └TfrmReports.GraphPanel...
   │   │ ├TRemoteSite.LabClear
   │   │ ├ExecuteAdhoc1
   │   │ │ └TfrmBase508Form.Create...
   │   │ ├TfrmReports.GoRemote
   │   │ │ ├HDRActive
   │   │ │ ├StrToFMDateTime
   │   │ │ ├TRemoteSite.ReportClear
   │   │ │ ├TfrmReports.UpdateRemoteStatus
   │   │ │ ├TfrmReports.LoadListView
   │   │ │ │ ├TRowObject.Add
   │   │ │ │ │ ├TCellObject.Create
   │   │ │ │ │ └TCellObject.Add
   │   │ │ │ └TUser.HasKey
   │   │ │ │   └HasSecurityKey
   │   │ │ ├GetRemoteData
   │   │ │ ├DirectQuery
   │   │ │ └RemoteQuery
   │   │ ├LoadReportText
   │   │ │ └StrToFMDateTime
   │   │ ├ListReportDateRanges
   │   │ │ └LoadReportLists
   │   │ │   └ExtractSection
   │   │ ├TfrmReports.lstQualifierClick
   │   │ │ ├TfrmReports.BlankWeb
   │   │ │ ├TRemoteSite.ReportClear
   │   │ │ ├TfrmReports.DisplayHeading...
   │   │ │ ├TRowObject.Clear
   │   │ │ ├TfrmReports.GoRemote...
   │   │ │ ├LoadReportText...
   │   │ │ ├TfrmReports.LoadListView...
   │   │ │ ├TfrmReports.ShowTabControl
   │   │ │ ├FormatECSDate
   │   │ │ │ └StrToFMDateTime
   │   │ │ └LoadECSReportText
   │   │ ├ListImagingExams
   │   │ ├ImagingParams
   │   │ ├TfrmReports.LoadProceduresTreeView
   │   │ │ └MakeProcedureTreeObject
   │   │ ├ListNutrAssessments
   │   │ ├TNotifications.GetAlertData
   │   │ │ └GetXQAData
   │   │ ├TfrmReports.LoadListView...
   │   │ ├TfrmReports.ShowTabControl
   │   │ ├ListProcedures
   │   │ │ └ShortDateStrToDate
   │   │ ├ListSurgeryReports
   │   │ └TfrmGraphs.ViewSelections
   │   │   ├TfrmGraphs.chkDualViewsClick...
   │   │   ├TfrmGraphs.lstViewsBottomChange...
   │   │   └TfrmGraphs.lstViewsTopChange...
   │   └TfrmLabs.tvReportsClick
   │     ├SaveColumnSizes
   │     ├TfrmLabs.HideTabControl
   │     ├TfrmLabs.ShowTabControl
   │     ├TfrmLabs.BlankWeb
   │     ├TfrmLabs.DisplayHeading
   │     │ └ValidDateTimeStr
   │     ├ColumnHeaders
   │     ├TLabRowObject.Clear
   │     ├TRemoteSite.LabClear
   │     ├TfrmLabs.CommonComponentVisible
   │     ├TfrmLabs.ChkBrowser
   │     │ └TfrmLabs.BlankWeb
   │     ├TfrmLabs.FormResize
   │     │ └TfrmLabs.AlignList
   │     ├TfrmLabs.cmdRecentClick
   │     │ ├TfrmLabs.GetInterimGrid
   │     │ │ ├GetNewestOldest
   │     │ │ ├InterimGrid
   │     │ │ ├LabPatchInstalled
   │     │ │ │ └ServerHasPatch
   │     │ │ ├TfrmLabs.FillGrid
   │     │ │ └TfrmLabs.FillComments
   │     │ └FMToday...
   │     ├SelectTests
   │     │ ├TfrmBase508Form.Create...
   │     │ ├SetFormPosition
   │     │ │ └TSizeHolder.GetSize
   │     │ └TfrmLabTests.lstListClick
   │     ├TfrmLabs.lstDatesClick
   │     │ ├TfrmLabs.DisplayHeading...
   │     │ ├TfrmLabs.ChkBrowser...
   │     │ ├TfrmLabs.FMToDateTime
   │     │ ├FMToday...
   │     │ ├TfrmLabs.BeginEndDates
   │     │ │ ├TfrmLabs.FMToDateTime
   │     │ │ └FMToday...
   │     │ ├TfrmLabs.BlankWeb
   │     │ ├TfrmLabs.GoRemoteOld
   │     │ │ ├TRemoteSite.LabClear
   │     │ │ ├TfrmLabs.UpdateRemoteStatus
   │     │ │ ├GetRemoteData
   │     │ │ ├RemoteLabReports
   │     │ │ ├RemoteLabCumulative
   │     │ │ ├RemoteLabInterim
   │     │ │ ├RemoteLabMicro
   │     │ │ └RemoteLab
   │     │ ├Cumulative
   │     │ ├Interim
   │     │ ├InterimSelect
   │     │ ├Worksheet
   │     │ ├TfrmLabs.HGrid
   │     │ │ └LabPatchInstalled...
   │     │ ├TfrmLabs.VGrid
   │     │ │ └LabPatchInstalled...
   │     │ ├TfrmLabs.GraphList
   │     │ ├TfrmLabs.GridComments
   │     │ ├TfrmLabs.ragCorGClick
   │     │ │ ├TfrmLabs.chk3DClick
   │     │ │ ├TfrmLabs.chkValuesClick
   │     │ │ └TfrmLabs.lstTestGraphClick
   │     │ │   └TfrmLabs.WorksheetChart
   │     │ │     ├TfrmLabs.GetStartStop
   │     │ │     ├OkFloatValue
   │     │ │     └TfrmLabs.FMToDateTime
   │     │ ├TfrmLabs.chkGraphZoomClick
   │     │ ├GetChart
   │     │ ├TfrmLabs.GraphChart
   │     │ │ └TfrmLabs.FMToDateTime
   │     │ ├Micro
   │     │ └Reports
   │     ├..(rec)..
   │     ├SelectTestGroups
   │     │ ├TfrmBase508Form.Create...
   │     │ └TfrmLabTestGroups.lstListClick
   │     │   └TfrmLabTestGroups.TestGroupEnable
   │     ├TfrmFrame.mnuToolsGraphingClick
   │     │ ├TfrmBase508Form.Create...
   │     │ ├TfrmGraphs.Initialize...
   │     │ ├TfrmGraphs.InitialRetain
   │     │ └..(rec)..
   │     ├SelectTest
   │     │ └TfrmBase508Form.Create...
   │     ├TfrmLabs.chkGraphZoomClick
   │     ├TfrmLabs.chkGraph3DClick
   │     ├TfrmLabs.chkGraphValuesClick
   │     ├TfrmLabs.GoRemoteOld...
   │     ├Reports
   │     ├TfrmLabs.GoRemote
   │     │ ├HDRActive
   │     │ ├StrToFMDateTime
   │     │ ├TRemoteSite.SetSelected
   │     │ ├TRemoteSite.ReportClear
   │     │ ├TfrmLabs.UpdateRemoteStatus
   │     │ ├TfrmLabs.LoadListView
   │     │ │ ├TLabRowObject.Add
   │     │ │ │ ├TCellObject.Create
   │     │ │ │ └TCellObject.Add
   │     │ │ └TUser.HasKey...
   │     │ ├GetRemoteData
   │     │ ├DirectQuery
   │     │ └RemoteQuery
   │     ├LoadReportText...
   │     ├ListReportDateRanges...
   │     ├TfrmLabs.lstQualifierClick
   │     │ ├TfrmLabs.DisplayHeading...
   │     │ ├TfrmLabs.FMToDateTime
   │     │ ├FMToday...
   │     │ ├TfrmLabs.BeginEndDates...
   │     │ ├TfrmLabs.BlankWeb
   │     │ ├TRemoteSite.ReportClear
   │     │ ├TLabRowObject.Clear
   │     │ ├TfrmLabs.GoRemote...
   │     │ ├LoadReportText...
   │     │ ├TfrmLabs.LoadListView...
   │     │ ├TfrmLabs.ShowTabControl
   │     │ ├TfrmLabs.GoRemoteOld...
   │     │ ├Cumulative
   │     │ ├Interim
   │     │ ├InterimSelect
   │     │ ├Worksheet
   │     │ ├TfrmLabs.HGrid...
   │     │ ├TfrmLabs.VGrid...
   │     │ ├TfrmLabs.GraphList
   │     │ ├TfrmLabs.GridComments
   │     │ ├TfrmLabs.ragCorGClick...
   │     │ ├TfrmLabs.chkGraphZoomClick
   │     │ ├GetChart
   │     │ ├TfrmLabs.GraphChart...
   │     │ ├Micro
   │     │ └Reports
   │     └TfrmLabs.LoadListView...
   ├TfrmFrame.DisplayEncounterText
   │ ├TEncounter.GetLocationText
   │ │ └TEncounter.UpdateText
   │ │   └GetEncounterText
   │ ├TEncounter.GetProviderName
   │ │ └TEncounter.UpdateText...
   │ └TfrmFrame.FitToolbar
   ├SetShareNode
   ├NotifyOtherApps
   │ ├AppNotificationEnabled
   │ │ └TNotifyAppsThread.CreateThread
   │ └TNotifyAppsThread.ResumeIfIdle
   ├MeansTestRequired
   ├HasLegacyData
   ├HasActiveFlg
   ├TriggerPRFPopUp
   ├ShowFlags
   │ ├TfrmBase508Form.Create...
   │ ├SetFormPosition...
   │ └TfrmFlags.PutFlagsOnLists
   ├TfrmCover.UpdateVAAButton
   ├ProcessPatientChangeEventHook
   │ ├GetPatientChangeGUIDs
   │ ├EnsureEventHookObjects
   │ │ └TCPRSEventHookManager.Create
   │ │   ├TCPRSBroker.Create
   │ │   └TCPRSState.Create
   │ └TCPRSEventHookManager.ProcessComObject
   │   └TCPRSBroker.Initialize
   └ShowPatientSelectMessages
     └TfrmBase508Form.Create...

Called-By Hierarchy


                  UpdatePatientInfoForAlert
               TfrmFrame.mnuFileNextClick┘ 
             TfrmFrame.mnuFileOpenClick┤   
                 TfrmFrame.UMInitiate┤ │   
        TfrmFrame.mnuFileNextClick...┤ │   
        TfrmFrame.mnuFileRefreshClick┤ │   
        TfrmOrders.CheckOrderStatus┤ │ │   
    TfrmOrders.mnuActChgEvntClick┤ │ │ │   
       TfrmOrders.mnuActHoldClick┤ │ │ │   
     TfrmOrders.mnuActUnholdClick┤ │ │ │   
      TfrmOrders.mnuActRenewClick┤ │ │ │   
     TfrmOrders.mnuActChangeClick┤ │ │ │   
       TfrmOrders.mnuActCopyClick┘ │ │ │   
             TfrmMeds.mnuActDCClick┤ │ │   
            TfrmMeds.CheckMedStatus┘ │ │   
         TfrmMeds.mnuActHoldClick┤   │ │   
        TfrmMeds.mnuActRenewClick┤   │ │   
       TfrmMeds.mnuActUnholdClick┤   │ │   
       TfrmMeds.mnuActChangeClick┤   │ │   
         TfrmMeds.mnuActCopyClick┤   │ │   
       TfrmMeds.mnuActRefillClick┘   │ │   
                   TfrmFrame.ViewInfo┘ │   
                TfrmDCSumm.ViewInfo┤   │   
              TfrmConsults.ViewInfo┤   │   
      TfrmFrame.pnlRemindersMouseUp┤   │   
       TfrmFrame.RemindersChanged┘ │   │   
           TfrmFrame.FormCreate┘   │   │   
             TfrmFrame.pnlCIRNClick┤   │   
       TfrmFrame.pnlVistaWebClick┤ │   │   
            TfrmFrame.FormKeyDown┘ │   │   
          TfrmFrame.pnlPatientClick┤   │   
            TfrmFrame.pnlVisitClick┤   │   
      TfrmFrame.pnlPrimaryCareClick┤   │   
        TfrmFrame.pnlRemindersClick┤   │   
         TfrmFrame.pnlPostingsClick┤   │   
             TfrmFrame.pnlFlagClick┤   │   
               TfrmFrame.laMHVClick┤   │   
              TfrmFrame.laVAA2Click┤   │   
                TfrmOrders.ViewInfo┤   │   
                  TfrmMeds.ViewInfo┤   │   
               TfrmSurgery.ViewInfo┤   │   
                 TfrmNotes.ViewInfo┤   │   
              TfrmProblems.ViewInfo┘   │   
      TfrmFrame.mnuFileNotifRemoveClick┤   
              TfrmFrame.NextButtonClick┘   
            TfrmFrame.SetUpNextButton┘     
      TfrmFrame.mnuFileOpenClick...┤       
               TfrmFrame.FormResize┘       
             TfrmFrame.ChangeFont┘         
     TfrmFrame.LoadSizesForUser┤           
TfrmFrame.LoadUserPreferences┘ │           
       TfrmFrame.UMInitiate┘   │           
     TfrmFrame.mnuFontSizeClick┘           

Calls

Name Declaration Comments
TEncounter.SetDateTime procedure SetDateTime(Value: TFMDateTime); -
TEncounter.SetInpatient procedure SetInpatient(Value: Boolean); -
TEncounter.SetLocation procedure SetLocation(Value: Integer); -
TEncounter.SetProvider procedure SetProvider(Value: Int64); -
TfrmFrame.SetupPatient procedure SetupPatient(AFlaggedList : TStringList = nil); -
TEncounter.SetVisitCategory procedure SetVisitCategory(Value: Char); -

Called-By

Name Declaration Comments
TfrmFrame.mnuFileNextClick procedure mnuFileNextClick(Sender: TObject); -


Source

1506  procedure UpdatePatientInfoForAlert;
1507  begin
1508    if Patient.Inpatient then
1509    begin
1510      Encounter.Inpatient := True;
1511      Encounter.Location := Patient.Location;
1512      Encounter.DateTime := Patient.AdmitTime;
1513      Encounter.VisitCategory := 'H';
1514    end;
1515    if User.IsProvider then Encounter.Provider := User.DUZ;
1516    SetupPatient(FlaggedPTList);
1517    if (FlaggedPTList.IndexOf(Patient.DFN) < 0) then
1518      FlaggedPTList.Add(Patient.DFN);
1519  end;