Retrieves the reply status of the service previously requested, either IiopRequest or IiopLocateRequest.
Include file
IIOP.bdh
IiopGetReplyStatus( in hIiop : number, out nStatus : number ): boolean;
true if successful
false otherwise
Parameter | Description |
---|---|
hIiop | Handle to a CORBA object |
nStatus |
Variable receiving the reply status. Possible return values for IiopRequest are:
Possible return values for IiopLocateRequest are:
|
dcltrans transaction TGetReplyStatus const HOST := "192.168.20.21"; // server PORT := 1052; // port KEY := "...\h00"; // key KEYLEN := 4; // key length var hIiop : number; // handle to CORBA object nStatus : number; begin IiopSetMaxGiopVersion("1.0"); IiopSetByteOrder(IIOP_BIG_ENDIAN); // retrieve handle to server IiopObjectCreate(hIiop, "IDL:DemoObject:1.0", "1.2", HOST, PORT, KEY, KEYLEN); // call request "Init" IiopRequest(hIiop, "Init"); // retrieve status IiopGetReplyStatus(hIiop, nStatus); if nStatus = IIOP_NO_EXCEPTION then write("initialization completed successfully"); else write("error during initialization"); end; writeln; IiopObjectRelease(hIiop); end TGetReplyStatus;