Procedure

TRemDlgElement.Check4ChildrenSharedPrompts

Module

uReminders

Last Modified

10/8/2014 2:49:30 PM

Visibility

Protected

Owner

TRemDlgElement

Declaration

procedure Check4ChildrenSharedPrompts;

Calls Hierarchy


TRemDlgElement.Check4ChildrenSharedPrompts
 ├TRemDlgElement.ChildrenSharePrompts
 ├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
 │   │ └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...
 │   │     │   │ ├TRemDlgElement.Check4ChildrenSharedPrompts...
 │   │     │   │ ├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
 └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

Called-By Hierarchy


                                                              TRemDlgElement.Check4ChildrenSharedPrompts
                                                                             TRemDlgElement.SetChecked┘ 
                                                                          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┘         │   
                                                                                           ..(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┘   │         
                                                           TReminderDialog.BaseCreate...┤     │         
                                                                  TRemDlgElement.GetData┘     │         
                                                          TRemDlgElement.SetChecked...┤       │         
                                         TRemDlgElement.Check4ChildrenSharedPrompts...┘       │         
                                                                           TRemPrompt.DoMHTest┤         
                                                                               AddPrompts...┘ │         
                                                                           TRemPCERoot.Sync...┘         

Calls

Name Declaration Comments
TRemPrompt.CanShare function CanShare(Prompt: TRemPrompt): boolean; -
TRemDlgElement.ChildrenSharePrompts function ChildrenSharePrompts: boolean; -
TRemDlgElement.GetData procedure GetData; -

Called-By

Name Declaration Comments
TRemDlgElement.SetChecked procedure SetChecked(const Value: boolean); -


Source

4757  procedure TRemDlgElement.Check4ChildrenSharedPrompts;
4758  var
4759    i, j: integer;
4760    Kid: TRemDlgElement;
4761    PList, EList: TList;
4762    FirstMatch: boolean;
4763    Prompt: TRemPrompt;
4764  
4765  begin
4766    if(not FChildrenShareChecked) then
4767    begin
4768      FChildrenShareChecked := TRUE;
4769      if(ChildrenSharePrompts and assigned(FChildren)) then
4770      begin
4771        for i := 0 to FChildren.Count-1 do
4772          TRemDlgElement(FChildren[i]).GetData;
4773        PList := TList.Create;
4774        try
4775          EList := TList.Create;
4776          try
4777            for i := 0 to FChildren.Count-1 do
4778            begin
4779              Kid := TRemDlgElement(FChildren[i]);
4780  //            if(Kid.ElemType <> etDisplayOnly) and (assigned(Kid.FPrompts)) then
4781              if(assigned(Kid.FPrompts)) then
4782              begin
4783                for j:= 0 to Kid.FPrompts.Count-1 do
4784                begin
4785                  PList.Add(Kid.FPrompts[j]);
4786                  EList.Add(Kid);
4787                end;
4788              end;
4789            end;
4790            if(PList.Count > 1) then
4791            begin
4792              for i := 0 to PList.Count-2 do
4793              begin
4794                if(assigned(EList[i])) then
4795                begin
4796                  FirstMatch := TRUE;
4797                  Prompt := TRemPrompt(PList[i]);
4798                  for j := i+1 to PList.Count-1 do
4799                  begin
4800                    if(assigned(EList[j]) and
4801                      (Prompt.CanShare(TRemPrompt(PList[j])))) then
4802                    begin
4803                      if(FirstMatch) then
4804                      begin
4805                        FirstMatch := FALSE;
4806                        if(not assigned(FPrompts)) then
4807                          FPrompts := TList.Create;
4808                        FHasSharedPrompts := TRUE;
4809                        Prompt.FIsShared := TRUE;
4810                        if(not assigned(Prompt.FSharedChildren)) then
4811                          Prompt.FSharedChildren := TList.Create;
4812                        Prompt.FSharedChildren.Add(EList[i]);
4813                        FPrompts.Add(PList[i]);
4814                        TRemDlgElement(EList[i]).FPrompts.Remove(PList[i]);
4815                        EList[i] := nil;
4816                      end;
4817                      Prompt.FSharedChildren.Add(EList[j]);
4818                      Kid := TRemDlgElement(EList[j]);
4819                      Kid.FPrompts.Remove(PList[j]);
4820                      if(Kid.FHasComment) and (Kid.FCommentPrompt = PList[j]) then
4821                      begin
4822                        Kid.FHasComment := FALSE;
4823                        Kid.FCommentPrompt := nil;
4824                      end;
4825                      TRemPrompt(PList[j]).Free;
4826                      EList[j] := nil;
4827                    end;
4828                  end;
4829                end;
4830              end;
4831            end;
4832          finally
4833            EList.Free;
4834          end;
4835        finally
4836          PList.Free;
4837        end;
4838        for i := 0 to FChildren.Count-1 do
4839        begin
4840          Kid := TRemDlgElement(FChildren[i]);
4841          if(assigned(Kid.FPrompts) and (Kid.FPrompts.Count = 0)) then
4842          begin
4843            Kid.FPrompts.Free;
4844            Kid.FPrompts := nil;
4845          end;
4846        end;
4847      end;
4848    end;
4849  end;