Re: Old Style Green Screen Subfile Templates on GitHub

[Vern Hamberg <vhamberg@xxxxxxxxxxxxxxx>]

Hello Sergio

I don't know that I agree with you in every case. If the user needs to 
catch the changed record a second time, just update the subfile record 
with the SFLNXTCHG attribute on. It is often done to reread a record 
when errors are detected.

A question - does your process go through the entire subfile, making 
comparisons, as you describe?

I'm sure your procedure is useful for some situations, though.

*Regards*

*Vern Hamberg*

IBM Champion 2025 <cid:part1.6qyEU9M0.Q9pJlJnR@centurylink.net> CAAC 
(COMMON Americas Advisory Council) IBM Influencer 2023


On 8/26/2025 6:00 PM, Sergio Luis Puentes-Valladares wrote:
> In the documentation, it is recommended to use the *READC instruction to
> read the changed subfile records*, this is not recommended
> because the READC instruction implicitly has an associated flag, that once
> read goes from 1 to 0, therefore the READC instruction
> can only be used once, it is recommended to use CYCLE using the DO..ENDDO
> instructions (DOU ENDDO), to correctly handle data control
> I recommend defining in the SUBFILE record, (HIDDEN) fields and I/O fields
> for the data that will be verified for change, so if the
> (HIDDEN) field is different from the I/O field itself, it means that the
> data was changed
> Best regards
>
> *Sergio Luis Puentes Valladares*
> * Desarrollador SR IBM i - RPG/COBOL*
>
>
> *Mobile    **(AR)+54 9 223 530 0358*
>
> *WhatsApp  (CL)+56 9 9379 0247*
>
> *Skype/Hangoutsspuentes@xxxxxxxxx <spuentes@xxxxxxxxx>*
>
>
>
>
>
>
>
>
>
> El mar, 26 ago 2025 a las 18:08, Patrik Schindler (<poc@xxxxxxxxxx>)
> escribió:
>
> > Hello,
> >
> > despite the majority of fellow list members being professionals, I hope
> > some hobbyists and old-hardware-nerds are silently reading this list, also.
> >
> > I finally managed to rework my classic 5250 Subfile Templates to be
> > multilingual: Object sources are included for English and German languages.
> >
> > https://github.com/PoC-dev/as400-sfltemplates
> >
> > The templates are meant as copy-adapt-compile-run templates to quickly get
> > a working, reasonably simple, single-PF maintenance application for further
> > enhancement and refinement. Also, the extensive readme might serve as an
> > introductory text into classic AS/400 development and somewhat resolve the
> > mystery about subfiles for newcomers to the platform, like I was in 2007.
> >
> > Note that I'm intentionally using positional RPG IV and other late 1990's
> > style development traits to enable backwards compatibility with at least
> > V4R4, maybe older. Making them compile on V3 needs a complete overhaul for
> > error checking (no %STAT BIF), amongst other compiler complaints, which is
> > still in the "how to do it properly" consideration phase. If you have
> > (opinionated) suggestions about your personal favorite way about how file
> > error checking and appropriate response was done best in the early 1990's,
> > I'd be glad to learn about them. Please direct your suggestions to the
> > RPG400-List to avoid being off-topic here, though.
> >
> > :wq! PoC
> >
> > --
> > This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list
> > To post a message email:MIDRANGE-L@xxxxxxxxxxxxxxxxxx
> > To subscribe, unsubscribe, or change list options,
> > visit:https://lists.midrange.com/mailman/listinfo/midrange-l
> > or email:MIDRANGE-L-request@xxxxxxxxxxxxxxxxxx
> > Before posting, please take a moment to review the archives
> > athttps://archive.midrange.com/midrange-l.
> >
> > Please contactsupport@xxxxxxxxxxxxxxxxxxxx for any subscription related
> > questions.