SmartJCL – The Complete JCL Solution

Preamble

This presentation gives a comprehensive overview of SmartJCL

At some slides this button can be used to jump

to specific slides in this presentation.

e.g. jump to slide Agenda

Click on this symbol
to jump to the
overview slide

SmartJCL – Product Presentation 2

 What is SmartJCL
AGENDA
JCL Validation
SmartJCL – The Complete
JCL Solution Reformat

Rules for Standards Check

Change Facility

REXX Interface

Remote Check

Scheduler Interfaces

ISPF Dialog

SmartJCL – Product Presentation 3

 What is SmartJCL?

• It’s more than a simple JCL checker. It offers many additional features that
makes it a complete JCL management tool:
• SmartJCL validates JCL
 Syntax
 Utilities (like IDCAMS, Sort, etc.)
 Program found / not found
 Dataset allocation, Acess authority check
• SmartJCL has many additional functions like
 Reformat
 Remote check
 Standards Check, Change Facility, REXX interface
 Scheduler interface (Control-M, IWS for z/OS)
• SmartJCL can be used as Edit Macro, in Batch, from ISPF or eclipse
• Integrated in ProcMan, it offers full JCL Change Management
 Moves JCL through all stages, e.g. from Test to Integration to Production
 Full history, e.g. a JCL containing all versions

SmartJCL – Product Presentation 4

 JCL Validation – Edit Macro

Type JCK …

SmartJCL – Product Presentation 5

 JCL Validation – DSN Catalog

The result:
1. Summary

2. Lables to
locate the error
3. Error message

SmartJCL – Product Presentation 6

 JCL Validation – DSN Catalog

EDIT SYSH.TXGC.JOBLIB(DB2COB2) - 01.11 ERRORS OCCURRED, RC=8

But IDCAMS requires
Command ===> ___________________________________________________ _ Scroll ===> PAGE
****** *********************** Top of Data **************** SYSPRINT …
==MSG> MESSAGE SUMMARY AND COUNTS: E=00001, W=00000, I=00001, SUPRESSED=00000
==MSG> LABEL MSG.NO. ERROR MESSAGE
==MSG> ------ -------- -----------------------------------------------------------
==MSG> .HAAA JCK0220E STEP DOES NOT CONTAIN REQUIRED DD NAME SYSPRINT
000001 //DB2COB2 JOB ,‘HORIZONT' ,HMSGCLASS=T, CLASS=A,
000002 //JOBLIB DD DISP=SHR,DSN=DSN910.DB9G.SDSNEXIT Error fixed: The insert
000003 DD DISP=SHR,DSN=DSN910.SDSNLOAD IDCAMS step deletes
000004 //DELETE EXEC PGM=IDCAMS
000005 //SYSIN DD * the DSN before its new
000006 DEL SYSH.XINFO.V3R6.DATA.DB2COB2.REPORT creation.
.HAAA SET MAXCC = 0
==MSG> JCK0220E STEP DOES NOT CONTAIN REQUIRED DD NAME SYSPRINT
000008 //PH02CS04 EXEC PGM=IKJEFT01,DYNAMBR=20,COND=(4,LT)
000009 //SYSTSPRT DD SYSOUT=*
000010 //SYSPRINT DD SYSOUT=* Yes, SmartJCL
000011 //REPORT DD DSN=SYSH.XINFO.V3R6.DATA.DB2COB2.REPORT,
000012 // DISP=(,CATLG) , would also verify
GDG processing

SmartJCL – Product Presentation 7

 JCL Validation – PGM not found

EDIT SYSH.TXGC.JOBLIB(DB2COB2) - 01.11 ERRORS OCCURRED, RC=8

