Function

ActivateOrderDialog

Module

uOrders

Last Modified

7/15/2014 3:26:42 PM

Comments

CsltFrmID: integer;

Scope

Interfaced

Declaration

function ActivateOrderDialog(const AnID: string; AnEvent: TOrderDelayEvent;
  AnOwner: TComponent; ARefNum: Integer; ANeedVerify: boolean = True): Boolean;

Calls Hierarchy


ActivateOrderDialog
 ├ValidateOrderAction
 ├ValidateComplexOrderAct
 ├RetrieveOrderText
 │ └RetrieveOrderFields
 │   └SetOrderFields
 │     ├TOrder.Clear
 │     ├SeqOfDGroup
 │     │ └LoadDGroupMap
 │     └TopNameOfDGroup
 │       └LoadDGroupMap
 ├PassDrugTest
 ├IMOActionValidation
 │ ├IsIMOOrder
 │ ├AllowActionOnIMO
 │ │ ├FMToday
 │ │ │ └FMNow
 │ │ ├IsValidIMOLoc
 │ │ └IMOTimeFrame
 │ │   └FMNow
 │ ├RetrieveOrderText...
 │ └UnlockOrder
 ├IsIMODialog
 │ ├IMOTimeFrame...
 │ ├IsInptQO
 │ ├IsIVQO
 │ └IsValidIMOLoc
 ├GetOrderPtEvtID
 ├EventInfo
 ├BuildResponses
 │ ├CheckQOGroup
 │ └CheckOrderGroup
 ├GetKeyVars
 ├ResetDialogProperties
 │ └IsPassEvt
 ├IsValidQOSch
 ├IsValidSchedule
 ├HasTemplateField
 ├CheckForAutoDCDietOrders
 │ ├LoadOrdersAbbr
 │ │ ├ClearOrders
 │ │ ├LoadDGroupMap
 │ │ ├ExpiredOrdersStartDT
 │ │ ├FMNow
 │ │ └SeqOfDGroup...
 │ └RetrieveOrderFields...
 ├ShowVerifyText
 │ ├TfrmBase508Form.Create
 │ │ ├TfrmBase508Form.UpdateAccessibilityActions
 │ │ ├UnfocusableControlEnter
 │ │ └AdjustControls
 │ │   ├TfrmBase508Form.ModifyUnfocusableControl
 │ │   └..(rec)..
 │ ├CutoffOutptPrompts
 │ ├SetFormPosition
 │ │ └TSizeHolder.GetSize
 │ └ExpandOrderObjects
 │   ├TdmodShared.BoilerplateOK
 │   │ ├ErrCount
 │   │ ├AddErr
 │   │ └TdmodShared.LoadTIUObjects
 │   │   └GetObjectList
 │   └GetTemplateText
 │     └TEncounter.GetVisitStr
 │       └TEncounter.GetVisitCategory
 ├PushKeyVars
 ├CreateOrderDialog
 │ ├SetOrderEventTypeOnCreate
 │ ├SetOrderEventIDOnCreate
 │ ├SetOrderFormIDOnCreate
 │ ├UseNewMedDialogs
 │ ├TfrmBase508Form.Create...
 │ └DestroyingOrderDialog
 │   ├ActiveOrdering
 │   ├ClearOrderRecall
 │   └UnlockIfAble
 │     └UnlockPatient
 ├DoesOIPIInSigForQO
 ├TfrmODBase.SetKeyVariables
 ├TResponses.SetEventDelay
 ├TfrmODBase.SetDisplayGroup
 ├TfrmODBase.SetDialogIEN
 ├TfrmODBase.SetupDialog
 │ ├SetTemplateDialogCanceled
 │ ├TResponses.SetEditOrder
 │ │ ├TResponses.Clear
 │ │ └LoadResponses
 │ │   └ExtractToResponses
 │ │     └ExpandOrderObjects...
 │ ├TResponses.SetCopyOrder
 │ │ ├TResponses.Clear
 │ │ └LoadResponses...
 │ └TResponses.SetQuickOrderByID
 │   ├TResponses.Clear
 │   └LoadResponses...
 ├TResponses.IValueFor
 ├GetPackageByOrderID
 ├DEACheckFailed
 ├TResponses.GetOrderText
 │ ├TResponses.NextInstance
 │ ├TResponses.FindResponseByName
 │ ├TResponses.FormatResponse
 │ │ └TResponses.FindResponseByIEN
 │ └TResponses.AppendChildren
 │   ├TResponses.FindPromptByIEN
 │   ├TResponses.FindResponseByIEN
 │   └TResponses.FormatResponse...
 ├TfrmFrame.mnuFileEncounterClick
 │ ├UpdateEncounter
 │ │ ├ExternalName
 │ │ ├TfrmBase508Form.Create...
 │ │ ├ReviewChanges
 │ │ │ ├TfrmBase508Form.Create...
 │ │ │ ├TfrmReview.CleanupChangesList
 │ │ │ ├TfrmReview.BuildFullList
 │ │ │ │ └TfrmReview.BuildList
 │ │ │ │   ├TSigItems.ResetOrders
 │ │ │ │   ├TfrmReview.AddHeader
 │ │ │ │   ├TfrmReview.AddItem
 │ │ │ │   ├rpcBuildSCIEList
 │ │ │ │   ├CompleteUnsignedBillingInfo
 │ │ │ │   │ ├InitializeUnsignedOrderRec
 │ │ │ │   │ ├LoadUnsignedOrderRec
 │ │ │ │   │ ├tempDxNodeExists
 │ │ │ │   │ ├SimpleAddTempDxList
 │ │ │ │   │ │ └TfrmBALocalDiagnoses.LoadTempRec
 │ │ │ │   │ │   ├TfrmFrame.GetTimedOut
 │ │ │ │   │ │   │ └TimedOut
 │ │ │ │   │ │   ├InitializeNewDxRec
 │ │ │ │   │ │   └StripTFactors
 │ │ │ │   │ ├PutBADxListForOrder
 │ │ │ │   │ ├GetBADxListForOrder
 │ │ │ │   │ └BuildSaveUnsignedList
 │ │ │ │   │   └SaveBillingData
 │ │ │ │   │     ├AttachDxToOrderList
 │ │ │ │   │     │ ├InitializeNewDxRec
 │ │ │ │   │     │ └GetBADxListForOrder
 │ │ │ │   │     └rpcSaveCIDCData
 │ │ │ │   │       └VerifyOrderIdExists
 │ │ │ │   ├rpcGetUnsignedOrdersBillingData
 │ │ │ │   ├IsPendingHold
 │ │ │ │   ├TSigItems.Add
 │ │ │ │   ├GetPKISite
 │ │ │ │   ├GetPKIUse
 │ │ │ │   ├DEACheckFailedAtSignature
 │ │ │ │   ├GetOrderableIen
 │ │ │ │   ├TfrmReview.AddCSHeader
 │ │ │ │   ├TfrmReview.AddCSItem
 │ │ │ │   ├TChanges.CanSign
 │ │ │ │   ├TfrmReview.SignRequiredForAny
 │ │ │ │   │ └AnyOrdersRequireSignature
 │ │ │ │   ├TfrmReview.ItemsAreChecked
 │ │ │ │   ├TfrmReview.AnyItemsAreChecked
 │ │ │ │   │ ├TfrmReview.ItemsAreChecked
 │ │ │ │   │ └TfrmReview.CSItemsAreChecked
 │ │ │ │   ├TfrmReview.txtESCodeChange
 │ │ │ │   │ └TfrmReview.AnyItemsAreChecked...
 │ │ │ │   ├GetUserParam
 │ │ │ │   ├TfrmReview.radReleaseClick
 │ │ │ │   ├TfrmReview.AdjustSignatureTop
 │ │ │ │   ├TSigItems.ClearDrawItems
 │ │ │ │   ├TSigItems.ClearFcb
 │ │ │ │   ├TSigItems.UpdateListBox
 │ │ │ │   │ ├notRightOne
 │ │ │ │   │ ├IsOrderBillable
 │ │ │ │   │ │ └PrepOrderID
 │ │ │ │   │ ├RemoveOrderFromDxList
 │ │ │ │   │ │ └tempDxNodeExists
 │ │ │ │   │ ├rpcGetSC4Orders
 │ │ │ │   │ ├OrderRequiresSCEI
 │ │ │ │   │ ├GetUnsignedOrderFlags
 │ │ │ │   │ ├GetConsultFlags
 │ │ │ │   │ │ └SetConsultFlags
 │ │ │ │   │ ├TSigItems.cbClicked
 │ │ │ │   │ │ └TSigItems.TagToItem
 │ │ │ │   │ ├SigItemHeight
 │ │ │ │   │ ├TSigItems.lbDrawItem
 │ │ │ │   │ │ └TSigItems.TagToItem
 │ │ │ │   │ ├CreateCB
 │ │ │ │   │ │ ├TSigItems.cbClicked...
 │ │ │ │   │ │ ├TSigItems.cbEnter
 │ │ │ │   │ │ └TSigItems.cbExit
 │ │ │ │   │ ├TSigItems.ItemToTag
 │ │ │ │   │ ├TSigItems.TagInfo
 │ │ │ │   │ └TSigItems.TagToItem
 │ │ │ │   └TfrmReview.lstReviewMeasureItem
 │ │ │ │     └SigItemHeight
 │ │ │ ├TfrmReview.cmdOKClick
 │ │ │ │ ├TfrmReview.AnyItemsAreChecked...
 │ │ │ │ ├ValidESCode
 │ │ │ │ ├ValidateOrderActionNature
 │ │ │ │ ├IsInvalidActionWarning
 │ │ │ │ │ ├IsLatestAction
 │ │ │ │ │ └ReportBox
 │ │ │ │ │   └CreateReportBox
 │ │ │ │ │     └TfrmBase508Form.Create...
 │ │ │ │ ├SignatureForItem
 │ │ │ │ │ └TfrmBase508Form.Create...
 │ │ │ │ ├PersonHasKey
 │ │ │ │ ├SaveUnsignedOrders
 │ │ │ │ ├TfrmReview.GetCheckBoxStatus
 │ │ │ │ │ └TSigItems.GetSigItems
 │ │ │ │ ├OrderRequiresSignature
 │ │ │ │ ├ExecuteSessionOrderChecks
 │ │ │ │ │ ├OrderChecksForSession
 │ │ │ │ │ ├TfrmBase508Form.Create...
 │ │ │ │ │ ├IsMonograph
 │ │ │ │ │ ├TOCRec.Create
 │ │ │ │ │ ├TextForOrder
 │ │ │ │ │ ├GetXtraTxt
 │ │ │ │ │ ├TfrmOCSession.SetReqJustify
 │ │ │ │ │ └TfrmFrame.SetActiveTab
 │ │ │ │ │   ├TfrmFrame.PageIDToTab
 │ │ │ │ │   └TfrmFrame.tabPageChange
 │ │ │ │ │     ├TfrmFrame.TabToPageID
 │ │ │ │ │     ├TfrmFrame.SwitchToPage
 │ │ │ │ │     └SpeakPatient
 │ │ │ │ ├IsUserNurseProvider
 │ │ │ │ │ └PersonHasKey
 │ │ │ │ ├TSigItems.OK2SaveSettings
 │ │ │ │ ├SetSAN
 │ │ │ │ │ ├tCryptography.Create
 │ │ │ │ │ │ ├tCryptography.Reset
 │ │ │ │ │ │ ├sCardReady
 │ │ │ │ │ │ │ ├SCardEstablishContext
 │ │ │ │ │ │ │ ├SCardListReadersA
 │ │ │ │ │ │ │ └SCardConnectA
 │ │ │ │ │ │ ├tCryptography.RaiseErr
 │ │ │ │ │ │ ├CryptAcquireContext
 │ │ │ │ │ │ └CryptGetProvParam
 │ │ │ │ │ └getSANFromCard
 │ │ │ │ │   ├checkPINValue
 │ │ │ │ │   │ ├sCardReady...
 │ │ │ │ │   │ ├CryptAcquireContext
 │ │ │ │ │   │ ├setPINValue
 │ │ │ │ │   │ │ ├CryptAcquireContext
 │ │ │ │ │   │ │ ├CryptSetProvParam
 │ │ │ │ │   │ │ └CryptReleaseContext
 │ │ │ │ │   │ └CryptReleaseContext
 │ │ │ │ │   └tCryptography.FindCert
 │ │ │ │ │     ├CertOpenSystemStore
 │ │ │ │ │     ├CertEnumCertificatesInStore
 │ │ │ │ │     ├CertGetNameString
 │ │ │ │ │     ├SerialNum
 │ │ │ │ │     ├CertDateTimeStr
 │ │ │ │ │     ├tCryptography.SigningCert
 │ │ │ │ │     │ └CertGetIntendedKeyUsage
 │ │ │ │ │     ├CertVerifyTimeValidity
 │ │ │ │ │     ├CertFindExtension
 │ │ │ │ │     ├tCryptography.CRLDistPoint
 │ │ │ │ │     │ └CryptDecodeObject
 │ │ │ │ │     ├Revco
 │ │ │ │ │     │ └CertVerifyRevocation
 │ │ │ │ │     └tCryptography.CertChainCheck
 │ │ │ │ │       ├CertCreateCertificateChainEngine
 │ │ │ │ │       ├Memo
 │ │ │ │ │       ├tCryptography.RaiseErr
 │ │ │ │ │       ├CertGetCertificateChain
 │ │ │ │ │       └SetStatus
 │ │ │ │ │         └Memo
 │ │ │ │ ├checkPINValue...
 │ │ │ │ ├tCryptography.Create...
 │ │ │ │ ├Piece2end
 │ │ │ │ ├tCryptography.Reset
 │ │ │ │ ├Log2File
 │ │ │ │ ├StoreDigitalSig
 │ │ │ │ ├UpdateOrderDGIfNeeded
 │ │ │ │ │ ├TPatient.Clear
 │ │ │ │ │ └TPatient.SetDFN
 │ │ │ │ │   ├TPatient.Clear
 │ │ │ │ │   └SelectPatient
 │ │ │ │ │     └FormatSSN
 │ │ │ │ ├BuildSaveUnsignedList...
 │ │ │ │ ├OrdersToBeSignedOrReleased
 │ │ │ │ ├BADxEntered
 │ │ │ │ │ ├IsOrderBillable...
 │ │ │ │ │ ├rpcOrderRequiresDx
 │ │ │ │ │ ├OrdersHaveDx
 │ │ │ │ │ │ ├InitializeNewDxRec
 │ │ │ │ │ │ ├tempDxNodeExists
 │ │ │ │ │ │ └GetBADxListForOrder
 │ │ │ │ │ └SaveBillingData...
 │ │ │ │ ├LockedForOrdering
 │ │ │ │ │ └LockPatient
 │ │ │ │ ├TfrmFrame.GetTimedOut...
 │ │ │ │ ├TfrmPrintLocation.rpcIsPatientOnWard
 │ │ │ │ ├TEncounter.GetLocationName
 │ │ │ │ │ └TEncounter.UpdateText
 │ │ │ │ │   └GetEncounterText
 │ │ │ │ ├TEncounter.GetLocationText
 │ │ │ │ │ └TEncounter.UpdateText...
 │ │ │ │ ├TEncounter.GetVisitCategory
 │ │ │ │ ├TfrmPrintLocation.PrintLocation
 │ │ │ │ │ ├TfrmBase508Form.Create...
 │ │ │ │ │ ├CurrentLocationForPatient
 │ │ │ │ │ ├TfrmPrintLocation.ProcessClinicOrders
 │ │ │ │ │ │ └TfrmPrintLocation.rpcChangeOrderLocation
 │ │ │ │ │ ├TEncounter.EncounterSwitch
 │ │ │ │ │ │ ├TEncounter.SetLocation
 │ │ │ │ │ │ ├TEncounter.SetVisitCategory
 │ │ │ │ │ │ └TEncounter.SetDateTime
 │ │ │ │ │ └TfrmFrame.DisplayEncounterText
 │ │ │ │ │   ├TEncounter.GetLocationText...
 │ │ │ │ │   ├TEncounter.GetProviderName
 │ │ │ │ │   │ └TEncounter.UpdateText...
 │ │ │ │ │   └TfrmFrame.FitToolbar
 │ │ │ │ ├TfrmPrintLocation.SwitchEncounterLoction
 │ │ │ │ │ ├TfrmBase508Form.Create...
 │ │ │ │ │ ├CurrentLocationForPatient
 │ │ │ │ │ ├TEncounter.SetLocation
 │ │ │ │ │ ├TfrmFrame.DisplayEncounterText...
 │ │ │ │ │ └TEncounter.EncounterSwitch...
 │ │ │ │ ├CurrentLocationForPatient
 │ │ │ │ ├TSigItems.SaveSettings
 │ │ │ │ │ └SaveCoPayStatus
 │ │ │ │ ├SendOrders
 │ │ │ │ ├TChanges.Locate
 │ │ │ │ ├NotifyOtherApps
 │ │ │ │ │ ├AppNotificationEnabled
 │ │ │ │ │ │ └TNotifyAppsThread.CreateThread
 │ │ │ │ │ └TNotifyAppsThread.ResumeIfIdle
 │ │ │ │ ├OrdersSignedOrReleased
 │ │ │ │ ├GetOrderStatus
 │ │ │ │ ├CheckForChangeFromLCtoWCOnRelease
 │ │ │ │ │ └FormatLCtoWCDisplayTextOnRelease
 │ │ │ │ │   └GetLCtoWCInstructions
 │ │ │ │ ├ReportBox...
 │ │ │ │ ├PrintOrdersOnSignReleaseMult
 │ │ │ │ │ └PrintOrdersOnSignRelease
 │ │ │ │ │   ├CurrentLocationForPatient
 │ │ │ │ │   ├TEncounter.SetLocation
 │ │ │ │ │   ├CommonLocationForOrders
 │ │ │ │ │   ├LookupLocation
 │ │ │ │ │   │ └TfrmBase508Form.Create...
 │ │ │ │ │   ├TfrmFrame.DisplayEncounterText...
 │ │ │ │ │   ├SetupOrdersPrint
 │ │ │ │ │   │ ├TfrmBase508Form.Create...
 │ │ │ │ │   │ ├OrderPrintDeviceInfo
 │ │ │ │ │   │ └TfrmOrdersPrint.SetupControls
 │ │ │ │ │   │   └TfrmOrdersPrint.SetupPrompting
 │ │ │ │ │   ├PrintOrdersOnReview
 │ │ │ │ │   └PrintServiceCopies
 │ │ │ │ ├PrintOrdersOnSignRelease...
 │ │ │ │ ├UpdateUnsignedOrderAlerts
 │ │ │ │ ├TNotifications.GetFollowUp
 │ │ │ │ ├UnsignedOrderAlertFollowup
 │ │ │ │ ├UpdateExpiringMedAlerts
 │ │ │ │ ├UpdateUnverifiedMedAlerts
 │ │ │ │ ├UpdateUnverifiedOrderAlerts
 │ │ │ │ ├TfrmNotes.SaveSignItem
 │ │ │ │ │ ├TfrmFrame.GetTimedOut...
 │ │ │ │ │ ├TfrmNotes.SaveCurrentNote
 │ │ │ │ │ │ └TfrmNotes.SaveEditedNote
 │ │ │ │ │ │   ├TfrmNotes.tvNotesChange
 │ │ │ │ │ │   │ ├CanBeAttached
 │ │ │ │ │ │   │ ├CanReceiveAttachment
 │ │ │ │ │ │   │ ├TraverseTree
 │ │ │ │ │ │   │ │ ├ContextMatch
 │ │ │ │ │ │   │ │ ├TextFound
 │ │ │ │ │ │   │ │ ├AddListViewItem
 │ │ │ │ │ │   │ │ └..(rec)..
 │ │ │ │ │ │   │ ├TfrmNotes.lvNotesSelectItem
 │ │ │ │ │ │   │ │ └TfrmNotes.lstNotesClick
 │ │ │ │ │ │   │ │   ├UpdateReminderFinish
 │ │ │ │ │ │   │ │   │ └TfrmRemDlg.UpdateButtons
 │ │ │ │ │ │   │ │   │   ├TfrmRemDlg.BackReminder
 │ │ │ │ │ │   │ │   │   │ └TfrmRemDlg.GetCurReminderList
 │ │ │ │ │ │   │ │   │   │   └TReminderDialog.GetIEN
 │ │ │ │ │ │   │ │   │   └TfrmRemDlg.NextReminder
 │ │ │ │ │ │   │ │   │     └TfrmRemDlg.GetCurReminderList...
 │ │ │ │ │ │   │ │   ├TfrmNotes.UpdateFormForInput
 │ │ │ │ │ │   │ │   │ └TimedOut
 │ │ │ │ │ │   │ │   ├LoadDocumentText
 │ │ │ │ │ │   │ │   ├TfrmReminderTree.EnableActions
 │ │ │ │ │ │   │ │   │ ├ReminderDialogActive
 │ │ │ │ │ │   │ │   │ ├NewRemCoverSheetListActive
 │ │ │ │ │ │   │ │   │ └CanEditAllRemCoverSheetLists
 │ │ │ │ │ │   │ │   │   └HasMenuOptionAccess
 │ │ │ │ │ │   │ │   ├TfrmNotes.DisplayPCE
 │ │ │ │ │ │   │ │   │ ├TPCEData.AddStrData
 │ │ │ │ │ │   │ │   │ │ ├Add
 │ │ │ │ │ │   │ │   │ │ ├TPCEData.StrVisitType
 │ │ │ │ │ │   │ │   │ │ │ ├GetPCEDataText
 │ │ │ │ │ │   │ │   │ │ │ │ └GetDiagnosisText
 │ │ │ │ │ │   │ │   │ │ │ ├TPCEProc.ModText
 │ │ │ │ │ │   │ │   │ │ │ │ └ModifierName
 │ │ │ │ │ │   │ │   │ │ │ │   └ModifierIdx
 │ │ │ │ │ │   │ │   │ │ │ │     ├TPCEData.VisitDateTime
 │ │ │ │ │ │   │ │   │ │ │ │     │ └TPCEData.IsSecondaryVisit
 │ │ │ │ │ │   │ │   │ │ │ │     ├FMToday...
 │ │ │ │ │ │   │ │   │ │ │ │     └MixedCaseModifier
 │ │ │ │ │ │   │ │   │ │ │ └TPCEData.StrVisitType
 │ │ │ │ │ │   │ │   │ │ │   └AddTxt
 │ │ │ │ │ │   │ │   │ │ ├TPCEData.StrDiagnoses
 │ │ │ │ │ │   │ │   │ │ │ └GetPCEDataText...
 │ │ │ │ │ │   │ │   │ │ ├TPCEData.StrProcedures
 │ │ │ │ │ │   │ │   │ │ │ ├GetPCEDataText...
 │ │ │ │ │ │   │ │   │ │ │ └TPCEProc.ModText...
 │ │ │ │ │ │   │ │   │ │ ├TPCEData.StrImmunizations
 │ │ │ │ │ │   │ │   │ │ │ └GetPCEDataText...
 │ │ │ │ │ │   │ │   │ │ ├TPCEData.StrSkinTests
 │ │ │ │ │ │   │ │   │ │ │ └GetPCEDataText...
 │ │ │ │ │ │   │ │   │ │ ├TPCEData.StrPatientEds
 │ │ │ │ │ │   │ │   │ │ │ └GetPCEDataText...
 │ │ │ │ │ │   │ │   │ │ ├TPCEData.StrHealthFactors
 │ │ │ │ │ │   │ │   │ │ │ └GetPCEDataText...
 │ │ │ │ │ │   │ │   │ │ └TPCEData.StrExams
 │ │ │ │ │ │   │ │   │ │   └GetPCEDataText...
 │ │ │ │ │ │   │ │   │ ├GetVitalsFromDate
 │ │ │ │ │ │   │ │   │ │ ├TPCEData.IsSecondaryVisit
 │ │ │ │ │ │   │ │   │ │ └GetVitalsFromEncDateTime
 │ │ │ │ │ │   │ │   │ ├TPCEData.AddVitalData
 │ │ │ │ │ │   │ │   │ │ └FormatVitalForNote
 │ │ │ │ │ │   │ │   │ │   └ConvertVitalData
 │ │ │ │ │ │   │ │   │ ├TfrmNotes.ShowPCEButtons
 │ │ │ │ │ │   │ │   │ │ ├TfrmFrame.GetTimedOut...
 │ │ │ │ │ │   │ │   │ │ ├AnytimeEncounters
 │ │ │ │ │ │   │ │   │ │ ├CanEditPCE
 │ │ │ │ │ │   │ │   │ │ │ ├GetAskPCE
 │ │ │ │ │ │   │ │   │ │ │ └FutureEncounter
 │ │ │ │ │ │   │ │   │ │ │   └FMToday...
 │ │ │ │ │ │   │ │   │ │ └GetAskPCE
 │ │ │ │ │ │   │ │   │ ├TfrmNotes.ShowPCEControls
 │ │ │ │ │ │   │ │   │ ├InteractiveRemindersActive
 │ │ │ │ │ │   │ │   │ │ └GetRemindersActive
 │ │ │ │ │ │   │ │   │ ├GetReminderStatus
 │ │ │ │ │ │   │ │   │ ├FutureEncounter...
 │ │ │ │ │ │   │ │   │ ├TfrmDrawers.DisplayDrawers
 │ │ │ │ │ │   │ │   │ │ ├TfrmDrawers.EnableDrawers
 │ │ │ │ │ │   │ │   │ │ │ ├TfrmDrawers.EnableDrawer
 │ │ │ │ │ │   │ │   │ │ │ │ ├TfrmDrawers.GetDrawerControls
 │ │ │ │ │ │   │ │   │ │ │ │ ├TfrmDrawers.OpenDrawer
 │ │ │ │ │ │   │ │   │ │ │ │ │ ├TfrmDrawers.StartInternalResize
 │ │ │ │ │ │   │ │   │ │ │ │ │ ├TfrmDrawers.GetDrawerControls
 │ │ │ │ │ │   │ │   │ │ │ │ │ ├TfrmDrawers.SetSplitterActive
 │ │ │ │ │ │   │ │   │ │ │ │ │ ├TfrmDrawers.EndInternalResize
 │ │ │ │ │ │   │ │   │ │ │ │ │ └TfrmDrawers.ResizeToVisible
 │ │ │ │ │ │   │ │   │ │ │ │ │   ├AllCtrls
 │ │ │ │ │ │   │ │   │ │ │ │ │   │ └TfrmDrawers.GetDrawerControls
 │ │ │ │ │ │   │ │   │ │ │ │ │   ├TfrmDrawers.GetDrawerControls
 │ │ │ │ │ │   │ │   │ │ │ │ │   ├TfrmDrawers.ButtonHeights
 │ │ │ │ │ │   │ │   │ │ │ │ │   ├TfrmDrawers.MinDrawerControlHeight
 │ │ │ │ │ │   │ │   │ │ │ │ │   ├TfrmDrawers.StartInternalResize
 │ │ │ │ │ │   │ │   │ │ │ │ │   └TfrmDrawers.EndInternalResize
 │ │ │ │ │ │   │ │   │ │ │ │ └TfrmDrawers.ResizeToVisible...
 │ │ │ │ │ │   │ │   │ │ │ └TfrmDrawers.ResizeToVisible...
 │ │ │ │ │ │   │ │   │ │ ├TfrmDrawers.ShowDrawers
 │ │ │ │ │ │   │ │   │ │ │ ├TfrmDrawers.OpenDrawer...
 │ │ │ │ │ │   │ │   │ │ │ ├TfrmDrawers.GetDrawerControls
 │ │ │ │ │ │   │ │   │ │ │ ├TfrmDrawers.ResizeToVisible...
 │ │ │ │ │ │   │ │   │ │ │ ├NotifyWhenRemindersChange
 │ │ │ │ │ │   │ │   │ │ │ ├TfrmDrawers.RemindersChanged
 │ │ │ │ │ │   │ │   │ │ │ │ ├TfrmDrawers.EnableDrawer...
 │ │ │ │ │ │   │ │   │ │ │ │ ├GetReminderStatus
 │ │ │ │ │ │   │ │   │ │ │ │ ├BuildReminderTree
 │ │ │ │ │ │   │ │   │ │ │ │ │ ├GetImageIndex
 │ │ │ │ │ │   │ │   │ │ │ │ │ ├RemContextPopup
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ ├ReminderMenu
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ ├SetReminderPopupDlgRoutine
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │ └ReminderTreePopupDlg
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │   └ReminderMenuBuilder
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     ├Add
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ ├ReminderClinMaintClicked
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │ ├ReportBox...
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │ ├DetailReminder
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │ │ └InteractiveRemindersActive...
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │ └ReminderName
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │   └TReminderDialog.GetPrintName
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ ├ReminderEduClicked
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │ ├ReportBox...
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │ └EducationTopicDetail
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ ├ReminderInqClicked
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │ ├ReportBox...
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │ ├ReminderInquiry
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │ └ReminderName...
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ ├ReminderWebClicked
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │ ├GotoWebPage
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │ └GetWebPageAddress
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ ├ReminderEvalClicked
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │ └EvalReminder
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │   ├EvaluateReminder
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │   │ └EvaluateReminders
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │   ├ReminderEvaluated
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │   └ReminderName...
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ ├ReminderViewFolderClicked
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │ ├GetRemFolders
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │ │ └GetReminderFolders
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │ └SetRemFolders
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │   ├BeginReminderUpdate
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │   ├SetReminderFolders
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ │   └EndReminderUpdate
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ ├GetRemFolders...
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ └ReminderIconLegendClicked
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │   └ShowIconLegend
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │     ├TfrmBase508Form.Create...
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │     ├TfrmFrame.TabExists
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │     ├TfrmIconLegend.ShowTab
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │     └TfrmIconLegend.SetFontSize
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │       └TfrmIconLegend.SnapLabels
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     ├GetEducationTopics
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ ├GetEducationTopicsForReminder
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ └GetEducationSubtopics
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     ├AddEducationTopics
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ ├GetEducationTopics...
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ ├Add...
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ └..(rec)..
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     ├GetWebPages
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     │ └GetReminderWebPages
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │     └AddWebPages
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │       ├Add...
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ │       └GetWebPageName
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │ └SetReminderPopupRoutine
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │   └ReminderTreePopup
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ │     └ReminderMenuBuilder...
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ └EvaluateCategoryClicked
 │ │ │ │ │ │   │ │   │ │ │ │ │ │   ├BeginReminderUpdate
 │ │ │ │ │ │   │ │   │ │ │ │ │ │   ├CheckReminders
 │ │ │ │ │ │   │ │   │ │ │ │ │ │   │ ├EvaluateReminders
 │ │ │ │ │ │   │ │   │ │ │ │ │ │   │ └ReminderEvaluated
 │ │ │ │ │ │   │ │   │ │ │ │ │ │   └EndReminderUpdate
 │ │ │ │ │ │   │ │   │ │ │ │ │ ├GetRemFolders...
 │ │ │ │ │ │   │ │   │ │ │ │ │ ├Add2Tree
 │ │ │ │ │ │   │ │   │ │ │ │ │ │ └GetRemFolders...
 │ │ │ │ │ │   │ │   │ │ │ │ │ ├TReminderDialog.GetIEN
 │ │ │ │ │ │   │ │   │ │ │ │ │ ├TReminderDialog.GetPrintName
 │ │ │ │ │ │   │ │   │ │ │ │ │ ├TReminder.GetDueDateStr
 │ │ │ │ │ │   │ │   │ │ │ │ │ ├TReminder.GetLastDateStr
 │ │ │ │ │ │   │ │   │ │ │ │ │ ├TReminder.GetStatus
 │ │ │ │ │ │   │ │   │ │ │ │ │ └TReminderDialog.Processing
 │ │ │ │ │ │   │ │   │ │ │ │ │   └CheckItem
 │ │ │ │ │ │   │ │   │ │ │ │ │     ├ChildrenChecked
 │ │ │ │ │ │   │ │   │ │ │ │ │     │ └CheckItem...
 │ │ │ │ │ │   │ │   │ │ │ │ │     └TRemDlgElement.Add2PN
 │ │ │ │ │ │   │ │   │ │ │ │ │       ├TRemDlgElement.ElemType
 │ │ │ │ │ │   │ │   │ │ │ │ │       └TRemDlgElement.AddData
 │ │ │ │ │ │   │ │   │ │ │ │ │         ├TRemDlgElement.Historical
 │ │ │ │ │ │   │ │   │ │ │ │ │         ├TPCEData.VisitDateTime...
 │ │ │ │ │ │   │ │   │ │ │ │ │         ├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...
 │ │ │ │ │ │   │ │   │ │ │ │ │         │ │ ├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...
 │ │ │ │ │ │   │ │   │ │ │ │ │         │ │ │ ├TRemPrompt.GetValue...
 │ │ │ │ │ │   │ │   │ │ │ │ │         │ │ │ └TRemDlgElement.Historical
 │ │ │ │ │ │   │ │   │ │ │ │ │         │ │ └GetPCEDataText...
 │ │ │ │ │ │   │ │   │ │ │ │ │         │ ├TRemDlgElement.Historical
 │ │ │ │ │ │   │ │   │ │ │ │ │         │ └TPCEData.VisitDateTime...
 │ │ │ │ │ │   │ │   │ │ │ │ │         ├TRemDlgElement.ElemType
 │ │ │ │ │ │   │ │   │ │ │ │ │         └..(rec)..
 │ │ │ │ │ │   │ │   │ │ │ │ └TfrmDrawers.tvRemindersMouseUp
 │ │ │ │ │ │   │ │   │ │ │ │   ├ViewReminderDialog
 │ │ │ │ │ │   │ │   │ │ │ │   │ ├ViewRemDlg
 │ │ │ │ │ │   │ │   │ │ │ │   │ │ └ViewRemDlgFromForm
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   ├TfrmNotes.AssignRemForm
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ ├TfrmNotes.CanFinishReminder
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ └TfrmNotes.DisplayPCE...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   ├FutureEncounter...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   ├TfrmConsults.AssignRemForm
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ ├TfrmConsults.CanFinishReminder
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ └TfrmConsults.DisplayPCE
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├TPCEData.AddStrData...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├GetVitalsFromDate...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├TPCEData.AddVitalData...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├CanEditPCE...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├TfrmConsults.ShowPCEControls
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├InteractiveRemindersActive...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├GetReminderStatus
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├TfrmDrawers.DisplayDrawers...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├TfrmDrawers.DisplayDrawers
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ └..(rec)..
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├ActOnDocument
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├TPCEData.PCEForNote
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├TEncounter.GetVisitStr...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├VisitStrForNote
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├TPCEData.GetVisitString
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ └TPCEData.VisitDateTime...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├TPCEData.CopyPCEData
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TPCEData.Clear
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ ├ClearList
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ ├TPCEProc.Clear
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │ └TPCEItem.Clear
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │   └TPCEItem.SetComment
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ └TPCEProviderList.Clear
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   └TPCEProviderList.GetPrimaryIdx
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TPCEProc.CopyProc
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ └TPCEItem.SetComment
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TPCEProviderList.Assign
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ └TPCEData.CopyPCEItems
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │   └TPCEItem.Assign
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │     └TPCEItem.SetComment
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├TPCEData.IsSecondaryVisit
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├GetLocSecondaryVisitCode
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├TPCEData.Clear...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├LoadPCEDataForNote
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├ListVisitTypeByLoc
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├SetRPCEncLocation
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├SCCValue
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├TPCEProviderList.Add
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TPCEProviderList.GetPrimaryIdx
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TPCEProviderList.IndexOfProvider
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ └TPCEProviderList.SetPrimaryIdx
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │   ├TPCEProviderList.GetPrimaryIdx
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │   └TPCEProviderList.SetPrimary
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├AppendComment
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├TPCEDiag.SetFromString
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ └TPCEItem.SetFromString
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │   └TPCEItem.SetComment
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├TPCEProc.SetFromString
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ └TPCEItem.SetFromString...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├TPCEImm.SetFromString
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ └TPCEItem.SetFromString...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├TPCESkin.SetFromString
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TPCEItem.SetFromString...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ └StrToFMDateTime
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├TPCEPat.SetFromString
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ └TPCEItem.SetFromString...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├TPCEHealth.SetFromString
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ └TPCEItem.SetFromString...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ └TPCEExams.SetFromString
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │   └TPCEItem.SetFromString...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   └GetVitalsFromNote
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     ├TPCEData.IsSecondaryVisit
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     ├GetVitalsFromEncDateTime
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     └GetVitalFromNoteIEN
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   ├TfrmBase508Form.Create...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   ├TfrmRemDlg.SetFontSize
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ └TfrmRemDlg.BuildControls
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├TfrmRemDlg.GetBox
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├TfrmRemDlg.ClearControls
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├WipeOutControls
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ └..(rec)..
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ └TfrmRemDlg.GetBox
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├TReminderDialog.GetPrintName
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├SetActiveVars
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ └IsOnBox
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├TReminderDialog.BuildControls
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ ├TRemDlgElement.BuildControls
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TRemDlgElement.TrueIndent
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ ├TRemDlgElement.Indent
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ ├TRemDlgElement.Box
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ └TRemDlgElement.ChildrenIndent
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TRemDlgElement.ElemType
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├GetPanel
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ ├GetDialogEntry
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │ └TTemplateDialogEntry.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │   ├TDlgFieldPanel.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │   ├GetTemplateField
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │   │ ├LoadTemplateFieldByIEN
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │   │ ├LoadTemplateField
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │   │ └TTemplateField.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │   │   ├TemplateFieldCode2Field
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │   │   └TemplateDateCode2DateType
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │   ├TTemplateField.GetRequired
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │   └TTemplateField.CreateDialogControls
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├TCPRSDialogFieldEdit.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ └TCPRSDialogComponent.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├TTemplateField.GetRequired
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├ht
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├wdth
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├TTemplateField.Width
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ └StripEmbedded
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├TTemplateDialogEntry.DoChange
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├TCPRSDialogComboBox.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ └TCPRSDialogComponent.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├StripEmbedded
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├TfraTemplateFieldButton.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ ├TfraTemplateFieldButton.ButtonKeyDown
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ │ └TfraTemplateFieldButton.pnlBtnMouseDown
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ │   ├TfraTemplateFieldButton.GetButtonText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ │   └TfraTemplateFieldButton.SetButtonText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ ├TfraTemplateFieldButton.ButtonKeyUp
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ │ └TfraTemplateFieldButton.pnlBtnMouseUp
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ └TCPRSDialogComponent.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├TfraTemplateFieldButton.SetButtonText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├TCPRSDialogCheckBox.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ └TCPRSDialogComponent.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├UpdateIndents
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ └wdth
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├StrToFMDateTime
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├TCPRSDialogDateCombo.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ └TCPRSDialogComponent.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├TCPRSDialogDateBox.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ └TCPRSDialogComponent.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├TCPRSDialogNumber.CreatePanel
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ └TCPRSDialogComponent.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├TTemplateDialogEntry.UpDownChange
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ ├EnsureText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ └TTemplateDialogEntry.DoChange
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├TCPRSDialogHyperlinkLabel.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ ├TCPRSDialogComponent.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ └TCPRSDialogHyperlinkLabel.KeyPressed
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │   └TCPRSDialogHyperlinkLabel.Clicked
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │     └GotoWebPage
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     ├TCPRSDialogHyperlinkLabel.Init
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     │ └TCPRSDialogHyperlinkLabel.Clicked...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │     └TCPRSDialogRichEdit.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │       └TCPRSDialogComponent.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ ├TTemplateDialogEntry.SetFieldValues
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │ └TTemplateDialogEntry.SetControlText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │   └TfraTemplateFieldButton.SetButtonText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ ├TTemplateDialogEntry.SetAutoDestroyOnPanelFree
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │ └PanelDestroy
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ ├TRemDlgElement.FieldPanelChange
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │ ├TReminderDialog.BeginTextChanged
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │ ├TTemplateDialogEntry.GetFieldValues
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │ │ └TTemplateDialogEntry.GetControlText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │ │   ├GetTemplateField...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │ │   ├GetOriginalItem
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │ │   │ ├GetTemplateField...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │ │   │ └StripEmbedded
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │ │   └TfraTemplateFieldButton.GetButtonText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │ └TReminderDialog.EndTextChanged
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ └TTemplateDialogEntry.GetPanel
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├Init
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TTemplateDialogEntry.KillLabels
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └ScreenReaderSystem_CurrentCheckBox
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │   └ScreenReaderSystem_Stop
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │     ├UpdateCheckBox
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │     ├UpdatePending
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │     └ScreenReaderSystem_Clear
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├Text508Work
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TTemplateDialogEntry.StripCode
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├ScreenReaderSystem_Stop...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├StripSRCode
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └ScreenReaderSystem_Continue
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TTemplateDialogEntry.StripCode
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├NextLine
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├DoLabel
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├Add2TabOrder
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├ScreenReaderSystem_CurrentLabel
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ └ScreenReaderSystem_Stop...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └ScreenReaderSystem_AddText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├Ctrl508Work
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├ScreenReaderSystem_CurrentLabel...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├ScreenReaderSystem_AddText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├ScreenReaderSystem_Stop...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├Add2TabOrder
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └ScreenReaderSystem_CurrentComponent
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │   ├UpdateCheckBox
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │   ├UpdatePending
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │   └ScreenReaderSystem_Stop...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TTemplateDialogEntry.SetFieldValues...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   └ScreenReaderSystem_Stop...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TRemDlgElement.EntryID
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├CRLFText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ └InitText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├UpdatePrompts
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ ├TRemDlgElement.FieldPanelEntered
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │ └TDlgFieldPanel.SetTheFocus
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ ├TRemDlgElement.FieldPanelExited
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ │ └TDlgFieldPanel.SetTheFocus
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ └AddPrompts
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.PromptOK
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemPrompt.PromptType...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemDlgElement.Historical
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemPrompt.RemDataActive...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └TRemPrompt.CompareActiveDate
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.Forced
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.PromptType...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.Required
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └TRemPrompt.PromptType...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TCPRSDialogFieldEdit.Create...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.GetValue...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.EditKeyPress
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.PromptChange
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TReminderDialog.BeginTextChanged
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemPrompt.GetValue...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemPrompt.PromptType...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├FMToday...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemPrompt.Caption
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ └AssignFieldIDs
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │   └GetNewFieldID
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├SelectDevice
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ ├TfrmBase508Form.Create...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ └GetDefaultPrinter
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├FMNow
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├MHDLLFound
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ └CheckforMHDll
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │   ├LoadMHDLL
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │   └UnloadMHDLL
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TReminderDialog.BeginNeedRedraw
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemPrompt.SetValue
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ ├TRemPrompt.Forced
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ ├TRemPrompt.PromptType...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ ├FMToday...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ ├TRemPrompt.GetValue...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ ├TPCEData.VisitDateTime...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ ├TRemData.InternalValue
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ ├TRemDlgElement.Historical
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ ├TRemPrompt.RemDataActive...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ ├TRemPrompt.RemDataChoiceActive
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ ├IsSyncPrompt
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ ├TRemPCERoot.Sync
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │ ├TRemPrompt.PromptType...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │ ├TRemPrompt.GetValue...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │ ├TRemPrompt.Forced
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │ ├TRemDlgElement.IsChecked
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │ ├TRemPrompt.SetValue...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │ └TRemDlgElement.cbClicked
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   ├TReminderDialog.BeginTextChanged
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   ├TReminderDialog.BeginNeedRedraw
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   ├TRemDlgElement.SetChecked
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ ├TRemDlgElement.GetData
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │ ├GetDialogPrompts
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │ ├TRemDlgElement.Historical
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │ ├TRemDlgElement.FindingType
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │ │ └TRemDlgElement.ElemType
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │ ├TReminderDialog.GetDlgSL
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │ │ ├TReminderDialog.GetIEN
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │ │ └GetDialogInfo
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │ └TRemDlgElement.UpdateData
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├TReminderDialog.GetDlgSL...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├Code2DataType
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├MHTestsOK
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├TRemPrompt.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├TRemData.Add2PN
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├TPCEData.VisitDateTime...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├TRemDlgElement.OneValidCode
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ ├TRemPrompt.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ └TRemPrompt.CompareActiveDate
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├TRemDlgElement.setActiveDates
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├TRemPCERoot.GetRoot
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├TRemDlgElement.Historical
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├Code2VitalType
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├MHDLLFound...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├Code2PromptType
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├TRemPrompt.InitValue
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ ├TRemPrompt.InternalValue
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ ├TRemPrompt.PromptType...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ ├GetPCECodes
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ │ ├LoadHistLocations
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ │ └CodeSetIndex
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ │   ├LoadImmSeriesItems
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ │   ├LoadImmReactionItems
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ │   ├LoadSkResultsItems
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ │   ├LoadPEDLevelItems
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ │   ├LoadHFLevelItems
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ │   └LoadXAMResultsItems
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ ├TRemPrompt.Forced
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ ├IsSyncPrompt
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ ├TRemPCERoot.GetValue
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ └TRemPrompt.SetValueFromParent
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │   └TRemPrompt.SetValue...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├PrepText4NextLine
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   └ExpandTIUObjects
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │     ├TdmodShared.BoilerplateOK...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │     └GetTemplateText...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ ├TRemDlgElement.Check4ChildrenSharedPrompts
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │ ├TRemDlgElement.ChildrenSharePrompts
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │ ├TRemDlgElement.GetData...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │ └TRemPrompt.CanShare
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├TRemPrompt.Forced
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├TRemPrompt.Required...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├TRemPrompt.PromptType...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   ├TRemPrompt.Add2PN
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ ├TRemPrompt.Forced
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   │ └TRemPrompt.PromptOK...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │   └TRemPrompt.Caption...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ ├TRemDlgElement.ChildrenRequired
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ ├..(rec)..
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ ├UpdateForcedValues
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │ ├TRemDlgElement.IsChecked
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │ ├TRemPrompt.Forced
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │ ├TRemPrompt.SetValueFromParent...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ │ └..(rec)..
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ ├TRemPrompt.Forced
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ ├IsSyncPrompt
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ ├TRemPrompt.PromptType...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │ └TRemPCERoot.UnSync
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   │   └TRemPrompt.Forced
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   ├TReminderDialog.EndNeedRedraw
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │   └TReminderDialog.EndTextChanged
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ ├TReminderDialog.Visible
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ │ └CurrentReminderInDialog
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ ├TRemPrompt.VitalValue...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ └TRemPrompt.VitalUnitValue...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TReminderDialog.EndNeedRedraw
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └TReminderDialog.EndTextChanged
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TCPRSDialogComboBox.Create...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.ComboBoxKeyDown
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├GetComboBoxMinMax
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├PCELoadORCombo
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └PCELoadORComboData
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │   ├GetPCECodes...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │   └GetComboBoxMinMax
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├GetDefLocations
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemData.DisplayWHResults
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├NextLine
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TCPRSDialogButton.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └TCPRSDialogComponent.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.DoWHReport
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └ReportBox...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├ScreenReaderSupport
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├ScreenReaderSystem_CurrentComponent...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └ScreenReaderSystem_Stop...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TCPRSDialogCheckBox.Create...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├ProcessLabel
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemPrompt.Caption...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├ScreenReaderSystem_CurrentLabel...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └ScreenReaderSystem_AddText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.ViewWHText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └ReportBox...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TCPRSDialogDateCombo.Create...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.Caption...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemDlgElement.ParentCBEnter
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemDlgElement.ParentCBExit
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemDlgElement.SubCommentChange
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemPrompt.PromptType...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemPrompt.Caption...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └TRemPrompt.SetValue...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.VitalType...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├InitPainCombo
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.VitalValue...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TVitalEdit.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └TCPRSDialogComponent.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.VitalVerify
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├ConvertHeight2Inches
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └VitalInvalid
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │   ├VerifyVital
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │   ├IsNumericWeight
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │   └VitalErrorText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TVitalComboBox.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └TCPRSDialogComponent.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├VitalControlTag
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TVitalComboBox.SelectByID
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.VitalUnitValue...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemDlgElement.Historical
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TPCEData.VisitDateTime...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TReminderDialog.ComboBoxCheckedText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TReminderDialog.ComboBoxResized
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├MHDLLFound...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.DoMHTest
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├MHTestAuthorized
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemData.Narrative
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TReminderDialog.BeginTextChanged
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemDlgElement.IncludeMHTestInPN
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemPrompt.GetValue...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├PerformMHTest
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │ └TfrmMHTest.CallMHDLL
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │   ├LoadMHDLL
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ │   └UnloadMHDLL
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TimedOut
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├GetMHResultText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemPrompt.SetValue...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├MentalHealthTestResults
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├ExpandTIUObjects...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └TReminderDialog.EndTextChanged
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.ForcedCaption
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemPrompt.Caption...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemPrompt.PromptType...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├TRemPrompt.VitalType...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └TRemData.Narrative
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├GAFURL
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.GAFHelp
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ ├GotoWebPage
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   │ └GAFURL
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemPrompt.SameLine
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├TRemDlgElement.TrueIndent...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├ScreenReaderSystem_CurrentComponent...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   ├ScreenReaderSystem_Stop...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │   └TRemDlgElement.Enabled
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │     └TRemDlgElement.EnableChildren
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │       ├..(rec)..
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │       └TRemDlgElement.ElemType
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TRemDlgElement.cbClicked...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TRemDlgElement.cbEntered
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ └UnfocusableControlEnter
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TRemDlgElement.ParentCBExit
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TRemDlgElement.FieldPanelKeyPress
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ └TRemDlgElement.FieldPanelOnClick
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TRemDlgElement.FieldPanelOnClick
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TRemDlgElement.FieldPanelLabelOnClick
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ └TRemDlgElement.FieldPanelOnClick
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TRemDlgElement.ChildrenRequired
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TRemDlgElement.ShowChildren
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ ├TRemDlgElement.ElemType
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ └TRemDlgElement.HideChildren
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TRemDlgElement.Box
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TRemDlgElement.ChildrenIndent
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TRemDlgElement.BoxCaption
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ │ └TRemDlgElement.Box
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TRemDlgElement.EnableChildren...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├..(rec)..
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├AddPrompts...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ ├TRemDlgElement.SubCommentChange...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ │ └ScreenReaderSystem_Stop...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ └TReminderDialog.GetPrintName
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├TfrmRemDlg.BoxUpdateDone
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ └TfrmRemDlg.ClearControls...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├IsOnBox
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   ├TfrmRemDlg.ControlsChanged
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   │ └TfrmRemDlg.GetBox
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │   └TfrmRemDlg.UpdateText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     ├TReminderDialog.AddText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ ├TRemDlgElement.AddText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ ├TRemDlgElement.Add2PN...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ ├TRemDlgElement.IndentPNLevel
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ │ ├..(rec)..
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ │ └TRemDlgElement.IndentChildrenInPN
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ ├CurrentReminderInDialog
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ ├ResolveTemplateFields
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ │ ├TTemplateDialogEntry.GetControlText...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ │ ├GetTemplateField...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ │ ├AddNewTxt
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ │ └WordWrapText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ │   └WrappedText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ ├TRemDlgElement.GetFieldValues
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ │ ├TRemDlgElement.ElemType
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ │ └..(rec)..
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ ├TRemDlgElement.GetTemplateFieldValues
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ │ ├GetTemplateField...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ │ ├TTemplateField.GetTemplateFieldDefault
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ │ │ └StripEmbedded
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ │ └AddNewTxt
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ ├StripScreenReaderCodes
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ ├WordWrap
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ │ ├StripScreenReaderCodes
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ │ └InitText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ ├TRemDlgElement.ElemType
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ │ └..(rec)..
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ ├TReminderDialog.GetPrintName
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ └StripScreenReaderCodes
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     ├ClinRemText
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     │ └GetProgressNoteHeader
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │     └TPCEData.StrVisitType...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   ├UpdateReminderFinish...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   ├TfrmRemDlg.ProcessTemplate
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ ├TReminderDialog.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ │ └TReminderDialog.BaseCreate
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ │   ├TReminderDialog.GetDlgSL...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ │   ├TRemDlgElement.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ │   ├TRemDlgElement.ElemType
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ │   ├TRemDlgElement.Historical
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ │   ├TRemDlgElement.FindingType...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ │   ├PrepText4NextLine
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ │   ├ExpandTIUObjects...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ │   ├AssignFieldIDs...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ │   ├TRemDlgElement.SetChecked...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ │   └TRemDlgElement.UpdateData...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ ├TTemplate.ReminderWipe
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ ├TfrmRemDlg.ClearControls...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ ├TfrmRemDlg.BuildControls...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ ├TfrmRemDlg.UpdateText...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   │ └TfrmRemDlg.UpdateButtons...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │   └TfrmRemDlg.ProcessReminder
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     ├GetReminder
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ └TReminder.Create
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │   └TReminderDialog.BaseCreate...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     ├TReminderDialog.FinishProblems
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ ├TReminderDialog.Processing...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ ├TRemDlgElement.FinishProblems
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ │ ├TRemPrompt.GetValue...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ │ ├TRemPrompt.PromptType...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ │ ├TRemPrompt.PromptOK...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ │ ├TRemPrompt.Forced
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ │ ├TRemPrompt.Required...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ │ ├WordWrap...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ │ ├TRemPrompt.ForcedCaption...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ │ ├TRemDlgElement.ElemType
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ │ ├TRemDlgElement.ChildrenRequired
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ │ ├TRemDlgElement.BoxCaption...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ │ └..(rec)..
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ ├TRemDlgElement.GetFieldValues...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ ├TReminderDialog.AddText...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │ └AreTemplateFieldsRequired
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │   ├GetTemplateField...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │   ├TTemplateField.GetRequired
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     │   └TTemplateDialogEntry.GetControlText...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     ├TfrmRemDlg.ClearControls...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     ├TfrmRemDlg.BuildControls...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     ├TfrmRemDlg.UpdateText...
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     ├TfrmRemDlg.PositionTrees
 │ │ │ │ │ │   │ │   │ │ │ │   │ │     └TfrmRemDlg.UpdateButtons...
 │ │ │ │ │ │   │ │   │ │ │ │   │ └HideReminderDialog
 │ │ │ │ │ │   │ │   │ │ │ │   └ReminderNode
 │ │ │ │ │ │   │ │   │ │ │ ├NotifyWhenProcessingReminderChanges
 │ │ │ │ │ │   │ │   │ │ │ ├TfrmDrawers.PositionToReminder
 │ │ │ │ │ │   │ │   │ │ │ ├RemoveNotifyRemindersChange
 │ │ │ │ │ │   │ │   │ │ │ └RemoveNotifyWhenProcessingReminderChanges
 │ │ │ │ │ │   │ │   │ │ └TfrmDrawers.SetSplitterActive
 │ │ │ │ │ │   │ │   │ ├ActOnDocument
 │ │ │ │ │ │   │ │   │ ├TPCEData.PCEForNote...
 │ │ │ │ │ │   │ │   │ └GetVitalsFromNote...
 │ │ │ │ │ │   │ │   └NotifyOtherApps...
 │ │ │ │ │ │   │ ├TfrmNotes.ShowPCEControls
 │ │ │ │ │ │   │ ├UpdateReminderFinish...
 │ │ │ │ │ │   │ ├TfrmNotes.ShowPCEButtons...
 │ │ │ │ │ │   │ └TfrmNotes.lstNotesClick...
 │ │ │ │ │ │   ├TfrmNotes.GetTitleText
 │ │ │ │ │ │   ├TfrmNotes.mnuActDeleteClick
 │ │ │ │ │ │   │ ├TfrmRemDlg.btnCancelClick
 │ │ │ │ │ │   │ │ └TfrmRemDlg.KillAll
 │ │ │ │ │ │   │ │   ├TfrmFrame.GetTimedOut...
 │ │ │ │ │ │   │ │   ├TReminderDialog.Processing...
 │ │ │ │ │ │   │ │   ├TReminderDialog.GetPrintName
 │ │ │ │ │ │   │ │   ├TReminderDialog.GetIEN
 │ │ │ │ │ │   │ │   ├RemoveMHTest
 │ │ │ │ │ │   │ │   │ ├LoadMHDLL
 │ │ │ │ │ │   │ │   │ └UnloadMHDLL
 │ │ │ │ │ │   │ │   └TfrmRemDlg.ResetProcessing
 │ │ │ │ │ │   │ │     ├TfrmRemDlg.ClearControls...
 │ │ │ │ │ │   │ │     ├TfrmRemDlg.PositionTrees
 │ │ │ │ │ │   │ │     └TfrmRemDlg.KillDlg
 │ │ │ │ │ │   │ ├ActOnDocument
 │ │ │ │ │ │   │ ├SelectDeleteReason
 │ │ │ │ │ │   │ │ ├JustifyDocumentDelete
 │ │ │ │ │ │   │ │ └TfrmBase508Form.Create...
 │ │ │ │ │ │   │ ├MakeNoteDisplayText
 │ │ │ │ │ │   │ ├TfrmNotes.LockConsultRequestAndNote
 │ │ │ │ │ │   │ │ ├TfrmConsults.ActiveEditOf
 │ │ │ │ │ │   │ │ │ └GetPackageRefForNote
 │ │ │ │ │ │   │ │ ├TChanges.Exist
 │ │ │ │ │ │   │ │ ├IsConsultTitle
 │ │ │ │ │ │   │ │ ├TitleForNote
 │ │ │ │ │ │   │ │ ├GetPackageRefForNote
 │ │ │ │ │ │   │ │ ├TfrmNotes.LockConsultRequest
 │ │ │ │ │ │   │ │ │ ├GetConsultOrderIEN
 │ │ │ │ │ │   │ │ │ └OrderCanBeLocked
 │ │ │ │ │ │   │ │ │   └LockOrder
 │ │ │ │ │ │   │ │ ├LockDocument
 │ │ │ │ │ │   │ │ └UnlockOrderIfAble
 │ │ │ │ │ │   │ │   └UnlockOrder
 │ │ │ │ │ │   │ ├JustifyDocumentDelete
 │ │ │ │ │ │   │ ├TfrmNotes.SaveCurrentNote...
 │ │ │ │ │ │   │ ├TfrmNotes.SetEditingIndex
 │ │ │ │ │ │   │ │ ├KillReminderDialog
 │ │ │ │ │ │   │ │ │ └TfrmRemDlg.ResetProcessing...
 │ │ │ │ │ │   │ │ └TfrmReminderTree.EnableActions...
 │ │ │ │ │ │   │ ├GetPackageRefForNote
 │ │ │ │ │ │   │ ├VisitStrForNote
 │ │ │ │ │ │   │ ├TfrmNotes.RemovePCEFromChanges
 │ │ │ │ │ │   │ │ ├VisitStrForNote
 │ │ │ │ │ │   │ │ └TChanges.Remove
 │ │ │ │ │ │   │ │   ├UnlockOrder
 │ │ │ │ │ │   │ │   └UnlockDocument
 │ │ │ │ │ │   │ ├DeleteDocument
 │ │ │ │ │ │   │ ├TChanges.Exist
 │ │ │ │ │ │   │ ├UnlockDocument
 │ │ │ │ │ │   │ ├TChanges.Remove...
 │ │ │ │ │ │   │ ├TfrmNotes.UnlockConsultRequest
 │ │ │ │ │ │   │ │ ├GetConsultIENforNote
 │ │ │ │ │ │   │ │ ├GetConsultOrderIEN
 │ │ │ │ │ │   │ │ └UnlockOrderIfAble...
 │ │ │ │ │ │   │ ├DeletePCE
 │ │ │ │ │ │   │ ├TfrmNotes.ClearEditControls
 │ │ │ │ │ │   │ │ ├TPCEData.Clear...
 │ │ │ │ │ │   │ │ └TfrmNotes.SetEditingIndex...
 │ │ │ │ │ │   │ ├TfrmNotes.LoadNotes
 │ │ │ │ │ │   │ │ ├KillDocTreeObjects
 │ │ │ │ │ │   │ │ │ └ResetDocTreeObjectStrings
 │ │ │ │ │ │   │ │ ├ListNotesForTree
 │ │ │ │ │ │   │ │ ├CreateListItemsForDocumentTree
 │ │ │ │ │ │   │ │ ├TfrmNotes.UpdateTreeView
 │ │ │ │ │ │   │ │ │ └BuildDocumentTree
 │ │ │ │ │ │   │ │ │   ├MakeNoteDisplayText
 │ │ │ │ │ │   │ │ │   ├MakeConsultNoteDisplayText
 │ │ │ │ │ │   │ │ │   ├MakeDCSummDisplayText
 │ │ │ │ │ │   │ │ │   ├MakeNoteTreeObject
 │ │ │ │ │ │   │ │ │   │ └MakeNoteDisplayText
 │ │ │ │ │ │   │ │ │   ├MakeConsultsNoteTreeObject
 │ │ │ │ │ │   │ │ │   │ ├MakeConsultNoteDisplayText
 │ │ │ │ │ │   │ │ │   │ └GetConsultOrderIEN
 │ │ │ │ │ │   │ │ │   ├MakeDCSummTreeObject
 │ │ │ │ │ │   │ │ │   │ └MakeDCSummDisplayText
 │ │ │ │ │ │   │ │ │   ├SetTreeNodeImagesAndFormatting
 │ │ │ │ │ │   │ │ │   │ ├ExternalName
 │ │ │ │ │ │   │ │ │   │ ├TextFound
 │ │ │ │ │ │   │ │ │   │ └MakeBold
 │ │ │ │ │ │   │ │ │   └..(rec)..
 │ │ │ │ │ │   │ │ ├TfrmNotes.SetNoteTreeLabel
 │ │ │ │ │ │   │ │ │ ├ExternalName
 │ │ │ │ │ │   │ │ │ └SetDateRangeText
 │ │ │ │ │ │   │ │ ├RemoveParentsWithNoChildren
 │ │ │ │ │ │   │ │ │ └KillDocTreeNode
 │ │ │ │ │ │   │ │ │   └ResetDocTreeObjectStrings
 │ │ │ │ │ │   │ │ └TfrmNotes.tvNotesChange...
 │ │ │ │ │ │   │ ├UpdateReminderFinish...
 │ │ │ │ │ │   │ ├TfrmNotes.ShowPCEControls
 │ │ │ │ │ │   │ └TfrmNotes.ShowPCEButtons...
 │ │ │ │ │ │   ├TPCEData.GetCPTRequired
 │ │ │ │ │ │   │ └TPCEData.NeededPCEData
 │ │ │ │ │ │   │   ├FutureEncounter...
 │ │ │ │ │ │   │   ├PromptForWorkload
 │ │ │ │ │ │   │   ├TPCEData.StandAlone
 │ │ │ │ │ │   │   │ └HasVisit
 │ │ │ │ │ │   │   ├TPCEData.GetHasCPTList
 │ │ │ │ │ │   │   │ └AddList
 │ │ │ │ │ │   │   │   └TPCEItem.HasCPTStr
 │ │ │ │ │ │   │   ├DataHasCPTCodes
 │ │ │ │ │ │   │   ├RequireExposures
 │ │ │ │ │ │   │   └EligbleConditions
 │ │ │ │ │ │   ├PutEditedNote
 │ │ │ │ │ │   │ └SetText
 │ │ │ │ │ │   │   └InitParams
 │ │ │ │ │ │   ├TfrmNotes.SetEditingIndex...
 │ │ │ │ │ │   └TfrmNotes.lstNotesClick...
 │ │ │ │ │ ├CosignDocument
 │ │ │ │ │ ├ActOnDocument
 │ │ │ │ │ ├NoteHasText
 │ │ │ │ │ ├LastSaveClean
 │ │ │ │ │ ├IsOK2Sign
 │ │ │ │ │ │ ├TPCEData.GetVisitString...
 │ │ │ │ │ │ ├VisitStrForNote
 │ │ │ │ │ │ ├TPCEData.OK2SignNote
 │ │ │ │ │ │ │ ├CanEditPCE...
 │ │ │ │ │ │ │ ├IsNonCountClinic
 │ │ │ │ │ │ │ ├IsCancelOrNoShow
 │ │ │ │ │ │ │ ├GetAskPCE
 │ │ │ │ │ │ │ ├TPCEData.NeededPCEData...
 │ │ │ │ │ │ │ ├TPCEProviderList.GetPrimaryIdx
 │ │ │ │ │ │ │ ├NoPrimaryPCEProvider
 │ │ │ │ │ │ │ │ ├TPCEProviderList.GetPrimaryIdx
 │ │ │ │ │ │ │ │ ├SetDefaultProvider
 │ │ │ │ │ │ │ │ │ ├InvalidPCEProviderTxt
 │ │ │ │ │ │ │ │ │ │ ├CheckActivePerson
 │ │ │ │ │ │ │ │ │ │ └IsUserAProvider
 │ │ │ │ │ │ │ │ │ ├TPCEData.PersonClassDate
 │ │ │ │ │ │ │ │ │ │ └FMToday...
 │ │ │ │ │ │ │ │ │ ├TEncounter.GetProviderName...
 │ │ │ │ │ │ │ │ │ ├DefaultProvider
 │ │ │ │ │ │ │ │ │ ├CheckActivePerson
 │ │ │ │ │ │ │ │ │ ├TIUSiteParams
 │ │ │ │ │ │ │ │ │ └TPCEProviderList.AddProvider
 │ │ │ │ │ │ │ │ │   └TPCEProviderList.Add...
 │ │ │ │ │ │ │ │ ├TfrmBase508Form.Create...
 │ │ │ │ │ │ │ │ ├TPCEProviderList.PendingIEN
 │ │ │ │ │ │ │ │ ├TPCEProviderList.PendingName
 │ │ │ │ │ │ │ │ ├TfrmPCEProvider.AskUser
 │ │ │ │ │ │ │ │ │ └TfrmPCEProvider.btnSelectClick
 │ │ │ │ │ │ │ │ └TPCEProviderList.AddProvider...
 │ │ │ │ │ │ │ ├TPCEProviderList.PendingIEN
 │ │ │ │ │ │ │ ├TPCEProviderList.IndexOfProvider
 │ │ │ │ │ │ │ ├TPCEProviderList.AddProvider...
 │ │ │ │ │ │ │ ├TPCEProviderList.PendingName
 │ │ │ │ │ │ │ ├Add
 │ │ │ │ │ │ │ ├ForcePCEEntry
 │ │ │ │ │ │ │ ├MissingProviderInfo
 │ │ │ │ │ │ │ │ ├TPCEData.Empty
 │ │ │ │ │ │ │ │ │ └TPCEProc.Empty
 │ │ │ │ │ │ │ │ ├TEncounter.NeedVisit
 │ │ │ │ │ │ │ │ ├TPCEData.SetEncUseCurr
 │ │ │ │ │ │ │ │ │ ├TEncounter.GetVisitCategory
 │ │ │ │ │ │ │ │ │ ├TPCEProviderList.SetPrimaryIdx...
 │ │ │ │ │ │ │ │ │ └SetRPCEncLocation
 │ │ │ │ │ │ │ │ └NoPrimaryPCEProvider...
 │ │ │ │ │ │ │ ├UpdatePCE
 │ │ │ │ │ │ │ │ ├TfrmBase508Form.Create...
 │ │ │ │ │ │ │ │ ├TPCEData.Empty...
 │ │ │ │ │ │ │ │ ├TEncounter.NeedVisit
 │ │ │ │ │ │ │ │ ├TPCEData.SetEncUseCurr...
 │ │ │ │ │ │ │ │ ├ExternalName
 │ │ │ │ │ │ │ │ ├TPCEData.VisitDateTime...
 │ │ │ │ │ │ │ │ ├TPCEProviderList.Assign
 │ │ │ │ │ │ │ │ ├SetDefaultProvider...
 │ │ │ │ │ │ │ │ ├TPCEProviderList.PendingIEN
 │ │ │ │ │ │ │ │ ├TPCEProviderList.IndexOfProvider
 │ │ │ │ │ │ │ │ ├AutoCheckout
 │ │ │ │ │ │ │ │ ├TPCEProviderList.AddProvider...
 │ │ │ │ │ │ │ │ ├TPCEProviderList.PendingName
 │ │ │ │ │ │ │ │ ├TfrmEncounterFrame.CreateChildForms
 │ │ │ │ │ │ │ │ │ ├TfrmEncounterFrame.LoadFormList
 │ │ │ │ │ │ │ │ │ │ └MHClinic
 │ │ │ │ │ │ │ │ │ │   └GAFOK
 │ │ │ │ │ │ │ │ │ ├TfrmEncounterFrame.AddTabs
 │ │ │ │ │ │ │ │ │ └TfrmEncounterFrame.CreateForms
 │ │ │ │ │ │ │ │ │   ├TfrmEncounterFrame.FormListContains
 │ │ │ │ │ │ │ │ │   ├TfrmPCEBase.CreateLinked
 │ │ │ │ │ │ │ │ │   │ └TfrmBase508Form.Create...
 │ │ │ │ │ │ │ │ │   ├TfrmEncounterFrame.PageIDToTab
 │ │ │ │ │ │ │ │ │   └TfrmEncounterFrame.PageIDToForm
 │ │ │ │ │ │ │ │ ├SetFormPosition...
 │ │ │ │ │ │ │ │ ├SetRPCEncLocation
 │ │ │ │ │ │ │ │ ├TfrmEncounterFrame.SynchPCEData
 │ │ │ │ │ │ │ │ │ ├TfrmEncounterFrame.FormListContains
 │ │ │ │ │ │ │ │ │ ├InitList
 │ │ │ │ │ │ │ │ │ │ ├TfrmEncounterFrame.FormListContains
 │ │ │ │ │ │ │ │ │ │ ├ListVisitTypeSections
 │ │ │ │ │ │ │ │ │ │ │ └LoadEncounterForm
 │ │ │ │ │ │ │ │ │ │ │   ├TPCEData.VisitDateTime...
 │ │ │ │ │ │ │ │ │ │ │   ├FMNow
 │ │ │ │ │ │ │ │ │ │ │   └AddProbsToDiagnoses
 │ │ │ │ │ │ │ │ │ │ │     ├TPCEData.VisitDateTime...
 │ │ │ │ │ │ │ │ │ │ │     ├rpcGetProviderPatientDaysDx
 │ │ │ │ │ │ │ │ │ │ │     └rpcGetPersonalDxList
 │ │ │ │ │ │ │ │ │ │ ├AutoSelectVisit
 │ │ │ │ │ │ │ │ │ │ ├PCERPCEncLocation
 │ │ │ │ │ │ │ │ │ │ └TfrmEncounterFrame.SectionClick
 │ │ │ │ │ │ │ │ │ │   ├TfrmEncounterFrame.FormListContains
 │ │ │ │ │ │ │ │ │ │   └TfrmVisitType.lstVTypeSectionClick
 │ │ │ │ │ │ │ │ │ │     ├ListVisitTypeCodes
 │ │ │ │ │ │ │ │ │ │     │ └InsertTab
 │ │ │ │ │ │ │ │ │ │     └TfrmVisitType.lbxVisitsClick
 │ │ │ │ │ │ │ │ │ │       └TfrmVisitType.ShowModifiers
 │ │ │ │ │ │ │ │ │ │         ├ListCPTModifiers
 │ │ │ │ │ │ │ │ │ │         │ ├ModifierList
 │ │ │ │ │ │ │ │ │ │         │ │ ├TPCEData.VisitDateTime...
 │ │ │ │ │ │ │ │ │ │         │ │ └MixedCaseModifier
 │ │ │ │ │ │ │ │ │ │         │ └ModifierIdx...
 │ │ │ │ │ │ │ │ │ │         └TfrmVisitType.CheckModifiers
 │ │ │ │ │ │ │ │ │ │           └UpdateVisitTypeModifierList
 │ │ │ │ │ │ │ │ │ │             └ModifierList...
 │ │ │ │ │ │ │ │ │ ├ListSCDisabilities
 │ │ │ │ │ │ │ │ │ ├EligbleConditions
 │ │ │ │ │ │ │ │ │ ├TfraVisitRelated.InitAllow
 │ │ │ │ │ │ │ │ │ │ └TfraVisitRelated.SetCheckEnable
 │ │ │ │ │ │ │ │ │ ├TfraVisitRelated.InitRelated
 │ │ │ │ │ │ │ │ │ │ └TfraVisitRelated.SetCheckState
 │ │ │ │ │ │ │ │ │ │   └TfraVisitRelated.chkClick
 │ │ │ │ │ │ │ │ │ │     ├DisableCheck
 │ │ │ │ │ │ │ │ │ │     └TfraVisitRelated.SetCheckEnable
 │ │ │ │ │ │ │ │ │ ├TfrmPCEBaseMain.InitTab
 │ │ │ │ │ │ │ │ │ │ ├TfrmPCEBaseMain.lbSectionClick
 │ │ │ │ │ │ │ │ │ │ │ ├TfrmPCEBaseGrid.ClearGrid
 │ │ │ │ │ │ │ │ │ │ │ │ └TfrmPCEBaseGrid.UpdateControls
 │ │ │ │ │ │ │ │ │ │ │ └TfrmPCEBaseMain.CheckOffEntries
 │ │ │ │ │ │ │ │ │ │ │   └TfrmPCEBaseMain.GetCat
 │ │ │ │ │ │ │ │ │ │ ├TfrmPCEBaseGrid.ClearGrid...
 │ │ │ │ │ │ │ │ │ │ └TfrmPCEBaseMain.GridChanged
 │ │ │ │ │ │ │ │ │ │   ├TfrmPCEBaseMain.BeginUpdate
 │ │ │ │ │ │ │ │ │ │   ├TfrmPCEBaseGrid.SaveGridSelected
 │ │ │ │ │ │ │ │ │ │   ├TPCEItem.ItemStr
 │ │ │ │ │ │ │ │ │ │   ├TfrmPCEBaseGrid.RestoreGridSelected
 │ │ │ │ │ │ │ │ │ │   ├TfrmPCEBaseGrid.SyncGridData
 │ │ │ │ │ │ │ │ │ │   │ ├TfrmPCEBaseGrid.SaveGridSelected
 │ │ │ │ │ │ │ │ │ │   │ ├TfrmPCEBaseGrid.RestoreGridSelected
 │ │ │ │ │ │ │ │ │ │   │ └TfrmPCEBaseGrid.SyncGridHeader
 │ │ │ │ │ │ │ │ │ │   ├TfrmPCEBaseMain.EndUpdate
 │ │ │ │ │ │ │ │ │ │   └TfrmPCEBaseMain.UpdateControls
 │ │ │ │ │ │ │ │ │ │     ├TfrmPCEBaseMain.NotUpdating
 │ │ │ │ │ │ │ │ │ │     ├TfrmPCEBaseMain.BeginUpdate
 │ │ │ │ │ │ │ │ │ │     ├TfrmPCEBaseGrid.GetGridIndex
 │ │ │ │ │ │ │ │ │ │     └TfrmPCEBaseMain.EndUpdate
 │ │ │ │ │ │ │ │ │ ├TPCEData.CopyDiagnoses
 │ │ │ │ │ │ │ │ │ │ └TPCEData.CopyPCEItems...
 │ │ │ │ │ │ │ │ │ ├ListDiagnosisSections
 │ │ │ │ │ │ │ │ │ │ └LoadEncounterForm...
 │ │ │ │ │ │ │ │ │ ├TfrmProcedures.InitTab
 │ │ │ │ │ │ │ │ │ ├TPCEData.CopyProcedures
 │ │ │ │ │ │ │ │ │ │ └TPCEData.CopyPCEItems...
 │ │ │ │ │ │ │ │ │ ├ListProcedureSections
 │ │ │ │ │ │ │ │ │ │ └LoadEncounterForm...
 │ │ │ │ │ │ │ │ │ ├TPCEData.CopyImmunizations
 │ │ │ │ │ │ │ │ │ │ └TPCEData.CopyPCEItems...
 │ │ │ │ │ │ │ │ │ ├ListImmunizSections
 │ │ │ │ │ │ │ │ │ │ └LoadEncounterForm...
 │ │ │ │ │ │ │ │ │ ├TPCEData.CopySkinTests
 │ │ │ │ │ │ │ │ │ │ └TPCEData.CopyPCEItems...
 │ │ │ │ │ │ │ │ │ ├ListSkinSections
 │ │ │ │ │ │ │ │ │ │ └LoadEncounterForm...
 │ │ │ │ │ │ │ │ │ ├TPCEData.CopyPatientEds
 │ │ │ │ │ │ │ │ │ │ └TPCEData.CopyPCEItems...
 │ │ │ │ │ │ │ │ │ ├ListPatientSections
 │ │ │ │ │ │ │ │ │ │ └LoadEncounterForm...
 │ │ │ │ │ │ │ │ │ ├TPCEData.CopyHealthFactors
 │ │ │ │ │ │ │ │ │ │ └TPCEData.CopyPCEItems...
 │ │ │ │ │ │ │ │ │ ├ListHealthSections
 │ │ │ │ │ │ │ │ │ │ └LoadEncounterForm...
 │ │ │ │ │ │ │ │ │ ├TPCEData.CopyExams
 │ │ │ │ │ │ │ │ │ │ └TPCEData.CopyPCEItems...
 │ │ │ │ │ │ │ │ │ ├ListExamsSections
 │ │ │ │ │ │ │ │ │ │ └LoadEncounterForm...
 │ │ │ │ │ │ │ │ │ ├TPCEProc.Assign
 │ │ │ │ │ │ │ │ │ │ └TPCEItem.Assign...
 │ │ │ │ │ │ │ │ │ └TfrmVisitType.MatchVType
 │ │ │ │ │ │ │ │ │   ├TfrmVisitType.lstVTypeSectionClick...
 │ │ │ │ │ │ │ │ │   └TfrmVisitType.lbxVisitsClickCheck
 │ │ │ │ │ │ │ │ │     ├TPCEProviderList.PrimaryIEN...
 │ │ │ │ │ │ │ │ │     ├TPCEProc.SetFromString...
 │ │ │ │ │ │ │ │ │     └TPCEProc.Clear...
 │ │ │ │ │ │ │ │ └TfrmEncounterFrame.TabControlChange
 │ │ │ │ │ │ │ │   ├TfrmEncounterFrame.PageIDToTab
 │ │ │ │ │ │ │ │   ├TfrmEncounterFrame.PageIDToForm
 │ │ │ │ │ │ │ │   └TfrmEncounterFrame.SwitchToPage
 │ │ │ │ │ │ │ │     └TfrmPCEBase.DisplayPage
 │ │ │ │ │ │ │ └TPCEData.Save
 │ │ │ │ │ │ │   ├TPCEData.IsSecondaryVisit
 │ │ │ │ │ │ │   ├GetLocSecondaryVisitCode
 │ │ │ │ │ │ │   ├GetVisitIEN
 │ │ │ │ │ │ │   ├TPCEDiag.DelimitedStr2
 │ │ │ │ │ │ │   ├TPCEProviderList.PCEProvider...
 │ │ │ │ │ │ │   ├TPCEDiag.DelimitedStr
 │ │ │ │ │ │ │   ├TPCEProc.DelimitedStr
 │ │ │ │ │ │ │   │ └ModifierCode
 │ │ │ │ │ │ │   │   └ModifierIdx...
 │ │ │ │ │ │ │   ├TPCEItem.DelimitedStr2
 │ │ │ │ │ │ │   ├TPCEImm.DelimitedStr
 │ │ │ │ │ │ │   ├TPCESkin.DelimitedStr
 │ │ │ │ │ │ │   ├TPCEPat.DelimitedStr
 │ │ │ │ │ │ │   ├TPCEHealth.DelimitedStr
 │ │ │ │ │ │ │   ├TPCEExams.DelimitedStr
 │ │ │ │ │ │ │   ├SavePCEData
 │ │ │ │ │ │ │   ├TPCEProviderList.GetProviderData
 │ │ │ │ │ │ │   ├TPCEProviderList.Delete
 │ │ │ │ │ │ │   ├TPCEProc.Clear...
 │ │ │ │ │ │ │   ├TPCEData.StrVisitType...
 │ │ │ │ │ │ │   ├TChanges.Add
 │ │ │ │ │ │ │   │ └TChangeItem.Create
 │ │ │ │ │ │ │   ├TPCEData.StrProcedures...
 │ │ │ │ │ │ │   ├TPCEData.StrDiagnoses...
 │ │ │ │ │ │ │   ├TPCEData.StrImmunizations...
 │ │ │ │ │ │ │   ├TPCEData.StrSkinTests...
 │ │ │ │ │ │ │   ├TPCEData.StrPatientEds...
 │ │ │ │ │ │ │   ├TPCEData.StrHealthFactors...
 │ │ │ │ │ │ │   └TPCEData.StrExams...
 │ │ │ │ │ │ ├TPCEData.Create
 │ │ │ │ │ │ └TPCEData.PCEForNote...
 │ │ │ │ │ ├TPCEData.CopyPCEData...
 │ │ │ │ │ ├TfrmNotes.lstNotesClick...
 │ │ │ │ │ ├TPCEData.Clear...
 │ │ │ │ │ ├SignDocument
 │ │ │ │ │ ├TfrmNotes.UnlockConsultRequest...
 │ │ │ │ │ └TfrmNotes.LoadNotes...
 │ │ │ │ ├TfrmConsults.SaveSignItem
 │ │ │ │ │ ├GetPackageRefForNote
 │ │ │ │ │ ├TfrmFrame.GetTimedOut...
 │ │ │ │ │ ├TfrmConsults.SaveCurrentNote
 │ │ │ │ │ │ └TfrmConsults.SaveEditedConsult
 │ │ │ │ │ │   ├TfrmConsults.LacksClinProcFields
 │ │ │ │ │ │   │ └AskCosignerForTitle
 │ │ │ │ │ │   │   └TIUPatch175Installed
 │ │ │ │ │ │   │     └ServerHasPatch
 │ │ │ │ │ │   ├TfrmConsults.cmdChangeClick
 │ │ │ │ │ │   │ ├ExecuteNoteProperties
 │ │ │ │ │ │   │ │ ├TfrmBase508Form.Create...
 │ │ │ │ │ │   │ │ ├FMToday...
 │ │ │ │ │ │   │ │ ├ListClinProcTitlesShort
 │ │ │ │ │ │   │ │ │ └LoadClinProcTitles
 │ │ │ │ │ │   │ │ │   ├IdentifyClinProcClass
 │ │ │ │ │ │   │ │ │   └TClinProcTitles.Create
 │ │ │ │ │ │   │ │ ├ListConsultTitlesShort
 │ │ │ │ │ │   │ │ │ └LoadConsultTitles
 │ │ │ │ │ │   │ │ │   ├IdentifyConsultsClass
 │ │ │ │ │ │   │ │ │   └TConsultTitles.Create
 │ │ │ │ │ │   │ │ ├ListSurgeryTitlesShort
 │ │ │ │ │ │   │ │ │ └LoadSurgeryTitles
 │ │ │ │ │ │   │ │ │   └TSurgeryTitles.Create
 │ │ │ │ │ │   │ │ ├GetUnresolvedConsultsInfo
 │ │ │ │ │ │   │ │ ├ListNoteTitlesShort
 │ │ │ │ │ │   │ │ │ └LoadNoteTitles
 │ │ │ │ │ │   │ │ │   └TNoteTitles.Create
 │ │ │ │ │ │   │ │ ├TfrmNoteProperties.ShowClinProcFields
 │ │ │ │ │ │   │ │ ├TfrmNoteProperties.SetCosignerRequired
 │ │ │ │ │ │   │ │ │ ├AskCosignerForDocument
 │ │ │ │ │ │   │ │ │ │ └TIUPatch175Installed...
 │ │ │ │ │ │   │ │ │ ├AskCosignerForTitle...
 │ │ │ │ │ │   │ │ │ └DefaultCosigner
 │ │ │ │ │ │   │ │ │   └LoadTIUPrefs
 │ │ │ │ │ │   │ │ │     └ExternalName
 │ │ │ │ │ │   │ │ ├TfrmNoteProperties.SetGenericFormSize
 │ │ │ │ │ │   │ │ ├TfrmNoteProperties.ShowRequestList
 │ │ │ │ │ │   │ │ │ └ListConsultRequests
 │ │ │ │ │ │   │ │ ├TfrmNoteProperties.ShowSurgCaseList
 │ │ │ │ │ │   │ │ │ └ListSurgeryCases
 │ │ │ │ │ │   │ │ ├TfrmNoteProperties.ShowPRFList
 │ │ │ │ │ │   │ │ │ ├TPRFActions.Create
 │ │ │ │ │ │   │ │ │ ├TPRFActions.Load
 │ │ │ │ │ │   │ │ │ └TPRFActions.ShowActionsOnList
 │ │ │ │ │ │   │ │ │   └TPRFActions.SelActionHasNote
 │ │ │ │ │ │   │ │ ├IsConsultTitle
 │ │ │ │ │ │   │ │ ├IsSurgeryTitle
 │ │ │ │ │ │   │ │ │ └ShowSurgeryTab
 │ │ │ │ │ │   │ │ ├IsPRFTitle
 │ │ │ │ │ │   │ │ ├TfrmNoteProperties.cboNewTitleExit
 │ │ │ │ │ │   │ │ │ └TfrmNoteProperties.cboNewTitleMouseClick
 │ │ │ │ │ │   │ │ │   ├IsConsultTitle
 │ │ │ │ │ │   │ │ │   ├TfrmNoteProperties.SetGenericFormSize
 │ │ │ │ │ │   │ │ │   ├TfrmNoteProperties.ShowRequestList...
 │ │ │ │ │ │   │ │ │   ├TfrmNoteProperties.ShowSurgCaseList...
 │ │ │ │ │ │   │ │ │   ├IsSurgeryTitle...
 │ │ │ │ │ │   │ │ │   ├TfrmNoteProperties.ShowPRFList...
 │ │ │ │ │ │   │ │ │   ├IsPRFTitle
 │ │ │ │ │ │   │ │ │   └TfrmNoteProperties.SetCosignerRequired...
 │ │ │ │ │ │   │ │ ├TfrmNoteProperties.FormatRequestList
 │ │ │ │ │ │   │ │ │ └TfrmNoteProperties.ShowRequestList...
 │ │ │ │ │ │   │ │ ├PrintNameForTitle
 │ │ │ │ │ │   │ │ ├TEncounter.GetLocationName...
 │ │ │ │ │ │   │ │ ├TPRFActions.GetPRF_IEN
 │ │ │ │ │ │   │ │ └TPRFActions.GetActionIEN
 │ │ │ │ │ │   │ ├TChanges.ReplaceSignState
 │ │ │ │ │ │   │ ├MakeConsultNoteDisplayText
 │ │ │ │ │ │   │ ├TChanges.ReplaceText
 │ │ │ │ │ │   │ ├TfrmConsults.GetTitleText
 │ │ │ │ │ │   │ │ └MakeConsultNoteDisplayText
 │ │ │ │ │ │   │ ├TfrmConsults.LockConsultRequest
 │ │ │ │ │ │   │ │ ├GetConsultOrderIEN
 │ │ │ │ │ │   │ │ ├TfrmNotes.ActiveEditOf
 │ │ │ │ │ │   │ │ └OrderCanBeLocked...
 │ │ │ │ │ │   │ ├UnlockOrderIfAble...
 │ │ │ │ │ │   │ ├GetConsultOrderIEN
 │ │ │ │ │ │   │ └TfrmConsults.mnuActLoadBoilerClick
 │ │ │ │ │ │   │   ├LoadBoilerPlate
 │ │ │ │ │ │   │   ├GetLinkedTemplate
 │ │ │ │ │ │   │   │ ├GetLinkedTemplateData
 │ │ │ │ │ │   │   │ └AddTemplate
 │ │ │ │ │ │   │   │   ├TTemplate.Create
 │ │ │ │ │ │   │   │   │ └TTemplate.ReminderDialogIEN
 │ │ │ │ │ │   │   │   └TTemplate.AddChild
 │ │ │ │ │ │   │   │     └TTemplate.GetItems
 │ │ │ │ │ │   │   │       └ExpandTemplate
 │ │ │ │ │ │   │   │         ├TTemplate.GetChildren
 │ │ │ │ │ │   │   │         ├GetTemplateChildren
 │ │ │ │ │ │   │   │         ├AddTemplate...
 │ │ │ │ │ │   │   │         └TTemplate.ItemIENs
 │ │ │ │ │ │   │   │           └TTemplate.GetItems...
 │ │ │ │ │ │   │   ├MakeXMLParamTIU
 │ │ │ │ │ │   │   │ └ExternalName
 │ │ │ │ │ │   │   ├AssignBoilerText
 │ │ │ │ │ │   │   │ └QuickCopyWith508Msg
 │ │ │ │ │ │   │   │   └SpeakTextInserted
 │ │ │ │ │ │   │   ├QueryBoilerPlate
 │ │ │ │ │ │   │   │ └TfrmBase508Form.Create...
 │ │ │ │ │ │   │   └QuickCopyWith508Msg...
 │ │ │ │ │ │   ├TfrmFrame.GetTimedOut...
 │ │ │ │ │ │   ├SaveOrAbort
 │ │ │ │ │ │   │ ├TfrmConsults.SetEditingIndex
 │ │ │ │ │ │   │ │ ├KillReminderDialog...
 │ │ │ │ │ │   │ │ └TfrmReminderTree.EnableActions...
 │ │ │ │ │ │   │ └TfrmConsults.lstNotesClick
 │ │ │ │ │ │   │   ├UpdateReminderFinish...
 │ │ │ │ │ │   │   ├MakeConsultNoteDisplayText
 │ │ │ │ │ │   │   ├GetDetailedMedicineResults
 │ │ │ │ │ │   │   ├NotifyOtherApps...
 │ │ │ │ │ │   │   ├LoadDocumentText
 │ │ │ │ │ │   │   ├TfrmReminderTree.EnableActions...
 │ │ │ │ │ │   │   ├TfrmConsults.DisplayPCE...
 │ │ │ │ │ │   │   └TfrmConsults.SetResultMenus
 │ │ │ │ │ │   │     ├CanReceiveAttachment
 │ │ │ │ │ │   │     ├TNotifications.GetFollowUp
 │ │ │ │ │ │   │     └TfrmConsults.UserIsSigner
 │ │ │ │ │ │   │       └GetCurrentSigners
 │ │ │ │ │ │   ├TfrmConsults.tvCsltNotesChange
 │ │ │ │ │ │   │ ├CanBeAttached
 │ │ │ │ │ │   │ ├CanReceiveAttachment
 │ │ │ │ │ │   │ ├UpdateReminderFinish...
 │ │ │ │ │ │   │ ├TfrmConsults.ShowPCEControls
 │ │ │ │ │ │   │ ├TfrmDrawers.DisplayDrawers...
 │ │ │ │ │ │   │ └TfrmConsults.lstNotesClick...
 │ │ │ │ │ │   ├TfrmConsults.GetTitleText...
 │ │ │ │ │ │   ├TfrmConsults.mnuActNoteDeleteClick
 │ │ │ │ │ │   │ ├ActOnDocument
 │ │ │ │ │ │   │ ├SelectDeleteReason...
 │ │ │ │ │ │   │ ├MakeNoteDisplayText
 │ │ │ │ │ │   │ ├TfrmConsults.LockConsultRequestAndNote
 │ │ │ │ │ │   │ │ ├TfrmNotes.ActiveEditOf
 │ │ │ │ │ │   │ │ ├TChanges.Exist
 │ │ │ │ │ │   │ │ ├IsConsultTitle
 │ │ │ │ │ │   │ │ ├TitleForNote
 │ │ │ │ │ │   │ │ ├GetPackageRefForNote
 │ │ │ │ │ │   │ │ ├TfrmConsults.LockConsultRequest...
 │ │ │ │ │ │   │ │ ├LockDocument
 │ │ │ │ │ │   │ │ └UnlockOrderIfAble...
 │ │ │ │ │ │   │ ├JustifyDocumentDelete
 │ │ │ │ │ │   │ ├TfrmConsults.SaveCurrentNote...
 │ │ │ │ │ │   │ ├TfrmConsults.SetEditingIndex...
 │ │ │ │ │ │   │ ├GetPackageRefForNote
 │ │ │ │ │ │   │ ├VisitStrForNote
 │ │ │ │ │ │   │ ├TfrmConsults.RemovePCEFromChanges
 │ │ │ │ │ │   │ │ ├VisitStrForNote
 │ │ │ │ │ │   │ │ └TChanges.Remove...
 │ │ │ │ │ │   │ ├DeleteDocument
 │ │ │ │ │ │   │ ├TChanges.Exist
 │ │ │ │ │ │   │ ├UnlockDocument
 │ │ │ │ │ │   │ ├TChanges.Remove...
 │ │ │ │ │ │   │ ├TfrmConsults.UnlockConsultRequest
 │ │ │ │ │ │   │ │ ├GetConsultIENforNote
 │ │ │ │ │ │   │ │ ├GetConsultOrderIEN
 │ │ │ │ │ │   │ │ └UnlockOrderIfAble...
 │ │ │ │ │ │   │ ├DeletePCE
 │ │ │ │ │ │   │ ├TfrmConsults.ClearEditControls
 │ │ │ │ │ │   │ │ ├TPCEData.Clear...
 │ │ │ │ │ │   │ │ ├TfrmConsults.SetEditingIndex...
 │ │ │ │ │ │   │ │ └TfrmConsults.ShowPCEControls
 │ │ │ │ │ │   │ ├UpdateReminderFinish...
 │ │ │ │ │ │   │ ├TfrmConsults.ShowPCEControls
 │ │ │ │ │ │   │ ├TfrmDrawers.DisplayDrawers...
 │ │ │ │ │ │   │ ├TfrmConsults.UpdateList
 │ │ │ │ │ │   │ │ ├StrToFMDateTime
 │ │ │ │ │ │   │ │ └TfrmConsults.LoadConsults
 │ │ │ │ │ │   │ │   ├KillDocTreeObjects...
 │ │ │ │ │ │   │ │   ├GetConsultsList
 │ │ │ │ │ │   │ │   │ └MakeConsultListItem
 │ │ │ │ │ │   │ │   ├StrToFMDateTime
 │ │ │ │ │ │   │ │   ├CreateListItemsForConsultTree
 │ │ │ │ │ │   │ │   ├TfrmConsults.UpdateConsultsTreeView
 │ │ │ │ │ │   │ │   │ └BuildConsultsTree
 │ │ │ │ │ │   │ │   │   ├MakeConsultListDisplayText
 │ │ │ │ │ │   │ │   │   ├SetNodeImage
 │ │ │ │ │ │   │ │   │   └..(rec)..
 │ │ │ │ │ │   │ │   └TfrmConsults.tvConsultsChange
 │ │ │ │ │ │   │ │     ├UpdateReminderFinish...
 │ │ │ │ │ │   │ │     ├TfrmConsults.ShowPCEControls
 │ │ │ │ │ │   │ │     ├TfrmDrawers.DisplayDrawers...
 │ │ │ │ │ │   │ │     ├KillDocTreeObjects...
 │ │ │ │ │ │   │ │     └TfrmConsults.lstConsultsClick
 │ │ │ │ │ │   │ │       ├TfrmConsults.ClearEditControls...
 │ │ │ │ │ │   │ │       ├GetConsultRec
 │ │ │ │ │ │   │ │       ├LoadConsultDetail
 │ │ │ │ │ │   │ │       ├KillDocTreeObjects...
 │ │ │ │ │ │   │ │       ├CreateListItemsForDocumentTree
 │ │ │ │ │ │   │ │       ├TfrmConsults.UpdateNoteTreeView
 │ │ │ │ │ │   │ │       │ └BuildDocumentTree...
 │ │ │ │ │ │   │ │       ├TfrmConsults.DisplayPCE...
 │ │ │ │ │ │   │ │       ├TfrmConsults.ShowPCEControls
 │ │ │ │ │ │   │ │       ├TfrmConsults.SetActionMenus
 │ │ │ │ │ │   │ │       │ ├GetActionMenuLevel
 │ │ │ │ │ │   │ │       │ │ └ConsultCanBeResubmitted
 │ │ │ │ │ │   │ │       │ └TNotifications.GetFollowUp
 │ │ │ │ │ │   │ │       └TfrmConsults.SetResultMenus...
 │ │ │ │ │ │   │ └TfrmConsults.tvConsultsClick
 │ │ │ │ │ │   │   ├KillDocTreeObjects...
 │ │ │ │ │ │   │   └TfrmConsults.tvConsultsChange...
 │ │ │ │ │ │   ├TPCEData.GetCPTRequired...
 │ │ │ │ │ │   ├PutEditedNote...
 │ │ │ │ │ │   ├TfrmConsults.SetEditingIndex...
 │ │ │ │ │ │   └TfrmConsults.lstNotesClick...
 │ │ │ │ │ ├CosignDocument
 │ │ │ │ │ ├ActOnDocument
 │ │ │ │ │ ├TfrmConsults.LacksClinProcFieldsForSignature
 │ │ │ │ │ │ ├GetConsultIENforNote
 │ │ │ │ │ │ ├GetActionMenuLevel...
 │ │ │ │ │ │ ├IsClinProcTitle
 │ │ │ │ │ │ ├TitleForNote
 │ │ │ │ │ │ ├GetSavedCPFields
 │ │ │ │ │ │ │ └StrToFMDateTime
 │ │ │ │ │ │ └TfrmConsults.LacksClinProcFields...
 │ │ │ │ │ ├NoteHasText
 │ │ │ │ │ ├LastSaveClean
 │ │ │ │ │ ├IsOK2Sign...
 │ │ │ │ │ ├TPCEData.CopyPCEData...
 │ │ │ │ │ ├TfrmConsults.lstNotesClick...
 │ │ │ │ │ ├TPCEData.Clear...
 │ │ │ │ │ ├SignDocument
 │ │ │ │ │ ├TfrmConsults.UnlockConsultRequest...
 │ │ │ │ │ ├UnlockDocument
 │ │ │ │ │ ├FindConsult
 │ │ │ │ │ │ └MakeConsultListItem
 │ │ │ │ │ ├MakeConsultListDisplayText
 │ │ │ │ │ ├SetNodeImage
 │ │ │ │ │ ├TfrmConsults.tvConsultsClick...
 │ │ │ │ │ └TfrmConsults.UpdateList...
 │ │ │ │ ├TfrmDCSumm.SaveSignItem
 │ │ │ │ │ ├TfrmFrame.GetTimedOut...
 │ │ │ │ │ ├TfrmDCSumm.SaveCurrentSumm
 │ │ │ │ │ │ └TfrmDCSumm.SaveEditedSumm
 │ │ │ │ │ │   ├TfrmDCSumm.tvSummsChange
 │ │ │ │ │ │   │ ├CanBeAttached
 │ │ │ │ │ │   │ ├CanReceiveAttachment
 │ │ │ │ │ │   │ ├TraverseTree...
 │ │ │ │ │ │   │ ├TfrmDCSumm.lvSummsSelectItem
 │ │ │ │ │ │   │ │ └TfrmDCSumm.lstSummsClick
 │ │ │ │ │ │   │ │   ├MakeDCSummDisplayText
 │ │ │ │ │ │   │ │   ├LoadDocumentText
 │ │ │ │ │ │   │ │   ├TfrmDCSumm.DisplayPCE
 │ │ │ │ │ │   │ │   │ ├TPCEData.AddStrData...
 │ │ │ │ │ │   │ │   │ ├GetVitalsFromDate...
 │ │ │ │ │ │   │ │   │ ├TPCEData.AddVitalData...
 │ │ │ │ │ │   │ │   │ ├CanEditPCE...
 │ │ │ │ │ │   │ │   │ ├TfrmDCSumm.ShowPCEControls
 │ │ │ │ │ │   │ │   │ ├TfrmDrawers.DisplayDrawers...
 │ │ │ │ │ │   │ │   │ ├ActOnDocument
 │ │ │ │ │ │   │ │   │ ├TPCEData.PCEForNote...
 │ │ │ │ │ │   │ │   │ └GetVitalsFromNote...
 │ │ │ │ │ │   │ │   └NotifyOtherApps...
 │ │ │ │ │ │   │ ├TfrmDCSumm.ShowPCEControls
 │ │ │ │ │ │   │ └TfrmDCSumm.lstSummsClick...
 │ │ │ │ │ │   ├TfrmDCSumm.GetTitleText
 │ │ │ │ │ │   ├TfrmDCSumm.mnuActDeleteClick
 │ │ │ │ │ │   │ ├TfrmDCSumm.NoSummSelected
 │ │ │ │ │ │   │ ├ActOnDocument
 │ │ │ │ │ │   │ ├SelectDeleteReason...
 │ │ │ │ │ │   │ ├MakeDCSummDisplayText
 │ │ │ │ │ │   │ ├TfrmDCSumm.LockSumm
 │ │ │ │ │ │   │ │ ├TChanges.Exist
 │ │ │ │ │ │   │ │ └LockDocument
 │ │ │ │ │ │   │ ├JustifyDocumentDelete
 │ │ │ │ │ │   │ ├TfrmDCSumm.SaveCurrentSumm...
 │ │ │ │ │ │   │ ├TfrmDCSumm.SetEditingIndex
 │ │ │ │ │ │   │ ├VisitStrForNote
 │ │ │ │ │ │   │ ├TfrmDCSumm.RemovePCEFromChanges
 │ │ │ │ │ │   │ │ ├VisitStrForNote
 │ │ │ │ │ │   │ │ └TChanges.Remove...
 │ │ │ │ │ │   │ ├DeleteDocument
 │ │ │ │ │ │   │ ├TChanges.Exist
 │ │ │ │ │ │   │ ├UnlockDocument
 │ │ │ │ │ │   │ ├TChanges.Remove...
 │ │ │ │ │ │   │ ├DeletePCE
 │ │ │ │ │ │   │ ├TfrmDCSumm.ClearEditControls
 │ │ │ │ │ │   │ │ ├TPCEData.Clear...
 │ │ │ │ │ │   │ │ └TfrmDCSumm.SetEditingIndex
 │ │ │ │ │ │   │ ├TfrmDCSumm.LoadSumms
 │ │ │ │ │ │   │ │ ├KillDocTreeObjects...
 │ │ │ │ │ │   │ │ ├ListSummsForTree
 │ │ │ │ │ │   │ │ ├CreateListItemsForDocumentTree
 │ │ │ │ │ │   │ │ ├TfrmDCSumm.UpdateTreeView
 │ │ │ │ │ │   │ │ │ └BuildDocumentTree...
 │ │ │ │ │ │   │ │ ├RemoveParentsWithNoChildren...
 │ │ │ │ │ │   │ │ └TfrmDCSumm.tvSummsChange...
 │ │ │ │ │ │   │ ├UpdateReminderFinish...
 │ │ │ │ │ │   │ ├TfrmDCSumm.ShowPCEControls
 │ │ │ │ │ │   │ └TfrmDrawers.DisplayDrawers...
 │ │ │ │ │ │   ├TfrmDCSumm.cmdChangeClick
 │ │ │ │ │ │   │ ├ExecuteDCSummProperties
 │ │ │ │ │ │   │ │ ├TfrmBase508Form.Create...
 │ │ │ │ │ │   │ │ ├ListDCSummTitlesShort
 │ │ │ │ │ │   │ │ │ └LoadDCSummTitles
 │ │ │ │ │ │   │ │ │   └TDCSummTitles.Create
 │ │ │ │ │ │   │ │ ├LoadDCUrgencies
 │ │ │ │ │ │   │ │ ├TfrmDCSummProperties.ShowAdmissionList
 │ │ │ │ │ │   │ │ │ └ListAdmitAll
 │ │ │ │ │ │   │ │ ├PrintNameForTitle
 │ │ │ │ │ │   │ │ ├StrToFMDateTime
 │ │ │ │ │ │   │ │ ├GetDischargeDate
 │ │ │ │ │ │   │ │ ├FMNow
 │ │ │ │ │ │   │ │ └GetTIUListItem
 │ │ │ │ │ │   │ ├TChanges.ReplaceSignState
 │ │ │ │ │ │   │ ├MakeDCSummDisplayText
 │ │ │ │ │ │   │ ├TChanges.ReplaceText
 │ │ │ │ │ │   │ ├TfrmDCSumm.GetTitleText
 │ │ │ │ │ │   │ └TfrmDCSumm.mnuActLoadBoilerClick
 │ │ │ │ │ │   │   ├TfrmDCSumm.NoSummSelected
 │ │ │ │ │ │   │   ├LoadBoilerPlate
 │ │ │ │ │ │   │   ├GetLinkedTemplate...
 │ │ │ │ │ │   │   ├MakeXMLParamTIU
 │ │ │ │ │ │   │   │ └ExternalName
 │ │ │ │ │ │   │   ├AssignBoilerText
 │ │ │ │ │ │   │   │ └QuickCopyWith508Msg...
 │ │ │ │ │ │   │   ├QueryBoilerPlate...
 │ │ │ │ │ │   │   └QuickAddWith508Msg
 │ │ │ │ │ │   │     └SpeakTextInserted
 │ │ │ │ │ │   ├TPCEData.GetCPTRequired...
 │ │ │ │ │ │   ├RequireMASVerification
 │ │ │ │ │ │   ├RequireRelease
 │ │ │ │ │ │   ├PutEditedDCSumm
 │ │ │ │ │ │   │ └SetText...
 │ │ │ │ │ │   ├TChanges.Remove...
 │ │ │ │ │ │   ├UnlockDocument
 │ │ │ │ │ │   ├TfrmDCSumm.SetEditingIndex
 │ │ │ │ │ │   └TfrmDCSumm.lstSummsClick...
 │ │ │ │ │ ├CosignDocument
 │ │ │ │ │ ├ActOnDocument
 │ │ │ │ │ ├NoteHasText
 │ │ │ │ │ ├LastSaveClean
 │ │ │ │ │ ├IsOK2Sign...
 │ │ │ │ │ ├TPCEData.CopyPCEData...
 │ │ │ │ │ ├TfrmDCSumm.lstSummsClick...
 │ │ │ │ │ ├TPCEData.Clear...
 │ │ │ │ │ ├SignDocument
 │ │ │ │ │ └TfrmDCSumm.LoadSumms...
 │ │ │ │ ├TfrmSurgery.SaveSignItem
 │ │ │ │ │ ├TfrmFrame.GetTimedOut...
 │ │ │ │ │ ├TfrmSurgery.SaveCurrentNote
 │ │ │ │ │ │ └TfrmSurgery.SaveEditedNote
 │ │ │ │ │ │   ├TfrmSurgery.tvSurgeryChange
 │ │ │ │ │ │   │ ├TfrmSurgery.EnableDisableMenus
 │ │ │ │ │ │   │ ├MakeSurgeryCaseDisplayText
 │ │ │ │ │ │   │ ├NotifyOtherApps...
 │ │ │ │ │ │   │ ├TfrmSurgery.lstNotesClick
 │ │ │ │ │ │   │ │ ├MakeSurgeryReportDisplayText
 │ │ │ │ │ │   │ │ ├LoadSurgReportText
 │ │ │ │ │ │   │ │ ├TfrmReminderTree.EnableActions...
 │ │ │ │ │ │   │ │ ├TfrmSurgery.DisplayPCE
 │ │ │ │ │ │   │ │ │ ├TfrmSurgery.ShowPCEControls
 │ │ │ │ │ │   │ │ │ ├TfrmDrawers.DisplayDrawers...
 │ │ │ │ │ │   │ │ │ ├TPCEData.AddStrData...
 │ │ │ │ │ │   │ │ │ ├GetVitalsFromDate...
 │ │ │ │ │ │   │ │ │ ├TPCEData.AddVitalData...
 │ │ │ │ │ │   │ │ │ ├TfrmSurgery.ShowPCEButtons
 │ │ │ │ │ │   │ │ │ │ ├AnytimeEncounters
 │ │ │ │ │ │   │ │ │ │ ├CanEditPCE...
 │ │ │ │ │ │   │ │ │ │ └GetAskPCE
 │ │ │ │ │ │   │ │ │ ├InteractiveRemindersActive...
 │ │ │ │ │ │   │ │ │ ├GetReminderStatus
 │ │ │ │ │ │   │ │ │ ├TfrmDrawers.DisplayDrawers...
 │ │ │ │ │ │   │ │ │ ├ActOnDocument
 │ │ │ │ │ │   │ │ │ ├TPCEData.PCEForNote...
 │ │ │ │ │ │   │ │ │ └GetVitalsFromNote...
 │ │ │ │ │ │   │ │ └NotifyOtherApps...
 │ │ │ │ │ │   │ ├TfrmSurgery.ShowPCEControls
 │ │ │ │ │ │   │ ├TfrmSurgery.ShowPCEButtons...
 │ │ │ │ │ │   │ ├TfrmReminderTree.EnableActions...
 │ │ │ │ │ │   │ └TfrmSurgery.DisplayPCE...
 │ │ │ │ │ │   ├TfrmSurgery.GetTitleText
 │ │ │ │ │ │   ├TfrmSurgery.mnuActDeleteClick
 │ │ │ │ │ │   │ ├ActOnDocument
 │ │ │ │ │ │   │ ├SelectDeleteReason...
 │ │ │ │ │ │   │ ├MakeNoteDisplayText
 │ │ │ │ │ │   │ ├LockDocument
 │ │ │ │ │ │   │ ├JustifyDocumentDelete
 │ │ │ │ │ │   │ ├TfrmSurgery.SaveCurrentNote...
 │ │ │ │ │ │   │ ├TfrmSurgery.SetEditingIndex
 │ │ │ │ │ │   │ │ ├KillReminderDialog...
 │ │ │ │ │ │   │ │ └TfrmReminderTree.EnableActions...
 │ │ │ │ │ │   │ ├VisitStrForNote
 │ │ │ │ │ │   │ ├TfrmSurgery.RemovePCEFromChanges
 │ │ │ │ │ │   │ │ ├VisitStrForNote
 │ │ │ │ │ │   │ │ └TChanges.Remove...
 │ │ │ │ │ │   │ ├DeleteDocument
 │ │ │ │ │ │   │ ├TChanges.Exist
 │ │ │ │ │ │   │ ├UnlockDocument
 │ │ │ │ │ │   │ ├TChanges.Remove...
 │ │ │ │ │ │   │ ├DeletePCE
 │ │ │ │ │ │   │ ├TfrmSurgery.ClearEditControls
 │ │ │ │ │ │   │ │ ├TPCEData.Clear...
 │ │ │ │ │ │   │ │ └TfrmSurgery.SetEditingIndex...
 │ │ │ │ │ │   │ ├TfrmSurgery.LoadSurgeryCases
 │ │ │ │ │ │   │ │ ├KillCaseTreeObjects
 │ │ │ │ │ │   │ │ │ └ResetCaseTreeObjectStrings
 │ │ │ │ │ │   │ │ ├TfrmSurgery.ShowPCEControls
 │ │ │ │ │ │   │ │ ├GetSurgCaseList
 │ │ │ │ │ │   │ │ ├CreateListItemsForCaseTree
 │ │ │ │ │ │   │ │ ├TfrmSurgery.UpdateTreeView
 │ │ │ │ │ │   │ │ │ └BuildCaseTree
 │ │ │ │ │ │   │ │ │   ├MakeSurgeryCaseDisplayText
 │ │ │ │ │ │   │ │ │   ├MakeSurgeryReportDisplayText
 │ │ │ │ │ │   │ │ │   ├MakeCaseTreeObject
 │ │ │ │ │ │   │ │ │   │ ├MakeSurgeryCaseDisplayText
 │ │ │ │ │ │   │ │ │   │ └MakeSurgeryReportDisplayText
 │ │ │ │ │ │   │ │ │   ├SetCaseTreeNodeImagesAndFormatting
 │ │ │ │ │ │   │ │ │   │ └SetImageFlag
 │ │ │ │ │ │   │ │ │   └..(rec)..
 │ │ │ │ │ │   │ │ ├RemoveParentsWithNoChildren
 │ │ │ │ │ │   │ │ │ └KillCaseTreeNode
 │ │ │ │ │ │   │ │ │   └ResetCaseTreeObjectStrings
 │ │ │ │ │ │   │ │ ├TfrmSurgery.SetSurgTreeLabel
 │ │ │ │ │ │   │ │ │ └SetDateRangeText
 │ │ │ │ │ │   │ │ └TfrmSurgery.tvSurgeryChange...
 │ │ │ │ │ │   │ ├UpdateReminderFinish...
 │ │ │ │ │ │   │ ├TfrmSurgery.ShowPCEControls
 │ │ │ │ │ │   │ └TfrmSurgery.ShowPCEButtons...
 │ │ │ │ │ │   ├TPCEData.GetCPTRequired...
 │ │ │ │ │ │   ├PutEditedNote...
 │ │ │ │ │ │   ├TfrmSurgery.SetEditingIndex...
 │ │ │ │ │ │   └TfrmSurgery.lstNotesClick...
 │ │ │ │ │ ├CosignDocument
 │ │ │ │ │ ├ActOnDocument
 │ │ │ │ │ ├NoteHasText
 │ │ │ │ │ ├LastSaveClean
 │ │ │ │ │ ├IsOK2Sign...
 │ │ │ │ │ ├TPCEData.CopyPCEData...
 │ │ │ │ │ ├TfrmSurgery.lstNotesClick...
 │ │ │ │ │ ├TPCEData.Clear...
 │ │ │ │ │ ├SignDocument
 │ │ │ │ │ └TfrmSurgery.LoadSurgeryCases...
 │ │ │ │ ├TChanges.Remove...
 │ │ │ │ └UnlockIfAble...
 │ │ │ ├TChanges.CanSign
 │ │ │ ├TfrmReview.BuildSignList
 │ │ │ │ └TfrmReview.BuildList...
 │ │ │ ├TfrmReview.PlaceComponents
 │ │ │ │ ├TfrmReview.AnyItemsAreChecked...
 │ │ │ │ └TfrmReview.IsSignatureRequired
 │ │ │ ├CSRemaining
 │ │ │ │ ├LoadUnsignedOrders
 │ │ │ │ └TextForOrder
 │ │ │ └rpcNonBillableOrders
 │ │ ├TEncounter.SetProvider
 │ │ ├TEncounter.SetLocation
 │ │ ├TEncounter.SetDateTime
 │ │ ├TEncounter.SetVisitCategory
 │ │ └TEncounter.SetStandAlone
 │ └TfrmFrame.DisplayEncounterText...
 ├TChanges.ExistForOrder
 ├UnlockOrder
 ├IsPSOSupplyDlg
 ├GMRCCanCloseDialog
 │ ├CanFreeConsultDialog
 │ └CanFreeProcDialog
 ├TfrmODBase.SetDefaultCoPay
 │ └GetDefaultCopay
 ├TResponses.FindResponseByName
 ├IsActiveICDCode
 │ └IsActiveCode
 ├SetFormPosition...
 ├TResponses.NextInstance
 ├ValidateDrugAutoAccept
 │ ├DefaultDays
 │ ├DaysToQty
 │ └CalcMaxRefills
 ├GetServiceIEN
 └TfrmODBase.cmdAcceptClick
   ├IsCompletedPtEvt
   ├CheckForAutoDCDietOrders...
   ├CurrentDietText
   ├TfrmODBase.ValidSave
   │ ├TfrmODBase.Validate
   │ │ ├TResponses.IValueFor
   │ │ ├StrToFMDateTime
   │ │ ├FMToday...
   │ │ ├PersonHasKey
   │ │ ├IsPFSSActive
   │ │ ├TResponses.PromptExists
   │ │ ├TResponses.Update
   │ │ │ ├TResponses.FindResponseByName
   │ │ │ └TResponses.IENForPrompt
   │ │ └TEncounter.GetVisitStr...
   │ ├TfrmODBase.AcceptOrderChecks
   │ │ ├OrderChecksEnabled
   │ │ ├TResponses.BuildOCItems
   │ │ │ ├TResponses.IValueFor
   │ │ │ └TResponses.EValueFor
   │ │ ├OrderChecksOnAccept
   │ │ └AcceptOrderWithChecks
   │ │   ├TfrmBase508Form.Create...
   │ │   ├IsMonograph
   │ │   └GetXtraTxt
   │ ├TfrmFrame.GetTimedOut...
   │ ├AskAnotherOrder
   │ ├TfrmODBase.InitDialog
   │ │ ├TfrmODBase.ClearDialogControls
   │ │ │ ├ClearControl
   │ │ │ └TfrmODBase.ShowOrderMessage
   │ │ └TResponses.Clear
   │ ├TfrmODBase.ClearDialogControls...
   │ ├TfrmODBase.LESValidationCheck
   │ │ ├GetDispGroupForLES
   │ │ ├TResponses.IValueFor
   │ │ └LESValidationForChangedLabOrder
   │ ├TResponses.SaveOrder
   │ │ ├CheckQOGroup
   │ │ ├IsValidIMOLoc
   │ │ ├EventExist
   │ │ ├PutNewOrder
   │ │ │ ├SetupORDIALOG
   │ │ │ └SetOrderFields...
   │ │ ├EventInfo
   │ │ ├SaveEvtForOrder
   │ │ └rpcGetBAMasterSwStatus
   │ ├SetDefaultCoPayToNewOrder
   │ ├ProcessOrderAcceptEventHook
   │ │ ├GetOrderAcceptGUIDs
   │ │ ├EnsureEventHookObjects
   │ │ │ └TCPRSEventHookManager.Create
   │ │ │   ├TCPRSBroker.Create
   │ │ │   └TCPRSState.Create
   │ │ └TCPRSEventHookManager.ProcessComObject
   │ │   └TCPRSBroker.Initialize
   │ ├GetEventDefaultDlg
   │ └TChanges.Add...
   ├AskAnotherOrder
   ├TfrmODBase.InitDialog...
   ├LateTrayCheck
   │ ├TResponses.FindResponseByName
   │ └CheckLateTray
   │   ├StrToFMDateTime
   │   ├FMToday...
   │   ├FMNow
   │   ├LoadDietParams
   │   ├SetAvailTimes
   │   │ └AMPMToFMTime
   │   └TfrmBase508Form.Create...
   ├TfrmODBase.OrderForInpatient
   │ ├OrderEventTypeOnCreate
   │ └IsPassEvt1
   ├TfrmODBase.ClearDialogControls...
   ├LateTrayOrder
   │ ├OrderLateTray
   │ │ └SetOrderFromResults
   │ │   └SetOrderFields...
   │ └TChanges.Add...
   └TfrmOrders.GroupChangesUpdate
     ├TChanges.ChangeOrderGrp
     └TChanges.ReplaceODGrpName

