Re: Using symbolic DD names

2021-01-10 Thread Binyamin Dissen
On Sun, 10 Jan 2021 08:18:10 -0600 Paul Gilmartin <000433f07816-dmarc-requ...@listserv.ua.edu> wrote: :>On Sun, 10 Jan 2021 14:34:03 +0200, Binyamin Dissen wrote: :> :>>On Wed, 30 Dec 2020 19:21:52 + Billy Ashton wrote: :>> :>>:>Hey folks! I have a vendor product program that looks for

Re: Using symbolic DD names

2021-01-10 Thread Paul Gilmartin
On Sun, 10 Jan 2021 14:34:03 +0200, Binyamin Dissen wrote: >On Wed, 30 Dec 2020 19:21:52 + Billy Ashton wrote: > >:>Hey folks! I have a vendor product program that looks for different >:>DDnames depending on the control statements passed into the program. Is >:>there any way to define a

Re: Using symbolic DD names

2021-01-10 Thread Binyamin Dissen
On Wed, 30 Dec 2020 19:21:52 + Billy Ashton wrote: :>Hey folks! I have a vendor product program that looks for different :>DDnames depending on the control statements passed into the program. Is :>there any way to define a dynamic DD statement using JCL symbols? For :>example, I would

Re: Using symbolic DD names

2020-12-31 Thread Dana Mitchell
On Thu, 31 Dec 2020 10:02:14 -0600, Paul Gilmartin wrote: >I've used BPXWDYN( 'ALLOC RTDDN(DD) ...' ) similarly. Stronger guarantee of >uniqueness; less ease of identification. > Thanks, I like that. Next time I'm in working on this, I'll change the ALLOC. Since I originally wrote this, it

Re: Using symbolic DD names

2020-12-31 Thread Paul Gilmartin
On Thu, 31 Dec 2020 07:50:44 -0600, Dana Mitchell wrote: > >... snippet ... > Thanks. I fixated on the wrong thing. >In this instance, I append zscreen to keep the DD names unique if this is used >more than once simultaneously in split screens. > I've used BPXWDYN( 'ALLOC RTDDN(DD) ...'

Re: Using symbolic DD names

2020-12-31 Thread Dana Mitchell
On Thu, 31 Dec 2020 07:25:45 -0600, Paul Gilmartin wrote: > >But my question remains, how does compound symbol TRAP. >get populated? > This example was just a snippet from my TRAP exec, where it issues the passed TSO command and performs an ISPF view on the output. It simply gets populated

Re: Using symbolic DD names

2020-12-31 Thread Paul Gilmartin
;Sent: Thursday, December 31, 2020 5:53 AM >To: IBM-MAIN@LISTSERV.UA.EDU >Subject: Re: Using symbolic DD names > >On Wed, 30 Dec 2020, at 22:59, Paul Gilmartin wrote: >> On Wed, 30 Dec 2020 15:16:49 -0600, Dana Mitchell wrote: > >> >Address ispexec 'VGET (ZSCREEN) SH

Re: Using symbolic DD names

2020-12-31 Thread Seymour J Metz
@LISTSERV.UA.EDU Subject: Re: Using symbolic DD names On Wed, 30 Dec 2020, at 22:59, Paul Gilmartin wrote: > On Wed, 30 Dec 2020 15:16:49 -0600, Dana Mitchell wrote: > >Address ispexec 'VGET (ZSCREEN) SHARED' > >ddname='$TRAP'zscreen > >'ALLOC FI('ddname') UNIT(3390) DSO(PS) RECFM(V

Re: Using symbolic DD names

2020-12-31 Thread Jeremy Nicoll
On Wed, 30 Dec 2020, at 22:59, Paul Gilmartin wrote: > On Wed, 30 Dec 2020 15:16:49 -0600, Dana Mitchell wrote: > >Address ispexec 'VGET (ZSCREEN) SHARED' > >ddname='$TRAP'zscreen > >'ALLOC FI('ddname') UNIT(3390) DSO(PS) RECFM(V B) LRECL(255) NEW DEL REU' > >'EXECIO 'trap.0' DISKW 'ddname' (FINI

Re: Using symbolic DD names

2020-12-31 Thread Peter Vels
Try this: // EXPORT SYMLIST=* // SET TNO=99 //SUBMIT EXEC PGM=IEBEDIT //SYSPRINT DD SYSOUT=X //SYSINDD DUMMY //SYSUT1 DD DATA,SYMBOLS=JCLONLY //INSIDE JOB //VENDOR EXEC PGM=IEFBR14

Re: Using symbolic DD names

2020-12-30 Thread Brian Westerman
> > > >-Original Message- >From: IBM Mainframe Discussion List On Behalf Of >Billy Ashton >Sent: Wednesday, December 30, 2020 12:22 PM >To: IBM-MAIN@LISTSERV.UA.EDU >Subject: Using symbolic DD names > >Hey folks! I have a vendor product program that looks for differ

Re: Using symbolic DD names

