RPC HELP XWB IS RPC AVAILABLE Example

From VistApedia
Jump to navigationJump to search

RPC Broker Help Home

XWB IS RPC AVAILABLE Example

The following is example of the XWB IS RPC AVAILABLE RPC: 

   brkrRPCBroker1.RemoteProcedure := 'XWB IS RPC AVAILABLE';
   brkrRPCBroker1.Param[0].Value :='XWB GET VARIABLE VALUE';
   brkrRPCBroker1.Param[0].PType := literal;
   brkrRPCBroker1.Param[1].Value := 'R';
   brkrRPCBroker1.Param[1].PType := literal;
   {no version number passed in this example as XWB GET VARIABLE VALUE has only one version}
   try
     brkrRPCBroker1.Call;
   except
     On EBrokerError do
       ShowMessage('Connection to server could not be established!');
   end;
   .; branch code to handle RPC availability
Retrieved from "https://vistapedia.com/index.php?title=RPC_HELP_XWB_IS_RPC_AVAILABLE_Example&oldid=16780"