John McKown wrote:
On Fri, 13 Mar 2009 09:50:52 -0500, Elardus Engelbrecht
<[email protected]> wrote:
<SNIP>
2. Other solution is to write a COBOL/REXX program with dynamic allocation
and using a loop of 100000 open/read/write/close. Read up the service
BPXWDYN.
You can use BPXWDYN in COBOL or REXX. This will give you an opportunity to
read your input ONCE and finish off all your dynamic alloc/write/close of
output datasets with one run with no headache of empty outputs.
HTH!
Groete / Greetings
Elardus Engelbrecht
In current Enterprise COBOL, it is not necessary to use BPXWDYN to do
dynamic allocation. Using "environment variables", it is possible to specify
dynamic allocation information in the program itself.
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IGY3LR40/4.2.3
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/IGY3LR40/4.2.3.1
http://publibz.boulder.ibm.com/cgi-bin/bookmgr_OS390/BOOKS/igy3pg40/3.4.2.3
Note that I've done the above in normal batch COBOL (not just UNIX COBOL
programs).
<ad>
Yes, and we show how to to do that (and have a hands on lab
for it, too) in our two day course "Enterprise COBOL Update I:
Essentials".
see http://www.trainersfriend.com/COBOL_Courses/d704descr.htm
</ad>
Kind regards,
-Steve Comstock
The Trainer's Friend, Inc.
303-393-8716
http://www.trainersfriend.com
z/OS Application development made easier
* Our classes include
+ How things work
+ Programming examples with realistic applications
+ Starter / skeleton code
+ Complete working programs
+ Useful utilities and subroutines
+ Tips and techniques
==> Check out the Trainer's Friend Store to purchase z/OS <==
==> application developer toolkits. Sample code in four <==
==> programming languages, JCL to Assemble or compile, <==
==> bind and test. <==
==> http://www.trainersfriend.com/TTFStore/index.html <==
----------------------------------------------------------------------
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
