Re: Sanity check

Hello Roger,

Is the SETLL using a format name or a file name?  Does the code do anything 
else when the 
record is not found?  Is the code behaving identically for found records and 
not found 
records?

Does the LF38 use DYNSLT?  Perhaps the database has changed sufficiently over 
the years to 
result in a sparse index and DB is simply taking a while to dynamically check 
the records -- 
although you should see signs of that with found records also.

One other possibilty is to check the number of deleted records in the file.  
When was the last 
time a RGZPFM was performed?

Regards,
Simon Coulter.

«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»
«» FlyByNight Software         AS/400 Technical Specialists       «»
«» Eclipse the competition - run your business on an IBM AS/400.  «»
«»                                                                «»
«» Phone: +61 3 9419 0175      Mobile: +61 0411 091 400           «»
«» Fax:   +61 3 9419 0175      mailto: shc@flybynight.com.au      «»
«»                                                                «»
«» Windoze should not be open at Warp speed.                      «»
«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»«»
//--- forwarded letter -------------------------------------------------------
> X-Mailer: Internet Mail Service (5.5.2448.0)
> Date: Fri, 23 Jul 99 16:21:48 -0700
> From: "Roger Boucher" <RBoucher@stanpac.com>
> To: MIDRANGE-L@midrange.com
> Reply-To: MIDRANGE-L@midrange.com
> Subject: Sanity check

> 
> I have a user (controller) who swears up and down that an invoice inquiry on
> our legacy system (an old AS/400 kept around for inquiry purposes only) is
> taking much longer than it used to.  I tested it and found that it works
> quickly if record is found and takes about 30 seconds when record not found.
> The problem point (debug) seems to be a SETLL statement on a multi-record
> format LF38.  The logical is not damaged, the physicals on which it is based
> are not damaged.  The Edit Rebuild of Access Paths screen shows nothing
> pending.
> 
> Does anyone know anything else to look for?
> Or Is this just a case of selective memory on the part of our friendly
> neighborhood user?
> 
> Any help would be appreciated...
> Thanks.
> +---
> | This is the Midrange System Mailing List!
> | To submit a new message, send your mail to MIDRANGE-L@midrange.com.
> | To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
> | To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
> | Questions should be directed to the list owner/operator: david@midrange.com
> +---
> 

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