RPC HELP XWB REMOTE RPC Example
From VistApedia
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.