Re: Printer DDS in RPG

Message text written by INTERNET:MIDRANGE-L@midrange.com
>I'm just starting to use a printer DDS file instead of the O specs and
>cannot figure out how to set an indicator to be set on when end-of-page has
>been reached, so that I can print headings again.
>Can anyone please help?
>Thanks.  Dan
<


 Dan

Just put a Numeric Indicator(99, or whatever you like)  in the F-Spec where you
would normally put the Overflow Indicator(ie OF) .  (Externally defined printer
files require Numeric overflow *IN's while Program defined printer files require
an Alpha).
Then in your code just replace  your normal Alphabetic overflow indicator (ie
*INOF, *INOV, etc) with the numeric one.   This is the most benign change.   

If you want to be more complicated;

There are other ways like having an Error Indicator on the WRITE statement of
your detail line and condition on that Indicator after writing your detail line.
Or grabbing the CPFxxxx message ID from the program status D/S (theres a
particular one for overflow). etc. etc.
 
But these are more complicated and 99% of the time not needed.   

John P. Carr   CDP
EdgeTech  Inc.
74711.77@compuserve.com

* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
* This is the Midrange System Mailing List!  To submit a new message,   *
* send your mail to "MIDRANGE-L@midrange.com".  To unsubscribe from     *
* this list send email to MAJORDOMO@midrange.com and specify            *
* 'unsubscribe MIDRANGE-L' in the body of your message.  Questions      *
* should be directed to the list owner / operator: david@midrange.com   *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *