On 2016-05-16, at 13:08, Jousma, David wrote:
> ...
> exit
>
>
> /* Allocate results output file */
> ddnm = 'DD'||random(1,99999)
> Address TSO "Alloc Fi("ddnm") SYSOUT"
>
I'll grant that the likeihood of a collision is minuscule,
the Birthday Problem doesn't apply here, but why not spare
your reviewers the mental gymnastics of verifying that by
reducing it to zero:
/* Allocate results output file */
call BPXWDYN( "Alloc rtddn(ddnm) SYSOUT msg(WTP)" )
-- gil
----------------------------------------------------------------------
For IBM-MAIN subscribe / signoff / archive access instructions,
send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN
