Portal | Manuals | References | Downloads | Info | Programs | JCLs | Master the Mainframes
IBM Mainframe Computers Forums Index
 
Register
 
IBM Mainframe Computers Forums Index Mainframe: Search IBM Mainframe Forum: FAQ Memberlist Usergroups Profile Log in to check your private messages Log in
 

 

Resolve symbolics - other than starting chars in qualifiers

 
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM
View previous topic :: :: View next topic  
Author Message
Shrinika Rajendran

New User


Joined: 06 Jun 2013
Posts: 25
Location: India

PostPosted: Tue May 27, 2014 6:15 pm    Post subject: Resolve symbolics - other than starting chars in qualifiers
Reply with quote

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
View user's profile Send private message

Nic Clouston

Global Moderator


Joined: 10 May 2007
Posts: 1714
Location: UK

PostPosted: Tue May 27, 2014 6:42 pm    Post subject: Reply to: Resolve symbolics - other than starting chars in q
Reply with quote

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
View user's profile Send private message
Terry Heinze

JCL Moderator


Joined: 14 Jul 2008
Posts: 1238
Location: Richfield, MN, USA

PostPosted: Tue May 27, 2014 6:53 pm    Post subject:
Reply with quote

Don't you mean "sym1=new" not "&sym1=new"? This resolves fine for me.
Back to top
View user's profile Send private message
enrico-sorichetti

Global Moderator


Joined: 14 Mar 2007
Posts: 10202
Location: italy

PostPosted: Tue May 27, 2014 6:57 pm    Post subject: Reply to: Resolve symbolics - other than starting chars in q
Reply with quote

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
View user's profile Send private message
Shrinika Rajendran

New User


Joined: 06 Jun 2013
Posts: 25
Location: India

PostPosted: Tue May 27, 2014 7:53 pm    Post subject:
Reply with quote

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
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic    IBMMAINFRAMES.com Support Forums -> JCL & VSAM All times are GMT + 6 Hours
Page 1 of 1

 

Search our Forum:

Similar Topics
Topic Author Forum Replies Posted
No new posts Online Assembler Program Starting point Aditya.Srivastava PL/I & Assembler 4 Fri Jul 08, 2016 6:48 pm
No new posts How to resolve IMS DB status code FM Priyanka Boga IMS DB/DC 3 Fri Jun 10, 2016 1:54 pm
No new posts starting cicstg EXCI problem meykh2014 CICS 3 Mon Apr 11, 2016 3:36 pm
No new posts how to Resolve SQL Error Code -924 Rajesh3825 ABENDS & Debugging 2 Thu Dec 10, 2015 2:39 pm
No new posts How to resolve -532 pkmurali DB2 3 Thu Aug 06, 2015 10:03 pm


Facebook
Back to Top
 
Mainframe Wiki | Forum Rules | Bookmarks | Subscriptions | FAQ | Tutorials | Contact Us