RPC HELP XWB IS RPC AVAILABLE Example
From VistApedia
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