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

[CRPence <CRPbottle@xxxxxxxxx>]

  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."