Re: Display Files: Window

Michael,
 
Add these two record formats to you display file of the popupwindow.
 ***************************************************************** 
 * DUMMY1 : The system will assume that this record format       * 
 *          is already on the screen => screen not erased.       * 
 ***************************************************************** 
A          R DUMMY1                    ASSUME                      
A                                      OVERLAY                     
A                                      KEEP                        
A                                  1  2' '                         
 ***************************************************************** 
 * DUMMY2 : Delete the window before leaving the program.        * 
 ***************************************************************** 
A          R DUMMY2                    CLRL(*NO)                   
A                                      OVERLAY                     
A                                      FRCDTA                      
 
Only dummy2 you have to write at the end of your program.
It will remove the window and restore what was under it.
This example assumes that the popupwindow is in a separate program (I use these 
kind of techniques only to popup selection windows).
 
Kind regards,
Eduard.

Michael Jacobsen <MJacobsen@xxxxxxxxxxxxxxxx> wrote:
I am having a subfile/display program problem. I am trying to display a 
message in a window and once the user presses enter on the window, I want 
to go back to the prior screen without losing any information on that 
prior screen. Is there a certain way to clear a window so I can get back 
to the previous screen?

I am sure this has been asked before, but I tried searching but didn't 
find anything.

Thanks for any help.
-- 
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.