Procedure

StartupReminders

Module

uReminders

Last Modified

10/8/2014 2:49:30 PM

Scope

Interfaced

Declaration

procedure StartupReminders;

Calls Hierarchy


StartupReminders
 └LoadReminderData
   ├BeginReminderUpdate
   ├GetCurrentReminders
   ├CheckReminders
   │ ├EvaluateReminders
   │ └ReminderEvaluated
   ├GetOtherReminders
   └EndReminderUpdate

Called-By Hierarchy


                     StartupReminders
    TfrmFrame.pnlRemindersMouseDown┤ 
       TfrmFrame.RemindersChanged┘ │ 
           TfrmFrame.FormCreate┘   │ 
       TfrmDrawers.sbRemindersClick┤ 
                   ViewReminderTree┘ 
               TfrmFrame.ViewInfo┘   
            TfrmDCSumm.ViewInfo┤     
          TfrmConsults.ViewInfo┤     
  TfrmFrame.pnlRemindersMouseUp┤     
TfrmFrame.RemindersChanged...┘ │     
         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┘     

Calls

Name Declaration Comments
LoadReminderData procedure LoadReminderData(ProcessingInBackground: boolean = FALSE); -

Called-By

Name Declaration Comments
TfrmFrame.pnlRemindersMouseDown procedure pnlRemindersMouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer); -
TfrmDrawers.sbRemindersClick procedure sbRemindersClick(Sender: TObject); -
ViewReminderTree procedure ViewReminderTree; -


Source

752   procedure StartupReminders;
753   begin
754     if(not InitialRemindersLoaded) then
755     begin
756       RemindersStarted := TRUE;
757       InitialRemindersLoaded := TRUE;
758       LoadReminderData;
759     end;
760   end;