Re: RCVF - how to do multiple CHAINS in one CL pgm

Best avoided anyhow. Performing a full-Open for every row processed is expensive. Note that the CPYF into a open-only-once work file [as suggested in another message] would open the FROMFILE() *and* TOFILE() each time, so that is even more expensive; I do not believe either source nor target opens done by CPYF can utilize a shared open.

As with many other of these questions about how to do some particular file\I/O in CL, the best resolution is to not use CL to do what other HLLs are good at doing. That is, if CHAIN is desirable, then use RPG. Bruce's CLF is effectively enabling the CL to have a similar interface as RPG CHAIN, using the C file\record interface.

Regards, Chuck

On 30 May 2012 14:21, Stone, Joel wrote:

Thanks for the CLOSE idea, but we are on v5r4.

Anderson, Kurt on Wednesday, May 30, 2012 3:14 PM wrote:

Sorry, it's not CLOF, it's actually CLOSE.

"The Close Database File (CLOSE) command will explicitly close a
database file that was implicitly opened by a Receive File (RCVF)
command run within the same CL program or ILE CL procedure. A file
with the same open identifier must have been declared by a Declare
File (DCLF) command within the same CL program or ILE CL
procedure.

After the CLOSE command is run, the next RCVF command for this file
will implicitly reopen the file and read a record from the file.

You can use CLOSE for a database file that is already closed or was
never opened; no error message will be sent."