Command ===> _____________________________________________________ Scroll ===> PAGE
****** *********************** Top of Data ****************
==MSG> MESSAGE SUMMARY AND COUNTS: E=00001, W=00000, I=00001, SUPRESSED=00000
==MSG> LABEL MSG.NO. ERROR MESSAGE
==MSG> ------ -------- -----------------------------------------------------------
==MSG> .HAAA JCK0440E PROGRAM DSN8BC4 NOT FOUND ON SEARCH PATH
000012 //PH02CS04 EXEC PGM=IKJEFT01,DYNAMBR=20,COND=(4,LT)
000013 //SYSTSPRT DD SYSOUT=*
000014 //SYSPRINT DD SYSOUT=* Program names are not
000015 //REPORT only taken from PGM=
DD DSN=SYSH.XINFO.V3R6.DATA.DB2COB2.REPORT,
000016 // DISP=(,CATLG) ,
000017 // SPACE=(TRK,(10,10),RLSE),
but also DB2 (and IMS)
000018 // DCB=(DSORG=PS,RECFM=FB,BLKSIZE=23474)calls are recognized.
000019 //SYSTIN DD *
000020 DSN SYSTEM(DB9G)
000021 RUN PROGEAM(DSN8BC4) PLAN(DSN8BH91) -
000022 LIB(‘DSN910.DB9G.RUNLIB.LOAD')
.HAAA END
==MSG> JCK0440E PROGRAM DSN8BC4 NOT FOUND ON SEARCH PATH

SmartJCL – Product Presentation 8

 JCL Validation - Utilities

EDIT SYSH.TXGC.JOBLIB(DB2COB2) - 01.11 ERRORS OCCURRED, RC=8

Command ===> _____________________________________________________ Scroll ===> PAGE
****** *********************** Top of Data ****************
==MSG> MESSAGE SUMMARY AND COUNTS: E=00001, W=00000, I=00001, SUPRESSED=00000
==MSG> LABEL MSG.NO. ERROR MESSAGE
==MSG> ------ -------- -----------------------------------------------------------
==MSG> .HAAA JCK0392W GDG BASE DATA SET SPECIFIED WITHOUT A GENERATION NUMBER
==MSG> DSN = DATA:SMFTEMP
==MSG> .HAAA JCK2204E SORT (LINE=00001): INVALID OPERAND IS FOUND (DIELDS)
000700 //SORTSMF EXEC PGM=SORT
.HAAA //SORTIN Besides IDCAMS, IEBGENER,
DD DSN=DATA.SMFTEMP,DISP=(SHR,DELETE,KEEP)
==MSG> JCK0392W GDG BASE DATA SET SPECIFIED WITHOUT A IEBCOPY
GENERATION NUMBER
etc. SORT
==MSG> DSN = DATA.SMFTEMP
000900 //SORTOUT DD DSN=DATA.SMFDUMP(+1); statements are checked.
001000 // DISP=(,CATLG),
001100 // SPACE=(TRK,(500,250),RLSE)
001200 //SYSOUT DD SYSOUT=*
001300 //SYSIN DD *
.HAAA SORT DIELDS=(11,4,CH,A,7,4,CH,A),EQUALS
==MSG> JCK2204E SORT (LINE=00001): INVALID OPERAND IS FOUND (DIELDS)

SmartJCL – Product Presentation 9

 JCL Reformat

Use the reformat function to change the JCL format quickly and easily to
conform readable standards.
• Administrator specifies positions of keyword, value and continuation line
indiviually for each JCL parameter according to your company needs.
• User invokes the function out of the ISPF editor with a simple line command.
• JCL is reformatted automatically according to your specifications.

SmartJCL – Product Presentation 10

 JCL Reformat

Type JREF…

Unformatted JCL is
difficult to read.

SmartJCL – Product Presentation 11

 JCL Reformat

… and get the

reformatted JCL.

SmartJCL – Product Presentation 12

 Rule Dialog – Standard Check

An ISPF dialog supports an “JCL Adminstrator” to specify rules according to

site specific standards easily:

• Every site has individual rules, e.g.

 “the first qualifier of new datasets in production must be PROD”
 “UNIT WORK not allowed if program is SORT”
 …
• It is possible to use SmartJCL’s REXX interface and code such checks.
• The ISPF rule dialog simplifies that. No coding is needed to setup your own
standard checks.

SmartJCL – Product Presentation 13

 Rule Dialog – Standard Check

-----------------------Standard Check: Modify Rule --------------- ROW 1 TO 9 OF 9

Command ===> ___________________________________________________ Scroll ===> PAGE
Commands: AddC Add Condition AddE Add Exception AddA Add Action CANcel
LineCmds: I Insert M Modify D Delete Condition/Exception/Action

Rule name : HLQ g

Description: HLQ of new DSN in prod must be DATA or Here
SYSH we verify the
b DSN of new cataloged
datasets, if the job run in class “P”. If it’s
-----------------------------------------------------------------------------------
_ Condition
_ JOB.CLASS EQ ‘P‘ not okay, a message will be written and an
_ DD.DISP.NORMAL EQ ‘CATLG‘
appropriate RC will be set (that’s defined in
_ Exception the member’s messages).
_ SUBSTR(DD,DSN,1,4) INLIST ‘DATA,SYSH‘

_ Action
_ MESSAGE LAST_JCL_STMT ‘STD000SE'
****** *********************** Bottom of Data *************************************

An ISPF “wizard” guides you step by step to

generate the conditions and actions of the rule.
SmartJCL – Product Presentation 14
 Rule Dialog – Standard Check

EDIT SYSH.TXGC.JOBLIB(DB2COB2) - 01.11 ERRORS OCCURRED, RC=8

Command ===> ___________________________________________________ Scroll ===> PAGE
****** ************************* Top of Data **************************************
==MSG> MESSAGE SUMMARY AND COUNTS: E=00001, W=00000, I=00000, SUPRESSED=00000
==MSG> LABEL MSG.NO. ERROR MESSAGE
==MSG> ------ -------- -----------------------------------------------------------
==MSG> .HAAA STDOOOSE 1ST QUALIFIER OF NEW DSN IN PROD MUST BE DATA OR SYSM
000005 //SYSPRINT DD SYSOUT=*
000006 //SYSIN DD * The result of the new standard
000007 DEL P390K.XINFO.V3R6.DATA.DB2COB2.REPORT rule (DSN starts with P390K
000008 SET MAXCC = 0
000009 //PH02CS04 EXEC PGM=IKJEFT01,DYNAMBR=20,COND=(4,LT) which is not allowed in prod).
000010 //SYSTSPRT DD SYSOUT=*
000011 //SYSPRINT DD SYSOUT=*
000012 //REPORT DD DSN=P390K.XINFO.V3R6.DATA.DB2COB2.REPORT,
000013 // DISP=(,CATLG) ,
000014 // SPACE=(TRK,(10,10),RLSE),
.HAAA // DCB=(DSORG=PS,RECFM=FB,BLKSIZE=23474)
ST
==MSG> STDOOOSE 1 QUALIFIER OF NEW DSN N PROD MUST BE DATA OR SYSH
000015 //SYSTSIN DD *

SmartJCL – Product Presentation 15

 Change Facility

In addition to the REXX Interface, SmartJCL has an integrated change

facility. It enables you to implement automatic and/or mass changes easily.
Examples:

• CHANGE PARM=DSN , VALUE=PROD* , NEWVAL=TEST*

• DELETE PARM=UNIT
• DELETE JOB=ABC% , PGM=IDCAMS , PARM=UNIT , VALUE=TAPE4

In case of more complex demands,

use the REXX Interface.

SmartJCL – Product Presentation 16

 SRI – SmartJCL REXX Interface

SRI allows to access all JCL parameters out of your REXX programs.

• SRI provides access to all JCL statements for verification and modification by
writing simple REXX code.
• SRI has functions to access JCL constructs easily, e.g. if qualifier (“dataset
name”, FIRST)=“TEST”then …
• SRI contains functions to delete, insert or modify all statements, even complete
steps can be inserted automatically!
• SRI is a powerful tool to simplify JCL handling, e.g. to
 Implement your own checks and setup a “JCL quality insurance system”.
 To change JCL automatically.

SmartJCL – Product Presentation 17

 REXX Interface

There are a lot of well documented

examples which explain how the SRI
functions are working.

Here we go through all

statements, if it’s a DD we
go through all parameters,
if it is DSN= we check the
name and do something.

SmartJCL – Product Presentation 18

 Remote Check

The Remote Check enables you to perform the JCL check on another
system. Advantages are:
• Simplifies checking JCL from the test or development system against the
production libraries on the production system.
• It avoids to transfer the JCL manually to the other (remote) system, logon to that
system and check it locally at this system.
• SmartJCL remote check uses standard TCP/IP architecture
 Simple TCP/IP protocol.
 Easy to install, easy to use.
• It works like this:
 The user creates or modifies JCL on the development system.
 The user calls RCK macro with parameter SRV=“target system”.
 SmartJCL transfers the JCL, runs the check remotely on the “target system” and
sends back the resulting messages.

SmartJCL – Product Presentation 19

 Scheduler Interfaces

------------------- IOA PRIMARY OPTION MENU ------------------(1)

OPTION ===> USER P390K
DATE 24.08.18

2 JOB SCHEDULE DEF CTM Job Scheduling Definition

3 ACTIVE ENV. CTM Active Environment Display
4 COND/RES IOA Conditions/Resources Display
5 LOG IOA Log Display
6 UTILITIES IOA On-Line Utilities
7 MANUAL COND IOA Manual Conditions Display
8 CALENDAR DEF IOA Calendar Definition
IV VARIABLE DATABASE IOA Variable Database Definition Facility
C CMEM DEFINITION CTM Event Manager Rule Definition
A MISSION STATUS CTD Active Mission Status Display
M MISSION DEF CTD Prt/Bkp/Rst Mission Def
R REPORT DEF CTD Rept Decollating Mission Def
T RECIPIENT TREE CTD Recipient Tree Definition
U USER REPORTS CTD Reports – Status/Update/View
F PC PACKET STATUS CTD File Transfer to CTD/PC
DO OBJECTS CTD Objects Facility

COMMANDS: X - EXIT, HELP, INFO, SET OR CHOOSE A MENU OPTION

IBM’s IWS BMC’s CTM

Skip Scheduler interfaces

SmartJCL – Product Presentation 20

 IWS Interface

One of the major benefits of SmartJCL is the intergrated interface to IWS:

• SmartJCL will simulate variable substitution (important if you use IWS

variable in e.g. DSN etc.).
• Optional display IWS info in JCL (e.g. Application id, Predecessors,
Successors and Special Ressources).
• Select jobs to be checked from AD or CP by Application id, Owner Id, Input
Arrival etc.
• Check JCL in production sequence and simulate catalog actions.
• Several simulation modes allow to check the complete production in
advance (and fix errors in advance).

SmartJCL – Product Presentation 21

 IWS Interface – Edit Macro

Use macro OSJ and JCK to first resolve

the variable and then call the check.

If you use IWS variable e.g. in a DSN,

it leads to an error message.

SmartJCL – Product Presentation 22

 IWS Interface – Edit Macro

SmartJCL searches in the CP and AD for the job. You can choose which one
should be the input and if it is AD you can enter a simulation date in the future.

SmartJCL – Product Presentation 23

 IWS Interface – Edit Macro

BROWSE SYSH13076.T122551.RA000.P390K.R0198945 CHECK SUCCESSFUL, RC=0

COMMAND ===> ___________________________________________________ Scroll ===> PAGE
******************************** Top of Data **************************************
OSJM215I JCL-VARIABLE SUBSTITUTION SUCCESSFULLY
*********************** JCL PREPARED BYSMARTJCL/SIMJCL*****************************
//DB2COB2T JOB ,‘HORIZONT‘,MSGCLASS=T,Class=A
//*%OPC SCAN The variable are resolved,
//JOBLIB DD DISP=SHR,DSN=DSN910.DB9G.SDSNEXIT
// DD DISP=SHR,DSN=DSN910.SDSNLOAD no errors anymore.
//DELETE EXEC PGM=IDCAMS
//SYSPRINT DD SYSOUT=*
//SYSIN DD *
DEL SYSH.XINFO.V3R6.DATA.DB2COB2.REPORT.D130816
SET MAXCC = 0
//PH02CS04 EXEC PGM=IKJEFT01,DYNAMBR=20,COND=(4,LT)
//SYSTSPRT DD SYSOUT=*
//SYSPRINT DD SYSOUT=*
//SYSOUT DD SYSOUT=*
//REPORT DD DSN=SYSH.XINFO.V3R6.DATA.DB2COB2.REPORT.D130B16,
// DISP=(,CATLG) ,

SmartJCL – Product Presentation 24

 IWS Interface – ISPF + Batch

e.g. select from AD

The ISPF dialog is mainly used to generate

batch jobs and consists of three parts:
Selection, Simulation, JCL Check.
SmartJCL – Product Presentation 25
 IWS Interface – Select from AD

The result will be a list of job

names in a file.

SmartJCL – Product Presentation 26

 IWS Interface – Select from AD

Additional selection criteria

SmartJCL – Product Presentation 27

 IWS Interface – Select from CP

The result will be a list of job

names in a file.

SmartJCL – Product Presentation 28

 IWS Interface – Select from CP

Additional selection criteria

SmartJCL – Product Presentation 29

 Checking Jobs in Production Sequence

Without checking the jobs in the correct sequence, a JCL checker displays
a message like „dataset not found“.
SmartJCL TWS Interface sort the jobs by planned start times and therefore
they are checked in correct run sequence.

Job creates a file

Job reads previously created file

and creates other files.

SmartJCL – Product Presentation 30

 IWS Interface - Forecast

The forecast creates a trial plan

for any date in the future.

SmartJCL – Product Presentation 31

 IWS Interface - Forecast

As always, the result will be a

list of job names in a file.

SmartJCL – Product Presentation 32

 IWS Interface – Simulation in Batch

Input is the list of jobs.

If the select job

did run and the
joblist file has
been created, the
simulation can be
started.

SmartJCL – Product Presentation 33

 IWS Interface – Simulation in Batch

VIEW P390K.SMARTJCL.TWS.JCLOUT Columns 000001

COMMAND ===> ___________________________________________________ Scroll ===> PAGE
000202 00***** JOB: DB2COB2T ADID: XINFODB2DEMOT OPNO: 010 WSID: CPU,
000203 20//DB2COB2T JOB ,‘HORIZONT' ,HMSGCLASS=T, CLASS=A The output file contains
000204,20//*/OPC SCAN
000205 20//JOBLIB DD DISP=SHR,DSN=DSN910.DB9G.SDSNEXIT JCL of all jobs, sorted by
000206 20// DD DISP=SHR,DSN=DSN910.SDSNLOAD planned start, all variable
000207 20//DELETE EXEC PGM=IDCAMS
000208 20//SYSPRINT DD SYSOUT=*
are resolved.
000209 20 DEL SYSH.XINFO.V3R6.DATA.DB2COB2.REPORT.D130816
000210 20 SET MAXCC = 0
000211 20//*
000212 20//PH02CS04 EXEC PGM=IKJEFT01,DYNAMNBR=20,COND=(4,LT)
000213 20//SYSTSPRT DD SYSOUT=*
000214 20//SYSPRINT DD SYSOUT=*
000215 20//REPORT DD DSN=SYSH.XINFO.V3R6.DATA.DB2COB2.REPORT.D130816,
000216 20// DISP=(,CATLG),
000217 20// SPACE=(TRK,(10,10),RLSE),
000218 20// DCB=(DSORG=PS,RECFM=FB,BLKSIZE=23474)
000219 20//SYSIN DD*

SmartJCL – Product Presentation 34

 IWS Interface – JCL Check in Batch

SmartJCL – Product Presentation 35

 IWS Interface – JCL Check in Batch

Now you can start the JCL

check of all previously
selected and simulated jobs.

SmartJCL – Product Presentation 36

 IWS Interface – JCL Check in Batch

The result is (optional) a

Display Filter View Print Options Help
detailed list of the JCL and it’s
-----------------------------------------------------------------------------------
SDSF OUTPUT DISPLAY P390KX JOB02145 DSID 102 LINE 0 Columns 02- 81
COMMAND INPUT ===> errors and a summary which
Scroll ===> PAGE
********************************** TOP OF DATA ************************************
contains all messages
***********************************************************************************
JCKIPS – CHECK JCL
HORIZONT GMBH, MUNICH, 2012, ALL RIGHTS RESERVED (including the standard check).
COMPILED WITH IBM ENTERPRISE PLI V3R5 AT 11.SEP.12 22.37.18
***********************************************************************************
JCKIPS STARTED FOR USER P390K AT 2013-03-17, 13:39:43:786
***********************************************************************************
MSG.NO. MESSAGE TEXT
------- --------------------------------------------------------------------------
***** JOB: DB2COB2 ADID: XINFODB2DEMO OPNO: 010 WSID: CPU You may use the
JCK0440E PROGRAM DSN8BC4 NOT FOUND ON SEARCH PATH
***** JOB: DB2Pl12 ADID: XINFODB2DEMO
“migrated info” to recall
OPNO: 015 WSID: CPU
JCK0080I PROCEDURE XXRJUNC WAS EXPANDED FROM DSN:SYSH.XINFO.V3R5.PROCLIBrequired datasets
***** JOB: DB2COMP ADID: XINFODB2DEMO OPNO: 020 WSID: CPU
automatically in advance.
JCK0080I PROCEDURE XXRJUNC WAS EXPANDED FROM DSN:SYSH.XINFO.V3R5.PROCLIB
***** JOB: DB2COMP ADID: XINFODB2DEMO OPNO: 020 WSID: CPU
JCK0080I PROCEDURE XXRJUNC WAS EXPANDED FROM DSN:SYSH.XINFO.V3R5.PROCLIB
JCK0540I DATASET IS MIGRATED DSN = “SYSH.XINFO.V3R5.DATA.DB2COB2.REPORT”
JCK0540I DATASET IS MIGRATED DSN = “SYSH.XINFO.V3R5.DATA.DB2COB2.REPORT”

SmartJCL – Product Presentation 37

 Control-M Interface

Besides TWS SmartJCL also supports Control-M. It enables you to:

• Simulate Control-M variable substitution (AUTO-Edit Function).

• Select the jobs to be checked by Table, Group, Application etc.

Skip CTM interface

SmartJCL – Product Presentation 38

 Control-M ISPF Dialog

------------------------- CTM/SimJCL Startpanel -----------------------

Command ===>

Select one of the following options and press ENTER

Control-M Interface
1 JOBLIST - Select jobs for simulation Mainpanel

2 SIMULATE - Start JCL simulation based on previous selection

3 CHECK - Start JCL check based on previous simulation

4 CHECK - Start JCL check without simulation

5 REFORMAT - Start JCL reformat (pre release)

Note: Options 3, 4, 5 are only available, if a JCL checker

is installed, for example SmartJCL

SmartJCL – Product Presentation 39

 Control-M ISPF Dialog

--------------------- CTM/SimJCL - Create Joblist --------------------

Command ===>

top : RESET restore default values, JC change jobcards

Selection
Table ===> ____________________
Application ===> ____________________
Select Jobs by using
Group ===> ____________________ Control-M fields.
Jobname ===> ________
Owner ===> ______________________________

Schedule Library
DSN ===> DATA.CTM.MAN.SCHEDULE___________________

Output files
Joblist ===> P390G.MJV.SELJOBS_______________________
Variablelist ===> P390G.MJV.SETVAR________________________

Submit ===> S S submit job, E edit before submit

SmartJCL – Product Presentation 40

 Control-M ISPF Dialog

------------------------- CTM/SimJCL - Simulate ------------------------

Command ===>

JCL LIBRARY MODE

For simulation of private members enter Y: N (Y or N)

SCHEDULING LIBRARY MODE

For simulation of the jobs unloaded from the SCHEDULE LIBRARY.
Files
Joblist (Input) ===> P390G.MJV.SELJOBS________________
JCL (Output) ===> P390G.MJV.JCLOUT_________________
CONTROL-M GLOBAL LIBRARY ===> P390A.MSJ.QM.HELPLIB_____________

Simulation (optional parameters) Specify desired date

GROUP ===> ____________________
$SIGN ===> _
WDATE ===> ______ DDMMYY
ODATE ===> ______ DDMMYY

Parameters
Submit ===> S S submit job, E edit

SmartJCL – Product Presentation 41

 Control-M Variables

File Edit Confirm Menu Utilities Compilers Test Help

-------------------------------------------------------------------------
EDIT P390P.TEST.CNTL(SIMJCL01) - 01.04
COMMAND ===>
****** *********************** Top of Data ******************************
000001 //SIMJCL01 JOB 'HORIZONT',MSGCLASS=T,NOTIFY=&SYSUID
000002 //*%OPC SCAN
Variable …
000003 //****************************************************************
000004 //DELETE EXEC PGM=IEFBR14
000005 //DD1 DD DSN=P390A.%%GROUP..%%NO,DISP=SHR
Variable …
000006 //****************************************************************
000007 //ALLOC EXEC PGM=IEFBR14,COND=(4,LT)
000008 //DD1 DD DSN=P390A.%%JOBNAME..LIST%%NO,
000009 // DISP=(,CATLG),SPACE=(CYL,(2,5),RLSE),
Variable …
000010 //****************************************************************
000011 //WRITER EXEC PGM=REPORT01,COND=(4,LT)
000012 //OUT1 DD DISP=SHR,DSN=P390A.%%JOBNAME..LIST%%NO
000013 //IN1 DD DISP=SHR,DSN=P390A.%%JOBNAME
****** ******************** Bottom of Data ******************************
Variable …

SmartJCL – Product Presentation 42

 Control-M Variables

File Edit Confirm Menu Utilities Compilers Test Help

--------------------------------------------------------------------------
EDIT P390P.TEST.CNTL(SIMJCL01) - 01.04
COMMAND ===>
****** *********************** Top of Data *******************************
000001 //SIMJCL01 JOB 'HORIZONT',MSGCLASS=T,NOTIFY=&SYSUID
000002 //*%OPC SCAN … must be substituted
before simulation.**************
000003 //**************************************************
000004 //DELETE EXEC PGM=IEFBR14
000005 //DD1 DD DSN=P390A.%%GROUP..%%NO,DISP=SHR
000006 //*****************************************************************
000007 //ALLOC EXEC PGM=IEFBR14,COND=(4,LT)
000008 //DD1 DD DSN=P390A.%%JOBNAME..LIST%%NO,
000009 // DISP=(,CATLG),SPACE=(CYL,(2,5),RLSE),
.HAAA // DISP=(,CATLG),SPACE=(CYL,(2,5),RLSE)
==MSG> JCK0316E - INVALID DATA SET NAME FORMAT
000009 //*****************************************************************
000010 //WRITER EXEC PGM=REPORT01,COND=(4,LT)
.HAAI //OUT1 DD DISP=SHR,DSN=P390A.%%JOBNAME

SmartJCL – Product Presentation 43

 Control-M Variables

File Edit Confirm Menu Utilities Compilers Test Help

--------------------------------------------------------------------------
EDIT P390P.TEST.CNTL(SIMJCL01) - 01.04
COMMAND ===>
****** *********************** Top of Data *******************************
… in order to perform a
000001 //SIMJCL01 JOB 'HORIZONT',MSGCLASS=T,NOTIFY=&SYSUID
=NOTE= --SIMJCL01 JOB 'HORIZONT',MSGCLASS=T,NOTIFY=P390G
correct validation.
000002 //*%OPC SCAN
000003 //*****************************************************************
000004 //DELETE EXEC PGM=IEFBR14
000005 //DD1 DD DSN=P390A.TEST.LIST10,DISP=SHR
000006 //*****************************************************************
000007 //ALLOC EXEC PGM=IEFBR14,COND=(4,LT)
000008 //DD1 DD DSN=P390A.SIMJCL01.LIST10,
000009 // DISP=(,CATLG),SPACE=(CYL,(2,5),RLSE),
000010 //*****************************************************************
000011 //WRITER EXEC PGM=REPORT01,COND=(4,LT)
000012 //OUT1 DD DISP=SHR,DSN=P390A.SIMJCL01.LIST10

SmartJCL – Product Presentation 44

 JCL Validation – ISPF

---------------------------- SmartJCL Check ------------- Row 1 to 2 of 2

Command ===> ____________________________________________ Scroll ===>PAGE
Commands: BAT Create batch job, FORE run in foreground
LineCmds: S Select, I Insert, D Delete, X Delete selection
Continue with ENTER back with END or CANcel
L Joblib Sel. Members
- ------------------------------------------------------- --------------
S SYSH.TXDC.JOBLIB 0
_ SYSH.XINFO.V3R6.CNTL 0
**************************** Bottom of data *****************************

There is an extra ISPF dialog to

run JCL checks for a set of jobs
Define and select a joblib to
in batch or foreground.
select the job member.

SmartJCL – Product Presentation 45

 JCL Validation – ISPF

---------------------- SmartJCL Check Member Selection ------------------

Command ===> ____________________________________________ Scroll ===> CSR
Commands: JCK Check member Del Delete all selections
LineCmds: S or 1,2,3… Select member B Browse member E Edit member
X Delete selection
Finish with END or CANcel
Joblib : SYSH.TXDC.JOBLIB
Name Prompt Size Created Changed ID
--------- -------- ---- ---------- ---------- -------- ------
_________ CRIT7 5 2006/10/02 2006/10/02 14:19:40 P390K
_________ CSEDLYD1 13 2011/05/26 2011/05/26 16:54:11 P390K
1________ DB2C 1. MEMBER 35 2005/09/21 2013/03/17 13:34:17 P390K
3________ DB2COB2 2. MEMBER 31 2004/01/19 2013/03/16 11:35:33 P390K
_________ DB2COB2T 34 2013/03/13 2013/03/17 13:36:28 P390K
2________ DB2COMP 3. MEMBER 60 2004/01/28 2013/03/17 08:59:26 P390K
_________ DB2PL11 38 2004/01/28 2013/03/17 13:35:29 P390K
_________ DB2PL12 32 2004/01/28 2013/03/17 13:35:51 P390K
_________ DB2RUNS 311 2010/07/30 2010/07/30 13:50:06 P390K
_________ DCPJ02 11 2012/06/28 2012/06/28 11:52:52 P390K
_________ DCPJ02 7 2012/06/28 2012/06/28 11:54:11 P390K
Select the member and their sequence
by entering a number.

SmartJCL – Product Presentation 46

 JCL Validation – ISPF

---------------------------- SmartJCL Check ------------- Row 1 to 2 of 2

Command ===> FORE________________________________________ Scroll ===>PAGE
Commands: BAT Create batch job, FORE run in foreground
LineCmds: S Select, I Insert, D Delete, X Delete selection
Continue with ENTER back with END or CANcel
L Joblib Sel. Members
- ------------------------------------------------------- --------------
_ SYSH.TXDC.JOBLIB 3
_ SYSH.XINFO.V3R6.CNTL 0
**************************** Bottom of data *****************************

Command BAT would generate a job to

run the check in batch, command FORE
run it in foreground.

SmartJCL – Product Presentation 47

 JCL Validation – ISPF

---------------------------- SmartJCL Check ------------- Row 1 to 2 of 2

Command ===> FORE________________________________________
SmartJCL Check in Foreground Scroll ===>PAGE
Command ===> 1
Comma nds: BAT Create batch job, FORE run in foreground
LineC mds: S Select,
JCKIPS I :
started Insert,
18 Mar D2013,
Delete, X Delete selection
14:37:15
Conti nue with ENTER
JCKIPS ended back
: 18with
Mar END or14:37:18
2013, CANcel
JCKIPS RC : 4
L Job lib
Members checked : 3 Sel. Members
- ------------------------------------------------------- --------------
Members with informations : 2
_ SYS H.TXDC.JOBLIB 3
Members with warnings
_ SYS H.XINFO.V3R6.CNTL : 1 0
Members with errors : 0
***** ********************** Bottom of data ******************************
To display the output of the foreground check use the following
options:
1 Browse summary (messages only)
2 Browse details (JCL with included messages)
3 Browse sysprint
4 Browse migrated datasets
**********************************************************************

The check is done, choose one of the

reports, e.g. the summary.

SmartJCL – Product Presentation 48

 JCL Validation – ISPF

Menu Utilities Compilers Help

___________________________________________________________________________________
BROWSE P390K.SmartJCL.JCKSUMO Line 00000000 Col 001 080
COMMAND INPUT ===> _______________________________________________ Scroll ===> PAGE
********************************** Top of Data ************************************
***********************************************************************************
JCKIPS – CHECK JCL
HORIZONT GMBH, MUNICH, 2012, ALL RIGHTS RESERVED
COMPILED WITH IBM ENTERPRISE PLI V3R5 AT 11.SEP.12 22.37.18
***********************************************************************************
JCKIPS STARTED FOR USER P390K AT 2013-03-17, 13:39:43:786
***********************************************************************************
MSG.NO. MESSAGE TEXT
------- --------------------------------------------------------------------------
JCK0080I PROCEDURE XXRJUNC WAS EXPANDED FROM DSN:SYSH.XINFO.V3R5.PROCLIB
STD0006W CLASS for production must be P or A
JCK0080I PROCEDURE XXRJUNC WAS EXPANDED FROM DSN:SYSH.XINFO.V3R5.PROCLIB
JCK0540I DATASET IS MIGRATED DSN = “SYSH.XINFO.V3R5.DATA.DB2COB2.REPORT”
JCK0540I DATASET IS MIGRATED DSN = “SYSH.XINFO.V3R5.DATA.DB2COB2.REPORT”
***********************************************************************************
SEQUENTIAL INPUT FROM JCKJCLI:
JOBS READ: 0
JOBS WITH INFORMATIONS: 0
JOBS WITH WARNINGS: 0
JOBS WITH ERRORS: 0
MEMBER INPUT FROM JUPJI001 to JUPI999:
MEMBERS READ: 3 The summary shows all
messages, including your own
standard check messages.

SmartJCL – Product Presentation 49

 Thanks for your attention! Do you have any questions?

Please feel free to visit us in Munich or send an email to

[email protected]