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
 

 

Symbolic paramters in instream proc?

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

New User


Joined: 08 Feb 2007
Posts: 11
Location: Hyderabad

PostPosted: Fri Mar 21, 2008 1:00 am    Post subject: Symbolic paramters in instream proc?
Reply with quote

Can we use Symbolic paramters in instream proc?
Back to top
View user's profile Send private message

superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4649
Location: Raleigh, NC, USA

PostPosted: Fri Mar 21, 2008 1:01 am    Post subject: Reply to: Symbolic paramters in instream proc?
Reply with quote

Yes.
Back to top
View user's profile Send private message
vizaiinti

New User


Joined: 08 Feb 2007
Posts: 11
Location: Hyderabad

PostPosted: Fri Mar 21, 2008 1:08 am    Post subject:
Reply with quote

if Yes, can you please help me with an example?
Back to top
View user's profile Send private message
superk

Moderator Team Head


Joined: 26 Apr 2004
Posts: 4649
Location: Raleigh, NC, USA

PostPosted: Fri Mar 21, 2008 1:15 am    Post subject: Reply to: Symbolic paramters in instream proc?
Reply with quote

Code:

//MYPROC PROC HLQ=&SYSUID                                       
//*                                                             
//PS01 EXEC PGM=IEFBR14                                         
//DD1  DD   DSN=&HLQ..MYTEST.DATA,DISP=(,CATLG,DELETE),         
//     UNIT=SYSDA,SPACE=(CYL,(1,1)),RECFM=FB,LRECL=80           
//*                                                             
//       PEND                                                   
//*                                                             
//JS01 EXEC MYPROC,HLQ=TEMP                                     


Try it like this, then change the last line to

//JS01 EXEC MYPROC

and try it again.
Back to top
View user's profile Send private message
dick scherrer

Site Director


Joined: 23 Nov 2006
Posts: 19270
Location: Inside the Matrix

PostPosted: Fri Mar 21, 2008 1:26 am    Post subject:
Reply with quote

Hello,

Quote:
can you please help me with an example?

Here ya go. . .

Code:
//* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
//MXCC05PH PROC MOD=9,C=,CEN=20,ICNPFX=KT,F='FLIP.',RUNYYMM=8888       
//* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
//MSCC50X  EXEC PGM=MXCC50&MOD,PARM='  CP'                           
//ALLCLMS  DD DSN=MX.&C.CLAIMS.A&CEN.&RUNYYMM,DISP=SHR               
//CARDFILE DD DSN=MX.&ICNPFX.ICNS.&F.TEMP#7,DISP=SHR                 
//DATE     DD DSN=MX.RDS.PURGHIST.DATES(D&RUNYYMM),DISP=SHR           
//TEMPFLE  DD DSN=&&TEMP,DISP=(,PASS),UNIT=SYSDA,                     
//            SPACE=(CYL,(8,2),RLSE),                                 
//            DCB=(BLKSIZE=12750,LRECL=255,RECFM=FB)                 
//STDFLE   DD DSN=&&SRTD,DISP=(,PASS),UNIT=SYSDA,                     
//            SPACE=(CYL,(8,2),RLSE),                                 
//            DCB=(BLKSIZE=12750,LRECL=255,RECFM=FB)                 
//SORTFLE  DD DSN=&&SORT,DISP=(,PASS),UNIT=SYSDA,                     
//            SPACE=(CYL,(8,2),RLSE),                                 
//            DCB=(BLKSIZE=12750,LRECL=255,RECFM=FB)                 
//SORTWK01 DD UNIT=SYSDA,SPACE=(CYL,(8,1),RLSE)                       
//PRINTFLE DD SYSOUT=O,DEST=LOCAL                                     
//PRNTFLE1 DD SYSOUT=O,DEST=LOCAL                                     
//SYSOU1   DD SYSOUT=*                                                 
//SYSDBOUT DD SYSOUT=*                                                 
//SYSUDUMP DD SYSOUT=*                                                 
//SYSOUT   DD SYSOUT=*                                                 
//         PEND                                                         
//* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
//RUN0401  EXEC MXCC05PH,MOD=4,CEN=20,ICNPFX=KT,RUNYYMM=0401           
//RUN0402  EXEC MXCC05PH,MOD=4,CEN=20,ICNPFX=KT,RUNYYMM=0402           
//RUN0403  EXEC MXCC05PH,MOD=4,CEN=20,ICNPFX=KT,RUNYYMM=0403           
//RUN0404  EXEC MXCC05PH,MOD=4,CEN=20,ICNPFX=KT,RUNYYMM=0404           
//RUN0405  EXEC MXCC05PH,MOD=4,CEN=20,ICNPFX=KT,RUNYYMM=0405           
//RUN0406  EXEC MXCC05PH,MOD=4,CEN=20,ICNPFX=KT,RUNYYMM=0406           
//RUN0407  EXEC MXCC05PH,MOD=4,CEN=20,ICNPFX=KT,RUNYYMM=0407   
//         


This is part of something that runs regularly in production. Hopefully, i've not introduced any inconsistencies editing. . . icon_smile.gif
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 Paasing symbolic parameter to instrea... Anirudh Anand JCL & VSAM 0 Thu Jul 27, 2017 1:22 pm
No new posts REXX to view the PGM or PROC jackzhang75 CLIST & REXX 11 Tue Jun 20, 2017 1:20 am
No new posts Fileaid 2 commands instream work. In ... descann Compuware & Other Tools 2 Tue May 16, 2017 3:31 pm
No new posts LISTCAT on a dataset with symbolic pa... shreya19 JCL & VSAM 5 Fri Apr 07, 2017 5:43 pm
No new posts Jcl pram vs proc parms ashek15 JCL & VSAM 3 Thu Mar 30, 2017 6:50 pm


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