Re: CL DCLF

[John Earl <johnearl@xxxxxxxxxxxxxxx>]

Jeff,

"Bull, Jeff" wrote:

> Hi all,
>         does anyone know how to get a dclf'ed physical file in a CL program
> to reposition back to start of file ?  I've tried OVRDBF  POSITION(*START)
> and POSITION(*RRN 1); neither seem to work.  Perhaps I am trying to do the
> impossible ?

First off, a CLOF and OPNDBF will not work after your program has received
CPF0864.  Once CPF0864 has been issued, you cannot re-read the file in that
occurance of the program.

As someone else mentioned, counting the number of records is also a risky
prospect.... you've got to be pretty darn sure that no one else is adding or
deleting records from te file.  It's also more work than the alternatives.

The method that I have used to accomplish this is to use the TFRCTL command. A
program can do a TFRCTL to itself, and a new occurance of the program is fired
off which allows you to read your file after CPF0864.  It's pretty painless , 
and
it allows you to accomplish your goal with one code base.

The other method that works is to not rely on the CL to do your DB reads....  
use
a HLL program to handle that and communicate the results back to your CL via
parms.

jte


--
John Earl                    johnearl@400security.com
The PowerTech Group      --> new number --> 253-872-7788
PowerLock Network Security   www.400security.com
--




+---
| This is the Midrange System Mailing List!
| To submit a new message, send your mail to MIDRANGE-L@midrange.com.
| To subscribe to this list send email to MIDRANGE-L-SUB@midrange.com.
| To unsubscribe from this list send email to MIDRANGE-L-UNSUB@midrange.com.
| Questions should be directed to the list owner/operator: david@midrange.com
+---