RE: subfile with footer question

[Gary Thompson <gthompson@xxxxxxxxxxx>]

Thanks Jeff,
I did something like that and am debugging now - but I used CHAIN with hard-coded 1 as the key,
which works, but maybe READ is a better, cleaner looking choice ?


-----Original Message-----
From: MIDRANGE-L [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Jeff Young
Sent: Wednesday, March 18, 2015 1:44 PM
To: Midrange Systems Technical Discussion
Subject: Re: subfile with footer question

Gary,
Just Read the footer record.
Write Footer  with new info
Exfmt SflCtl
Read Footer.

Jeff Young
Sr. Programmer Analyst

On Wed, Mar 18, 2015 at 3:21 PM, Gary Thompson <gthompson@xxxxxxxxxxx>
wrote:

> I'm changing a local application to have a user input field on a "screen"
> made up of a Subfile and Subfile Control, a "footer" record that 
> overlays the area beneath the subfile and above the MSGCTL/MSGSFL
>
> This application is used at month end to allow a user to process a 
> list of business units.
>
> The change is to allow the user to run a summary report after all 
> business units in the Subfile/Subfile Control area  have been 
> processed.
>
> At this point I have changed the "footer" record to display the report 
> option after all business units in the main subfile have been 
> processed (using an indicator to toggle DSPATR(HI UL) / DSPATR(ND), 
> but now I want to read that record to get the user's input to the new 
> report option, and I'm wondering if I can simply use a CHAIN ?
>
> I don't think I want to  EXFMT the "footer" because I think that will 
> make the user interface more "clumsy" ?
> --
> 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.