RE: Fastest way to delete records.

[Quazy <quazy@xxxxxxxxxxxx>]

I forgot to mention that fist the records need to be archived to a 
different library. Then deleted from production.
When probably monthly or semimonthly.
It will be run by operations.

At 10:18 AM 2/8/01 +1000, you wrote:


>Unfortunately the original post doesn't state WHY the records are to be 
>deleted,
>or WHEN.  These (to me ) are the critical questions.  The HOW then comes about
>as a result.
>
>The WHY & WHEN that need to be considered include
>-  Is this a 'once off', or something to be done on a regular basis (e.g.
>monthly)?
>-  Do the deletions need to be audited in any way?
>-  Does a history have to be kept?
>-  Is this going to be run by the users or IT?
>
>If it is a once off, run by IT, with no auditing or History, SQL would be 
>fine.
>It would be quickest and easiest.  While CPYF would be an alternative, I
>wouldn't recommend it, as it would have more activities than the SQL, 
>leading to
>more possible points to make a mistake in the operation.
>
>If, on the other hand, this is a regular job, or run by users, or auditing is
>required, or the records need to go to some form of History, then the LF
>suggested would probably be more appropriate.
>
>
>
>
>"Nick Runnalls" <nick_runnalls@hawkbridge.com> on 08/02/2001 08:36:14
>
>Please respond to RPG400-L@midrange.com
>
>To:   RPG400-L@midrange.com
>cc:    (bcc: STEVEN J RYAN/DIAU)
>
>Subject:  RE: Fastest way to delete records.
>
>
>
>
>Unless the employee file is for the Chinese Army the majority are to be
>deleted, could use CPYF or SQL to copy out good records then remove all
>logical file members from original, copy data back re-add all logical file
>members. This may be faster, will also reorganize the file. Depends on
>number and complexity of logical Files
>
>
>-----Original Message-----
>From: owner-rpg400-l@midrange.com [mailto:owner-rpg400-l@midrange.com]On
>Behalf Of Jim Langston
>Sent: Wednesday, February 07, 2001 1:50 PM
>To: RPG400-L@midrange.com
>Subject: Re: Fastest way to delete records.
>
>Hmm...
>create a logical on the time stamp.
>
>Open Combined Full procedural this file
>Do while not LR
>   if  TimeStamp <= ToTimeStamp
>   Delete  Record
>   else
>   SetOn LR
>   EndIf
>End Do
>
>Can anyone think of a faster way?
>
>Regards,
>
>Jim Langston
>
>
>Quazy wrote:
> >
> > I have a file with about 10 million records.  It is keyed on  Company #,
> > Employee #, and Time stamp.
> >
> > I need to delete all records that have a time stamp before a certain time
> > period.
> >
> > Any suggestions on the fastest approach?
> > Speed is a very important factor.
> >
> > +---
> > | 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
>+---
>
>+---
>| 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
>+---
>
>
>
>
>
>
>+---
>| 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
+---