Re: Fastest way to delete records. -- RPG400-L


Yes,

Read the physical sequentially.  Sequential processing is always faster than 
keyed.  Test each record.

I am also thinking opnqryf but building access path over 10 mill, NIGHTMARE!

Building any logical over 10 mill, another DASD glutten.

Good thing you do not have multiple members.

Jeff
>From: Quazy <quazy@SoftHome.net>
>Reply-To: RPG400-L@midrange.com
>To: RPG400-L@midrange.com
>Subject: Re: Fastest way to delete records.
>Date: Thu, 08 Feb 2001 08:13:36 -0600
>MIME-Version: 1.0
>Received: from [192.160.127.90] by hotmail.com (3.2) with ESMTP id 
>MHotMailBC4BFE4D008E4004318DC0A07F5A04DE0; Thu Feb 08 06:55:19 2001
>Received: (from uucp@localhost)by uucphost.mcs.net (8.11.1/8.11.1) with 
>UUCP id f18Et9c47734;Thu, 8 Feb 2001 08:55:09 -0600 (CST)(envelope-from 
>rpg400-l-owner@midrange.com)
>Received: from localhost (mail@localhost)by linux.midrange.com 
>(8.9.3/8.8.7) with SMTP id JAA16969;Thu, 8 Feb 2001 09:20:17 -0600
>Received: by linux.midrange.com (bulk_mailer v1.13); Thu, 8 Feb 2001 
>09:20:12 -0600
>Received: (from majordom@localhost)by linux.midrange.com (8.9.3/8.8.7) id 
>JAA16816for rpg400-l-outgoing; Thu, 8 Feb 2001 09:20:08 -0600
>Received: (from uucp@localhost)by linux.midrange.com (8.9.3/8.8.7) with 
>UUCP id JAA16802for RPG400-L@midrange.com; Thu, 8 Feb 2001 09:20:06 -0600
>Received: from tango.SoftHome.net (tango.SoftHome.net [204.144.231.49])by 
>uucphost.mcs.net (8.11.1/8.11.1) with SMTP id f18EDeZ40217for 
><RPG400-L@midrange.com>; Thu, 8 Feb 2001 08:13:40 -0600 (CST)(envelope-from 
>quazy@SoftHome.net)
>Received: (qmail 20552 invoked by uid 417); 8 Feb 2001 14:23:31 -0000
>Received: from gssfw1.good-sam.com (HELO dcmonitor.SoftHome.net) 
>(207.140.250.2)  by smtpb.softhome.net with SMTP; 8 Feb 2001 14:23:31 -0000
>From rpg400-l-owner@midrange.com Thu Feb 08 06:56:09 2001
>Message-Id: <5.0.0.25.0.20010208081225.00a374a0@pop.softhome.net>
>X-Sender: quazy@pop.softhome.net
>X-Mailer: QUALCOMM Windows Eudora Version 5.0
>In-Reply-To: <3A81C2FB.E05269C3@conexfreight.com>
>References: <5.0.0.25.0.20010207145727.00a3eac0@pop.softhome.net>
>Sender: owner-rpg400-l@midrange.com
>X-List-Name: RPG/400 Discussion Mailing List (RPG400-L@midrange.com)
>
>sounds good, but I can't create a logical on timestamp alone.  As then I
>would have many duplicate keys. as there are 40,000 employee numbers each
>with many timestamps.
>
>At 01:49 PM 2/7/01 -0800, you wrote:
>>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
>+---

_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.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
+---