Consultor Eletrônico



Kbase P18212: How to know what are the connections to the AppServer in the
Autor   Progress Software Corporation - Progress
Acesso   Público
Publicação   27/01/2003
Status: Unverified

GOAL:

How to know what are the connections to the AppServer in the current 4GL session

GOAL:

How to use the FIRST-SERVER session attribute

FACT(s) (Environment):

Progress 9.x

FIX:

The following code will show the AppServer connections in the 4GL session:

DEFINE VARIABLE hServer AS HANDLE NO-UNDO.

ASSIGN hServer = SESSION:FIRST-SERVER NO-ERROR.

REPEAT WHILE hServer NE ?:
MESSAGE hServer:NAME
VIEW-AS ALERT-BOX INFO BUTTONS OK.

ASSIGN hServer = hServer:NEXT-SIBLING NO-ERROR.
END.