RE: LAST RECORD

["Dwayne Allison" <Dwayne.Allison@xxxxxxxxxxxxxxxxxxxxxxxx>]

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.