On Wed, 25 Mar 2009 18:36:09 -0600, Rick Fochtman <[email protected]> wrote:
>You're mixing your terms somewhat. :-) If the cluster is defined with >the REUSE attribute, all you need to do is OPEN and CLOSE it using an >ACB that also specifies REUSE. ESDS clusters have no index. An IMS "index database" is a VSAM ESDS under the covers. This is what I was referring to. >What you have here is perfectly acceptable and I've used similar >programs in the past for exactly that purpose, although I notice you've >deleted some of the ACB parms, like a DDNAME. Check your ACB operands >very carefully, code only what's absolutely necessary and you should be >fine. I'm not sure you need CNV in the MACRF, but OUT and RST will do >the trick. You don't need a RPL 'cuz you're not doing any I/O to the >dataset. I used to have a program to do exactly what you need; if you >contact me off-list, I'll look around and see if I still have it. If so; >you're welcome to a copy. DDNAME is not required. It defaults to the label (FILE1, in this case). I used CNV because it allows the function two work for all three file types (ESDS, KSDS, RRDS). Thanks! Frank ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: GET IBM-MAIN INFO Search the archives at http://bama.ua.edu/archives/ibm-main.html
