How to skip first step of a job? Can we use COND on the
first step?
Answers were Sorted based on User's Feedback
Answer / abhijit18in2002
Check this JCL you can use COND=ONLY
//X5PAKR5J JOB (X5P,AKR,5,00000),'TEST CONDITION',
// MSGLEVEL=(1,1),CLASS=Z,MSGCLASS=Z,
// NOTIFY=&SYSUID
//STEP1 EXEC PGM=IEFBR14,COND=ONLY
//SYSPRINT DD SYSOUT=*
//SYSOUT DD *
//STEP2 EXEC PGM=IEFBR14
//SYSPRINT DD SYSOUT=*
//SYSOUT DD *
//STEP3 EXEC PGM=IEFBR14
//SYSPRINT DD SYSOUT=*
//SYSOUT DD *
//SYSIN DD DUMMY
/*
O/P
STEP1-STEP WAS NOT RUN BECAUSE OF COND = ONLY
STEP2-STEP WAS EXECUTED - COND CODE 0000
STEP3-STEP WAS EXECUTED - COND CODE 0000
Is This Answer Correct ? | 34 Yes | 6 No |
Answer / amrita
We can use RESTART in the Job card. For example if in the
Job, proc has been called from Step name STEP01 and the we
want to skip first step from proc viz PROCSTEP01 i.e. we
want our Job to start from Proc step 2 viz PROCSTEP02, use
following syntax in the Jobcard -
RESTART=(STEP01.PROCSTEP02).
Is This Answer Correct ? | 6 Yes | 13 No |
Answer / challa srinivas
Use COND=(0,LE) in step 1. It will bypass step1.
Is This Answer Correct ? | 3 Yes | 22 No |
What is concatenating?
How do you override a parameter in Positional parameters?
which parameter is use to declare the name of dataset in dd statement?
If a field is declared as a comp-3 field and if we want to sort a dataset based on this field, then how will the sort card be??? e.g- if we want to sort by a field which is defined as a PIC X(5) then we will mention - sort fields=(1,5,ch,a). Likewise if a field is defined as PIC S9(10)COMP-3 then in this case how will the sort field be defined (because in this case a sign is also involved)???
What are the maximum and minimum sizes of any CONTROL AREA (VSAM datasets) ?
What is the purpose of dd dummy statement?
Can you execute a PROC from another PROC?
What is the difference between a symbolic and an override in executing a PROC?
One dataset is creating in the step1 with LRECL of 133 and the same dataset is used in the next step in DISP=SHR mode, but while scanning the JCL the following error is thrwon. Please verify the below JCL $/SEPP030.PROVIDER DD DSN=Z1225BT.F5750PG9.F5910PRV.QC#A6868 //ERRORRPT DD DSN=F5910&ST&IN..F5910EPP.ERRORRPT.P&CYCDATE, --ERRORRPT DD DSN=F5910PG.F5910EPP.ERRORRPT.P, // DISP=&DISNCD,UNIT=&DELQ, -- DISP= (NEW,CATLG,DELETE),UNIT=DELQ, // SPACE=(TRK, (30,15),RLSE), // DCB=&DCB2 -- DCB= (PPG.METMODEL,BLKSIZE=0,LRECL=133,RECFM=FB) $/SEPP030.ERRORRPT DD DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT //SEPP040 EXEC PGM=FILEAID,COND= (0002,EQ,SEPP030) //SYSPRINT DD SYSOUT=* //SYSLIST DD SYSOUT=* //DD01 DD DSN=SYSCMN.PROD.CCLIB (F5910EP1),DISP=SHR $/SEPP040.DD01 DD DSN=Z1225BT.TEST.CCLIB (F5910EP1) E1 - DSS20791E - DATA SET 'Z1225BT.F5910EPP.ERRORRPT.AOUTPUT' HAS AN LRECL OF 133 COULD NOT BE OPENED BECAUSE THE CODED LRECL WAS 80. // DD DSN=F5910&ST&IN..F5910EPP.ERRORRPT.P&CYCDATE, -- DD DSN=F5910PG.F5910EPP.ERRORRPT.P, // DISP=SHR $/ DD DSN=Z1225BT.F5910EPP.ERRORRPT.AOUTPUT please find the error code in the above mentioned lines and please suggest me about the error and the solution for that.
//S10 EXEC PGM=ICETOOL //TOOLMSG DD SYSOUT=* //DFSMSG DD SYSOUT=* //CON DD DSN=VAR.INPUT1,DISP=SHR // DD DSN=VAR.INPUT2,DISP=SHR //OUT DD DSN=VAR.OUTPUT,DISP=(NEW,CATLG,DELETE), // SPACE=(CYL,(5,5)),UNIT=SYSDA //TOOLIN DD * * Splice the needed data from the two VB files together SPLICE FROM(CON) TO(OUT) ON(5,5,CH) WITHALL - WITH(12,5) WITH(22,20) VLENMAX /*
How to code these statements in JCL: CLEANUP INITIAL(NO) RESTART(NO) DYNALLOC(NO) job definition..?
ihave ten flatfile in that iwant to concatinate all the files except file 5,6 into output file by uing jcl? how to do this? give me detail yntax for tis?