Procedure

TfrmGraphs.HideGraphs

Module

fGraphs

Last Modified

7/15/2014 3:26:36 PM

Visibility

Private

Owner

TfrmGraphs

Declaration

procedure HideGraphs(action: boolean);

Called-By Hierarchy


                                        TfrmGraphs.HideGraphs
                            TfrmGraphs.mnuPopGraphSwapClick┤ 
                                       TfrmGraphs.GraphSwap┤ 
                          TfrmGraphs.mnuPopGraphSwapClick┘ │ 
                           TfrmGraphs.mnuPopGraphSplitClick┤ 
                                      TfrmGraphs.SplitClick┤ 
                         TfrmGraphs.mnuPopGraphSplitClick┘ │ 
                              TfrmGraphs.cboDateRangeChange┤ 
                            TfrmReports.lstDateRangeClick┤ │ 
                                 TfrmReports.GraphPanel┘ │ │ 
                                    TfrmReports.Graph┤   │ │ 
                         TfrmReports.tvReportsClick┘ │   │ │ 
                  TfrmFrame.lstCIRNLocationsClick┤   │   │ │ 
                            TfrmFrame.SetUpCIRN┘ │   │   │ │ 
                       TfrmFrame.SetupPatient┘   │   │   │ │ 
                  UpdatePatientInfoForAlert┤     │   │   │ │ 
               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.AllowCCOWContextChange┤     │   │   │ │ 
            TfrmFrame.mnuFileNextClick...┤ │     │   │   │ │ 
            TfrmFrame.mnuFileOpenClick...┤ │     │   │   │ │ 
   TfrmFrame.mnuFileResumeContextSetClick┘ │     │   │   │ │ 
                TfrmFrame.UpdateCCOWContext┤     │   │   │ │ 
            TfrmFrame.mnuFileOpenClick...┤ │     │   │   │ │ 
          TfrmFrame.ctxContextorCommitted┤ │     │   │   │ │ 
           TfrmFrame.StartCCOWContextor┘ │ │     │   │   │ │ 
                 TfrmFrame.FormCreate┘   │ │     │   │   │ │ 
   TfrmFrame.mnuFileResumeContextGetClick┘ │     │   │   │ │ 
     TfrmFrame.mnuFileResumeContextSetClick┘     │   │   │ │ 
                          TfrmReports.DisplayPage┤   │   │ │ 
                         TfrmReports.LoadTreeView┤   │   │ │ 
                        TfrmReports.DisplayPage┤ │   │   │ │ 
           TfrmOptionsReportsDefault.btnOKClick┤ │   │   │ │ 
        TfrmOptionsReportsDefault.btnResetClick┤ │   │   │ │ 
         TfrmOptionsReportsCustom.btnApplyClick┘ │   │   │ │ 
          TfrmOptionsReportsCustom.btnOKClick┘   │   │   │ │ 
                 TfrmReports.ProcessNotifications┤   │   │ │ 
                        TfrmReports.DisplayPage┘ │   │   │ │ 
                     TfrmReports.tvReportsKeyDown┤   │   │ │ 
                  TfrmReports.tvProceduresKeyDown┤   │   │ │ 
                      TfrmReports.chkMaxFreqClick┤   │   │ │ 
             TfrmOptionsReportsDefault.btnOKClick┤   │   │ │ 
          TfrmOptionsReportsDefault.btnResetClick┤   │   │ │ 
        TfrmOptionsReportsCustom.btnApplyClick...┘   │   │ │ 
                        TfrmReports.tvReportsClick...┘   │ │ 
                                    TfrmGraphs.Initialize┤ │ 
                                 TfrmFrame.ClearPatient┤ │ │ 
                            TfrmFrame.SetupPatient...┘ │ │ │ 
                        TfrmFrame.mnuToolsGraphingClick┤ │ │ 
                                 TfrmLabs.grdLabClick┤ │ │ │ 
                              TfrmLabs.tvReportsClick┤ │ │ │ 
                               TfrmLabs.DisplayPage┤ │ │ │ │ 
                              TfrmLabs.LoadTreeView┤ │ │ │ │ 
                             TfrmLabs.DisplayPage┤ │ │ │ │ │ 
        TfrmOptionsReportsCustom.btnApplyClick...┘ │ │ │ │ │ 
                        TfrmLabs.cmdOtherTestsClick┤ │ │ │ │ 
                           TfrmLabs.chkMaxFreqClick┤ │ │ │ │ 
                      TfrmLabs.ProcessNotifications┤ │ │ │ │ 
                             TfrmLabs.DisplayPage┘ │ │ │ │ │ 
                                          ..(rec)..┤ │ │ │ │ 
                          TfrmLabs.tvReportsKeyDown┤ │ │ │ │ 
                 TfrmFrame.lstCIRNLocationsClick...┘ │ │ │ │ 
                                            ..(rec)..┘ │ │ │ 
                                TfrmReports.ClearPtData┤ │ │ 
                            TfrmFrame.ClearPatient...┘ │ │ │ 
                                   TfrmReports.Graph...┘ │ │ 
                                      TfrmGraphs.FormShow┤ │ 
                        TfrmGraphs.btnChangeSettingsClick┤ │ 
                         TfrmReports.btnChangeViewClick┘ │ │ 
                             TfrmGraphs.CheckExpandedLabs┤ │ 
                                  TfrmGraphs.ItemsClick┘ │ │ 
                               TfrmGraphs.DisplayData┤   │ │ 
                          TfrmFrame.ClearPatient...┤ │   │ │ 
                         TfrmReports.ClearPtData...┤ │   │ │ 
                               TfrmReports.Graph...┤ │   │ │ 
                        TfrmGraphs.chkItemsTopClick┤ │   │ │ 
                     TfrmGraphs.chkItemsBottomClick┤ │   │ │ 
                 TfrmGraphs.mnuPopGraphIsolateClick┤ │   │ │ 
                   TfrmGraphs.cboDateRangeChange...┤ │   │ │ 
                           TfrmGraphs.ItemsClick...┤ │   │ │ 
                             TfrmGraphs.ViewsChange┤ │   │ │ 
                     TfrmGraphs.lstViewsTopChange┤ │ │   │ │ 
                       TfrmGraphs.Initialize...┤ │ │ │   │ │ 
                         TfrmGraphs.GraphSwitch┤ │ │ │   │ │ 
                      TfrmGraphs.GraphSwap...┘ │ │ │ │   │ │ 
               TfrmGraphs.cboDateRangeChange...┤ │ │ │   │ │ 
                      TfrmGraphs.ViewSelections┘ │ │ │   │ │ 
                TfrmReports.tvReportsClick...┤   │ │ │   │ │ 
           TfrmGraphs.btnGraphSelectionsClick┘   │ │ │   │ │ 
        TfrmReports.btnGraphSelectionsClick┘     │ │ │   │ │ 
                  TfrmGraphs.lstViewsBottomChange┘ │ │   │ │ 
                       TfrmGraphs.Initialize...┤   │ │   │ │ 
                      TfrmGraphs.GraphSwitch...┤   │ │   │ │ 
               TfrmGraphs.cboDateRangeChange...┤   │ │   │ │ 
                   TfrmGraphs.ViewSelections...┘   │ │   │ │ 
                  TfrmGraphs.mnuPopGraphRemoveClick┘ │   │ │ 
                       TfrmGraphs.lvwItemsBottomClick┤   │ │ 
                           TfrmGraphs.Initialize...┤ │   │ │ 
                            TfrmGraphs.CheckContext┤ │   │ │ 
                              TfrmGraphs.FormShow┘ │ │   │ │ 
                       TfrmGraphs.chkDualViewsClick┤ │   │ │ 
                         TfrmGraphs.Initialize...┤ │ │   │ │ 
                              TfrmGraphs.FormShow┤ │ │   │ │ 
                                           Layout┤ │ │   │ │ 
                             TfrmGraphs.GetSize┘ │ │ │   │ │ 
                          TfrmGraphs.FormShow┘   │ │ │   │ │ 
             TfrmGraphs.mnuPopGraphDualViewsClick┤ │ │   │ │ 
                     TfrmGraphs.ViewSelections...┘ │ │   │ │ 
                          TfrmGraphs.GraphSwitch...┤ │   │ │ 
                           TfrmGraphs.SplitClick...┤ │   │ │ 
                   TfrmGraphs.mnuPopGraphClearClick┤ │   │ │ 
                              TfrmGraphs.AutoSelect┤ │   │ │ 
                        TfrmGraphs.ViewsChange...┘ │ │   │ │ 
                    TfrmGraphs.lvwItemsBottomChange┘ │   │ │ 
                          TfrmGraphs.lvwItemsTopClick┘   │ │ 
                           TfrmGraphs.Initialize...┤     │ │ 
                                TfrmGraphs.FormShow┤     │ │ 
                    TfrmGraphs.chkDualViewsClick...┤     │ │ 
                          TfrmGraphs.GraphSwitch...┤     │ │ 
                           TfrmGraphs.SplitClick...┤     │ │ 
                   TfrmGraphs.mnuPopGraphClearClick┤     │ │ 
                           TfrmGraphs.AutoSelect...┤     │ │ 
                   TfrmGraphs.mnuPopGraphResetClick┤     │ │ 
                              TfrmGraphs.FormShow┤ │     │ │ 
            TfrmGraphs.mnuPopGraphHorizontalClick┤ │     │ │ 
              TfrmGraphs.mnuPopGraphVerticalClick┤ │     │ │ 
                TfrmGraphs.mnuPopGraphRemoveClick┤ │     │ │ 
              TfrmGraphs.mnuPopGraphZoomBackClick┘ │     │ │ 
                       TfrmGraphs.lvwItemsTopChange┘     │ │ 
                                TfrmGraphs.ViewsChange...┤ │ 
                     TfrmGraphs.mnuPopGraphMergeLabsClick┘ │ 
                                   TfrmGraphs.ItemsClick...┘ 

