RE: Slow respond time when file change to open with update&Add

[<Rick.Chevalier@xxxxxxxxxxxxxxx>]

Lim,

You could chain into a data structure and/or write from a different data 
structure to keep the field names separate.  I don't know how long this has 
been available but it has really come in handy for me recently.

This example is from a working program.  You can substitute CHAIN and WRITE for 
the READ and UPDATE.

d LnpaufIn        ds                  LikeRec(LFFEER :*Input)  
d LnpaufOut       ds                  LikeRec(LFFEER :*Output) 

// Read the input record
ReadE(E) %KDS(LNPAUFKey :2) LFFEER LnpaufIn;

//Update record 
Update LFFEER LnpaufOut;

HTH,

Rick

-----Original Message-----
From: rpg400-l-bounces@xxxxxxxxxxxx
[mailto:rpg400-l-bounces@xxxxxxxxxxxx]On Behalf Of Lim Hock-Chai
Sent: Thursday, April 29, 2004 2:12 PM
To: RPG programming on the AS400 / iSeries
Subject: RE: Slow respond time when file change to open with update&Add


Want to also mention that, I tried the unique key method again with the input 
file open as key access and here is the result:
2a) Ran for 13 mins ( 407 secs of processing unit time): Input file opened as 
(IF K), outfile (UF A) Unique.  (Chain and update if write failed) 

Seems like sequential access on input file also help increase the speed.

Do want to mention that the unique key method might cause longer respond time 
if the outfile contains a lot of duplicate.  Because to use this method, when 
write failed, the program has to save all outfile fields data to a save data 
structure first, do a chain, move the saved structure back to the fields in the 
outfile and then update.  (what a pain).