Procedure

LoadSamples

Module

rODLab

Last Modified

7/15/2014 3:26:42 PM

Scope

Interfaced

Declaration

procedure LoadSamples(LoadList: TStringList) ;

Called-By Hierarchy


                              LoadSamples
                TLabTest.LoadAllSamples┤ 
                TfrmODLab.SetupDialog┤ │ 
                      TLabTest.Create┤ │ 
       TfrmODLab.cboAvailTestSelect┘ │ │ 
            TfrmODLab.SetupDialog┤   │ │ 
       TfrmODLab.cboAvailTestExit┘   │ │ 
      TfrmODLab.cboAvailTestSelect...┤ │ 
          TfrmODLab.GetAllCollSamples┘ │ 
                 TfrmODLab.Validate┤   │ 
      TfrmODLab.cboCollSampKeyPause┤   │ 
    TfrmODLab.cboCollSampMouseClick┘   │ 
                TLabTest.LoadAllSamples┘ 
                      TLabTest.Create┤   
            TfrmODBBank.SetupDialog┤ │   
        TfrmODBBank.SetOnQuickOrder┤ │   
        TfrmODBBank.cboQuickClick┘ │ │   
     TfrmODBBank.cboAvailTestSelect┤ │   
          TfrmODBBank.SetupDialog┤ │ │   
     TfrmODBBank.cboAvailTestExit┘ │ │   
     TfrmODBBank.cboAvailCompSelect┤ │   
     TfrmODBBank.cboAvailCompExit┘ │ │   
   TfrmODBBank.lvSelectionListClick┤ │   
          TfrmODBBank.SetupDialog┤ │ │   
   TfrmODBBank.SetOnQuickOrder...┤ │ │   
TfrmODBBank.cboAvailTestSelect...┤ │ │   
TfrmODBBank.cboAvailCompSelect...┤ │ │   
    TfrmODBBank.cboAvailTestEnter┤ │ │   
    TfrmODBBank.cboAvailCompEnter┤ │ │   
     TfrmODBBank.cboCollTimeEnter┤ │ │   
     TfrmODBBank.cboCollTypeEnter┤ │ │   
    TfrmODBBank.cboModifiersEnter┤ │ │   
     TfrmODBBank.calWantTimeEnter┤ │ │   
       TfrmODBBank.tQuantityEnter┤ │ │   
    TfrmODBBank.txtImmedCollEnter┤ │ │   
     TfrmODBBank.calCollTimeEnter┘ │ │   
       TfrmODBBank.cboSurgeryChange┘ │   
          TfrmODBBank.SetupDialog┤   │   
   TfrmODBBank.SetOnQuickOrder...┤   │   
TfrmODBBank.cboAvailCompSelect...┤   │   
      TfrmODBBank.tQuantityChange┘   │   
        TfrmODBBank.GetAllCollSamples┘   

Called-By

Name Declaration Comments
TLabTest.LoadAllSamples procedure LoadAllSamples; -
TLabTest.LoadAllSamples procedure LoadAllSamples; -


Source

137   procedure LoadSamples(LoadList: TStringList) ;
138   begin
139       tCallV(LoadList, 'ORWDLR32 ALLSAMP', [nil]);
140   end ;