RPC HELP XWB REMOTE RPC Example

From VistApedia
Jump to: navigation, search

RPC Broker Help Home

XWB REMOTE RPC Example

The following is example of the XWB REMOTE RPC:

   brkrRPCBroker1.RemoteProcedure := 'XWB REMOTE RPC';
   brkrRPCBroker1.Param[0].Ptype:= Literal;
   brkrRPCBroker1.Param[0].Value := 'Station Number';
   brkrRPCBroker1.Param[1].Ptype:= Literal;
   brkrRPCBroker1.Param[1].Value := 'MY RPC’;
   brkrRPCBroker1.Param[2].Ptype:= Literal;
   brkrRPCBroker1.Param[2].Value := '1';
   brkrRPCBroker1.Param[3].Ptype:= Reference;
   brkrRPCBroker1.Param[3].Value := 'MY RPC PARAMETER';
   try
     brkrRPCBroker1.Call;
   except
     On EBrokerError do
       ShowMessage('Connection to server could not be established!');
   end;
   .; code to store HANDLE returned in brkrRPCBroker1.Results[]	

The application will need to use XWB REMOTE STATUS CHECK, XWB REMOTE GETDATA, and XWB REMOTE CLEAR to complete the transaction.