RE: Fastest way to delete records.

["Hockemeyer, Gene" <HockemG@xxxxxxxxxxx>]

Also ... the big time consumer is still there .. REORGING THE FILES .. to
recover the DASD..! .. This process is dependent on the number of Logical
files as well as the size of the original physical file! .. This is still my
favored archiving solution.   

-----Original Message-----
From: Rich Duzenbury [mailto:rduz@westernmidrange.com]
Sent: Thursday, February 08, 2001 1:23 PM
To: RPG400-L@midrange.com
Subject: Re: Fastest way to delete records.


Whoops, I forgot to add: Delete the 'K' on Terry.Rhoades example file specs 
so the files will process in arrival sequence!

Regards,
Rich


>>H
>>FORIGFILE  UP   E           K DISK
>>FBKUPFILE  O    E           K DISK
>>C                   IF        TIMESTAMP <=  YYYYMMDD
>>C                   WRITE     BKUPFILE
>>C                   DELETE    ORIGFILE
>>C                   ENDIF
>>
>>
>>It's not pretty, and it's not the fastest.   But if you compile it and 
>>run it in batch, it will be done before everyone is finished
>>discussing it.  <G>

+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator:
david@midrange.com
+---
+---
| This is the RPG/400 Mailing List!
| To submit a new message, send your mail to RPG400-L@midrange.com.
| To subscribe to this list send email to RPG400-L-SUB@midrange.com.
| To unsubscribe from this list send email to RPG400-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---