Called-By Hierarchy


                                   ActivateOrderDialog
                           TfrmRemDlg.btnFinishClick┤ 
           TfrmConsults.mnuActNewConsultRequestClick┤ 
                   TfrmConsults.cmdNewConsultClick┘ │ 
                TfrmConsults.mnuActNewProcedureClick┤ 
                      TfrmConsults.cmdNewProcClick┘ │ 
                                        ChangeOrders┤ 
                      TfrmOrders.mnuActChangeClick┤ │ 
                        TfrmMeds.mnuActChangeClick┘ │ 
                                     ChangeOrdersEvt┤ 
                                          CopyOrders┤ 
                        TfrmOrders.mnuActCopyClick┤ │ 
                          TfrmMeds.mnuActCopyClick┤ │ 
                           TfrmODActive.btnOKClick┘ │ 
                                      TransferOrders┤ 
                        TfrmOrders.mnuActCopyClick┤ │ 
                          TfrmMeds.mnuActCopyClick┤ │ 
                           TfrmODActive.btnOKClick┘ │ 
                            TfrmOrders.lstWriteClick┤ 
               TfrmOrders.PlaceOrderForDefaultDialog┤ 
                  TfrmOrders.DisplayDefaultDlgList┤ │ 
                       TfrmOrders.ResetOrderPage┘ │ │ 
               TfrmOrders.btnDelayedOrderClick┘   │ │ 
                                 DisplayEvntDialog┤ │ 
                             SetDelayEventForMed┘ │ │ 
                      TfrmMeds.mnuActCopyClick┘   │ │ 
                                 DisplayEvntDialog┤ │ 
                                  SetViewForCopy┘ │ │ 
                    TfrmOrders.mnuActCopyClick┘   │ │ 
                                 DisplayEvntDialog┘ │ 
                                ExecuteChangeEvt┘   │ 
                 TfrmOrders.mnuActChgEvntClick┘     │ 
                             TfrmMeds.mnuActNewClick┤ 
                           TfrmOMNavA.ActivateDialog┤ 
                         TfrmOMNavA.grdMenuKeyDown┤ │ 
                         TfrmOMNavA.grdMenuMouseUp┘ │ 
                                TfrmOMSet.DoNextItem┘ 
                              TfrmOMSet.InsertList┤   
                               ActivateOrderList┘ │   
                     TfrmRemDlg.btnFinishClick┤   │   
                             ActivateOrderHTML┤   │   
                    TfrmOrders.lstWriteClick┤ │   │   
    TfrmOrders.PlaceOrderForDefaultDialog...┘ │   │   
                              ActivateOrderSet┤   │   
                   TfrmRemDlg.btnFinishClick┤ │   │   
