View previous topic :: View next topic
Author
Message
Shrinika Rajendran New User Joined: 06 Jun 2013Posts: 25 Location: India
Hi,
Is there a way to resolve symbolics if its for the content other than starting characters of the 8 bytes qualifier in a DSN??
&SYM1=NEW,
1) DSN name: MY.PDS.COOL&SYM1..TEST
This is always resolved as MY.PDS.COOL.NEW.TEST
Is there a way to get "MY.PDS.COOLNEW.TEST" by passing 'NEW' thru symbolics?
Thanks
Back to top
Nic Clouston Global Moderator Joined: 10 May 2007Posts: 2455 Location: Hampshire, UK
Why don't you try it? Use TYPRUN=SCAN to make sure you do not inadvertently run the job. Also, check out the PROCLIBs at your site.
Back to top
Terry Heinze JCL Moderator Joined: 14 Jul 2008Posts: 1249 Location: Richfield, MN, USA
Don't you mean "sym1=new" not "&sym1=new"? This resolves fine for me.
Back to top
enrico-sorichetti Superior Member Joined: 14 Mar 2007Posts: 10873 Location: italy
works for me ....
Code:
****** ***************************** Top of Data ******************************
- - - - - - - - - - - - - - - - - - - 3 Line(s) not Displayed
000004 //MYPROC PROC SYM1='NEW'
000005 //G EXEC PGM=IEFBR14
000006 //NEWDS DD DISP=(NEW,CATLG),
000007 // DSN=ENRICO.TEST&SYM1..CNTL,
000008 // DCB=(RECFM=FB,LRECL=80),
000009 // UNIT=SYSDA,SPACE=(CYL,(1,1,1))
000010 // PEND
000011 //*
000012 //S1 EXEC MYPROC
000013 //*
000014 //S2 EXEC MYPROC,SYM1='OTH'
****** **************************** Bottom of Data ****************************
the result ....
Code:
3 //S1 EXEC MYPROC
4 ++MYPROC PROC SYM1='NEW'
5 ++G EXEC PGM=IEFBR14
6 ++NEWDS DD DISP=(NEW,CATLG),
++ DSN=ENRICO.TEST&SYM1..CNTL,
++ DCB=(RECFM=FB,LRECL=80),
++ UNIT=SYSDA,SPACE=(CYL,(1,1,1))
//*
IEFC653I SUBSTITUTION JCL - DISP=(NEW,CATLG),DSN=ENRICO.TESTNEW.CNTL,... ...
7 //S2 EXEC MYPROC,SYM1='OTH'
8 ++MYPROC PROC SYM1='NEW'
9 ++G EXEC PGM=IEFBR14
10 ++NEWDS DD DISP=(NEW,CATLG),
++ DSN=ENRICO.TEST&SYM1..CNTL,
++ DCB=(RECFM=FB,LRECL=80),
++ UNIT=SYSDA,SPACE=(CYL,(1,1,1))
IEFC653I SUBSTITUTION JCL - DISP=(NEW,CATLG),DSN=ENRICO.TESTOTH.CNTL,... ...
Back to top
Shrinika Rajendran New User Joined: 06 Jun 2013Posts: 25 Location: India
Nic; Terry; Enrico;
Yes. It is "sym1=new" and not "&sym1=new".
It does work for me now. I was using 'peek' option to view the dataset which is our internal REXX tool to edit, view or browse a dataset on the fly without having to go thru 3.4 option, which would show up the datset name after resolving the symbolics even if the dataset is not catalogued. It resolved the dataset name incorrectly that I got this doubt.
Thanks all.
Back to top
Please enable JavaScript!