RPC HELP TRPCBroker Call Method Example

From VistApedia
Jump to: navigation, search

Call Example

The following program code demonstrates the use of the Call method in a hypothetical example of bringing back demographic information for a patient and then displaying the results in a memo box:

   procedure TForm1.Button1Click(Sender: TObject);
   begin
     brkrRPCBroker1.RemoteProcedure := 'GET PATIENT DEMOGRAPHICS';
     brkrRPCBroker1.Param[0].Value := 'DFN';
     brkrRPCBroker1.Param[0].PType := reference;
     brkrRPCBroker1.Call;
     Memo1.Lines := brkrRPCBroker1.Results;
   end;

NOTE: For a demonstration using the Call method, please run the BrokerExample.EXE located in the ..\BDK32\Samples\BrokerEx directory.