Procedure

TRemDlgElement.UpdateData

Module

uReminders

Last Modified

10/8/2014 2:49:30 PM

Visibility

Protected

Owner

TRemDlgElement

Declaration

procedure UpdateData;

Calls Hierarchy


TRemDlgElement.UpdateData
 ├TReminderDialog.GetDlgSL
 │ ├TReminderDialog.GetIEN
 │ └GetDialogInfo
 ├Code2DataType
 ├MHTestsOK
 ├TRemPrompt.Create
 ├TRemData.Add2PN
 ├TPCEData.VisitDateTime
 │ └TPCEData.IsSecondaryVisit
 ├TRemDlgElement.OneValidCode
 │ ├TRemPrompt.Create
 │ └TRemPrompt.CompareActiveDate
 ├TRemDlgElement.setActiveDates
 ├TRemPCERoot.GetRoot
 ├TRemDlgElement.Historical
 ├Code2VitalType
 ├MHDLLFound
 │ └CheckforMHDll
 │   ├LoadMHDLL
 │   └UnloadMHDLL
 ├Code2PromptType
 ├TRemPrompt.InitValue
 │ ├TRemPrompt.InternalValue
 │ ├TRemPrompt.PromptType
 │ │ └Code2PromptType
 │ ├GetPCECodes
 │ │ ├LoadHistLocations
 │ │ └CodeSetIndex
 │ │   ├LoadImmSeriesItems
 │ │   ├LoadImmReactionItems
 │ │   ├LoadSkResultsItems
 │ │   ├LoadPEDLevelItems
 │ │   ├LoadHFLevelItems
 │ │   └LoadXAMResultsItems
 │ ├TRemPrompt.Forced
 │ ├IsSyncPrompt
 │ ├TRemPCERoot.GetValue
 │ └TRemPrompt.SetValueFromParent
 │   └TRemPrompt.SetValue
 │     ├TRemPrompt.Forced
 │     ├TRemPrompt.PromptType...
 │     ├FMToday
 │     │ └FMNow
 │     ├TRemPrompt.GetValue
 │     │ ├TRemDlgElement.Historical
 │     │ ├TPCEData.VisitDateTime...
 │     │ ├TRemPrompt.RemDataActive
 │     │ │ └TRemPrompt.CompareActiveDate
 │     │ └TRemPrompt.RemDataChoiceActive
 │     ├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...
 │     │   │ │ └TRemDlgElement.UpdateData...
 │     │   │ ├TRemDlgElement.Check4ChildrenSharedPrompts
 │     │   │ │ ├TRemDlgElement.ChildrenSharePrompts
 │     │   │ │ ├TRemDlgElement.GetData...
 │     │   │ │ └TRemPrompt.CanShare
 │     │   │ │   ├TRemPrompt.Forced
 │     │   │ │   ├TRemPrompt.Required
 │     │   │ │   │ └TRemPrompt.PromptType...
 │     │   │ │   ├TRemPrompt.PromptType...
 │     │   │ │   ├TRemPrompt.Add2PN
 │     │   │ │   │ ├TRemPrompt.Forced
 │     │   │ │   │ └TRemPrompt.PromptOK
 │     │   │ │   │   ├TRemPrompt.PromptType...
 │     │   │ │   │   ├TRemDlgElement.Historical
 │     │   │ │   │   ├TRemPrompt.RemDataActive...
 │     │   │ │   │   └TRemPrompt.CompareActiveDate
 │     │   │ │   └TRemPrompt.Caption
 │     │   │ │     └AssignFieldIDs
 │     │   │ │       └GetNewFieldID
 │     │   │ ├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.GetValue...
 │     └TRemPrompt.VitalUnitValue
 │       ├TRemPrompt.VitalType
 │       │ ├Code2VitalType
 │       │ └TRemData.InternalValue
 │       └TRemPrompt.GetValue...
 ├PrepText4NextLine
 └ExpandTIUObjects
   ├TdmodShared.BoilerplateOK
   │ ├ErrCount
   │ ├AddErr
   │ └TdmodShared.LoadTIUObjects
   │   └GetObjectList
   └GetTemplateText
     └TEncounter.GetVisitStr
       └TEncounter.GetVisitCategory

