Hi,
I run a .w file. When I hit the cancel button to quit the application, procedure editor opens and stays till I close it. The CANCEL button event code is presented below.
&Scoped-define SELF-NAME BUTTON-CANCEL
&ANALYZE-SUSPEND _UIB-CODE-BLOCK _CONTROL BUTTON-CANCEL C-Win
ON CHOOSE OF BUTTON-CANCEL IN FRAME DEFAULT-FRAME /* Done */
DO:
&IF DEFINED (adm-panel) <> 0 &THEN
RUN dispatch IN THIS-PROCEDURE ('exit').
&ELSE
APPLY "CLOSE":U TO THIS-PROCEDURE.
&ENDIF
Can anyone help me on how to get rid of the procedure editor?
Thanks
Sid
END.
Jagabandhu,
In the trigger for the cancel button,give a QUIT statement after the preprocessor statement.This will help you in coming out of the session.
Hope it helps you,
Rajesh
>
>Hi,
>
>I run a .w file. When I hit the cancel button to quit
>the application, procedure editor opens and stays till
>I close it. The CANCEL button event code is presented
>below.
>
>&Scoped-define SELF-NAME BUTTON-CANCEL
>&ANALYZE-SUSPEND _UIB-CODE-BLOCK _CONTROL BUTTON-CANCEL
>C-Win
>ON CHOOSE OF BUTTON-CANCEL IN FRAME DEFAULT-FRAME /* Done
>*/
>DO:
&IF DEFINED (adm-panel) <> 0 &THEN
RUN dispatch IN THIS-PROCEDURE ('exit').
&ELSE
APPLY "CLOSE":U TO THIS-PROCEDURE.
&ENDIF
>Can anyone help me on how to get rid of the procedure
>editor?
>
>Thanks
>
>Sid
>END.
>
USE : QUIT. ( basic !!!! )
"Rajesh Aravindakshan" wrote:
>
>Jagabandhu,
In the trigger for the cancel button,give a QUIT statement
>after the preprocessor statement.This will help you in
>coming out of the session.
>
>Hope it helps you,
>Rajesh
>
>>
>>Hi,
>>
>>I run a .w file. When I hit the cancel button to quit
>>the application, procedure editor opens and stays till
>>I close it. The CANCEL button event code is presented
>>below.
>>
>>&Scoped-define SELF-NAME BUTTON-CANCEL
>>&ANALYZE-SUSPEND _UIB-CODE-BLOCK _CONTROL BUTTON-CANCEL
>>C-Win
>>ON CHOOSE OF BUTTON-CANCEL IN FRAME DEFAULT-FRAME /*
>Done
>>*/
>>DO:
>> &IF DEFINED (adm-panel) <> 0 &THEN
>> RUN dispatch IN THIS-PROCEDURE ('exit').
>> &ELSE
>> APPLY "CLOSE":U TO THIS-PROCEDURE.
>> &ENDIF
>>
>>Can anyone help me on how to get rid of the procedure
>>editor?
>>
>>Thanks
>>
>>Sid
>>END.
>>
>