RE: Printing a Subfile - Revisited

Hi Again,

Ok, I also tried doing an Rrn_Max and moving the Rrn value into it.

Here's a sample of the subfile that prints out to the display:
200510-ZA-001 32155S9V A031            6      191630 13 RP  10/01/2005
08:08
200510-ZA-001 32155S9V A121            6      191630 13 RP  10/01/2005
08:08
200510-ZA-001 32155S9V A301            6      191630 13 RP  10/01/2005
08:08
200510-ZA-002 33100S3V A120M1          2      141350 04 SS  10/02/2005
09:38
200510-ZA-003 51320S0X C000M1          120    132280 01 SS  10/02/2005
11:37
200510-ZA-004 76861S3V A040M2          10     140290 04 SS  10/02/2005
14:11
200510-ZA-005 79100S3V A400M1          3      140290 11 SS  10/02/2005
14:11

However, when I print it out, here's the output I get:
200510-ZA-005  79100S3V A400M1           3       140290 11  SS
10/02/2005  14:11
 200510-ZA-005  79100S3V A400M1           3       140290 11  RP
10/02/2005  14:11
 200510-ZA-005  79100S3V A400M1           3       140290 11  RP
10/02/2005  14:11
 200510-ZA-005  79100S3V A400M1           3       140290 11  RP
10/02/2005  14:11
 200510-ZA-005  79100S3V A400M1           3       140290 11  SS
10/02/2005  14:11
 200510-ZA-005  79100S3V A400M1           3       140290 11  SS
10/02/2005  14:11
 200510-ZA-005  79100S3V A400M1           3       140290 11  SS
10/02/2005  14:11

It's maddening knowing that I'm so close and yet there's one small issue
that is not working.

Brian.

-----Original Message-----
From: Fisher, Don [mailto:dfisher@xxxxxxxxxxxxx] 
Sent: Thursday, October 13, 2005 2:13 PM
To: 'RPG programming on the AS400 / iSeries'
Subject: RE: Printing a Subfile - Revisited

You're also making the assumption there have been no other file i/o
operations to the subfile, which seems valid in this case, but would not
necessarily be so all the time.  

That's why I usually have Rrn_max updated with rrn after I load records
into
the subfile.  It makes my life less complicated...my programming life
anyway.

Donald R. Fisher, III
Project Manager
Roomstore Furniture Company
(804) 784-7600 extension 2124
DFisher@xxxxxxxxxxxxx


<clip>
Don, You are correct - mea culpa. So we have to save the maximum value
in
another field defined like RRN:

If rrn > 0; // skip the whole thing if no records in subfile
Rrn_max = rrn;
<clip>