Function

TReminderDialog.Processing

Module

uReminders

Last Modified

10/8/2014 2:49:30 PM

Visibility

Public

Owner

TReminderDialog

Declaration

function Processing: boolean;

Calls Hierarchy


TReminderDialog.Processing
 └CheckItem
   ├ChildrenChecked
   │ └CheckItem...
   └TRemDlgElement.Add2PN
     ├TRemDlgElement.ElemType
     └TRemDlgElement.AddData
       ├TRemDlgElement.Historical
       ├TPCEData.VisitDateTime
       │ └TPCEData.IsSecondaryVisit
       ├TRemData.AddData
       │ ├Add
       │ │ ├Code2DataType
       │ │ ├TRemDlgElement.Historical
       │ │ ├TRemPrompt.GetValue
       │ │ │ ├TRemDlgElement.Historical
       │ │ │ ├TPCEData.VisitDateTime...
       │ │ │ ├TRemPrompt.RemDataActive
       │ │ │ │ └TRemPrompt.CompareActiveDate
       │ │ │ └TRemPrompt.RemDataChoiceActive
       │ │ ├TPCEData.VisitDateTime...
       │ │ ├ValidateGAFDate
       │ │ │ ├TPatient.GetDateDied
       │ │ │ │ └DateOfDeath
       │ │ │ └FMToday
       │ │ │   └FMNow
       │ │ ├TPCEProviderList.PCEProvider
       │ │ │ ├Check
       │ │ │ │ └TPCEProviderList.IndexOfProvider
       │ │ │ └TPCEProviderList.PrimaryIEN
       │ │ │   └TPCEProviderList.GetPrimaryIdx
       │ │ ├AddPrompt
       │ │ │ ├TRemPrompt.PromptType
       │ │ │ │ └Code2PromptType
       │ │ │ ├TPCEProviderList.PCEProvider...
       │ │ │ ├TPCEData.VisitDateTime...
       │ │ │ ├TRemPrompt.VitalValue
       │ │ │ │ └TRemPrompt.GetValue...
       │ │ │ ├TRemPrompt.VitalType
       │ │ │ │ ├Code2VitalType
       │ │ │ │ └TRemData.InternalValue
       │ │ │ ├TRemPrompt.VitalUnitValue
       │ │ │ │ ├TRemPrompt.VitalType...
       │ │ │ │ └TRemPrompt.GetValue...
       │ │ │ ├ConvertVital
       │ │ │ ├FormatVitalForNote
       │ │ │ │ └ConvertVitalData
       │ │ │ ├TRemPrompt.GetValue...
       │ │ │ └TRemDlgElement.Historical
       │ │ └GetPCEDataText
       │ │   └GetDiagnosisText
       │ ├TRemDlgElement.Historical
       │ └TPCEData.VisitDateTime...
       ├TRemDlgElement.ElemType
       └..(rec)..