Called-By

Name Declaration Comments
TfrmGraphs.cboDateRangeChange procedure cboDateRangeChange(Sender: TObject); -
TfrmGraphs.GraphSwap procedure GraphSwap(bottomview, topview: integer); -
TfrmGraphs.ItemsClick procedure ItemsClick(Sender: TObject; aListView, aOtherListView: TListView; aCheckBox: TCheckBox; aListBox: TORListBox; aList: TStrings; aSection: string); -
TfrmGraphs.mnuPopGraphSplitClick procedure mnuPopGraphSplitClick(Sender: TObject); -
TfrmGraphs.mnuPopGraphSwapClick procedure mnuPopGraphSwapClick(Sender: TObject); -
TfrmGraphs.SplitClick procedure SplitClick; -


Source

6325  procedure TfrmGraphs.HideGraphs(action: boolean);
6326  begin
6327    pnlTop.Color := chartDatelineTop.Color;
6328    pnlBottom.Color := chartDatelineTop.Color;
6329    if action then
6330    begin
6331      pnlScrollTopBase.Visible := false;
6332      pnlScrollBottomBase.Visible := false;
6333    end
6334    else
6335    begin
6336      pnlScrollTopBase.Visible := true;
6337      pnlScrollBottomBase.Visible := true;
6338      chartDatelineTop.Refresh;
6339    end;
6340  end;