TfrmConsults.mnuActNewConsultRequestClick...┤ │   │   
     TfrmConsults.mnuActNewProcedureClick...┤ │   │   
                    TfrmOrders.lstWriteClick┤ │   │   
    TfrmOrders.PlaceOrderForDefaultDialog...┤ │   │   
                     TfrmMeds.mnuActNewClick┤ │   │   
                TfrmOMNavA.ActivateDialog...┤ │   │   
                     TfrmOMSet.DoNextItem...┘ │   │   
                       TfrmOMNavA.DoSelectList┘   │   
                     TfrmOMNavA.grdMenuKeyUp┤     │   
                   TfrmOMNavA.grdMenuMouseUp┘     │   
                                        SkipToNext┤   
                         TfrmOMSet.DoNextItem...┘ │   
                            TfrmOMSet.UMDelayEvent┘   

Calls

Name Declaration Comments
BuildResponses procedure BuildResponses(var ResolvedDialog: TOrderDialogResolved; const KeyVars: string; AnEvent: TOrderDelayEvent; ForIMO: boolean = False); -
CheckForAutoDCDietOrders procedure CheckForAutoDCDietOrders(EvtID: integer; DispGrp: integer; CurrentText: string; var CancelText: string; Sender: TObject); -
TfrmODBase.cmdAcceptClick procedure cmdAcceptClick(Sender: TObject); -
CreateOrderDialog function CreateOrderDialog(Sender: TComponent; FormID: integer; AnEvent: TOrderDelayEvent; ODEvtID: integer = 0): TfrmODBase; -
DEACheckFailed function DEACheckFailed(AnOI: Integer; ForInpatient: Boolean): string; -
DoesOIPIInSigForQO function DoesOIPIInSigForQO(AnQOID: integer): integer; -
EventInfo function EventInfo(APtEvtID: string): string; -
TChanges.ExistForOrder function ExistForOrder(const AnID: string): Boolean; -
TResponses.FindResponseByName function FindResponseByName(const APromptID: string; AnInstance: Integer): TResponse; -
GetKeyVars function GetKeyVars: string; -
GetOrderPtEvtID function GetOrderPtEvtID(AnOrderID: string): string; -
TResponses.GetOrderText function GetOrderText: string; -
GetPackageByOrderID function GetPackageByOrderID(const OrderID: string): string; -
GetServiceIEN function GetServiceIEN(ORIEN: string): string; -
GMRCCanCloseDialog function GMRCCanCloseDialog(dialog : TfrmODBase) : Boolean; -
HasTemplateField function HasTemplateField(txt: string): boolean; -
IMOActionValidation function IMOActionValidation(AnId: string; var IsIMOOD: boolean; var x: string; AnEventType: char): boolean; -
IsActiveICDCode function IsActiveICDCode(ACode: string; ADate: TFMDateTime = 0): boolean; -
IsIMODialog function IsIMODialog(DlgID: integer): boolean; -
IsPSOSupplyDlg function IsPSOSupplyDlg(DlgID, QODlg: integer): boolean; -
IsValidQOSch function IsValidQOSch(QOID: string): string; -
IsValidSchedule function IsValidSchedule(AnOrderID: string): boolean; -
TResponses.IValueFor function IValueFor(const APromptID: string; AnInstance: Integer): string; -
TfrmFrame.mnuFileEncounterClick procedure mnuFileEncounterClick(Sender: TObject); -
TResponses.NextInstance function NextInstance(const APromptID: string; LastInstance: Integer): Integer; -
PassDrugTest function PassDrugTest(OI: integer; OrderType: string; InptOrder: boolean; CheckForClozapineOnly: boolean = false): boolean; -
PushKeyVars procedure PushKeyVars(const NewVals: string); -
ResetDialogProperties procedure ResetDialogProperties(const AnID: string; AnEvent: TOrderDelayEvent; var ResolvedDialog: TOrderDialogResolved); -
RetrieveOrderText function RetrieveOrderText(AnOrderID: string): string; -
TfrmODBase.SetDefaultCoPay procedure SetDefaultCoPay(AnOrderID: string); -
TfrmODBase.SetDialogIEN procedure SetDialogIEN(Value: Integer); virtual; -
TfrmODBase.SetDisplayGroup procedure SetDisplayGroup(Value: Integer); -
TResponses.SetEventDelay procedure SetEventDelay(AnEvent: TOrderDelayEvent); -
SetFormPosition procedure SetFormPosition(AForm: TForm); -
TfrmODBase.SetKeyVariables procedure SetKeyVariables(const VarStr: string); -
TfrmODBase.SetupDialog procedure SetupDialog(OrderAction: Integer; const ID: string); virtual; -
ShowVerifyText procedure ShowVerifyText(var QuickLevel: Integer; var VerifyText: string; InptDispGrp: boolean = False); -
UnlockOrder procedure UnlockOrder(OrderID: string); -
ValidateComplexOrderAct procedure ValidateComplexOrderAct(AnOrderID: string; var ErrMsg: string); -
ValidateDrugAutoAccept function ValidateDrugAutoAccept(tempDrug, tempUnit, tempSch, tempDur: string; OI, tempSupply, tempRefills: integer; tempQuantity: Double): boolean; -
ValidateOrderAction procedure ValidateOrderAction(const ID, Action: string; var ErrMsg: string); -

