Re: Preserving display when calling a 'Prompt' program

[Stuart Rowe <rowestu@xxxxxxxxx>]

Pete,

Everyone's right.  You have two display files -- the big full-screen one and
the (presumably) windowed prompt.  The big full-screen one should be
compiled with RSTDSP(*YES).  The (presumably) windowed one should have a
record in it that specifies the ASSUME keyword (you will never write this
one out, just call it DUMMY or something) and an output field.  The windowed
format with your prompt in it should have the KEEP and OVERLAY keywords
specified.  The effect should turn out that your window overlays your
full-screen image (you should see it behind the window) and then disappears
when your prompt program ends (it may blink).

Stu



On Thu, Feb 10, 2011 at 15:11, Tom Huff <tehuff@xxxxxxxxxxxxx> wrote:

> Try Restore(*YES) Defer Write(*NO)
>
> -----Original Message-----
> From: rpg400-l-bounces@xxxxxxxxxxxx [mailto:rpg400-l-bounces@xxxxxxxxxxxx]
> On Behalf Of Pete Helgren
> Sent: Thursday, February 10, 2011 2:53 PM
> To: RPG Midrange Discussion
> Subject: Preserving display when calling a 'Prompt' program
>
> I needed to add a prompt program to an existing 5250 display program.  I
> sorted out the function of the called program and managed to modify the
> existing display program to call and display it, but when I return to
> the calling program, most of the screen components are missing, having
> been overwritten (presumably) by the called program display.
>
> Seems to me that there is a way to do this but I can't remember what key
> words and techniques need to be used so that when I prompt and display
> the called program, the original program retains its screen display
> components.
>
>  I haven't "retrofitted" a display program to do this before.  What
> modifications are needed in the calling program to retain the display
> and is there anything I need to do in the called program to restore the
> calling program display?
>
> Thanks.
>
> --
> Pete Helgren
> Value Added Software, Inc
> www.asaap.com
> www.opensource4i.com
>
> --
> This is the RPG programming on the IBM i / System i (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.
>
> --
> This is the RPG programming on the IBM i / System i (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.