CURRENT-RESPONSE-INFO attribute

An object reference to a Progress.Lang.OERequestInfo class that allows you to set the response to a current request that an AppServer agent returns to an AppServer client. This attribute only has meaning for a session running on an AppServer agent.

Note:

If you access this attribute from an ABL client, it returns the Unknown value (?).

Data type:

Progress.Lang.OERequestInfo class

Access:

Readable/Writeable

Applies to:

SESSION system handle

The following AppServer code fragment generates a unique value as a client context identifier (CCID) and assigns it as the value returned to an AppServer client in response to the current request:

 

DEFINE VARIABLE ccid AS CHARACTER NO-UNDO. ccid = SUBSTRING(BASE64-ENCODE (GENERATE-UUID), 1, 22). ASSIGN   SESSION:CURRENT-RESPONSE-INFO:ClientContextId = ccid.

The bold code in the following fragment sets the client principal returned to an AppServer client:

 

DEFINE VARIABLE hCPIn   AS HANDLE. DEFINE VARIABLE hCPOut  AS HANDLE.   hCPIn = SESSION:CURRENT-REQUEST-INFO:GetClientPrincipal(). SECURITY-POLICY:SET-CLIENT(hCPIn). hCPOut = SECURITY-POLICY:GET-CLIENT(). SESSION:CURRENT-RESPONSE-INFO:SetClientPrincipal(hCPOut).

See also:

GetClientPrincipal( ) method, CURRENT-REQUEST-INFO attribute, LOCAL-VERSION-INFO attribute, REQUEST-INFO attribute, RESPONSE-INFO attribute, SetClientPrincipal( ) method