IBM Mainframe Forum Index
 
Log In
 
IBM Mainframe Forum Index Mainframe: Search IBM Mainframe Forum: FAQ Register
 

Override from JCL to dummy out proc step


IBM Mainframe Forums -> JCL & VSAM
Post new topic   Reply to topic
View previous topic :: View next topic  
Author Message
shantipriya

New User


Joined: 16 Jul 2007
Posts: 8
Location: chennai

PostPosted: Fri Nov 16, 2007 8:58 pm
Reply with quote

I am writing a JCL where am using a proc in which some of the steps should not be executed.
Please provide a solution to override to the unwanted steps in proc from JCL.

Thanks
Back to top
View user's profile Send private message
superk

Global Moderator


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

PostPosted: Fri Nov 16, 2007 9:08 pm
Reply with quote

See 5.2 Modifying Procedures in the z/OS V1R9.0 MVS JCL Reference.
Back to top
View user's profile Send private message
dominickim

New User


Joined: 28 Feb 2007
Posts: 65
Location: NS, CA

PostPosted: Fri Nov 16, 2007 10:08 pm
Reply with quote

Code:
//S1       EXEC PGM=IDCAMS                       
//SYSPRINT DD SYSOUT=*                           
//SYSIN    DD *                                   
 SET MAXCC=8                                     
/*                                               
//S2       EXEC PGM=IEFBR14,COND=(0,NE)           
//S3       EXEC SKIPSTEP,RUN='(0,NE,S1)'         
  P1//SKIPSTEP  PROC RUN='(0,LE)'                 
  P1//STEP1     EXEC PGM=IEFBR14                 
  P1//STEP2     EXEC PGM=IEFBR14,COND=&RUN       
  P1--STEP2     EXEC PGM=IEFBR14,COND=(0,NE,S1)   
  P1//STEP3     EXEC PGM=IEFBR14                 
  P1//STEP4     EXEC PGM=IEFBR14,COND=&RUN       
  P1--STEP4     EXEC PGM=IEFBR14,COND=(0,NE,S1)   
  P1//STEP5     EXEC PGM=IEFBR14                 
  P1//          PEND                             
//                                               

Output
Code:
- STARTED - TIME=08.32.14           
  S1         IDCAMS    (0001)   0008
  S2         IEFBR14   (0002)   NXEQ
  STEP1      IEFBR14   (0003)   0000
  STEP2      IEFBR14   (0004)   NXEQ
  STEP3      IEFBR14   (0005)   0000
  STEP4      IEFBR14   (0006)   NXEQ
  STEP5      IEFBR14   (0007)   0000
- ENDED - TIME=08.32.14
Back to top
View user's profile Send private message
Douglas Wilder

Active User


Joined: 28 Nov 2006
Posts: 305
Location: Deerfield IL

PostPosted: Fri Nov 16, 2007 10:50 pm
Reply with quote

dominickim's methos works well if you can change the proc, if not try the following overrides.
Code:
//**********************************************************
//SKIPSTEP  PROC                                           
//STEP1     EXEC PGM=IEFBR14                               
//STEP2     EXEC PGM=IEFBR14                               
//STEP3     EXEC PGM=IEFBR14                               
//STEP4     EXEC PGM=IEFBR14                               
//STEP5     EXEC PGM=IEFBR14                               
//          PEND                                           
//**********************************************************
//S1     EXEC PGM=IDCAMS                                   
//SYSPRINT DD SYSOUT=*                                     
//SYSIN    DD *                                             
 SET MAXCC=8                                               
/*                                                         
//S2     EXEC PGM=IEFBR14,COND=(0,NE)                       
//S3     EXEC SKIPSTEP,                                     
//            COND.STEP2=(0,NE,S1),                         
//            COND.STEP4=(0,NE,S1)                         
//                                                         
Code:
STEPNAME PROCSTEP    RC
S1                   08
S2                FLUSH
S3       STEP1       00
S3       STEP2    FLUSH
S3       STEP3       00
S3       STEP4    FLUSH
S3       STEP5       00
Back to top
View user's profile Send private message
expat

Global Moderator


Joined: 14 Mar 2007
Posts: 8797
Location: Welsh Wales

PostPosted: Fri Nov 16, 2007 11:50 pm
Reply with quote

Also, this topic has already been discussed to death. There is a SEARCH facility on this forum which would have shown you the numerous answers already given.
Back to top
View user's profile Send private message
View previous topic :: :: View next topic  
Post new topic   Reply to topic View Bookmarks
All times are GMT + 6 Hours
Forum Index -> JCL & VSAM

 


Similar Topics
Topic Forum Replies
No new posts Return codes-Normal & Abnormal te... JCL & VSAM 7
No new posts How to append a PS file into multiple... JCL & VSAM 3
No new posts convert file from VB to FB and use tr... DFSORT/ICETOOL 8
No new posts Forcing a step to run (even if abended) JCL & VSAM 8
No new posts step by step trace 4 ISPF dialog call... TSO/ISPF 17
Search our Forums:

Back to Top