On Mon, Jan 30, 2017 at 1:59 PM, Paul Gilmartin <
[email protected]> wrote:
> On Mon, 30 Jan 2017 16:14:42 +0000, Jousma, David wrote:
> > ...
> >/* Allocate results output file */
> >ddnm = 'DD'||random(1,99999)
> >Address TSO "Alloc Fi("ddnm") SYSOUT"
> >
> It's better to let DYNALLOC choose a DDNAME, SYSnnnnn, guaranteed unique.
>
Also, I think that it is a far better idea to use BPXWDYN rather than TSO
ALLOCATE, being sure to use the RTDDN(...) so that it will return the DD
name to you.
>
> -- gil
>
> ----------------------------------------------------------------------
> For IBM-MAIN subscribe / signoff / archive access instructions,
> send email to [email protected] with the message: INFO IBM-MAIN
>
--
There’s no obfuscated Perl contest because it’s pointless.
—Jeff Polk
Maranatha! <><
John McKown
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to [email protected] with the message: INFO IBM-MAIN
