RE: Last Record in Sequential File

I believe you:

1) have a blank in position 34 of the F-spec
2) SETGT *HIVAL MYFILE
3) READP MYFILE

HTH,

Charles Wilt
iSeries Systems Administrator / Developer
Mitsubishi Electric Automotive America
ph: 513-573-4343
fax: 513-398-1121
 

> -----Original Message-----
> From: rpg400-l-bounces+cwilt=meaa.mea.com@xxxxxxxxxxxx
> [mailto:rpg400-l-bounces+cwilt=meaa.mea.com@xxxxxxxxxxxx]On Behalf Of
> Paul Morgan
> Sent: Thursday, March 24, 2005 4:40 PM
> To: rpg400-l@xxxxxxxxxxxx
> Subject: Last Record in Sequential File
> 
> 
> How do you read the last record in a non-keyed file in RPGLE? 
>  No reading
> through the whole file.  Retrieve that record with one 
> read/chain.  Simple
> question.  Is it a simple answer?
> 
> Thanks,
> Paul
> 
> -- 
> Paul Morgan
> Senior Programmer Analyst - Retail
> J. Jill Group
> 100 Birch Pond Drive, PO Box 2009
> Tilton, NH 03276-2009
> Phone: (603) 266-2117
> Fax:   (603) 266-2333
> 
> 
> 
> -- 
> 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.
> 
>