RE: LAST RECORD

In CL, you can use POSDBF

In RPG, you can use SETLL with *END

Thanks,
Ganesh

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Dwayne Allison
Sent: Friday, May 06, 2005 9:13 PM
To: Midrange Systems Technical Discussion
Subject: RE: LAST RECORD

Thanks

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx]On Behalf Of Doug Hart
Sent: Friday, May 06, 2005 10:36 AM
To: 'Midrange Systems Technical Discussion'
Subject: RE: LAST RECORD



>From my archives:  Delete the last record in a file.

FRJEFILE UF  F      80            DISK         KINFDS INFO       
IINFO        DS                                           
I                                    B 156 1590RCDCNT     
C           RCDCNT    CHAINRJEFILE              99        
C           *IN99     IFEQ '0'

C                     DELETRJEFILE                        
C                     END                                 
C                     SETON                     LR        

---
Doug Hart



-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx
[mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Dwayne Allison
Sent: Friday, May 06, 2005 11:00 AM
To: Midrange Systems Technical Discussion
Subject: LAST RECORD

Is there a command that will take you to the end of a file that is not
keyed?


--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.


--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing
list
To post a message email: MIDRANGE-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/midrange-l.



Confidentiality Notice

The information contained in this electronic message and any attachments to 
this message are intended
for the exclusive use of the addressee(s) and may contain confidential or 
privileged information. If
you are not the intended recipient, please notify the sender at Wipro or 
Mailadmin@xxxxxxxxx immediately
and destroy all copies of this message and any attachments.