Called-By

Name Declaration Comments
TfrmOMNavA.ActivateDialog procedure ActivateDialog(AnItem: TOrderMenuItem); -
TfrmRemDlg.btnFinishClick procedure btnFinishClick(Sender: TObject); -
ChangeOrders procedure ChangeOrders(AList: TStringList; AnEvent: TOrderDelayEvent); -
ChangeOrdersEvt function ChangeOrdersEvt(AnOrderID: string; AnEvent: TOrderDelayEvent): boolean; -
CopyOrders function CopyOrders(AList: TStringList; AnEvent: TOrderDelayEvent; var DoesEventOccur: boolean; ANeedVerify: boolean = True): boolean; -
TfrmOMSet.DoNextItem procedure DoNextItem; -
TfrmOrders.lstWriteClick procedure lstWriteClick(Sender: TObject); -
TfrmMeds.mnuActNewClick procedure mnuActNewClick(Sender: TObject); -
TfrmConsults.mnuActNewConsultRequestClick procedure mnuActNewConsultRequestClick(Sender: TObject); -
TfrmConsults.mnuActNewProcedureClick procedure mnuActNewProcedureClick(Sender: TObject); -
TfrmOrders.PlaceOrderForDefaultDialog function PlaceOrderForDefaultDialog(ADlgInfo: string; IsDefaultDialog: boolean; AEvent: TOrderDelayEvent): boolean; -
TransferOrders function TransferOrders(AList: TStringList; AnEvent: TOrderDelayEvent; var DoesEventOccur: boolean; ANeedVerify: boolean = True): boolean; -


