Thank you everyone so far.
Yes, I can use the BPXWDYN function for dynamic allocation. Just not REXX
So it sounds like nothing native in Cobol. So my design is probably going to be
Step 1 - IDCAMS ListC
Step 2 - Cobol
Read IDCAMS Listc and create a list of GDGs to process
Using BPXWDYN Dynamic allocation to read the GDGs one at a time
Produce appropriate messages as to status of GDG reads
Write to Report Repository
Rename the GDG - this is only done as a precaution. It may not be needed
Go to next GDG and continue until done
I will look at CSI, I had already started reviewing that for COBOL. That would
eliminate one step
Thanks
Lizette
> -----Original Message-----
> From: IBM Mainframe Discussion List [mailto:[email protected]] On
> Behalf Of Bill Woodger
> Sent: Friday, November 18, 2016 8:51 AM
> To: [email protected]
> Subject: Re: How to tell COBOL to read a concatenation of GDGs
>
> To access the files you will need to use "dynamic allocation". There's a
> couple of methods, and some search-engineing for Tom Ross COBOL Dynamic
> Allocation should get you some working examples.
>
> I'd LISTCAT to a data set, and read the data set in the COBOL program. Gives
> you a fixed point, a copy of the driving informaiton, and the output you need
> is simple to extract in COBOL from the LISTCAT (it's all in fixed locations
> with maximum or fixed lengths, so nothing fancy needed).
>
> Which method of dynamic alllocation you use in the COBOL program is down to
> what your site already uses from COBOL (if anything, do it the same way) or
> what is otherwise considered to be the most convenient.
>
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