Called-By Hierarchy


                                                  TReminderDialog.Processing
                                                  TfrmRemDlg.btnClearClick┤ 
                                                        TfrmRemDlg.KillAll┤ 
                                               TfrmRemDlg.FormCloseQuery┤ │ 
                                               TfrmRemDlg.btnCancelClick┘ │ 
                                          TfrmNotes.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┘   │   │ 
                                           TfrmNotes.mnuActDeleteClick┘   │ 
                                            TfrmNotes.SaveEditedNote┘     │ 
                                         TfrmNotes.SaveCurrentNote┘       │ 
                                 TfrmNotes.AllowContextChange...┤         │ 
                                       TfrmNotes.LstNotesToPrint┤         │ 
                      TfrmFrame.mnuFilePrintSelectedItemsClick┘ │         │ 
                                          TfrmNotes.RequestPrint┤         │ 
                                   TfrmFrame.mnuFilePrintClick┘ │         │ 
                                          TfrmNotes.mnuViewClick┤         │ 
                                      TfrmNotes.SetViewContext┤ │         │ 
                                       TfrmNotes.DisplayPage┤ │ │         │ 
                       TfrmNotes.mnuViewReturntoDefaultClick┘ │ │         │ 
                           TfrmNotes.mnuViewSaveAsDefaultClick┘ │         │ 
                                          TfrmNotes.StartNewEdit┤         │ 
                                      TfrmNotes.mnuActNewClick┤ │         │ 
                                   TfrmNotes.cmdNewNoteClick┘ │ │         │ 
                               TfrmNotes.mnuActAddIDEntryClick┤ │         │ 
                                   TfrmNotes.mnuActAddendClick┤ │         │ 
                                     TfrmNotes.mnuActEditClick┘ │         │ 
                         TfrmNotes.mnuActDetachFromIDParentClick┤         │ 
                                  TfrmNotes.mnuActDeleteClick...┤         │ 
                                       TfrmNotes.mnuActSaveClick┤         │ 
                                       TfrmNotes.mnuActSignClick┤         │ 
                                          TfrmNotes.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┘               │         │ 
                                             TfrmNotes.FormClose┤         │ 
                        TfrmNotes.mnuActIdentifyAddlSignersClick┤         │ 
                            TfrmNotes.popNoteMemoAddlSignClick┘ │         │ 
                                  TfrmNotes.ProcessNotifications┤         │ 
                                         TfrmNotes.DisplayPage┘ │         │ 
                                     TfrmNotes.SetViewContext...┤         │ 
                                       TfrmNotes.tvNotesDragDrop┤         │ 
                           TfrmNotes.mnuActAttachtoIDParentClick┘         │ 
                                                 TfrmRemDlg.btnFinishClick┤ 
                                                    ProcessingChangeString┤ 
                                                       ClearReminderData┤ │ 
                                                TfrmFrame.ClearPatient┘ │ │ 
                                              TfrmFrame.SetupPatient┘   │ │ 
                                         UpdatePatientInfoForAlert┤     │ │ 
                                   TfrmFrame.mnuFileNextClick...┘ │     │ │ 
                                     TfrmFrame.mnuFileOpenClick...┤     │ │ 
                                  TfrmFrame.AllowCCOWContextChange┤     │ │ 
                                   TfrmFrame.mnuFileNextClick...┤ │     │ │ 
                                   TfrmFrame.mnuFileOpenClick...┤ │     │ │ 
                          TfrmFrame.mnuFileResumeContextSetClick┘ │     │ │ 
                                       TfrmFrame.UpdateCCOWContext┤     │ │ 
                                   TfrmFrame.mnuFileOpenClick...┤ │     │ │ 
                              TfrmFrame.ctxContextorCommitted...┤ │     │ │ 
                          TfrmFrame.mnuFileResumeContextGetClick┘ │     │ │ 
                            TfrmFrame.mnuFileResumeContextSetClick┘     │ │ 
                                               RemindersInProcessChanged┘ │ 
                                                   InitReminderObjects┘   │ 
                                           uReminders.initialization┘     │ 
                                                         BuildReminderTree┤ 
                                            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...┘ │     │ │ │   │ │     │ │ 
                    TfrmConsults.SetViewContext...┤     │ │ │   │ │     │ │ 
                      TfrmConsults.mnuViewClick...┤     │ │ │   │ │     │ │ 
        TfrmConsults.mnuActDetachFromIDParentClick┤     │ │ │   │ │     │ │ 
             TfrmConsults.mnuActNoteDeleteClick...┤     │ │ │   │ │     │ │ 
             TfrmConsults.mnuActSignatureSaveClick┤     │ │ │   │ │     │ │ 
             TfrmConsults.mnuActSignatureSignClick┤     │ │ │   │ │     │ │ 
                         TfrmConsults.SaveSignItem┤     │ │ │   │ │     │ │ 
                        TfrmReview.cmdOKClick...┘ │     │ │ │   │ │     │ │ 
                   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┘   │     │ │ 
                                                  ViewRemDlg┤     │     │ │ 
                                        ViewReminderDialog┤ │     │     │ │ 
                          TfrmDrawers.tvRemindersMouseUp┤ │ │     │     │ │ 
                       TfrmDrawers.RemindersChanged...┘ │ │ │     │     │ │ 
                          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┘             │     │ │ 
                                            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.mnuActAddIDEntryClick┘ │ │       │ │ 
                                      TfrmNotes.InsertAddendum┤ │       │ │ 
                                 TfrmNotes.mnuActAddendClick┘ │ │       │ │ 
                                         TfrmNotes.LoadForEdit┤ │       │ │ 
                                   TfrmNotes.mnuActEditClick┘ │ │       │ │ 
                                   TfrmNotes.SaveEditedNote...┤ │       │ │ 
                                     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...┘         │ │ 
                                       TfrmReminderTree.RemindersChanged┘ │ 
                                           TfrmReminderTree.FormCreate┤   │ 
                                          TfrmReminderTree.FormDestroy┘   │ 
                                            TReminderDialog.FinishProblems┘ 
                                              TfrmRemDlg.ProcessReminder┤   
                                                 ViewRemDlgFromForm...┤ │   
                                              TfrmRemDlg.btnClearClick┤ │   
                                 TfrmRemDlg.ProcessReminderFromNodeStr┘ │   
                                             TfrmRemDlg.btnNextClick┤   │   
                                             TfrmRemDlg.btnBackClick┘   │   
                                               TfrmRemDlg.btnFinishClick┘   

