Many ways to skin the cat. Your way works fine too, and is one less line of code :)
_________________________________________________________________ Dave Jousma Assistant Vice President, Manager, Mainframe Engineering david.jou...@53.com 1830 East Paris, Grand Rapids, MIĀ 49546 MD RSCB2H p 616.653.8429 f 616.653.2717 -----Original Message----- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Paul Gilmartin Sent: Tuesday, May 17, 2016 10:19 AM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: JCL "COMMAND" statements 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 This e-mail transmission contains information that is confidential and may be privileged. It is intended only for the addressee(s) named above. If you receive this e-mail in error, please do not read, copy or disseminate it in any manner. If you are not the intended recipient, any disclosure, copying, distribution or use of the contents of this information is prohibited. Please reply to the message immediately by informing the sender that the message was misdirected. After replying, please erase it from your computer system. Your assistance in correcting this error is appreciated. ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to lists...@listserv.ua.edu with the message: INFO IBM-MAIN