Re: chain problem

[Eduard Sluis <eduard@xxxxxxxxxxxxxxxxxxxxxxx>]

If you define the file not as only output but for example as input with add, 
writing to the file will not be blocked but will be done immediately.
This will do the whole trick, no more to it.
 
Regards,
Eduard.


RPower@xxxxxxxxxx wrote:
The Except statement puts the records out immediately as well. I had 
similar problem once before. Although some might consider the Except 
statement archaic for this purpose but it gets the job done easily .

Ron Power
Programmer
Information Services
City Of St. John's, NL
P.O. Box 908
St. John's, NL
A1C 5M2
Tel: 709-576-8132
Email: rpower@xxxxxxxxxx
Website: http://www.stjohns.ca/
___________________________________________________________________________
Success is going from failure to failure without a loss of enthusiasm. - 
Sir Winston Churchill




Ken Sims 
Sent by: rpg400-l-bounces@xxxxxxxxxxxx
13/08/2004 12:26 AM
Please respond to
RPG programming on the AS400 / iSeries 


To
rpg400-l@xxxxxxxxxxxx
cc

Subject
Re: chain problem







>The CHAIN is probably failing because the write was buffered.
>
>You can either try a FEOD (force end of data) after the WRITE to force 
the
>record to disk or change the file's force-write ratio to something 
smaller
>(like 1). Either use CHGPF FRCRATIO(1) or OVRDBF FRCRATIO(1)

Don't use FRCRATIO(1). That forces the program to wait until the data is 
actually written to the disk.

Use OVRDBF SEQONLY(*NO) or block(*no) on the F-spec if you're in RPG 
IV. If you're using RPG III and don't want to use OVRDBF, you can code 
the 
file as update/add and have some dummy operations to keep the compiler 
happy. Any of these methods will eliminate program buffering so that the 
data is immediately available, but still allow the operating system to 
write it to the hard drive asynchronously.

--
Ken
http://www.ke9nr.net/
Opinions expressed are my own and do not necessarily represent the views 
of 
my employer or anyone in their right mind.

--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.




This OutBound email has been scanned for Viruses
--
This is the RPG programming on the AS400 / iSeries (RPG400-L) mailing list
To post a message email: RPG400-L@xxxxxxxxxxxx
To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/rpg400-l
or email: RPG400-L-request@xxxxxxxxxxxx
Before posting, please take a moment to review the archives
at http://archive.midrange.com/rpg400-l.