Procedure

LoadLabTestData

Module

rODLab

Last Modified

7/15/2014 3:26:42 PM

Scope

Interfaced

Declaration

procedure LoadLabTestData(LoadData: TStringList; LabTestIEN: string) ;

Called-By Hierarchy


                        LoadLabTestData
                      TLabTest.Create┤ 
       TfrmODLab.cboAvailTestSelect┘ │ 
            TfrmODLab.SetupDialog┤   │ 
       TfrmODLab.cboAvailTestExit┘   │ 
                      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┘     

Called-By

Name Declaration Comments
TLabTest.Create constructor Create(const LabTestIEN: string; Responses: TResponses); -
TLabTest.Create constructor Create(const LabTestIEN: string; Responses: TResponses); -


Source

132   procedure LoadLabTestData(LoadData: TStringList; LabTestIEN: string) ;
133   begin
134       tCallV(LoadData, 'ORWDLR32 LOAD', [LabTestIEN]);
135   end ;