Called-By Hierarchy


                                                                             TRemDlgElement.UpdateData
                                                                          TReminderDialog.BaseCreate┤ 
                                                                            TReminderDialog.Create┤ │ 
                                                                      TfrmRemDlg.ProcessTemplate┘ │ │ 
                                                                            ViewRemDlgFromForm┘   │ │ 
                                                                                  ViewRemDlg┤     │ │ 
                                                                        ViewReminderDialog┤ │     │ │ 
                                                          TfrmDrawers.tvRemindersMouseUp┤ │ │     │ │ 
                                                          TfrmDrawers.RemindersChanged┘ │ │ │     │ │ 
                                                             TfrmDrawers.ShowDrawers┘   │ │ │     │ │ 
                                                         TfrmDrawers.CreateDrawers┤     │ │ │     │ │ 
                                                           TfrmDCSumm.FormCreate┤ │     │ │ │     │ │ 
                                                         TfrmConsults.FormCreate┤ │     │ │ │     │ │ 
                                                          TfrmSurgery.FormCreate┤ │     │ │ │     │ │ 
                                                            TfrmNotes.FormCreate┘ │     │ │ │     │ │ 
                                                        TfrmDrawers.DisplayDrawers┘     │ │ │     │ │ 
                                                         TfrmConsults.DisplayPCE┤       │ │ │     │ │ 
                                                 TfrmConsults.lstConsultsClick┤ │       │ │ │     │ │ 
                                               TfrmConsults.tvConsultsChange┘ │ │       │ │ │     │ │ 
                                TfrmConsults.mnuActDetachFromIDParentClick┤   │ │       │ │ │     │ │ 
                                                  TfrmConsults.NotifyOrder┤   │ │       │ │ │     │ │ 
                                                    TfrmFrame.UMNewOrder┘ │   │ │       │ │ │     │ │ 
                                    TfrmConsults.mnuActDisplayDetailsClick┤   │ │       │ │ │     │ │ 
                               TfrmConsults.mnuActIdentifyAddlSignersClick┤   │ │       │ │ │     │ │ 
                                   TfrmConsults.popNoteMemoAddlSignClick┘ │   │ │       │ │ │     │ │ 
                                         TfrmConsults.ProcessNotifications┤   │ │       │ │ │     │ │ 
                                                TfrmConsults.DisplayPage┘ │   │ │       │ │ │     │ │ 
                                                 TfrmConsults.LoadConsults┤   │ │       │ │ │     │ │ 
                                                 TfrmConsults.UpdateList┤ │   │ │       │ │ │     │ │ 
                                             TfrmConsults.mnuViewClick┤ │ │   │ │       │ │ │     │ │ 
                                         TfrmConsults.SetViewContext┘ │ │ │   │ │       │ │ │     │ │ 
                                          TfrmConsults.DisplayPage┤   │ │ │   │ │       │ │ │     │ │ 
                          TfrmConsults.mnuViewReturntoDefaultClick┘   │ │ │   │ │       │ │ │     │ │ 
                                    TfrmConsults.mnuActNoteDeleteClick┤ │ │   │ │       │ │ │     │ │ 
                                      TfrmConsults.SaveEditedConsult┘ │ │ │   │ │       │ │ │     │ │ 
                                      TfrmConsults.SaveCurrentNote┘   │ │ │   │ │       │ │ │     │ │ 
                                 TfrmConsults.AllowContextChange┤     │ │ │   │ │       │ │ │     │ │ 
                               TfrmFrame.AllowContextChangeAll┘ │     │ │ │   │ │       │ │ │     │ │ 
                                    TfrmFrame.FormCloseQuery┤   │     │ │ │   │ │       │ │ │     │ │ 
                                  TfrmFrame.mnuFileNextClick┤   │     │ │ │   │ │       │ │ │     │ │ 
                                TfrmFrame.mnuFileOpenClick┤ │   │     │ │ │   │ │       │ │ │     │ │ 
                                    TfrmFrame.UMInitiate┤ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                           TfrmFrame.mnuFileNextClick...┤ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                           TfrmFrame.mnuFileRefreshClick┤ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                           TfrmOrders.CheckOrderStatus┤ │ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                       TfrmOrders.mnuActChgEvntClick┤ │ │ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                          TfrmOrders.mnuActHoldClick┤ │ │ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                        TfrmOrders.mnuActUnholdClick┤ │ │ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                         TfrmOrders.mnuActRenewClick┤ │ │ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                        TfrmOrders.mnuActChangeClick┤ │ │ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                          TfrmOrders.mnuActCopyClick┘ │ │ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                                TfrmMeds.mnuActDCClick┤ │ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                               TfrmMeds.CheckMedStatus┘ │ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                            TfrmMeds.mnuActHoldClick┤   │ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                           TfrmMeds.mnuActRenewClick┤   │ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                          TfrmMeds.mnuActUnholdClick┤   │ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                          TfrmMeds.mnuActChangeClick┤   │ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                            TfrmMeds.mnuActCopyClick┤   │ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                          TfrmMeds.mnuActRefillClick┘   │ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                                      TfrmFrame.ViewInfo┘ │ │   │     │ │ │   │ │       │ │ │     │ │ 
                                   TfrmDCSumm.ViewInfo┤   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                                 TfrmConsults.ViewInfo┤   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                         TfrmFrame.pnlRemindersMouseUp┤   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                          TfrmFrame.RemindersChanged┘ │   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                              TfrmFrame.FormCreate┘   │   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                                TfrmFrame.pnlCIRNClick┤   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                          TfrmFrame.pnlVistaWebClick┤ │   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                               TfrmFrame.FormKeyDown┘ │   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                             TfrmFrame.pnlPatientClick┤   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                               TfrmFrame.pnlVisitClick┤   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                         TfrmFrame.pnlPrimaryCareClick┤   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                           TfrmFrame.pnlRemindersClick┤   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                            TfrmFrame.pnlPostingsClick┤   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                                TfrmFrame.pnlFlagClick┤   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                                  TfrmFrame.laMHVClick┤   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                                 TfrmFrame.laVAA2Click┤   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                                   TfrmOrders.ViewInfo┤   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                                     TfrmMeds.ViewInfo┤   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                                  TfrmSurgery.ViewInfo┤   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                                    TfrmNotes.ViewInfo┤   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                                 TfrmProblems.ViewInfo┘   │ │   │     │ │ │   │ │       │ │ │     │ │ 
                         TfrmFrame.mnuFileNotifRemoveClick┤ │   │     │ │ │   │ │       │ │ │     │ │ 
                                 TfrmFrame.NextButtonClick┘ │   │     │ │ │   │ │       │ │ │     │ │ 
                               TfrmFrame.SetUpNextButton┘   │   │     │ │ │   │ │       │ │ │     │ │ 
                         TfrmFrame.mnuFileOpenClick...┤     │   │     │ │ │   │ │       │ │ │     │ │ 
                                  TfrmFrame.FormResize┘     │   │     │ │ │   │ │       │ │ │     │ │ 
                                TfrmFrame.ChangeFont┘       │   │     │ │ │   │ │       │ │ │     │ │ 
                        TfrmFrame.LoadSizesForUser┤         │   │     │ │ │   │ │       │ │ │     │ │ 
                   TfrmFrame.LoadUserPreferences┘ │         │   │     │ │ │   │ │       │ │ │     │ │ 
                          TfrmFrame.UMInitiate┘   │         │   │     │ │ │   │ │       │ │ │     │ │ 
                        TfrmFrame.mnuFontSizeClick┘         │   │     │ │ │   │ │       │ │ │     │ │ 
                               TfrmFrame.mnuFileOpenClick...┤   │     │ │ │   │ │       │ │ │     │ │ 
                               TfrmFrame.ctxContextorPending┤   │     │ │ │   │ │       │ │ │     │ │ 
                              TfrmFrame.StartCCOWContextor┘ │   │     │ │ │   │ │       │ │ │     │ │ 
                                    TfrmFrame.FormCreate┘   │   │     │ │ │   │ │       │ │ │     │ │ 
                             TfrmFrame.ctxContextorCommitted┤   │     │ │ │   │ │       │ │ │     │ │ 
                           TfrmFrame.StartCCOWContextor...┘ │   │     │ │ │   │ │       │ │ │     │ │ 
                      TfrmFrame.mnuFileResumeContextGetClick┤   │     │ │ │   │ │       │ │ │     │ │ 
                      TfrmFrame.mnuFileResumeContextSetClick┘   │     │ │ │   │ │       │ │ │     │ │ 
                                  TfrmConsults.SetViewContext...┤     │ │ │   │ │       │ │ │     │ │ 
                                    TfrmConsults.mnuViewClick...┤     │ │ │   │ │       │ │ │     │ │ 
                      TfrmConsults.mnuActDetachFromIDParentClick┤     │ │ │   │ │       │ │ │     │ │ 
                           TfrmConsults.mnuActNoteDeleteClick...┤     │ │ │   │ │       │ │ │     │ │ 
                           TfrmConsults.mnuActSignatureSaveClick┤     │ │ │   │ │       │ │ │     │ │ 
                           TfrmConsults.mnuActSignatureSignClick┤     │ │ │   │ │       │ │ │     │ │ 
                                       TfrmConsults.SaveSignItem┤     │ │ │   │ │       │ │ │     │ │ 
                                         TfrmReview.cmdOKClick┘ │     │ │ │   │ │       │ │ │     │ │ 
                                               ReviewChanges┘   │     │ │ │   │ │       │ │ │     │ │ 
                        TfrmFrame.AllowContextChangeAll...┤     │     │ │ │   │ │       │ │ │     │ │ 
                                  TfrmFrame.FormCloseQuery┤     │     │ │ │   │ │       │ │ │     │ │ 
                              TfrmFrame.mnuFileReviewClick┤     │     │ │ │   │ │       │ │ │     │ │ 
                                           UpdateEncounter┘     │     │ │ │   │ │       │ │ │     │ │ 
                         TfrmFrame.mnuFileEncounterClick┤       │     │ │ │   │ │       │ │ │     │ │ 
                                 TfrmFrame.ViewInfo...┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                    TfrmODMedIV.SetValuesFromResponses┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                             TfrmODMedIV.SetupDialog┤ │ │       │     │ │ │   │ │       │ │ │     │ │ 
                   TfrmODMedIV.cboSolutionMouseClick┘ │ │       │     │ │ │   │ │       │ │ │     │ │ 
                       TfrmODMedIV.cboSolutionExit┘   │ │       │     │ │ │   │ │       │ │ │     │ │ 
                  TfrmODMedIV.cboSolutionMouseClick...┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                     TfrmODMedIV.cboAdditiveMouseClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                         TfrmODMedIV.cboAdditiveExit┘ │ │       │     │ │ │   │ │       │ │ │     │ │ 
                                TfrmODAuto.SetupDialog┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                                   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┘   │ │       │     │ │ │   │ │       │ │ │     │ │ 
                               TfrmOMSet.InsertList...┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                                TfrmODMeds.SetupDialog┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                             TfrmODMeds.btnSelectClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                             TfrmODMeds.UMDelayClick┘ │ │       │     │ │ │   │ │       │ │ │     │ │ 
                                    ExecuteRenewOrders┘ │       │     │ │ │   │ │       │ │ │     │ │ 
                         TfrmOrders.mnuActRenewClick┤   │       │     │ │ │   │ │       │ │ │     │ │ 
                           TfrmMeds.mnuActRenewClick┘   │       │     │ │ │   │ │       │ │ │     │ │ 
                                        EncounterPresent┤       │     │ │ │   │ │       │ │ │     │ │ 
                                      ReadyForNewOrder┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                           TfrmRemDlg.btnFinishClick┤ │ │       │     │ │ │   │ │       │ │ │     │ │ 
        TfrmConsults.mnuActNewConsultRequestClick...┤ │ │       │     │ │ │   │ │       │ │ │     │ │ 
             TfrmConsults.mnuActNewProcedureClick...┤ │ │       │     │ │ │   │ │       │ │ │     │ │ 
                                     ChangeOrders...┤ │ │       │     │ │ │   │ │       │ │ │     │ │ 
                                     ChangeOrdersEvt┤ │ │       │     │ │ │   │ │       │ │ │     │ │ 
                                       CopyOrders...┤ │ │       │     │ │ │   │ │       │ │ │     │ │ 
                                   TransferOrders...┤ │ │       │     │ │ │   │ │       │ │ │     │ │ 
                            TfrmOrders.lstWriteClick┤ │ │       │     │ │ │   │ │       │ │ │     │ │ 
                             TfrmMeds.mnuActNewClick┘ │ │       │     │ │ │   │ │       │ │ │     │ │ 
                                     ReadyForNewOrder1┤ │       │     │ │ │   │ │       │ │ │     │ │ 
            TfrmOrders.PlaceOrderForDefaultDialog...┘ │ │       │     │ │ │   │ │       │ │ │     │ │ 
                              TfrmOrders.mnuActDCClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                             TfrmOrders.mnuActRelClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                            TfrmOrders.mnuActHoldClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                          TfrmOrders.mnuActUnholdClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                           TfrmOrders.mnuActRenewClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                         TfrmOrders.mnuActReleaseClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                         TfrmOrders.mnuActOnChartClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                            TfrmOrders.mnuActSignClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                                TfrmMeds.mnuActDCClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                              TfrmMeds.mnuActHoldClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                             TfrmMeds.mnuActRenewClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                            TfrmMeds.mnuActUnholdClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                              TfrmMeds.mnuActCopyClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                            TfrmMeds.mnuActRefillClick┘ │       │     │ │ │   │ │       │ │ │     │ │ 
                                     EncounterPresentEDO┤       │     │ │ │   │ │       │ │ │     │ │ 
                                   ReadyForNewOrder...┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                         TfrmOrders.mnuActChgEvntClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                          TfrmOrders.mnuActChangeClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                            TfrmOrders.mnuActCopyClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                       TfrmOrders.btnDelayedOrderClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                            TfrmMeds.mnuActChangeClick┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                              TfrmMeds.mnuActCopyClick┘ │       │     │ │ │   │ │       │ │ │     │ │ 
                                             UpdateVisit┤       │     │ │ │   │ │       │ │ │     │ │ 
                                           EditPCEData┤ │       │     │ │ │   │ │       │ │ │     │ │ 
                             TfrmSurgery.cmdPCEClick┤ │ │       │     │ │ │   │ │       │ │ │     │ │ 
                                 UpdateEncounterInfo┘ │ │       │     │ │ │   │ │       │ │ │     │ │ 
                             TfrmNotes.cmdPCEClick┘   │ │       │     │ │ │   │ │       │ │ │     │ │ 
                        TfrmVitals.btnEnterVitalsClick┘ │       │     │ │ │   │ │       │ │ │     │ │ 
                                             UpdateVisit┤       │     │ │ │   │ │       │ │ │     │ │ 
                                        EncounterPresent┘       │     │ │ │   │ │       │ │ │     │ │ 
                         TfrmProblems.lstProbActsClick┘         │     │ │ │   │ │       │ │ │     │ │ 
                     TfrmProblems.wgProbDataDblClick┤           │     │ │ │   │ │       │ │ │     │ │ 
                           TfrmProblems.lstViewClick┘           │     │ │ │   │ │       │ │ │     │ │ 
                   TfrmProblems.HighlightDuplicate┘             │     │ │ │   │ │       │ │ │     │ │ 
                         TfrmProblems.AddProblem┤               │     │ │ │   │ │       │ │ │     │ │ 
              TfrmProblems.lstProbActsClick...┤ │               │     │ │ │   │ │       │ │ │     │ │ 
                 TfrmProblems.lstProbPickClick┤ │               │     │ │ │   │ │       │ │ │     │ │ 
              TfrmProblems.lstProbPickDblClick┤ │               │     │ │ │   │ │       │ │ │     │ │ 
              TfrmProblems.edProbEntKeyPress┘ │ │               │     │ │ │   │ │       │ │ │     │ │ 
                      TfrmProblems.UMPLLexicon┘ │               │     │ │ │   │ │       │ │ │     │ │ 
                   TfrmdlgProb.bbChangeProbClick┘               │     │ │ │   │ │       │ │ │     │ │ 
                                 TfrmConsults.mnuActConsultClick┤     │ │ │   │ │       │ │ │     │ │ 
                                       TfrmConsults.RequestPrint┤     │ │ │   │ │       │ │ │     │ │ 
                            TfrmConsults.mnuActPrintSF513Click┤ │     │ │ │   │ │       │ │ │     │ │ 
                                   TfrmFrame.mnuFilePrintClick┘ │     │ │ │   │ │       │ │ │     │ │ 
                          TfrmConsults.mnuActDisplayResultsClick┤     │ │ │   │ │       │ │ │     │ │ 
                          TfrmConsults.ProcessNotifications...┘ │     │ │ │   │ │       │ │ │     │ │ 
                            TfrmConsults.mnuActDisplaySF513Click┤     │ │ │   │ │       │ │ │     │ │ 
                              TfrmConsults.mnuActPrintSF513Click┤     │ │ │   │ │       │ │ │     │ │ 
                          TfrmConsults.mnuActDisplayDetailsClick┤     │ │ │   │ │       │ │ │     │ │ 
                                          TfrmConsults.FormClose┤     │ │ │   │ │       │ │ │     │ │ 
                  TfrmConsults.mnuActIdentifyAddlSignersClick...┤     │ │ │   │ │       │ │ │     │ │ 
                            TfrmConsults.ProcessNotifications...┤     │ │ │   │ │       │ │ │     │ │ 
                               TfrmConsults.mnuActNotePrintClick┤     │ │ │   │ │       │ │ │     │ │ 
                            TfrmConsults.popNoteMemoPrintClick┘ │     │ │ │   │ │       │ │ │     │ │ 
                                       TfrmConsults.StartNewEdit┤     │ │ │   │ │       │ │ │     │ │ 
                              TfrmConsults.mnuActCompleteClick┤ │     │ │ │   │ │       │ │ │     │ │ 
                            TfrmConsults.mnuActAddIDEntryClick┤ │     │ │ │   │ │       │ │ │     │ │ 
                          TfrmConsults.mnuActMakeAddendumClick┤ │     │ │ │   │ │       │ │ │     │ │ 
                              TfrmConsults.mnuActNoteEditClick┘ │     │ │ │   │ │       │ │ │     │ │ 
                            TfrmConsults.mnuActCompleteClick┘   │     │ │ │   │ │       │ │ │     │ │ 
                                TfrmConsults.tvCsltNotesDragDrop┤     │ │ │   │ │       │ │ │     │ │ 
                               TfrmConsults.tvCsltNotesStartDrag┤     │ │ │   │ │       │ │ │     │ │ 
                        TfrmConsults.mnuActAttachtoIDParentClick┤     │ │ │   │ │       │ │ │     │ │ 
                                 TfrmConsults.LstConsultsToPrint┘     │ │ │   │ │       │ │ │     │ │ 
                      TfrmFrame.mnuFilePrintSelectedItemsClick┘       │ │ │   │ │       │ │ │     │ │ 
                                 TfrmConsults.mnuActSignatureSaveClick┤ │ │   │ │       │ │ │     │ │ 
                                 TfrmConsults.mnuActSignatureSignClick┤ │ │   │ │       │ │ │     │ │ 
                                          TfrmConsults.SaveSignItem...┤ │ │   │ │       │ │ │     │ │ 
                                       TfrmConsults.mnuActConsultClick┤ │ │   │ │       │ │ │     │ │ 
                                           TfrmConsults.NotifyOrder...┤ │ │   │ │       │ │ │     │ │ 
                                               TfrmConsults.UMNewOrder┤ │ │   │ │       │ │ │     │ │ 
                                        TfrmConsults.ProcessMedResults┘ │ │   │ │       │ │ │     │ │ 
                                   TfrmConsults.mnuActAttachMedClick┤   │ │   │ │       │ │ │     │ │ 
                                   TfrmConsults.mnuActRemoveMedClick┘   │ │   │ │       │ │ │     │ │ 
                                    TfrmConsults.mnuActEditResubmitClick┤ │   │ │       │ │ │     │ │ 
                                     TfrmConsults.cmdEditResubmitClick┘ │ │   │ │       │ │ │     │ │ 
                                      TfrmConsults.LstConsultsToPrint...┘ │   │ │       │ │ │     │ │ 
                                              TfrmConsults.tvConsultsClick┤   │ │       │ │ │     │ │ 
                                            TfrmConsults.mnuViewClick...┤ │   │ │       │ │ │     │ │ 
                              TfrmConsults.mnuActDetachFromIDParentClick┤ │   │ │       │ │ │     │ │ 
                                   TfrmConsults.mnuActNoteDeleteClick...┤ │   │ │       │ │ │     │ │ 
                                   TfrmConsults.mnuActSignatureSaveClick┤ │   │ │       │ │ │     │ │ 
                                   TfrmConsults.mnuActSignatureSignClick┤ │   │ │       │ │ │     │ │ 
                                            TfrmConsults.SaveSignItem...┤ │   │ │       │ │ │     │ │ 
                                         TfrmConsults.mnuActConsultClick┤ │   │ │       │ │ │     │ │ 
                                 TfrmConsults.mnuActEditResubmitClick...┤ │   │ │       │ │ │     │ │ 
                                            TfrmConsults.StartNewEdit...┤ │   │ │       │ │ │     │ │ 
                                       TfrmConsults.ProcessMedResults...┤ │   │ │       │ │ │     │ │ 
                                TfrmConsults.mnuActAttachtoIDParentClick┘ │   │ │       │ │ │     │ │ 
                                              TfrmConsults.DoAttachIDChild┤   │ │       │ │ │     │ │ 
                                        TfrmConsults.tvCsltNotesDragDrop┤ │   │ │       │ │ │     │ │ 
                                TfrmConsults.mnuActAttachtoIDParentClick┘ │   │ │       │ │ │     │ │ 
                                              TfrmConsults.tvConsultsKeyUp┘   │ │       │ │ │     │ │ 
                                                      TfrmConsults.cmdPCEClick┤ │       │ │ │     │ │ 
                                                    TfrmConsults.lstNotesClick┤ │       │ │ │     │ │ 
                                                TfrmConsults.CompleteConsult┤ │ │       │ │ │     │ │ 
                                          TfrmConsults.mnuActCompleteClick┤ │ │ │       │ │ │     │ │ 
                                        TfrmConsults.mnuActAddIDEntryClick┘ │ │ │       │ │ │     │ │ 
                                                 TfrmConsults.InsertAddendum┤ │ │       │ │ │     │ │ 
                                      TfrmConsults.mnuActMakeAddendumClick┘ │ │ │       │ │ │     │ │ 
                                                    TfrmConsults.LoadForEdit┤ │ │       │ │ │     │ │ 
                                       TfrmConsults.mnuActNoteEditClick...┘ │ │ │       │ │ │     │ │ 
                                                                 SaveOrAbort┤ │ │       │ │ │     │ │ 
                                         TfrmConsults.SaveEditedConsult...┘ │ │ │       │ │ │     │ │ 
                                           TfrmConsults.SaveEditedConsult...┤ │ │       │ │ │     │ │ 
                                       TfrmConsults.mnuActSignatureSignClick┤ │ │       │ │ │     │ │ 
                                                TfrmConsults.SaveSignItem...┤ │ │       │ │ │     │ │ 
                              TfrmConsults.mnuActIdentifyAddlSignersClick...┤ │ │       │ │ │     │ │ 
                                              TfrmConsults.tvCsltNotesChange┘ │ │       │ │ │     │ │ 
                                         TfrmConsults.SaveEditedConsult...┤   │ │       │ │ │     │ │ 
                                     TfrmConsults.mnuActSignatureSignClick┤   │ │       │ │ │     │ │ 
                                      TfrmConsults.ProcessNotifications...┘   │ │       │ │ │     │ │ 
                                                    TfrmConsults.AssignRemForm┘ │       │ │ │     │ │ 
                                                       ViewRemDlgFromForm...┘   │       │ │ │     │ │ 
                                                          TfrmSurgery.DisplayPCE┤       │ │ │     │ │ 
                                                       TfrmSurgery.cmdPCEClick┤ │       │ │ │     │ │ 
                                                   TfrmSurgery.tvSurgeryChange┤ │       │ │ │     │ │ 
                                                  TfrmSurgery.SaveEditedNote┤ │ │       │ │ │     │ │ 
                                               TfrmSurgery.SaveCurrentNote┘ │ │ │       │ │ │     │ │ 
                                          TfrmSurgery.AllowContextChange┤   │ │ │       │ │ │     │ │ 
                                    TfrmFrame.AllowContextChangeAll...┘ │   │ │ │       │ │ │     │ │ 
                                              TfrmSurgery.SetViewContext┤   │ │ │       │ │ │     │ │ 
                                               TfrmSurgery.DisplayPage┤ │   │ │ │       │ │ │     │ │ 
                               TfrmSurgery.mnuViewReturntoDefaultClick┘ │   │ │ │       │ │ │     │ │ 
                                                TfrmSurgery.RequestPrint┤   │ │ │       │ │ │     │ │ 
                                           TfrmFrame.mnuFilePrintClick┘ │   │ │ │       │ │ │     │ │ 
                                                TfrmSurgery.mnuViewClick┤   │ │ │       │ │ │     │ │ 
                                         TfrmSurgery.SetViewContext...┘ │   │ │ │       │ │ │     │ │ 
                                                TfrmSurgery.StartNewEdit┤   │ │ │       │ │ │     │ │ 
                                            TfrmSurgery.mnuActNewClick┤ │   │ │ │       │ │ │     │ │ 
                                         TfrmSurgery.cmdNewNoteClick┘ │ │   │ │ │       │ │ │     │ │ 
                                         TfrmSurgery.mnuActAddendClick┤ │   │ │ │       │ │ │     │ │ 
                                           TfrmSurgery.mnuActEditClick┘ │   │ │ │       │ │ │     │ │ 
                                           TfrmSurgery.mnuActDeleteClick┤   │ │ │       │ │ │     │ │ 
                                         TfrmSurgery.SaveEditedNote...┘ │   │ │ │       │ │ │     │ │ 
                                             TfrmSurgery.mnuActSaveClick┤   │ │ │       │ │ │     │ │ 
                                             TfrmSurgery.mnuActSignClick┤   │ │ │       │ │ │     │ │ 
                                                TfrmSurgery.SaveSignItem┤   │ │ │       │ │ │     │ │ 
                                              TfrmReview.cmdOKClick...┘ │   │ │ │       │ │ │     │ │ 
                                                   TfrmSurgery.FormClose┤   │ │ │       │ │ │     │ │ 
                              TfrmSurgery.mnuActIdentifyAddlSignersClick┤   │ │ │       │ │ │     │ │ 
                                  TfrmSurgery.popNoteMemoAddlSignClick┘ │   │ │ │       │ │ │     │ │ 
                                        TfrmSurgery.ProcessNotifications┘   │ │ │       │ │ │     │ │ 
                                               TfrmSurgery.DisplayPage┘     │ │ │       │ │ │     │ │ 
                                                 TfrmSurgery.mnuActSignClick┤ │ │       │ │ │     │ │ 
                                              TfrmSurgery.mnuViewDetailClick┤ │ │       │ │ │     │ │ 
                                         TfrmSurgery.ProcessNotifications...┤ │ │       │ │ │     │ │ 
                                                TfrmSurgery.LoadSurgeryCases┘ │ │       │ │ │     │ │ 
                                               TfrmSurgery.mnuViewClick...┤   │ │       │ │ │     │ │ 
                                               TfrmSurgery.StartNewEdit...┤   │ │       │ │ │     │ │ 
                                          TfrmSurgery.mnuActDeleteClick...┤   │ │       │ │ │     │ │ 
                                               TfrmSurgery.mnuActSaveClick┤   │ │       │ │ │     │ │ 
                                               TfrmSurgery.mnuActSignClick┤   │ │       │ │ │     │ │ 
                                               TfrmSurgery.SaveSignItem...┤   │ │       │ │ │     │ │ 
                             TfrmSurgery.mnuActIdentifyAddlSignersClick...┘   │ │       │ │ │     │ │ 
                                                     TfrmSurgery.lstNotesClick┘ │       │ │ │     │ │ 
                                                   TfrmSurgery.InsertNewNote┤   │       │ │ │     │ │ 
                                             TfrmSurgery.mnuActNewClick...┘ │   │       │ │ │     │ │ 
                                                  TfrmSurgery.InsertAddendum┤   │       │ │ │     │ │ 
                                             TfrmSurgery.mnuActAddendClick┘ │   │       │ │ │     │ │ 
                                                     TfrmSurgery.LoadForEdit┤   │       │ │ │     │ │ 
                                               TfrmSurgery.mnuActEditClick┘ │   │       │ │ │     │ │ 
                                               TfrmSurgery.SaveEditedNote...┤   │       │ │ │     │ │ 
                                                 TfrmSurgery.mnuActSignClick┤   │       │ │ │     │ │ 
                                                 TfrmSurgery.SaveSignItem...┤   │       │ │ │     │ │ 
                               TfrmSurgery.mnuActIdentifyAddlSignersClick...┤   │       │ │ │     │ │ 
                                              TfrmSurgery.tvSurgeryChange...┘   │       │ │ │     │ │ 
                                                            TfrmNotes.DisplayPCE┘       │ │ │     │ │ 
                                                       TfrmNotes.lstNotesClick┤         │ │ │     │ │ 
                                                     TfrmNotes.InsertNewNote┤ │         │ │ │     │ │ 
                                                  TfrmNotes.mnuActNewClick┤ │ │         │ │ │     │ │ 
                                               TfrmNotes.cmdNewNoteClick┘ │ │ │         │ │ │     │ │ 
                                           TfrmNotes.mnuActAddIDEntryClick┘ │ │         │ │ │     │ │ 
                                                    TfrmNotes.InsertAddendum┤ │         │ │ │     │ │ 
                                               TfrmNotes.mnuActAddendClick┘ │ │         │ │ │     │ │ 
                                                       TfrmNotes.LoadForEdit┤ │         │ │ │     │ │ 
                                                 TfrmNotes.mnuActEditClick┘ │ │         │ │ │     │ │ 
                                                    TfrmNotes.SaveEditedNote┤ │         │ │ │     │ │ 
                                                 TfrmNotes.SaveCurrentNote┘ │ │         │ │ │     │ │ 
                                            TfrmNotes.AllowContextChange┤   │ │         │ │ │     │ │ 
                                    TfrmFrame.AllowContextChangeAll...┘ │   │ │         │ │ │     │ │ 
                                               TfrmNotes.LstNotesToPrint┤   │ │         │ │ │     │ │ 
                              TfrmFrame.mnuFilePrintSelectedItemsClick┘ │   │ │         │ │ │     │ │ 
                                                  TfrmNotes.RequestPrint┤   │ │         │ │ │     │ │ 
                                           TfrmFrame.mnuFilePrintClick┘ │   │ │         │ │ │     │ │ 
                                                  TfrmNotes.mnuViewClick┤   │ │         │ │ │     │ │ 
                                              TfrmNotes.SetViewContext┤ │   │ │         │ │ │     │ │ 
                                               TfrmNotes.DisplayPage┤ │ │   │ │         │ │ │     │ │ 
                               TfrmNotes.mnuViewReturntoDefaultClick┘ │ │   │ │         │ │ │     │ │ 
                                   TfrmNotes.mnuViewSaveAsDefaultClick┘ │   │ │         │ │ │     │ │ 
                                                  TfrmNotes.StartNewEdit┤   │ │         │ │ │     │ │ 
                                           TfrmNotes.mnuActNewClick...┤ │   │ │         │ │ │     │ │ 
                                       TfrmNotes.mnuActAddIDEntryClick┤ │   │ │         │ │ │     │ │ 
                                           TfrmNotes.mnuActAddendClick┤ │   │ │         │ │ │     │ │ 
                                             TfrmNotes.mnuActEditClick┘ │   │ │         │ │ │     │ │ 
                                 TfrmNotes.mnuActDetachFromIDParentClick┤   │ │         │ │ │     │ │ 
                                             TfrmNotes.mnuActDeleteClick┤   │ │         │ │ │     │ │ 
                                           TfrmNotes.SaveEditedNote...┘ │   │ │         │ │ │     │ │ 
                                               TfrmNotes.mnuActSaveClick┤   │ │         │ │ │     │ │ 
                                               TfrmNotes.mnuActSignClick┤   │ │         │ │ │     │ │ 
                                                  TfrmNotes.SaveSignItem┤   │ │         │ │ │     │ │ 
                                              TfrmReview.cmdOKClick...┘ │   │ │         │ │ │     │ │ 
                                                     TfrmNotes.FormClose┤   │ │         │ │ │     │ │ 
                                TfrmNotes.mnuActIdentifyAddlSignersClick┤   │ │         │ │ │     │ │ 
                                    TfrmNotes.popNoteMemoAddlSignClick┘ │   │ │         │ │ │     │ │ 
                                          TfrmNotes.ProcessNotifications┤   │ │         │ │ │     │ │ 
                                                 TfrmNotes.DisplayPage┘ │   │ │         │ │ │     │ │ 
                                             TfrmNotes.SetViewContext...┤   │ │         │ │ │     │ │ 
                                               TfrmNotes.tvNotesDragDrop┤   │ │         │ │ │     │ │ 
                                   TfrmNotes.mnuActAttachtoIDParentClick┘   │ │         │ │ │     │ │ 
                                                   TfrmNotes.mnuActSignClick┤ │         │ │ │     │ │ 
                                                   TfrmNotes.SaveSignItem...┤ │         │ │ │     │ │ 
                                                TfrmNotes.mnuViewDetailClick┤ │         │ │ │     │ │ 
                                 TfrmNotes.mnuActIdentifyAddlSignersClick...┤ │         │ │ │     │ │ 
                                                     TfrmNotes.tvNotesChange┤ │         │ │ │     │ │ 
                                               TfrmNotes.SaveEditedNote...┤ │ │         │ │ │     │ │ 
                                                 TfrmNotes.mnuActSignClick┤ │ │         │ │ │     │ │ 
                                         TfrmNotes.ProcessNotifications...┤ │ │         │ │ │     │ │ 
                                                       TfrmNotes.LoadNotes┘ │ │         │ │ │     │ │ 
                                            TfrmNotes.LstNotesToPrint...┤   │ │         │ │ │     │ │ 
                                               TfrmNotes.mnuViewClick...┤   │ │         │ │ │     │ │ 
                                               TfrmNotes.StartNewEdit...┤   │ │         │ │ │     │ │ 
                                 TfrmNotes.mnuActDetachFromIDParentClick┤   │ │         │ │ │     │ │ 
                                          TfrmNotes.mnuActDeleteClick...┤   │ │         │ │ │     │ │ 
                                               TfrmNotes.mnuActSaveClick┤   │ │         │ │ │     │ │ 
                                               TfrmNotes.mnuActSignClick┤   │ │         │ │ │     │ │ 
                                               TfrmNotes.SaveSignItem...┤   │ │         │ │ │     │ │ 
                             TfrmNotes.mnuActIdentifyAddlSignersClick...┤   │ │         │ │ │     │ │ 
                                   TfrmNotes.mnuActAttachtoIDParentClick┤   │ │         │ │ │     │ │ 
                                               TfrmNotes.DoAttachIDChild┘   │ │         │ │ │     │ │ 
                                             TfrmNotes.tvNotesDragDrop┤     │ │         │ │ │     │ │ 
                                 TfrmNotes.mnuActAttachtoIDParentClick┘     │ │         │ │ │     │ │ 
                                                 TfrmNotes.lvNotesSelectItem┘ │         │ │ │     │ │ 
                                                TfrmNotes.tvNotesChange...┘   │         │ │ │     │ │ 
                                                        UpdateEncounterInfo...┤         │ │ │     │ │ 
                                                       TfrmNotes.AssignRemForm┘         │ │ │     │ │ 
                                                       ViewRemDlgFromForm...┘           │ │ │     │ │ 
                                                          TfrmDrawers.tvRemindersKeyDown┘ │ │     │ │ 
                                                                ViewReminderDialogTemplate┘ │     │ │ 
                                                                  ViewRemDlgTemplateFromForm┘     │ │ 
                                                           TTemplate.ExecuteReminderDialog┘       │ │ 
                                                            ExecuteTemplateOrBoilerPlate┤         │ │ 
                                                                  TfrmDrawers.InsertText┘         │ │ 
                                                       TfrmDrawers.tvTemplatesDblClick┤           │ │ 
                                                        TfrmDrawers.tvTemplatesKeyDown┤           │ │ 
                                                            TfrmDrawers.NewRECDragDrop┤           │ │ 
                                                      TfrmDrawers.SetRichEditControl┘ │           │ │ 
                                                             TfrmDCSumm.FormCreate┤   │           │ │ 
                                                           TfrmConsults.FormCreate┤   │           │ │ 
                                                            TfrmSurgery.FormCreate┤   │           │ │ 
                                                              TfrmNotes.FormCreate┘   │           │ │ 
                                                    TfrmDrawers.mnuInsertTemplateClick┘           │ │ 
                                              TfrmDCSumm.popSummMemoInsTemplateClick┤             │ │ 
                                            TfrmConsults.popNoteMemoInsTemplateClick┤             │ │ 
                                             TfrmSurgery.popNoteMemoInsTemplateClick┤             │ │ 
                                               TfrmNotes.popNoteMemoInsTemplateClick┘             │ │ 
                                                                                  TReminder.Create┘ │ 
                                                                                     GetReminder┘   │ 
                                                                    TfrmRemDlg.ProcessReminder┘     │ 
                                                                       ViewRemDlgFromForm...┤       │ 
                                                                    TfrmRemDlg.btnClearClick┤       │ 
                                                       TfrmRemDlg.ProcessReminderFromNodeStr┘       │ 
                                                                   TfrmRemDlg.btnNextClick┤         │ 
                                                                   TfrmRemDlg.btnBackClick┘         │ 
                                                                              TRemDlgElement.GetData┘ 
                                                                         TRemDlgElement.SetChecked┤   
                                                                   TReminderDialog.BaseCreate...┤ │   
                                                                                       ..(rec)..┤ │   
                                                                        TRemDlgElement.cbClicked┘ │   
                                                                  TRemDlgElement.BuildControls┤   │   
                                                               TReminderDialog.BuildControls┤ │   │   
                                                                  TfrmRemDlg.BuildControls┘ │ │   │   
                                                           TfrmRemDlg.ProcessReminder...┤   │ │   │   
                                                                  TfrmRemDlg.UMResyncRem┤   │ │   │   
                                                           TfrmRemDlg.ProcessTemplate...┤   │ │   │   
                                                                  TfrmRemDlg.SetFontSize┘   │ │   │   
                                                                 ViewRemDlgFromForm...┤     │ │   │   
                                                               TfrmFrame.ChangeFont...┘     │ │   │   
                                                                                   ..(rec)..┘ │   │   
                                                                              TRemPCERoot.Sync┘   │   
                                                                         TRemPrompt.SetValue┘     │   
                                                           TRemDlgElement.SubCommentChange┤       │   
                                                                              AddPrompts┤ │       │   
                                                                         UpdatePrompts┤ │ │       │   
                                                     TRemDlgElement.BuildControls...┘ │ │ │       │   
                                                       TRemDlgElement.BuildControls...┘ │ │       │   
                                                         TRemDlgElement.BuildControls...┘ │       │   
                                                                   TRemPrompt.PromptChange┤       │   
                                                                           AddPrompts...┘ │       │   
                                                             TRemPrompt.SetValueFromParent┤       │   
                                                                      UpdateForcedValues┤ │       │   
                                                                             ..(rec)..┤ │ │       │   
                                                          TRemDlgElement.SetChecked...┘ │ │       │   
                                                                    TRemPrompt.InitValue┘ │       │   
                                                          TRemDlgElement.UpdateData...┘   │       │   
                                                                       TRemPrompt.DoMHTest┤       │   
                                                                           AddPrompts...┘ │       │   
                                                                       TRemPCERoot.Sync...┘       │   
                                                        TRemDlgElement.Check4ChildrenSharedPrompts┘   
                                                                    TRemDlgElement.SetChecked...┘     

