Procedure

TRemoteSite.ReportClear

Module

uCore

Last Modified

7/15/2014 3:26:44 PM

Visibility

Public

Owner

TRemoteSite

Declaration

procedure ReportClear;

Called-By Hierarchy


                             TRemoteSite.ReportClear
                               TRemoteSite.Destroy┤ 
                       TfrmLabs.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┘   │ 
                              TfrmLabs.DisplayPage┤ 
                        TfrmLabs.lstQualifierClick┤ 
                         TfrmLabs.tvReportsClick┘ │ 
                          TfrmLabs.DisplayPage┤   │ 
                         TfrmLabs.LoadTreeView┤   │ 
                        TfrmLabs.DisplayPage┤ │   │ 
      TfrmOptionsReportsCustom.btnApplyClick┘ │   │ 
       TfrmOptionsReportsCustom.btnOKClick┘   │   │ 
                   TfrmLabs.cmdOtherTestsClick┤   │ 
                      TfrmLabs.chkMaxFreqClick┤   │ 
                 TfrmLabs.ProcessNotifications┤   │ 
                        TfrmLabs.DisplayPage┘ │   │ 
                                     ..(rec)..┤   │ 
                     TfrmLabs.tvReportsKeyDown┤   │ 
               TfrmFrame.lstCIRNLocationsClick┘   │ 
                         TfrmFrame.SetUpCIRN┘     │ 
                    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┘         │ 
                                 TfrmLabs.GoRemote┤ 
                   TfrmLabs.lstQualifierClick...┤ │ 
                      TfrmLabs.tvReportsClick...┘ │ 
                TfrmFrame.lstCIRNLocationsClick...┤ 
                    TfrmReports.AllowContextChange┤ 
              TfrmFrame.AllowContextChangeAll...┘ │ 
                           TfrmReports.DisplayPage┤ 
                     TfrmReports.lstQualifierClick┤ 
                      TfrmReports.tvReportsClick┘ │ 
            TfrmFrame.lstCIRNLocationsClick...┤   │ 
                       TfrmReports.DisplayPage┤   │ 
                      TfrmReports.LoadTreeView┤   │ 
                     TfrmReports.DisplayPage┤ │   │ 
        TfrmOptionsReportsDefault.btnOKClick┤ │   │ 
     TfrmOptionsReportsDefault.btnResetClick┤ │   │ 
   TfrmOptionsReportsCustom.btnApplyClick...┘ │   │ 
              TfrmReports.ProcessNotifications┤   │ 
                     TfrmReports.DisplayPage┘ │   │ 
                  TfrmReports.tvReportsKeyDown┤   │ 
               TfrmReports.tvProceduresKeyDown┤   │ 
                   TfrmReports.chkMaxFreqClick┤   │ 
          TfrmOptionsReportsDefault.btnOKClick┤   │ 
       TfrmOptionsReportsDefault.btnResetClick┤   │ 
     TfrmOptionsReportsCustom.btnApplyClick...┘   │ 
                              TfrmReports.GoRemote┤ 
                TfrmReports.lstQualifierClick...┤ │ 
                   TfrmReports.tvReportsClick...┘ │ 
                     TfrmReports.tvReportsClick...┘ 

Called-By

Name Declaration Comments
TfrmLabs.AllowContextChange function AllowContextChange(var WhyNot: string): Boolean; override; -
TfrmReports.AllowContextChange function AllowContextChange(var WhyNot: string): Boolean; override; -
TRemoteSite.Destroy destructor Destroy; override; -
TfrmLabs.DisplayPage procedure DisplayPage; override; -
TfrmReports.DisplayPage procedure DisplayPage; override; -
TfrmLabs.GoRemote procedure GoRemote(Dest: TStringList; AItem: string; AQualifier, ARpc: string; AHSTag: string; AHDR: string; aFHIE: string); -
TfrmReports.GoRemote procedure GoRemote(Dest: TStringList; AItem: string; AQualifier, ARpc: string; AHSTag: string; AHDR: string; aFHIE: string); -
TfrmFrame.lstCIRNLocationsClick procedure lstCIRNLocationsClick(Sender: TObject); -
TfrmLabs.lstQualifierClick procedure lstQualifierClick(Sender: TObject); -
TfrmReports.lstQualifierClick procedure lstQualifierClick(Sender: TObject); -
TfrmReports.tvReportsClick procedure tvReportsClick(Sender: TObject); -


Source

1586  procedure TRemoteSite.ReportClear;
1587  begin
1588    FData.Clear;
1589    FQueryStatus := '';
1590  end;