Source

868   function ActivateOrderDialog(const AnID: string; AnEvent: TOrderDelayEvent;
869     AnOwner: TComponent; ARefNum: Integer; ANeedVerify: boolean = True): Boolean;
870   const
871     TX_DEAFAIL1   = 'Order for controlled substance,' + CRLF;
872     TX_DEAFAIL2   = CRLF + 'could not be completed. Provider does not have a' + CRLF +
873                     'current, valid DEA# on record and is ineligible' + CRLF + 'to sign the order.';
874     TX_SCHFAIL    = CRLF + 'could not be completed. Provider is not authorized' + CRLF +
875                     'to prescribe medications in Federal Schedule ';
876     TX_NO_DETOX   = CRLF + 'could not be completed. Provider does not have a' + CRLF +
877                     'valid Detoxification/Maintenance ID number on' + CRLF +
878                     'record and is ineligible to sign the order.';
879     TX_EXP_DETOX1 = CRLF + 'could not be completed. Provider''s Detoxification/Maintenance' + CRLF +
880                     'ID number expired due to an expired DEA# on ';
881     TX_EXP_DETOX2 = '.' + CRLF + 'Provider is ineligible to sign the order.';
882     TX_EXP_DEA1   = CRLF + 'could not be completed. Provider''s DEA# expired on ';
883     TX_EXP_DEA2   = CRLF + 'and no VA# is assigned. Provider is ineligible to sign the order.';
884     TX_INSTRUCT   = CRLF + CRLF + 'Click RETRY to select another provider.' + CRLF + 'Click CANCEL to cancel the current order.';
885     TC_DEAFAIL    = 'Order not completed';
886     TC_IMO_ERROR  = 'Inpatient medication order on outpatient authorization required';
887     TX_EVTDEL_DIET_CONFLICT = 'Have you done either of the above?';
888     TC_EVTDEL_DIET_CONFLICT = 'Possible delayed order conflict';
889     TX_INACTIVE_SVC = 'This consult service is currently inactive and not receiving requests.' + CRLF +
890                       'Please contact your Clinical Coordinator/IRM staff to fix this order.';
891     TX_INACTIVE_SVC_CAP = 'Inactive Service';
892     TX_NO_SVC = 'The order or quick order you have selected does not specify a consult service.' + CRLF +
893                 'Please contact your Clinical Coordinator/IRM staff to fix this order.';
894     TC_NO_SVC = 'No service specified';
895   var
896     ResolvedDialog: TOrderDialogResolved;
897     x, EditedOrder, chkCopay, OrderID, PkgInfo,OrderPtEvtID,OrderEvtID,NssErr, tempUnit, tempSupply, tempDrug, tempSch: string;
898     temp,tempDur,tempQuantity, tempRefills: string;
899     i, ODItem, tempOI, ALTOI: integer;
900     DrugCheck, InptDlg, IsAnIMOOrder, DrugTestDlgType: boolean;
901     IsPsoSupply,IsDischargeOrPass,IsPharmacyOrder,IsConsultOrder,ForIMO, IsNewOrder: boolean;
902     tmpResp: TResponse;
903     CxMsg: string;
904     AButton: TButton;
905     SvcIEN: string;
906     //CsltFrmID: integer;
907     FirstNumericPos: Integer;
908     DEAFailStr, TX_INFO: string;
909   
910   begin
911     IsPsoSupply := False;
912     Result := False;
913     IsDischargeOrPass := False;
914     IsAnIMOOrder  := False;
915     ForIMO := False;
916     IsNewOrder := True;
917     PassDrugTstCall := False;
918     DrugCheck := false;
919     DrugTestDlgType := false;
920     InptDlg := False;
921     //We need to get the first numeric postion
922     for FirstNumericPos := 1 to Length(AnID) do begin
923      if AnID[FirstNumericPos] in ['0'..'9'] then break;
924     end;
925   
926     //QOAltOI.OI := 0;
927     Application.ProcessMessages;
928     // double check environment before continuing with order
929     if uOrderDialog <> nil then uOrderDialog.Close; // then x := uOrderDialog.Name else x := '';
930     //if ShowMsgOn(uOrderDialog <> nil, TX_DLG_ERR + CRLF + x, TC_DLG_ERR) then Exit;
931   
932     if CharAt(AnID, 1) = 'X' then
933     begin
934       IsNewOrder := False;
935      // if PassDrugTest(StrtoINT(Copy(AnID, FirstNumericPos, (Pos(';', AnID) - FirstNumericPos))), 'E')=false then Exit;
936       ValidateOrderAction(Copy(AnID, 2, Length(AnID)), OA_CHANGE,   x);
937       if ( Length(x)<1 ) and not (AnEvent.EventIFN > 0) then
938         ValidateComplexOrderAct(Copy(AnID, 2, Length(AnID)),x);
939       if (Pos('COMPLEX-PSI',x)>0) then
940         x := TX_COMPLEX;
941       if Length(x) > 0 then
942         x := RetrieveOrderText(Copy(AnID, 2, Length(AnID))) + #13#10 + x;
943       if ShowMsgOn(Length(x) > 0, x, TC_NO_CHANGE) then Exit;
944       DrugCheck := true;
945     end;
946     if CharAt(AnID, 1) = 'C' then
947     begin
948       IsNewOrder := False;
949       //if PassDrugTest(StrtoINT(Copy(AnID, FirstNumericPos, (Pos(';', AnID) - FirstNumericPos))), 'E')=false then Exit;
950       ValidateOrderAction(Copy(AnID, 2, Length(AnID)), OA_COPY,     x);
951       if Length(x) > 0 then
952         x := RetrieveOrderText(Copy(AnID, 2, Length(AnID))) + #13#10 + x;
953       if ShowMsgOn(Length(x) > 0, x, TC_NO_COPY) then Exit;
954       DrugCheck := true;
955    end;
956     if CharAt(AnID, 1) = 'T' then
957     begin
958       IsNewOrder := False;
959       if (XfInToOutNow = true) and (PassDrugTest(StrtoINT(Copy(AnID, FirstNumericPos, (Pos(';', AnID) - FirstNumericPos))), 'E', false)=false) then Exit;
960       if (XfInToOutNow = false) then
961         begin
962          if (XferOuttoInOnMeds = True) and (PassDrugTest(StrtoINT(Copy(AnID, FirstNumericPos, (Pos(';', AnID) - FirstNumericPos))), 'E', true)=false) then Exit;
963          if (XferOuttoInOnMeds = False) and (PassDrugTest(StrtoINT(Copy(AnID, FirstNumericPos, (Pos(';', AnID) - FirstNumericPos))), 'E', False)=false) then Exit;
964         end;
965       ValidateOrderAction(Copy(AnID, 2, Length(AnID)), OA_TRANSFER, x);
966       if Length(x) > 0 then
967         x := RetrieveOrderText(Copy(AnID, 2, Length(AnID))) + #13#10 + x;
968       if ShowMsgOn(Length(x) > 0, x, TC_NO_XFER) then Exit;
969     end;
970     if not IMOActionValidation(AnID, IsAnIMOOrder, x, AnEvent.EventType) then
971     begin
972       ShowMsgOn(Length(x) > 0, x, TC_IMO_ERROR);
973       Exit;
974     end;
975     if ( (StrToIntDef(AnId,0)>0) and (AnEvent.EventIFN <= 0) ) then
976       ForIMO := IsIMODialog(StrToInt(AnId))
977     else if ( (IsAnIMOOrder) and (AnEvent.EventIFN <= 0) ) then
978       ForIMO := True;
979     OrderPtEvtID := GetOrderPtEvtID(Copy(AnID, 2, Length(AnID)));
980     OrderEvtID := Piece(EventInfo(OrderPtEvtID),'^',2);
981     //CQ 18660 Orders for events should be modal. Orders for non-event should not be modal
982     if AnEvent.EventIFN > 0 then frmOrders.NeedShowModal := true
983     else frmOrders.NeedShowModal := false;
984     // evaluate order dialog, build response list & see what form should be presented
985     FillChar(ResolvedDialog, SizeOf(ResolvedDialog), #0);
986     ResolvedDialog.InputID := AnID;
987     BuildResponses(ResolvedDialog, GetKeyVars, AnEvent, ForIMO);
988     if (ResolvedDialog.DisplayGroup = InPtDisp) or (ResolvedDialog.DisplayGroup = ClinDisp) then DrugTestDlgType := true;
989     if (DrugCheck = true) and (ResolvedDialog.DisplayGroup = OutPtDisp) and
990     (PassDrugTest(StrtoINT(Copy(AnID, FirstNumericPos, (Pos(';', AnID) - FirstNumericPos))), 'E', false)=false) then Exit;
991     if (DrugCheck = true) and (DrugTestDlgType = true) and (PassDrugTest(StrtoINT(Copy(AnID, FirstNumericPos, (Pos(';', AnID) - FirstNumericPos))), 'E', true)=false) then Exit;
992     if (IsNewOrder = True) and (ResolvedDialog.DialogType = 'Q') and
993        ((ResolvedDialog.DisplayGroup = OutptDisp) or (DrugTestDlgType = true)) then
994       begin
995         if (PassDrugTest(ResolvedDialog.DialogIEN, 'Q', DrugTestDlgType)=false) then Exit
996         else PassDrugTstCall := True;
997       end;
998     if (ForIMO and ( (ResolvedDialog.DialogIEN = MedsInDlgIen)
999       or (ResolvedDialog.DialogIEN = MedsIVDlgIen)) ) then
1000      ResolvedDialog.DisplayGroup := ClinDisp;
1001    ResetDialogProperties(AnID, AnEvent, ResolvedDialog);
1002   {* AGP CHANGE 26.20 Remove restriction to allowed for ordering of inpatient medication for an inpatient from an outpatient location
1003     //jd imo change
1004     if (ResolvedDialog.DisplayGroup = InptDisp) and (Patient.Inpatient) and (AnEvent.EventIFN < 1) then
1005     begin
1006       if IsClinicLoc(Encounter.Location) then
1007       begin
1008         MessageDlg(TX_NOINPT, mtWarning, [mbOK], 0);
1009         Exit;
1010       end;
1011     end;
1012     //jd imo change end  *}
1013     if (ResolvedDialog.DisplayGroup = InptDisp) or
1014        (ResolvedDialog.DisplayGroup = OutptDisp) or
1015        (ResolvedDialog.DisplayGroup = MedsDisp) or
1016        (ResolvedDialog.DisplayGroup = IVDisp) or
1017        (ResolvedDialog.DisplayGroup =  NonVADisp) or
1018        (ResolvedDialog.DisplayGroup =  ClinDisp) then  IsPharmacyOrder := True
1019     else
1020        IsPharmacyOrder := False;
1021     (*  IsPharmacyOrder := ResolvedDialog.DisplayGroup in [InptDisp, OutptDisp,
1022          MedsDisp,IVDisp, NonVADisp, ClinDisp];*)   //v25.27 range check error - RV
1023    IsConsultOrder := ResolvedDialog.DisplayGroup in [CsltDisp,ProcDisp];
1024    if (uAutoAC) and (not (ResolvedDialog.QuickLevel in [QL_REJECT,QL_CANCEL]))
1025      and (not IsPharmacyOrder) and (not IsConsultOrder) then
1026      ResolvedDialog.QuickLevel := QL_AUTO;
1027    if (ResolvedDialog.DialogType = 'Q')
1028      and (ResolvedDialog.DisplayGroup = InptDisp) then
1029    begin
1030       NssErr := IsValidQOSch(ResolvedDialog.InputID);
1031       if (Length(NssErr) > 1) then
1032       begin
1033         if (NssErr <> 'OTHER') and (NssErr <> 'schedule is not defined.') then
1034           ShowMsg('The order contains invalid non-standard schedule.');
1035         NSSchedule := True;
1036         ResolvedDialog.QuickLevel := 0;
1037       end;
1038    end;
1039    if ResolvedDialog.DisplayGroup = InptDisp then       //nss
1040    begin
1041      if (CharAt(AnID, 1) = 'C') or (CharAt(AnID, 1) = 'T') or (CharAt(AnID, 1) = 'X') then
1042      begin
1043        if not IsValidSchedule(Copy(AnID, 2, Length(AnID))) then
1044        begin
1045          ShowMsg('The order contains invalid non-standard schedule.');
1046          NSSchedule := True;
1047        end;
1048      end;
1049      if NSSchedule then ResolvedDialog.QuickLevel := 0;
1050    end;
1051   (* if (ResolvedDialog.DialogType = 'Q') and ((ResolvedDialog.FormID = OD_MEDINPT) or (ResolvedDialog.FormID = OD_MEDOUTPT)) then
1052      begin
1053        temp := '';
1054        tempOI := GetQOOrderableItem(ResolvedDialog.InputID);
1055        if tempOI >0 then
1056          begin
1057            ALTOI := tempOI;
1058            CheckFormularyOI(AltOI,temp,True);
1059            if ALTOI <> tempOI then
1060              begin
1061                ResolvedDialog.QuickLevel := 0;
1062                QOAltOI.OI := ALTOI;
1063              end;
1064          end;
1065      end; *)
1066    //   ((ResolvedDialog.DisplayGroup = InptDisp) or (ResolvedDialog.DisplayGroup = OutptDisp) or (ResolvedDialog.DisplayGroup = MedsDisp)) then
1067   //    ResolvedDialog.QuickLevel := 0;
1068    with ResolvedDialog do if (QuickLevel = QL_VERIFY) and (HasTemplateField(ShowText)) then QuickLevel := QL_DIALOG;
1069  
1070    // Check for potential conflicting auto-accept delayed-release diet orders (CQ #10946 - v27.36 - RV)
1071    with ResolvedDialog do if (QuickLevel = QL_AUTO) and (DisplayGroup = DietDisp) and (AnEvent.EventType <> 'C') then
1072    begin
1073      AButton := TButton.Create(Application);
1074      try
1075        CheckForAutoDCDietOrders(AnEvent.EventIFN, DisplayGroup, '', CxMsg, AButton);
1076        if CxMsg <> '' then
1077        begin
1078          if InfoBox(CxMsg + CRLF + CRLF + TX_EVTDEL_DIET_CONFLICT,
1079             TC_EVTDEL_DIET_CONFLICT,
1080             MB_ICONWARNING or MB_YESNO) = ID_NO
1081             then QuickLevel := QL_DIALOG;
1082        end;
1083      finally
1084        AButton.Free;
1085      end;
1086    end;
1087  
1088    with ResolvedDialog do
1089    begin
1090      if QuickLevel = QL_REJECT then InfoBox(ShowText, TC_DLG_REJECT, MB_OK);
1091      if (QuickLevel = QL_VERIFY) and (IsPharmacyOrder or ANeedVerify) then  ShowVerifyText(QuickLevel, ShowText, DisplayGroup=InptDisp);
1092      if QuickLevel = QL_AUTO then
1093      begin
1094        //CsltFrmID := FormID;
1095        FormID := OD_AUTOACK;
1096      end;
1097      if (QuickLevel = QL_REJECT) or (QuickLevel = QL_CANCEL) then Exit;
1098      PushKeyVars(ResolvedDialog.QOKeyVars);
1099    end;
1100    if ShowMsgOn(not (ResolvedDialog.FormID > 0), TX_NOFORM, TC_NOFORM) then Exit;
1101    with ResolvedDialog do if DialogType = 'X' then
1102    begin
1103      EditedOrder := Copy(Piece(ResponseID, '-', 1), 2, Length(ResponseID));
1104    end
1105    else EditedOrder := '';
1106    if XfInToOutNow then
1107    begin
1108       //if Transfer an order to outpatient and release immediately
1109       // then changing the Eventtype to 'C' instead of 'D'
1110       IsDischargeOrPass := True;
1111       AnEvent.EventType := 'C';
1112       AnEvent.Effective := 0;
1113    end;
1114    uOrderDialog := CreateOrderDialog(AnOwner, ResolvedDialog.FormID, AnEvent, StrToIntDef(OrderEvtID,0));
1115    uOrderDialog.IsSupply := IsPsoSupply;
1116  
1117    {For copy, change, transfer actions on an None-IMO order, the new order should not be treated as IMO order
1118     although the IMO criteria could be met. }
1119    //if (uOrderDialog.IsIMO) and (CharAt(AnID, 1) in ['X','C','T']) then
1120    if not uOrderDialog.IsIMO then
1121      uOrderDialog.IsIMO := ForIMO;
1122  
1123    if (ResolvedDialog.DialogType = 'Q') and (ResolvedDialog.DisplayGroup in [MedsDisp, OutptDisp, InptDisp]) then
1124       begin
1125         if DoesOIPIInSigForQO(StrToInt(ResolvedDialog.InputID))=1 then
1126           uOrderDialog.IncludeOIPI := True
1127         else
1128           uOrderDialog.IncludeOIPI := False;
1129       end;
1130  
1131    if (uOrderDialog <> nil) and not uOrderDialog.Closing then with uOrderDialog do
1132          begin
1133            SetKeyVariables(GetKeyVars);
1134  
1135            if IsDischargeOrPass then
1136              EvtForPassDischarge  := 'D'
1137            else
1138              EvtForPassDischarge  := #0;
1139  
1140            Responses.SetEventDelay(AnEvent);
1141            Responses.LogTime := uOrderSetTime;
1142            DisplayGroup := ResolvedDialog.DisplayGroup;  // used to pass ORTO
1143            DialogIEN    := ResolvedDialog.DialogIEN;     // used to pass ORIT
1144            RefNum := ARefNum;
1145  
1146            case ResolvedDialog.DialogType of
1147            'C': SetupDialog(ORDER_COPY,  ResolvedDialog.ResponseID);
1148            'D': SetupDialog(ORDER_NEW,   '');
1149            'X':
1150                  begin
1151                     SetupDialog(ORDER_EDIT,  ResolvedDialog.ResponseID);
1152                     OrderID := Copy(ResolvedDialog.ResponseID,2,Length(ResolvedDialog.ResponseID));
1153                     //IsInpatient := OrderForInpatient;
1154                     ODItem := StrToIntDef(Responses.IValueFor('ORDERABLE', 1), 0);
1155                     PkgInfo := '';
1156                     DEAFailStr := '';
1157                     if Length(OrderID)>0 then
1158                       PkgInfo := GetPackageByOrderID(OrderID);
1159                     if Pos('PS',PkgInfo)=1 then
1160                     begin
1161                       if PkgInfo = 'PSO' then InptDlg := False
1162                       else if PkgInfo = 'PSJ' then InptDlg := True;
1163                       DEAFailStr := DEACheckFailed(ODItem, InptDlg);
1164                       while (StrToIntDef(Piece(DEAFailStr,U,1),0) in [1..5]) and (uOrderDialog.FillerID <> 'PSH') do
1165                       begin
1166                         case StrToIntDef(Piece(DEAFailStr,U,1),0) of
1167                           1: TX_INFO := TX_DEAFAIL1 + #13 + Responses.OrderText + #13 + TX_DEAFAIL2;  //prescriber has an invalid or no DEA#
1168                           2: TX_INFO := TX_DEAFAIL1 + #13 + Responses.OrderText + #13 + TX_SCHFAIL + Piece(DEAFailStr,U,2) + '.';  //prescriber has no schedule privileges in 2,2N,3,3N,4, or 5
1169                           3: TX_INFO := TX_DEAFAIL1 + #13 + Responses.OrderText + #13 + TX_NO_DETOX;  //prescriber has an invalid or no Detox#
1170                           4: TX_INFO := TX_DEAFAIL1 + #13 + Responses.OrderText + #13 + TX_EXP_DEA1 + Piece(DEAFailStr,U,2) + TX_EXP_DEA2;  //prescriber's DEA# expired and no VA# is assigned
1171                           5: TX_INFO := TX_DEAFAIL1 + #13 + Responses.OrderText + #13 + TX_EXP_DETOX1 + Piece(DEAFailStr,U,2) + TX_EXP_DETOX2;  //valid detox#, but expired DEA#
1172                         end;
1173                         if InfoBox(TX_INFO + TX_INSTRUCT, TC_DEAFAIL, MB_RETRYCANCEL) = IDRETRY then
1174                           begin
1175                             DEAContext := True;
1176                             fFrame.frmFrame.mnuFileEncounterClick(uOrderDialog);
1177                             DEAFailStr := '';
1178                             DEAFailStr := DEACheckFailed(ODItem, InptDlg);
1179                           end
1180                         else
1181                           begin
1182                             if (ResolvedDialog.DialogType = 'X') and not Changes.ExistForOrder(EditedOrder)
1183                             then UnlockOrder(EditedOrder);
1184                             uOrderDialog.Close;
1185                             Exit;
1186                           end;
1187                       end;
1188                     end;
1189                  end;
1190            'Q':
1191                  begin
1192                    if IsPSOSupplyDlg(ResolvedDialog.DialogIEN,1) then
1193                      uOrderDialog.IsSupply := True;
1194                    SetupDialog(ORDER_QUICK, ResolvedDialog.ResponseID);
1195                    {if ((ResolvedDialog.DisplayGroup = CsltDisp)
1196                      and (ResolvedDialog.QuickLevel = QL_AUTO)) then
1197                      TfrmODCslt.SetupDialog(ORDER_QUICK, ResolvedDialog.ResponseID);}
1198                  end;
1199            end;
1200  
1201             if Assigned(uOrderDialog) then
1202              with uOrderDialog do
1203                if AbortOrder and GMRCCanCloseDialog(uOrderDialog) then
1204                  begin
1205                    Close;
1206                    if Assigned(uOrderDialog) then
1207                      uOrderDialog.Destroy;
1208                    Exit;
1209                  end;
1210  
1211            if CharAt(AnID, 1) = 'T' then
1212               begin
1213                 if ARefNum = -2 then
1214                   Responses.TransferOrder := '';
1215                 if ARefNum = -1 then
1216                   Responses.TransferOrder := AnID;
1217               end;
1218  
1219            if CharAt(AnID,1) = 'C' then            ////////////////////////////////////////////////////////////////////////
1220               begin
1221                 chkCopay := Copy(AnID,2,length(AnID)); //STRIP prepended C, T, or X from first position in order ID.
1222                 SetDefaultCoPay(chkCopay);
1223               end;                                    ////////////////////////////////////////////////////////////////////////'
1224  
1225            if IsConsultOrder and (CharAt(AnID,1) = 'C') then
1226               begin
1227                 tmpResp := uOrderDialog.Responses.FindResponseByName('CODE', 1);
1228                 if (tmpResp <> nil) then
1229                   begin
1230                   if IsActiveICDCode(tmpResp.EValue) then
1231                      ResolvedDialog.QuickLevel := QL_AUTO
1232                   else
1233                      ResolvedDialog.QuickLevel := QL_DIALOG;
1234                   end
1235                 else
1236                   ResolvedDialog.QuickLevel := QL_AUTO
1237               end;
1238  
1239            if ResolvedDialog.QuickLevel <> QL_AUTO then
1240               begin
1241                 if CharAt(AnID, 1) in ['C','T','X'] then
1242                    begin
1243                    Position := poScreenCenter;
1244                    FormStyle := fsNormal;
1245                    ShowModal;
1246                    Result := uOrderDialog.AcceptOK;
1247                    end
1248                 else
1249                    begin
1250                      SetBounds(frmFrame.Left + 112, frmFrame.Top + frmFrame.Height - Height, Width, Height);
1251                      SetFormPosition(uOrderDialog);
1252                      FormStyle := fsStayOnTop;
1253                      if frmOrders.NeedShowModal then
1254                         begin
1255                         ShowModal;
1256                         Result := uOrderDialog.AcceptOK;
1257                         uOrderDialog.Destroy;
1258                         end
1259                      else
1260                         begin
1261                         Show;
1262                         Result := True;
1263                         end;
1264                   end;
1265               end
1266            else
1267               begin
1268               if uOrderDialog.DisplayGroup = OutptDisp then
1269                 begin
1270                   tempUnit := '';
1271                   tempSupply := '';
1272                   tempDrug := '';
1273                   tempSch := '';
1274                   tempDur := '';
1275                   tmpResp := uOrderDialog.Responses.FindResponseByName('SUPPLY', 1);
1276                   if tmpResp = nil then tempSupply := '0'
1277                   else tempSupply := tmpResp.EValue;
1278                   tmpResp := uOrderDialog.Responses.FindResponseByName('QTY', 1);
1279                   if tmpResp = nil then tempQuantity := '0'
1280                   else tempQuantity := tmpResp.EValue;
1281                   tmpResp := uOrderDialog.Responses.FindResponseByName('REFILLS', 1);
1282                   if tmpResp = nil then tempRefills := '0'
1283                   else tempRefills := tmpResp.EValue;
1284                   tmpResp := uOrderDialog.Responses.FindResponseByName('ORDERABLE', 1);
1285                   tempOI := StrToIntDef(tmpResp.IValue,0);
1286                   i := uORderDialog.Responses.NextInstance('DOSE',0);
1287                   while i > 0 do
1288                     begin
1289                        x := Piece(uOrderDialog.Responses.IValueFor('DOSE',i), '&', 3);
1290                        tempUnit := tempUnit + X + U;
1291                        x := uOrderDialog.Responses.IValueFor('SCHEDULE',i);
1292                        tempSch := tempSch + x + U;
1293                        x := uOrderDialog.Responses.IValueFor('DRUG', i);
1294                        tempDrug := Piece(x, U, 1);
1295                        i := Responses.NextInstance('DOSE', i);
1296                        x := UORderDialog.Responses.IValueFor('DAYS', i);
1297                        tempDur := tempDur + x + '~';
1298                        x := uOrderDialog.Responses.IValueFor('CONJ', i);
1299                        tempDur := tempDur + x + U;
1300                     end;
1301                   if ValidateDrugAutoAccept(tempDrug, tempUnit, tempSch, tempDur, tempOI, StrtoInt(tempSupply), StrtoInt(tempRefills), StrToFloat(tempQuantity)) = false then Exit;
1302                 end;
1303               if ((ResolvedDialog.DisplayGroup = CsltDisp) and (ResolvedDialog.QuickLevel = QL_AUTO)) then
1304               begin
1305                 with Responses do
1306                 begin
1307                   Changing := True;
1308                   tmpResp := TResponse(FindResponseByName('ORDERABLE',1));
1309                   if tmpResp <> nil then
1310                     SvcIEN := GetServiceIEN(tmpResp.IValue)
1311                   else
1312                   begin
1313                     InfoBox(TX_NO_SVC, TC_NO_SVC, MB_ICONERROR or MB_OK);
1314                     //AbortOrder := True;
1315                     //Close;
1316                     Exit;
1317                   end;
1318                   if SvcIEN = '-1' then
1319                   begin
1320                     InfoBox(TX_INACTIVE_SVC, TX_INACTIVE_SVC_CAP, MB_OK);
1321                     //AbortOrder := True;
1322                     //Close;
1323                     Exit;
1324                   end;
1325                 end;
1326               end;
1327               cmdAcceptClick(Application);  // auto-accept order
1328               Result := uOrderDialog.AcceptOK;
1329               if (result = true) and (ScreenReaderActive) then
1330                 GetScreenReader.Speak('Auto Accept Quick Order '+ Responses.DialogDisplayName + ' placed.');
1331  
1332               //BAPHII 1.3.2
1333               //Show508Message('DEBUG: About to copy BA CI''s to copied order from Order: '+AnID+'#13'+' in uOrders.ActivateOrderDialog()');
1334  
1335               //End BAPHII 1.3.2
1336  
1337               if Assigned(uOrderDialog) then
1338                 uOrderDialog.Destroy;
1339               end;
1340  
1341          end
1342    else
1343       begin
1344         uOrderDialog.Release;
1345         Result := False;
1346       //Application.ProcessMessages;       // to allow dialog to finish closing
1347       //Exit;                              // so result is not returned true
1348       end;
1349  
1350    if NSSchedule then
1351      NSSchedule := False;
1352  
1353    if (ResolvedDialog.DialogType = 'X') and not Changes.ExistForOrder(EditedOrder)
1354      then UnlockOrder(EditedOrder);
1355    //QOAltOI.OI := 0;
1356  end;