Function

ValidImmCollTime

Module

rODLab

Last Modified

7/15/2014 3:26:42 PM

Scope

Interfaced

Declaration

function  ValidImmCollTime(CollTime: TFMDateTime): string;

Called-By Hierarchy


                ValidImmCollTime
 TfrmODLabImmedColl.cmdOKClick┤ 
            TfrmODLab.Validate┤ 
       TfrmODBBank.ValidateAdd┘ 
        TfrmODBBank.Validate┤   
        TfrmODBBank.ValidAdd┘   
TfrmODBBank.cmdAcceptClick┘     

Called-By

Name Declaration Comments
TfrmODLabImmedColl.cmdOKClick procedure cmdOKClick(Sender: TObject); -
TfrmODLab.Validate procedure Validate(var AnErrMsg: string); override; -
TfrmODBBank.ValidateAdd procedure ValidateAdd(var AnErrMsg: string); -


Source

185   function  ValidImmCollTime(CollTime: TFMDateTime): string;
186   begin
187     CallV('ORWDLR32 IC VALID',[CollTime]);
188     Result := RPCBrokerV.Results[0];
189   end;