Function

GetRemovableMedResults

Module

rConsults

Last Modified

7/15/2014 3:26:36 PM

Scope

Interfaced

Declaration

function  GetRemovableMedResults(ConsultIEN: integer): TStrings;

Called-By Hierarchy


                 GetRemovableMedResults
                 SelectMedicineResult┘ 
     TfrmConsults.ProcessMedResults┘   
TfrmConsults.mnuActAttachMedClick┤     
TfrmConsults.mnuActRemoveMedClick┘     

Called-By

Name Declaration Comments
SelectMedicineResult function SelectMedicineResult(ConsultIEN: integer; FormTitle: string; var MedResult: TMedResultRec): boolean ; -


Source

413   function GetRemovableMedResults(ConsultIEN: integer): TStrings;
414   begin
415     CallV('ORQQCN REMOVABLE MED RESULTS', [ConsultIEN]);
416     Result := RPCBrokerV.Results;
417   end;