Consultor Eletrônico



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 */