Joel,

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

Thanks,
Kurt

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Stone, Joel
Sent: Wednesday, May 30, 2012 2:17 PM
To: 'Midrange Systems Technical Discussion'
Subject: RE: RCVF - how to do multiple CHAINS in one CL pgm

Good idea, but CLOF only works with OPNQRYF and OPNDBF according to help.

I tried that, issues error Message ID . . . . . . : CPF4520
Date sent . . . . . . : 05/30/12 Time sent . . . . . .

Message . . . . : No file open with identifier EMADDR.






Close File - Help

The Close File (CLOF) command closes a database file. This command
works in conjunction with the Open Query File (OPNQRYF) and Open
Database File (OPNDBF) commands.



-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Anderson, Kurt
Sent: Wednesday, May 30, 2012 2:10 PM
To: Midrange Systems Technical Discussion
Subject: RE: RCVF - how to do multiple CHAINS in one CL pgm

You can't reposition an open file, can you? For some reason I was thinking you couldn't. Then again, I rarely do anything than the most basic I/O in CL.

Have you tried using CLOF before going to the Top label?

-Kurt

-----Original Message-----
From: midrange-l-bounces@xxxxxxxxxxxx [mailto:midrange-l-bounces@xxxxxxxxxxxx] On Behalf Of Stone, Joel
Sent: Wednesday, May 30, 2012 1:46 PM
To: midrange-l@xxxxxxxxxxxx
Subject: RCVF - how to do multiple CHAINS in one CL pgm

I have a CL loop as follows:


Top:
Load keyValue
OVRDBF FILE(TestFile) POSITION(*KEYAE 1 *N &KeyValue)
rcvf
goto Top





The OVRDBF positions the file ONLY the first time thru (apparently it only positions for the NEXT file open).


How can I read the record that I need (using keys) several times in on CL run?


Thanks!



______________________________________________________________________
This outbound email has been scanned for all viruses by the MessageLabs Skyscan service.
For more information please visit http://www.symanteccloud.com ______________________________________________________________________
--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l.

--
This is the Midrange Systems Technical Discussion (MIDRANGE-L) mailing list To post a message email: MIDRANGE-L@xxxxxxxxxxxx To subscribe, unsubscribe, or change list options,
visit: http://lists.midrange.com/mailman/listinfo/midrange-l
or email: MIDRANGE-L-request@xxxxxxxxxxxx Before posting, please take a moment to review the archives at http://archive.midrange.com/midrange-l.


________________________________________________________________________
This inbound email has been scanned for all viruses by the MessageLabs SkyScan
service.
________________________________________________________________________

______________________________________________________________________
This outbound email has been scanned for all viruses by the MessageLabs Skyscan service.
For more information please visit http://www.symanteccloud.com
______________________________________________________________________

As an Amazon Associate we earn from qualifying purchases.

This thread ...

Follow-Ups:
Replies:

Follow On AppleNews
Return to Archive home page | Return to MIDRANGE.COM home page

This mailing list archive is Copyright 1997-2024 by midrange.com and David Gibbs as a compilation work. Use of the archive is restricted to research of a business or technical nature. Any other uses are prohibited. Full details are available on our policy page. If you have questions about this, please contact [javascript protected email address].

Operating expenses for this site are earned using the Amazon Associate program and Google Adsense.