Kbase P25366: Super Procedure launched from container continues to run
| Autor |
Progress Software Corporation - Progress |
| Acesso |
Público |
| Publicação |
5/16/2003 |
|
Status: Unverified
FACT(s) (Environment):
Dynamics 2.0A
SYMPTOM(s):
Super Procedure launched from container continues to run
Super procedures keep running after the window is closed
destroyObject procedure does not destroy the object super-procedures
CHANGE:
Installation of ServicePack 02 for Dynamics2.0A
CAUSE:
Bug# 20030516-032
CAUSE:
Regression of Bug# 20021112-015, Issuezilla# 7576 reported in solution P13590
FIX:
Override the destroyObject super-procedure and add the following code to it could be a workaround:
DEFINE VARIABLE cSuperProcedure AS CHARACTER NO-UNDO.
DEFINE VARIABLE iSuperProcedures AS INTEGER NO-UNDO.
DEFINE VARIABLE hSuperProcedure AS HANDLE NO-UNDO.
RUN getObjectSuperProcedure IN gshRepositoryManager (
INPUT DYNAMIC-FUNCTION('getLogicalObjectName':U IN TARGET-PROCEDURE),
INPUT '',
OUTPUT cSuperProcedure).
IF cSuperProcedure NE '' OR cSuperProcedure NE ? THEN
DO:
REPEAT iSuperProcedures = 1 TO NUM-ENTRIES(TARGET-PROCEDURE:SUPER-PROCEDURES):
ASSIGN hSuperProcedure = WIDGET-HANDLE(ENTRY(iSuperProcedures, TARGET-PROCEDURE:SUPER-PROCEDURES)).
IF hSuperProcedure:FILE-NAME = cSuperProcedure
THEN DO:
DELETE OBJECT hSuperProcedure.
LEAVE.
END.
END.
END.
RUN SUPER.