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.