On Tue, 10 Jan 2017 07:27:12 -0600, John Mckown
([email protected]) wrote about ""task level" TIOT & XTIOT? A
crazy thought?" (in
<caajsdjgawmzkmaec7ngld5wjv_yyw1h9-wo+bsdqtts1xs3...@mail.gmail.com>):
[snip]
> So, have you ever wanted to run multiple, concurrent, executions of some
> program which does not accept an alternative DD name list? For instance,
> some in-house COBOL program.
Simply use PL/I with the TITLE() option on the OPEN statement. This
allows the program to specify the DDNAME at run time.
If you really are wedded to COBOL, ask for the language to offer a new
facility in the ENVIRONMENT DIVISION, like:
SELECT <fd-name> ASSIGN TO <ws-variable>
where the <ws-variable> is something like:
77 WS-MY-DDNAME PIC X(8).
This can be the target of a text unit for SVC 99, or read from input, or
passed in from a calling main program.
This is far more straightforward than fiddling with multiple TIOT, SIOT,
DSAB, etc. This also avoids the filth known as environment variables.
> Just running the idea up the flag pole to see who salutes. I don't really
> have much else to do any more. Just waiting for the axe.
The waiting can be worse than the redundancy itself. ... :-(
--
Regards,
Dave [RLU #314465]
*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
[email protected] (David W Noon)
*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*-*
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
