RE: Using RRN 0 to do Setll on arrival sequence file

When you debug I/O, and no record is found, you don't 'jump up to the
file' from my experience. 


Kurt Anderson
Application Developer
Highsmith Inc

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx] On Behalf Of Bob P. Roche
Sent: Friday, October 20, 2006 1:48 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Using RRN 0 to do Setll on arrival sequence file

What I find interesting is when I debugged simple program posted here
earlier

     FCMP002    IF   E             DISK

     D EOF             S               N
     D EOF1            S               N

     C     0             SETLL     CMP002
     C                   READ      CMP002
     C                   EVAL      EOF = %EOF

     C     1             SETLL     CMP002
     C                   READ      CMP002
     C                   EVAL      EOF1 = %EOF


When the first read is performed I see no indication the file is ever
touched. When the second read is performed the code jumps up to the file
as I expect it to do in debug during a file read. 


--
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.