Previous Next

REQUEST-INFO attribute
An object reference to a Progreses.Lang.OERequestInfo class that provides information about a client request sent from this ABL session to an AppServer.
Data type:
Access:
Applies to:
Note:
The object reference returned by this attribute is of type Progress.Lang.Object. In order to access the OERequestInfo properties of this instance, you must cast any reference to this attribute down to a Progress.Lang.OERequestInfo reference.
The following code fragment retrieves the default client context identifier (CCID) that the AVM generates when you create a server object handle:
 
DEFINE VARIABLE hAppSrv AS HANDLE NO-UNDO.
DEFINE VARIABLE ccid AS CHARACTER NO-UNDO.
DEFINE VARIABLE rRqInfo AS Progress.Lang.OERequestInfo NO-UNDO. 
 
CREATE SERVER hAppSrv.
rRqInfo = CAST(hAppSrv:REQUEST-INFO, Progress.Lang.OERequestInfo).
ccid = rRqInfo:ClientContextId.
You can also access this attribute using the SELF system handle inside an ABL event procedure that runs when an associated asynchronous remote procedure completes.
The following code fragment defines an event procedure (AsynReqIsDone) that you might use to access this attribute in response to an asynchronous remote procedure call:
 
DEFINE VARIABLE ccid AS CHARACTER NO-UNDO.
 
/* Assume that this procedure has been specified as the event procedure */
/* for an asynchronous remote procedure call */
 
PROCEDURE AsyncRqIsDone:
  DEFINE VARIABLE rRqInfo AS Progress.Lang.OERequestInfo NO-UNDO.
 
  rRqInfo = CAST(SELF:REQUEST-INFO, Progress.Lang.OERequestInfo).
  ccid = rRqInfo:ClientContextId.
  DELETE OBJECT SELF.
END.
This event procedure accesses the CCID that was sent to the AppServer along with the asychronous request and assigns the value to the ccid variable defined in the enclosing external procedure.
See also:

Previous Next
© 2012 Progress Software Corporation and/or its subsidiaries or affiliates.