Re: Simple Subfile question

["Paul Cunnane" <paul@xxxxxxxxxxx>]

> The way I usually get around this is I create a 3rd record format called
> the "footer" record format.    I put the OVERLAY keyword on my SFLCTL
> format, then in the RPG code I do:
>
> WRITE FOOTER
> EXFMT SFLCTL
>
> I don't know if theres a better technique, but thats the one that I use :)

I generally use:

 C                   write     SflCtl
 C
 C                   if        not iSflDsp
 C                   write     NoRcds
 C                   endif
 C
 C                   write     FunKey
 C                   write     MsgCtl
 C
 C                   read      SflCtl

Where the NoRcds, FunKey and MsgCtl records have OVERLAY defined. iSflDsp is
the indicator corresponding to SFLDSP, and was set when the subfile was
loaded.  SFLDSPCTL is always set.

I guess I just like painting my screens top-to-bottom!

--
Paul


+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---