Calls

Name Declaration Comments
CheckItem function CheckItem(Item: TRemDlgElement): boolean; -

Called-By

Name Declaration Comments
TfrmRemDlg.btnClearClick procedure btnClearClick(Sender: TObject); -
TfrmRemDlg.btnFinishClick procedure btnFinishClick(Sender: TObject); -
BuildReminderTree procedure BuildReminderTree(Tree: TORTreeView); -
TReminderDialog.FinishProblems procedure FinishProblems(List: TStrings; var MissingTemplateFields: boolean); -
TfrmRemDlg.KillAll function KillAll: boolean; -
ProcessingChangeString function ProcessingChangeString: string; -


Source

2484  function TReminderDialog.Processing: boolean;
2485  var
2486    i,j: integer;
2487    Elem: TRemDlgElement;
2488    RData: TRemData;
2489  
2490    function ChildrenChecked(Prnt: TRemDlgElement): boolean; forward;
2491  
2492    function CheckItem(Item: TRemDlgElement): boolean;
2493    begin
2494      if(Item.ElemType = etDisplayOnly) then
2495      begin
2496        Result := ChildrenChecked(Item);
2497        if(not Result) then
2498          Result := Item.Add2PN;
2499      end
2500      else
2501        Result := Item.FChecked;
2502    end;
2503  
2504    function ChildrenChecked(Prnt: TRemDlgElement): boolean;
2505    var
2506      i: integer;
2507  
2508    begin
2509      Result := FALSE;
2510      if(assigned(Prnt.FChildren)) then
2511      begin
2512        for i := 0 to Prnt.FChildren.Count-1 do
2513        begin
2514          Result := CheckItem(TRemDlgElement(Prnt.FChildren[i]));
2515          if(Result) then break;
2516        end;
2517      end;
2518    end;
2519  
2520  begin
2521    Result := FALSE;
2522    if(assigned(FElements)) then
2523    begin
2524      for i := 0 to FElements.Count-1 do
2525      begin
2526        Elem := TRemDlgElement(FElements.Objects[i]);
2527        if(not assigned(Elem.FParent)) then
2528        begin
2529          Result := CheckItem(Elem);
2530          if (Result = false) then  //(AGP CHANGE 24.9 add check to have the finish problem check for MH test)
2531            begin
2532            if (assigned(Elem.FData)) then
2533              begin
2534                 for j := 0 to Elem.FData.Count-1 do
2535                    begin
2536                       RData := TRemData(Elem.FData[j]);
2537                       if piece(RData.FRec3,U,4)='MH' then
2538                          Result := True;
2539                       if (Result) then break;
2540                    end;
2541              end;
2542            end;
2543          if(Result) then break;
2544        end;
2545      end;
2546    end;
2547  end;