2020-12-30 Thread Charles Mills
es -Original Message- From: IBM Mainframe Discussion List [mailto:IBM-MAIN@LISTSERV.UA.EDU] On Behalf Of Lizette Koehler Sent: Wednesday, December 30, 2020 12:56 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Using symbolic DD names So the question becomes, can your Program handle a constant

Re: Using symbolic DD names

2020-12-30 Thread Bernd Oppolzer
Am 30.12.2020 um 21:55 schrieb Lizette Koehler: So the question becomes, can your Program handle a constantly changing DD Name? What would be the benefit from doing this? In Cobol you predefine (If I am allowed to use this word) the IO Section. Which specifies the DD name - consider that

Re: Using symbolic DD names

2020-12-30 Thread Paul Gilmartin
On Wed, 30 Dec 2020 15:16:49 -0600, Dana Mitchell wrote: >I do this frequently in REXX: > >Address ispexec 'VGET (ZSCREEN) SHARED' >ddname='$TRAP'zscreen >'ALLOC FI('ddname') UNIT(3390) DSO(PS) RECFM(V B) LRECL(255) NEW DEL REU' >'EXECIO 'trap.0' DISKW 'ddname' (FINI STEM TRAP.' > I'm mystified.

Re: Using symbolic DD names

2020-12-30 Thread Seymour J Metz
smetz3 From: IBM Mainframe Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Lizette Koehler [stars...@mindspring.com] Sent: Wednesday, December 30, 2020 3:55 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Using symbolic DD names So the question becomes, can your Program handle a constantly ch

Re: Using symbolic DD names

2020-12-30 Thread Seymour J Metz
Discussion List [IBM-MAIN@LISTSERV.UA.EDU] on behalf of Billy Ashton [bill00ash...@gmail.com] Sent: Wednesday, December 30, 2020 4:24 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Re: Using symbolic DD names Hi Lizette, as I noted originally, the vendor program uses control statements, where certain values

Re: Using symbolic DD names

2020-12-30 Thread Paul Gilmartin
On Wed, 30 Dec 2020 13:55:32 -0700, Lizette Koehler wrote: > >And yes Scheduling products can supply symbolics where native z/OS might now. > JCL Converter is brain-dead. Symbolics should be recognized *everywhere*, even when split over continuation lines. >Could you provide an example where

Re: Using symbolic DD names

2020-12-30 Thread Billy Ashton
. Billy -- Original Message -- From: "Lizette Koehler" To: IBM-MAIN@listserv.ua.edu Sent: 12/30/2020 3:55:32 PM Subject: Re: Using symbolic DD names So the question becomes, can your Program handle a constantly changing DD Name? What would be the benefit from doing this? In

Re: Using symbolic DD names

2020-12-30 Thread Dana Mitchell
I do this frequently in REXX: Address ispexec 'VGET (ZSCREEN) SHARED' ddname='$TRAP'zscreen 'ALLOC FI('ddname') UNIT(3390) DSO(PS) RECFM(V B) LRECL(255) NEW DEL REU' 'EXECIO 'trap.0' DISKW 'ddname' (FINI STEM TRAP.' Dana On Wed, 30 Dec 2020 13:55:32 -0700, Lizette Koehler wrote: >So the

Re: Using symbolic DD names

2020-12-30 Thread Lizette Koehler
in JCL? Lizette -Original Message- From: IBM Mainframe Discussion List On Behalf Of Billy Ashton Sent: Wednesday, December 30, 2020 12:22 PM To: IBM-MAIN@LISTSERV.UA.EDU Subject: Using symbolic DD names Hey folks! I have a vendor product program that looks for different DDnames depending

Re: Using symbolic DD names

2020-12-30 Thread Steve Smith
JCL doesn't allow any symbol substitution in names or operation. You can, however, use anything in the wide wide world of programming to generate the JCL and submit it. But here's a nice, simple way to do it: // SET =99 //SUBMIT EXEC PGM=IEBEDIT //SYSPRINT DD ... //SYSIN DD DUMMY //SYSUT1 DD

Re: Using symbolic DD names

2020-12-30 Thread Paul Gilmartin
On Wed, 30 Dec 2020 19:21:52 +, Billy Ashton wrote: >Hey folks! I have a vendor product program that looks for different >DDnames depending on the control statements passed into the program. Is >there any way to define a dynamic DD statement using JCL symbols? For >example, I would love to

Re: Using symbolic DD names

2020-12-30 Thread R.S.
W dniu 30.12.2020 o 20:21, Billy Ashton pisze: Hey folks! I have a vendor product program that looks for different DDnames depending on the control statements passed into the program. Is there any way to define a dynamic DD statement using JCL symbols? For example, I would love to have //TB to

Using symbolic DD names

2020-12-30 Thread Billy Ashton
Hey folks! I have a vendor product program that looks for different DDnames depending on the control statements passed into the program. Is there any way to define a dynamic DD statement using JCL symbols? For example, I would love to have //TB to correspond to TB01DAT, TB14DAT, or TB67DAT if