Re: dynamic printer file

Derek,


Since it appears that the footer is variable, may I suggest the following:

   * In the printer file define one line (80, 132 or however many
     characters you need) for a single data element
   * In your program define the contents of that line in your D-specs
     plus Calcs (whatever it takes) on first cycle
   * You should know, by that time how many lines you need for the footer
   * Since a page will only hold so many lines and you now know how
     many lines the footer needs, use these variables to calculate how
     many detail lines you can print per page and use that as a counter
   * When the counter is reached, invoke a separate procedure to
     produce your footer

        * Jerry C. Adams
*IBM System i Programmer/Analyst
B&W Wholesale Distributors, Inc.* *
voice
        615.995.7024
fax
        615.995.1201
email
        jerry@xxxxxxxxxxxxxxx <mailto:jerry@xxxxxxxxxxxxxxx>



derek gonsalves wrote:

hi..

Can u please tell me how do i calculate no of detail lines that would fit on the page through the rpg program. Also let me give u a brief idea of the program.

The text for the footer will change according to the parameters that are sent to the printer file program. So firstly i have to calculate the total number of lines for the different scenarios(eg if parameter 1 is sent then no of lines in the pf for case 1 would be 5, for case 2 would be 6 and so on, this could change) and then select the one with the maximum no of text lines. this number would then be my constant for the number of lines for the footer irrespective of any parameter tht is sent. And my footer would have to be written from a specific line number after calculating the no of lines to be left from the bottom .Also please tel me how do i hard code in the rpg program for the header/footer to start from a specific line number.?

So in such a situation do i design my printer file (inc;uding the footer) in the normal way i.e. through the STRRLU utility/ if so then how do i know the no of lines to leave for the footer?? because this would be calculated in the first time calculations in the rpg program.

Could you please give me a simple example for this.?

Thanx & Regards

Derek.

From: "Christen, Duane J." <dchristen@xxxxxxxxxxxxx>
Reply-To: RPG programming on the AS400 / iSeries <rpg400-l@xxxxxxxxxxxx>
To: "'RPG programming on the AS400 / iSeries'" <rpg400-l@xxxxxxxxxxxx>
Subject: RE: dynamic printer file
Date: Mon, 3 Jul 2006 08:34:39 -0500

You program would calculate the number of detail lines that fit on the page
and then as you write the detail lines you would count them. When the
counter reaches the detail line limit you would write you footer and header
for the next page, reset the counter and continue printing detail lines.

Duane Christen


-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of derek gonsalves
Sent: Monday, July 03, 2006 4:46 AM
To: rpg400-l@xxxxxxxxxxxx
Subject: dynamic printer file


Hi...

I have to create a printer file program. Can someone please tell me how to
code a Rpg program for the following issue..
In the Rpg program I have to decide the number of lines for the footer

depending on the no of lines of text present in the pf i.e. the lines of the

footer are read from a pf.
Hence the no of lines in the footer can change.

How do i handle this.??


--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.



NOTICE: This electronic mail transmission may contain confidential
information and is intended only for the person(s) named.  Any use, copying
or disclosure by any other person is strictly prohibited. If you have
received this transmission in error, please notify the sender via e-mail.



--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.