Calls

Name Declaration Comments
TRemData.Add2PN function Add2PN: boolean; -
Code2DataType function Code2DataType(Code: string): TRemDataType; -
Code2PromptType function Code2PromptType(Code: string): TRemPromptType; -
Code2VitalType function Code2VitalType(Code: string): TVitalType; -
TRemPrompt.Create constructor Create; -
ExpandTIUObjects procedure ExpandTIUObjects(var Txt: string; msg: string = ''); -
TReminderDialog.GetDlgSL function GetDlgSL: TORStringList; -
TRemPCERoot.GetRoot class function GetRoot(Data: TRemData; Rec3: string; Historical: boolean): TRemPCERoot; -
TRemDlgElement.Historical function Historical: boolean; -
TRemPrompt.InitValue procedure InitValue; -
MHDLLFound function MHDLLFound: boolean; -
MHTestsOK function MHTestsOK: boolean; -
TRemDlgElement.OneValidCode function OneValidCode(Choices: TORStringList; ChoicesActiveDates: TList; encDt: TFMDateTime): string; -
PrepText4NextLine procedure PrepText4NextLine(var txt: string); -
TRemDlgElement.setActiveDates procedure setActiveDates(Choices: TORStringList; ChoicesActiveDates: TList; ActiveDates: TStringList); -
TPCEData.VisitDateTime function VisitDateTime: TFMDateTime; -

