We have this format on most of our subfile screens.
It is just there, we never have to reference it in the RPG at all.

R ASSUME ASSUME
This format has 2 functions:
1st, because of its existence, any format already being displayed by
another program will remain on the screen.
2nd, when the program using these formats ends, it will output this
format to provide a smooth transition back to the previous
program.

OVERLAY
KEEP
24 80' ' DSPATR(ND)

The space at 24/80 is because a screen has to output something.

HTH,
Lance



-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Tom Hightower
Sent: Thursday, December 27, 2012 1:02 PM
To: 'Midrange Systems Technical Discussion'
Subject: RE: Subfile question

When I compile with RSTDSP(*yes), it blanks the screen before presenting the notes screens.

Tom


-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Booth Martin
Sent: Thursday, December 27, 2012 2:38 PM
To: Midrange Systems Technical Discussion
Subject: Re: Subfile question

Items I can think of:

-Are you compiling your screens RSTDSP(*YES)?
-Are you using a dummy record with the ASSUME keyword? (I am never sure which Display file needs that record added.) -Are you using more than one program? Setting on the LR indicator in the called program can cause unexpected results.


On 12/27/2012 2:15 PM, Tom Hightower wrote:
I'm having an issue with a converted DSPF36 screen that I'm trying to
convert/use as a subfile. In our customer data entry program, a user
can press F8 to call the NOTES program (a called "RPG" program) which
overlays the notes data-entry screen onto the display. In the
S36-style display file, each notes line of the notes screen is a
separate field (15 of them in total). You remember doing that sort of
thing way back in the day.

The boss wrote all of that about 15 years ago, maybe longer, and it's
worked fine for years. Now he wants to me add some new fields to the
notes file, and to update the coding to new style and replace the
DSPF36 with subfile programming. Cool, and it's about time.

I've converted the S36 screen to subfile (2 subfiles, according to his
spec) and written a new version of the notes program (RPGLE,
actgrp=*caller) to populate/display the existing notes in one subfile,
and present another subfile for new notes entry. It's basically
working, except that instead of overlaying the subfiles onto the
customer data-entry screen, the display is cleared and then the
subfiles
data-entry screens are displayed.

I've tested and tested it all kinds of ways. The most-recent test was
to modify the customer data-entry screen to include the notes
populate/display processing within the customer data-entry program. It
does the overlay just as I want - the SECOND and subsequent times that
the notes screen is displayed; the first time thru the display is
blanked and the notes screens are shown.

I'm not sure what I need to adjust to get this to properly. Any ideas?

TomH


--
Booth Martin
802-461-5349
http://www.martinvt.com
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l.

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l.


As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.