RE: LAST record

["Wilt, Charles" <CWilt@xxxxxxxxxxxx>]

Or use *END...

      *END    setll  MyFile
              read   MyFile        


BTW Dave, care to share how you explicitly control writing to deleted records?

AFAIK, if reuse deleted records is set the RDBMS controls when the deleted 
records is reused.



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

> -----Original Message-----
> From: midrange-l-bounces@xxxxxxxxxxxx
> [mailto:midrange-l-bounces@xxxxxxxxxxxx]On Behalf Of Dave Schnee
> Sent: Friday, May 06, 2005 12:03 PM
> To: midrange-l@xxxxxxxxxxxx
> Subject: Re: LAST record
> 
> 
> Dwayne Allison wrote:
> 
> Is there a command that will take you to the end of a file that is not
> keyed?
> 
> If you want to do this entirely in RPG, simply:
> 
>            eval    Recnum = *hival
>   Recnum   setgt   FileorRec
>            readp   FileorRec
> 
> This will give you the physically-last record in the file.
> 
> WARNING:  If you specify "reuse deleted records", this may 
> not necessarily 
> be the most-recently added record.  It is possible to write into the 
> deleted record space.  You do have to do so explicitly, but some 
> applications do just that.
> 
> Dave Schnee,
> Barsa Consulting Group, LLC