Kbase P60516: How to get all the persitent procedures handles running in an appserv
Autor |
  Progress Software Corporation - Progress |
Acesso |
  Público |
Publicação |
  16/10/2008 |
|
Status: Unverified
GOAL:
How to get all the persistent procedures handles running in an appserver
FACT(s) (Environment):
Progress 9.x
FIX:
FIRST-PROCEDURE and NEXT-SIBLING attributes can be used on the server handle for the connection, as follow:
DEFINE VARIABLE hProxy AS HANDLE NO-UNDO.
DEFINE VARIABLE hServer AS HANDLE NO-UNDO
/* Create server handle for hServer and connect to an AppServer. */
/* Call remote persistent procedures on the AppServer. */
hProxy = hServer:FIRST-PROCEDURE. /* First proxy handle */
/* Display the pathname of the file that contains the remote procedure */
/* active on the AppServer for each proxy persistent procedure handle. */
DO WHILE NOT hProxy = hServer:LAST-PROCEDURE:
DISPLAY hProxy:FILE-NAME.
hProxy = hProxy:NEXT-SIBLING.
END.
DISPLAY hProxy:FILE-NAME. /* Procedure pathname for last proxy handle */