Consultor Eletrônico

Status: Unverified

SYMPTOM(s):

Shadow window appears when running ADM2 Windows from a .NET Form

Executing in the following sequence:

ABL Form -> ADM2 Window (parent) -> ADM2 Window (child)

Shadow window appears when displaying the ADM2 child window

FACT(s) (Environment):

ABL .NET form launches an ADM2 SmartWindow (parent)
ADM2 SmartWindow launches a second ADM2 SmartWindow (child)
ABL Form launches the ADM2 parent window using the mechanism:

DEFINE VARIABLE hProc AS HANDLE NO-UNDO.
RUN VALUE("winparent.w") PERSIST SET hProc NO-ERROR.

IF VALID-HANDLE(hProc) THEN DO:

RUN InitializeObject IN hProc.
hProc:CURRENT-WINDOW:PARENT = THIS-OBJECT:ProWinHandle.
END.
ADM2 parent window launches the ADM2 child window using the mechanism:

RUN viewPage IN THIS-PROCEDURE(1).

Which calls adm-create-objects (defined in the parent window) to launch the child
Shadow window does not appear when the child window is opened if the statement " hProc:CURRENT-WINDOW:PARENT = THIS-OBJECT:ProWinHandle. " is commented/removed
Shadow window does not appear if the ADM2 parent window launches the ADM2 child window using the same mechanism that the ABL Form uses to launch the ADM2 parent window
OpenEdge Category: Language (4GL/ABL)
OpenEdge 10.2A
OpenEdge 10.2A01 32-bit Service Pack
OpenEdge 10.2A02 32-bit Service Pack
Windows

CAUSE:

Bug# OE00195862

CAUSE:

Shadow window is incorrectly made visible when the ABL is making sure that all of the child window's ancestors are visible

FIX:

Option #1
Upgrade to 10.2A03
Upgrade to 10.2B

Option #2
Using the same mechanism in the ADM2 parent window to launch the ADM2 child window:

DEFINE VARIABLE hProc AS HANDLE NO-UNDO.
RUN VALUE("winchild.w") PERSIST SET hProc NO-ERROR.

IF VALID-HANDLE(hProc) THEN DO:

RUN InitializeObject IN hProc.
hProc:CURRENT-WINDOW:PARENT = THIS-OBJECT:ProWinHandle.
END.