Called-By

Name Declaration Comments
TReminderDialog.BaseCreate constructor BaseCreate; -
TRemDlgElement.GetData procedure GetData; -


Source

2998  procedure TRemDlgElement.UpdateData;
2999  var
3000    Ary: array of integer;
3001    idx, i,cnt: integer;
3002    TempSL: TORStringList;
3003    RData: TRemData;
3004    RPrompt: TRemPrompt;
3005    Tmp, Tmp2, ChoiceTmp: string;
3006    NewLine: boolean;
3007    dt: TRemDataType;
3008    pt: TRemPromptType;
3009    DateRange: string;
3010    ChoicesActiveDates:   TStringList;
3011    ChoiceIdx: integer;
3012    Piece7: string;
3013    EncDt: TFMDateTime;
3014  
3015  begin
3016    if FHaveData then exit;
3017    TempSL := FReminder.GetDlgSL;
3018    if(TempSL.IndexOfPieces([RPCCalled, FID, FTaxID]) >= 0) then
3019    begin
3020      FHaveData := TRUE;
3021      RData := nil;
3022      idx := -1;
3023      repeat
3024        idx := TempSL.IndexOfPieces(['3', FID, FTaxID], idx);
3025        if (idx >= 0) and (Pieces(TempSL[idx-1],U,1,6) = Pieces(TempSL[idx],u,1,6)) then
3026          if pos(':', Piece(TempSL[idx],U,7)) > 0 then  //if has date ranges
3027            begin
3028              if RData <> nil then
3029                begin
3030                  if (not assigned(RData.FActiveDates)) then
3031                    RData.FActiveDates := TStringList.Create;
3032                  DateRange := Pieces(Piece(TempSL[idx],U,7),':',2,3);
3033                  RData.FActiveDates.Add(DateRange);
3034                  with RData do
3035                    begin
3036                      FParent := Self;
3037                      Piece7 := Piece(Piece(TempSL[idx],U,7),':',1);
3038                      FRec3 := TempSL[idx];
3039                      SetPiece(FRec3,U,7,Piece7);
3040                    end;
3041                end;
3042            end;
3043        if(idx >= 0) and (Pieces(TempSL[idx-1],U,1,6) <> Pieces(TempSL[idx],u,1,6)) then
3044        begin
3045          dt := Code2DataType(piece(TempSL[idx], U, r3Type));
3046          if(dt <> dtUnknown) and ((dt <> dtOrder) or
3047            CharInSet(CharAt(piece(TempSL[idx], U, 11),1), ['D', 'Q', 'M', 'O', 'A'])) and   //AGP change 26.10 for allergy orders
3048            ((dt <> dtMentalHealthTest) or MHTestsOK) then
3049          begin
3050            if(not assigned(FData)) then
3051              FData := TList.Create;
3052            RData := TRemData(FData[FData.Add(TRemData.Create)]);
3053            if pos(':',Piece(TempSL[idx],U,7)) > 0 then
3054              begin
3055                RData.FActiveDates := TStringList.Create;
3056                RData.FActiveDates.Add(Pieces(Piece(TempSL[idx],U,7),':',2,3));
3057              end;
3058            with RData do
3059            begin
3060              FParent := Self;
3061              Piece7 := Piece(Piece(TempSL[idx],U,7),':',1);
3062              FRec3 := TempSL[idx];
3063              SetPiece(FRec3,U,7,Piece7);
3064  //            FRoot := FRec3;
3065              i := idx + 1;
3066              ChoiceIdx := 0;
3067              while (i < TempSL.Count) and (TempSL.PiecesEqual(i, ['5', FID, FTaxID])) do
3068              begin
3069                if (Pieces(TempSL[i-1],U,1,6) = Pieces(TempSL[i],U,1,6)) then
3070                  begin
3071                   if pos(':', Piece(TempSL[i],U,7)) > 0 then
3072                     begin
3073                      if (not assigned(FChoicesActiveDates)) then
3074                        begin
3075                          FChoicesActiveDates := TList.Create;
3076                          ChoicesActiveDates := TStringList.Create;
3077                          FChoicesActiveDates.Insert(ChoiceIdx, ChoicesActiveDates);
3078                        end;
3079                      TStringList(FChoicesActiveDates[ChoiceIdx]).Add(Pieces(Piece(TempSL[i],U,7),':',2,3));
3080                     end;
3081                   inc(i);
3082                  end
3083                else
3084                  begin
3085                    if(not assigned(FChoices)) then
3086                    begin
3087                      FChoices := TORStringList.Create;
3088                      if(not assigned(FPrompts)) then
3089                        FPrompts := TList.Create;
3090                      FChoicePrompt := TRemPrompt(FPrompts[FPrompts.Add(TRemPrompt.Create)]);
3091                      with FChoicePrompt do
3092                      begin
3093                        FParent := Self;
3094                        Tmp := Piece(FRec3,U,10);
3095                        NewLine := (Tmp <> '');
3096                        FRec4 := '4' + U + FID + U + FTaxID + U + U + BOOLCHAR[not RData.Add2PN] + U + U +
3097                                 'P' + U + Tmp + U + BOOLCHAR[NewLine] + U + '1';
3098                        FData := RData;
3099                        FOverrideType := ptDataList;
3100                        InitValue;
3101                      end;
3102                    end;
3103                    Tmp := TempSL[i];
3104                    Piece7 := Piece(Piece(TempSL[i],U,7),':',1);
3105                    SetPiece(Tmp,U,7,Piece7);
3106                    Tmp2 := Piece(Piece(Tmp,U,r3Code),':',1);
3107                    if(Tmp2 <> '') then Tmp2 := ' (' + Tmp2 + ')';
3108                    Tmp2 := MixedCase(Piece(Tmp,U,r3Nar)) + Tmp2;
3109                    SetPiece(Tmp,U,12,Tmp2);
3110                    ChoiceIdx := FChoices.Add(Tmp);
3111                    if pos(':',Piece(TempSL[i],U,7)) > 0 then
3112                     begin
3113                      if (not assigned(FChoicesActiveDates)) then
3114                        FChoicesActiveDates := TList.Create;
3115                      ChoicesActiveDates := TStringList.Create;
3116                      ChoicesActiveDates.Add(Pieces(Piece(TempSL[i],U,7),':',2,3));
3117                      FChoicesActiveDates.Insert(ChoiceIdx, ChoicesActiveDates);
3118                     end
3119                    else
3120                      if assigned(FChoicesActiveDates) then
3121                         FChoicesActiveDates.Insert(ChoiceIdx, TStringList.Create);
3122                    inc(i);
3123                  end;
3124              end;
3125              choiceTmp := '';
3126              // agp ICD-10 modify this code to handle one valid code against encounter date if combobox contains more than one code.
3127              if(assigned(FChoices)) and ((FChoices.Count = 1) or (FChoicesActiveDates.Count = 1)) then // If only one choice just pick it
3128              begin
3129                choiceTmp := FChoices[0];
3130              end;
3131              if (assigned(FChoices)) and (assigned(FChoicesActiveDates)) and (choiceTmp = '') then
3132                begin
3133                  if (assigned(FParent.FReminder.FPCEDataObj)) then encDT := FParent.FReminder.FPCEDataObj.DateTime
3134                  else encDT := RemForm.PCEObj.VisitDateTime;
3135                  choiceTmp := OneValidCode(FChoices, FChoicesActiveDates, encDT);
3136                end;
3137              //            if(assigned(FChoices)) and (((FChoices.Count = 1) or (FChoicesActiveDates.Count = 1)) or
3138  //            (oneValidCode(FChoices, FChoicesActiveDates, FParent.FReminder.FPCEDataObj.DateTime) = true)) then // If only one choice just pick it
3139              if (choiceTmp <> '') then
3140  
3141              begin
3142                if (not assigned(RData.FActiveDates)) then
3143                begin
3144                  RData.FActiveDates := TStringList.Create;
3145                  setActiveDates(FChoices, FChoicesActiveDates, RData.FActiveDates);
3146                end;
3147  
3148                FPrompts.Remove(FChoicePrompt);
3149                KillObj(@FChoicePrompt);
3150                Tmp := choiceTmp;
3151                KillObj(@FChoices);
3152                cnt := 5;
3153                if(Piece(FRec3,U,9) = '') then inc(cnt);
3154                SetLength(Ary,cnt);
3155                for i := 0 to cnt-1 do
3156                  Ary[i] := i+4;
3157                SetPieces(FRec3, U, Ary, Tmp);
3158                if (not assigned(RData.FActiveDates)) then
3159                begin
3160                  RData.FActiveDates := TStringList.Create;
3161                end;
3162  
3163              end;
3164              if(assigned(FChoices)) then
3165              begin
3166                for i := 0 to FChoices.Count-1 do
3167                  FChoices.Objects[i] := TRemPCERoot.GetRoot(RData, FChoices[i], Historical);
3168              end
3169              else
3170                FPCERoot := TRemPCERoot.GetRoot(RData, RData.FRec3, Historical);
3171              if(dt = dtVitals) then
3172              begin
3173                if(Code2VitalType(Piece(FRec3,U,6)) <> vtUnknown) then
3174                begin
3175                  if(not assigned(FPrompts)) then
3176                    FPrompts := TList.Create;
3177                  FChoicePrompt := TRemPrompt(FPrompts[FPrompts.Add(TRemPrompt.Create)]);
3178                  with FChoicePrompt do
3179                  begin
3180                    FParent := Self;
3181                    Tmp := Piece(FRec3,U,10);
3182                    NewLine := FALSE;
3183    //                FRec4 := '4' + U + FID + U + FTaxID + U + U + BOOLCHAR[not RData.Add2PN] + U +
3184    //                         RData.InternalValue + U + 'P' + U + Tmp + U + BOOLCHAR[SameL] + U + '1';
3185                    FRec4 := '4' + U + FID + U + FTaxID + U + U + BOOLCHAR[not RData.Add2PN] + U +
3186                             U + 'P' + U + Tmp + U + BOOLCHAR[NewLine] + U + '0';
3187                    FData := RData;
3188                    FOverrideType := ptVitalEntry;
3189                    InitValue;
3190                  end;
3191                end;
3192              end;
3193              if(dt = dtMentalHealthTest) then
3194              begin
3195                if(not assigned(FPrompts)) then
3196                  FPrompts := TList.Create;
3197                FChoicePrompt := TRemPrompt(FPrompts[FPrompts.Add(TRemPrompt.Create)]);
3198                with FChoicePrompt do
3199                begin
3200                  FParent := Self;
3201                  Tmp := Piece(FRec3,U,10);
3202                  NewLine := FALSE;
3203  //                FRec4 := '4' + U + FID + U + FTaxID + U + U + BOOLCHAR[not RData.Add2PN] + U +
3204  //                         RData.InternalValue + U + 'P' + U + Tmp + U + BOOLCHAR[SameL] + U + '1';
3205                  FRec4 := '4' + U + FID + U + FTaxID + U + U + BOOLCHAR[not RData.Add2PN] + U +
3206                           U + 'P' + U + Tmp + U + BOOLCHAR[NewLine] + U + '0';
3207                  FData := RData;
3208                  if ((Piece(FRec3, U, r3GAF) = '1')) and (MHDLLFound = false) then
3209                  begin
3210                    FOverrideType := ptGAF;
3211                    SetPiece(FRec4, U, 8, ForcedCaption + ':');
3212                  end
3213                  else
3214                    FOverrideType := ptMHTest;
3215                end;
3216              end;
3217            end;
3218          end;
3219        end;
3220      until(idx < 0);
3221  
3222      idx := -1;
3223      repeat
3224        idx := TempSL.IndexOfPieces(['4', FID, FTaxID], idx);
3225        if(idx >= 0) then
3226        begin
3227          pt := Code2PromptType(piece(TempSL[idx], U, 4));
3228          if(pt <> ptUnknown) and ((pt <> ptComment) or (not FHasComment)) then
3229          begin
3230            if(not assigned(FPrompts)) then
3231              FPrompts := TList.Create;
3232            RPrompt := TRemPrompt(FPrompts[FPrompts.Add(TRemPrompt.Create)]);
3233            with RPrompt do
3234            begin
3235              FParent := Self;
3236              FRec4 := TempSL[idx];
3237              InitValue;
3238            end;
3239            if(pt = ptComment) then
3240            begin
3241              FHasComment := TRUE;
3242              FCommentPrompt := RPrompt;
3243            end;
3244            if(pt = ptSubComment) then
3245              FHasSubComments := TRUE;
3246            if(pt = ptMST) then
3247              FMSTPrompt := RPrompt;
3248          end;
3249        end;
3250      until(idx < 0);
3251  
3252      idx := -1;
3253      repeat
3254        idx := TempSL.IndexOfPieces(['6', FID, FTaxID], idx);
3255        if(idx >= 0) then
3256        begin
3257          PrepText4NextLine(FPNText);
3258          FPNText := FPNText + Trim(Piece(TempSL[idx], U, 4));
3259        end;
3260      until(idx < 0);
3261      ExpandTIUObjects(FPNText);
3262    end;
3263  end;