JCL Interview Questions and Answers | Mainframe | JCL| IBM | 

Learn about ESP scheduler

Yes, you can achieve this using JCL by adding conditional statements based on the current date. Here's an example JCL code that runs a particular step every Monday of the month and every 15th day of the month, taking into account holidays: csharp Copy code //JOBNAME JOB (ACCOUNT), 'DESCRIPTION', CLASS=CLASS,MSGCLASS=CLASS //MONDAY EXEC PGM=YOURPGM //DATECHK1 EXEC PGM=IFTHEN,PARM='(WHEN=(2,EQ,VERIFY))' //SYSPRINT DD SYSOUT=* //SYSUT1 DD * MONDAY: PROCEDURE DATECHK1: IFTHEN=(WHEN=(2,EQ,VERIFY), OVERLAY=(81:C'RUN-ON-HOLIDAY')) IF DAY-OF-WEEK EQ MON THEN //STEP1 EXEC PGM=YOURPGM //SYSIN DD * ELSE DATECHK2: IFTHEN=(WHEN=(2,EQ,VERIFY), OVERLAY=(81:C'RUN-ON-TUESDAY')) IF DAY-OF-WEEK EQ TUE AND DATE-1 EQ HOLIDAY THEN //STEP1 EXEC PGM=YOURPGM //SYSIN DD * ELSE //SKIP1 EXEC PGM=IEBGENER //SYSUT1 DD DUMMY //SYSUT2 DD SYSOUT=* //SYSIN DD DUMMY //STEP2 EXEC PGM=YOURPGM //SYSIN DD * //DD1 DD DSN=DATASET.NAME,DISP=SHR //DD2 DD DSN=OUTPUT.FILE,DISP=(NEW,CATLG,DELETE), // UNIT=DISK,SPACE=(CYL,(5,5)),DCB=(RECFM=FB,LRECL=80,BLKSIZE=0) //DATECHK2 EXEC PGM=IFTHEN,PARM='(WHEN=(2,EQ,VERIFY))' //SYSPRINT DD SYSOUT=* //SYSUT1 DD * 15THDAY: PROCEDURE DATECHK3: IFTHEN=(WHEN=(2,EQ,VERIFY), OVERLAY=(81:C'RUN-ON-HOLIDAY')) IF DAY-OF-MONTH EQ 15 THEN //STEP3 EXEC PGM=YOURPGM //SYSIN DD * ELSE DATECHK4: IFTHEN=(WHEN=(2,EQ,VERIFY), OVERLAY=(81:C'RUN-ON-NEXT-WORKING-DAY')) IF DAY-OF-MONTH EQ 16 AND DATE-1 EQ HOLIDAY THEN //STEP3 EXEC PGM=YOURPGM //SYSIN DD * ELSE //SKIP2 EXEC PGM=IEBGENER //SYSUT1 DD DUMMY //SYSUT2 DD SYSOUT=* //SYSIN DD DUMMY //STEP4 EXEC PGM=YOURPGM //SYSIN DD * //DD1 DD DSN=DATASET.NAME,DISP=SHR //DD2 DD DSN=OUTPUT.FILE,DISP=(NEW,CATLG,DELETE), // UNIT=DISK,SPACE=(CYL,(5,5)),DCB=(RECFM=FB,LRECL=80,BLKSIZE=0) //DATECHK4 EXEC PGM=IFTHEN,PARM='(WHEN=(2,EQ,VERIFY))' //SYSPRINT DD SYSOUT=* //SYSUT1

Thank you