A delimiter statement is used

Input stream ends (EOF in a UNIX file)

A control statement other than a delimiter statement is used

A specified delimiter is used when the DLM operand is specified

Syntax

* DATA

Note

The asterisk (*) operand cannot be used along with the DLM operand.

Examples

The following example uses in-stream data as SYSIN with asterisk (*).

//SYSIN DD *
this is sysin data
/*

The following example shows that instream data is terminated by a control statement.

//SYSIN DD *
this is sysin data
//SYSOUT DD SYSOUT=*

Syntax

ACCODE = value

Syntax

AMP = value

Syntax

AVGREC = {U|K|M}

The AVGREC operand is applied only when the first field of the SPACE operand is record length. The unit is used for the initial value and additional value of the SPACE operand.

When the AVGREC operand is used, space quotas are calculated as follows:

Initial space quota = initial value * record length * the unit specified with AVGREC
Additional space quota = additional value * record length * the unit specified with AVGREC

Note

The AVGREC operand is ignored if the first field of the SPACE operand is either TRK or CYL.

Example

The following example specifies M for the AVGREC operand. In this case, the initial space quota is 5 * 100 * 1048576 bytes, and the additional space quota is 2 * 100 * 1048576 bytes.

//EX1 DD DSN=NEW.DATASET,DISP=(NEW,CATLG),SPACE=(100,(5,2)),AVGREC=M

Syntax

BLKSIZE = {value | valueK | valueM}

Note

If the BLKSIZE operand is specified as a parameter of the DCB operand, it is overridden and ignored.

Example

The following example sets BLKSIZE to 4000.

//EX1 DD DSN=NEW.DATASET,DISP=(NEW,CATLG),
//       RECFM=FB,LRECL=80,BLKSIZE=4000

Syntax

BLKSZLIM = {value | valueK | valueM | valueG}

Syntax

BURST = {YES | Y | NO | N}

Syntax

CCSID = value

Syntax

CHARS = {table name}
        {(table name[,table name])}
        {DUMP}
        {(DUMP[,table name])}

Note

Example

The following example sends information of CHARS=(TBJ1,TBJ2) to an external printer module.

//EX1 DD SYSOUT=A,CHARS=(TBJ1,TBJ2)

Syntax

CHKPT = EOV

Syntax

CNTL = {*.label }
       {*.stepname.label }
       {*.stepname.procstepname.label}

Syntax

COPIES = (copy count[,(group copy count[,group copy count]...)])

Note

Example

The following example sends information from COPIES=(2,(2,1)) to an external printer module.

//OUTPUT DD SYSOUT=A,COPIES=(2,(2,1))

Syntax

DATACLAS = class name

Note

An error occur if the corresponding data class is not configured in the sms subject during OpenFrame configuration.

Example

The following example specifies a data class as DATA01.

//DD1 DD DSN=NEW.DATASET,DISP=(NEW,CATLG),DATACLAS=DATA01

Syntax

DCB = (dcb parameter[,dcb parameter]...)
DCB = ({dataset name}                   [,dcb parameter]...)
      ({*.DD name}                                       )
      ({*.STEP name.DD name}                              )
      ({*.STEP name.procedure STEP name.DD name}             )

Syntax

DDNAME = DD name

Note

Example

In the following example, the SYSOUT statement references the DD2 statement to set its data set. DD2 is only referenced without being used.

//STEP1  EXEC PGM=TMAXSOFT
//SYSOUT DD DDNAME=DD2
//DD2    DD SYSOUT=*

In the following example, IN in STEP2 backwardly references OUT in STEP1. The referenced part is OUT in STEP1, not DD2 in STEP1.

//STEP1  EXEC PGM=TMAXSOFT
//OUT    DD DDNAME=DD2
//DD2    DD DSN=TEST.DATASET,DISP=(NEW,PASS)
//STEP2  EXEC PGM=TMAXSOFT
//IN     DD DSN=*.STEP1.OUT,DISP=(OLD,DELETE)
//

Syntax

DEST = destination

Note

Example

The following example sends information in DEST=LOCAL to an external printer module.

//EX1 DD SYSOUT=A,DEST=LOCAL

Syntax

DISP = ([NEW] [,DELETE] [,DELETE])
        [OLD] [,KEEP]   [,KEEP])
        [SHR] [,PASS]   [,CATLG])
        [MOD] [,CATLG]  [,UNCATLG])
        [,]   [,UNCATLG]
              [,]

Note

Example

The following example writes a temporary data set in the direct access volume and deletes it when the JOB STEP ends.

//TEMP DD UNIT=DISK,SPACE=(TRK,(5,1))

The following example requests an exclusive use of a data set 'ORG.SOURCE.TEST' which is written in a volume with a serial number of 333333. The data set is cataloged when the JOB STEP ends.

//DD1 DD DSN=ORG.SOURCE.TEST,UNIT=8598,
//       DISP=(OLD,CATLG),
//       VOL=SER=333333

The following example requests an exclusive use of a data set 'ORG.LIB' which has already been cataloged. The data set is deleted when the JOB STEP ends. The data set is not only deleted, but also uncataloged.

//DD2 DD DSN=ORG.LIB.DISP=(OLD,DELETE)

Syntax

DLM = delimiter

Example

The following example specifies AA as the delimiter to use OS JCL as the in-stream data of DD1.

//DD1    DD DATA,DLM=AA
//JOB1   JOB                        --|
//STEP1  EXEC PGM=TMAXSOFT            | ---> In-stream data of DD1
//                                  --|
AA
//DD2 ...

Syntax

DSID = {id}
       {(id[,V])}

Syntax

{DSNAME | DSN} = {data set name                  }
                 {data set name (member name)           }
                 {data set name (generation number)          }
                 {&&data set name                }
                 {*.DD name                      }
                 {*.STEP name.DD name             }
                 {*.STEP name.procedure STEP name.DD name}

The following is a description of temporary data sets related to "&&data set name" as described earlier. A temporary data set is created in the following format.

Note

Example

The following specifies a data set as TMAX.DATASET.

//DD1     DD  DSN=TMAX.DATASET,DISP=SHR

In the following example, the length of a data set exceeds 44 characters, causing a syntax error.

//DD1     DD  DSN=TMAX.DATASET.OVERFLOW.LENGTH.COLUMN44.ISOCCUR.PARSE.ERROR

The following example specifies a data set and the member.

//DD1     DD  DSN=TMAX.PDSLIB(DATASET),DISP=(NEW,DELETE,DELETE)

The following example specifies a generation data set.

//DD1     DD  DSN=TMAX.GDG(+1),DISP=(NEW,DELETE,DELETE)

The following example specifies a temporary data set.

//DD1     DD  DSN=&&TEMP,DISP=(NEW,PASS)

The following example specifies a temporary data set as SYSOUT data set.

//DD1     DD  DSN=&&TEMP,SYSOUT=*

The following example omits the DSN operand.

//DD1     DD  DISP=(NEW,PASS)

The following example references the data set name of the STEP. Here, the data set name of DD2 is TMAX.DATASET.

//DD1     DD  DSN=TMAX.DATASET,DISP=SHR
//DD2     DD  DSN=*.DD1,DISP=SHR

The following example references the data set name of the previous STEP. Here, the data set name of STEP 2 DD1 is TMAX.DATASET.

//STEP1   EXEC PGM=TMAXSOFT
//DD1     DD  DSN=TMAX.DATASET,DISP=SHR
//STEP2   EXEC PGM=TMAXSOFT
//DD1     DD  DSN=*.STEP1.DD1,DISP=SHR

The following example references the data set name of the previous procedure STEP. Here, the data set name of STEP2 DD1 is TMAX.DATASET.

//JOB1     JOB  CLASS=A,MSGCLASS=A
//TMAXPROC PROC
//PSTEP1   EXEC PGM=TMAXSOFT
//PDD1     DD   DSN=TMAX.DATASET
//         PEND
//STEP1    EXEC TMAXPROC
//STEP2    EXEC PGM=TMAXSOFT
//DD1      DD   DSN=*.STEP1.PSTEP1.PDD1

Syntax

DSNTYPE = {LIBRARY|HFS|PDS|PIPE|EXTREQ|EXTPREF|LARGE|BASIC}

Note

If DSORG is specified, DSNTYPE is ignored.

Example

The following example specifies the DSNTYPE as PDS.

//DD1 DD DSN=NEW.DATASET,DISP=(NEW,CATLG),DSNTYPE=PDS

Syntax

DUMMY

Example

The following example specifies SYSOUT as DUMMY.

//SYSOUT DD DUMMY

Syntax

DYNAM

Syntax

EXPDT = {yyddd|yyyy/ddd}

Note

Example

The following example specifies the expiration date of a data set as December 31, 2010.

//DD1 DD DSN=NEW.DATASET,DISP=(NEW,CATLG),EXPDT=2010/365

Syntax

FCB = fcb-name

Syntax

FILEDATA = {BINARY | TEXT }

Syntax

FLASH = (film identification name〔,number of copies〕)

Note

Example

The following example sends the information of FLASH=(FLM1,2) to an external printer module.

//EXF1 DD SYSOUT=A,FLASH=(FLM1,2)

Syntax

FREE = {END | CLOSE}

Syntax

HOLD = {YES | Y | NO | N}

Note

If printing is not for SYSOUT data sets, the HOLD operand is ignored.

Example

The following example specifies the printing status for SYSOUT data sets to HOLD.

//SYSOUT DD SYSOUT=A,HOLD=YES

Syntax

KEYLEN = value

Note

Example

The following example specifies KEYLEN of a ISAM data set as 10.

//DD1 DD DSN=ISAM.NEW.DATASET,DISP=(NEW,CATLG),
//       KEYLEN=10,DCB=(RECFM=FB,DSORG=IS,LRECL=72)

Syntax

KEYOFF = value

Note

Example

The following example specifies KEYOFF of an ISAM data set as 20.

//DD1 DD DSN=ISAM.NEW.DATASET,DISP=(NEW,CATLG),
//       KEYLEN=10,KEYOFF=20,DCB=(RECFM=FB,DSORG=IS,LRECL=72)

Syntax

LABEL = ([data set sequence number][,AL] [,PASSWORD][,IN] [,EXPDT={yyyy/ddd}])
                          [,AUL][,NOPWREAD][,OUT]        {yyddd}
                          [,BLP][,]        [,]   [,RETPD=nnnn]
                          [,LTM]
                          [,NL]
                          [,NSL]
                          [,SL]
                          [,SUL]
                          [,]

Note

Example

The following example stores a new data set 'TMAX.PRESERVE' on a magnetic tape volume for permanent retention.

//DD2 DD DSN=TMAX.PRESERVE,UNIT=848X-1,
//       DISP=(,KEEP),VOL=SER=111111,
//       LABEL=EXPDT=99365

Syntax

LGSTREAM = value

Syntax

LIKE = data set name

Note

An error may occur if the specified data set is not cataloged.

Example

The following example gets attributes of a new data set from those of LIKE.DATASET.

//DD1 DD DSN=NEW.DATASET,DISP=(NEW,CATLG),LIKE=LIKE.DATASET

Syntax

MGMTCLAS = class name

Note

An error may occur if the corresponding management class is not configured in the sms subject under OpenFrame Configuration.

Example

The following example specifies the management class name as MGMT01.

//DD1 DD DSN=NEW.DATASET,DISP=(NEW,CATLG),MGMTCLAS=MGMT01

Syntax

MODIFY = (module name[,table number])

Note

Example

The following example sends information from CHARS=(TBJ0,TBJ1), MODIFY=(TLE2,2) to an external printer module.

//OUT1 DD SYSOUT=A,CHARS=(TBJ0,TBJ1),
//        MODIFY=(TLE2,2)

Syntax

OUTLIM = value

Note

If OUTLIM is set to 0, the number of records is unlimited.

Syntax

OUTPUT = (reference[,reference]...)

Note

An error may occur if there exists no OUTPUT statement to be referenced.

Example

The following example references an OUTPUT statement.

//JOB1    JOB    CLASS=A,MSGCLASS=A
//OUT1    OUTPUT COPIES=5,OUTDISP=WRITE
//STEP1   EXEC   PGM=TMAXTEST
//OUT2    OUTPUT COPIES=3,OUTDISP=HOLD
//OUTDD1  DD     SYSOUT=*,OUTPUT=(*.OUT1,*.OUT2)
//SYSOUT  DD     SYSOUT=*
//STEP2   EXEC   PGM=TMAXTEST
//OUTDD2  DD     SYSOUT=*,OUTPUT=*.STEP1.OUT2
//SYSOUT  DD     SYSOUT=*
//

In the previous example, the OUTDD1 SYSOUT data set references OUT1 and OUT2, and output is handled once with the setting of OUT1 and once with the setting of OUT2. The OUTDD2 SYSOUT data set references OUT2 in STEP1, and output is handled with the setting of OUT2. As a result, output is handled five times: twice for OUTDD1, once for OUTDD2, and twice for SYSOUT in each STEP.

Syntax

PATH = 'file-path'

Syntax

PATHDISP = ([KEEP][,KEEP] )
           ([DELETE][,DELETE])

Syntax

PATHMODE = {file-access-attribute} | {(file-access-attribute[,file-access-attribute]...)}

Syntax

PATHOPTS = {file-option} | {(file-option[,file-option]...)}

Syntax

PROTECT = {YES | Y}

Syntax

RECFM={F[B][A|M]}
      {V[B|S|BS][A|M]}
      {L[A|M]}
      {U[A|M]}

Note

If RECFM is specified as a parameter of the DCB operand, this operand is overridden and ignored.

Example

The following example specifies RECFM as FB.

//DD1 DD DSN=NEW.DATASET,DISP=(NEW,CATLG),RECFM=FB,LRECL=80

Syntax

RECORG = {KS | ES | RR | LS}

Syntax

REFDD = {*.DD name}
        {*.STEP name.DD name}
        {*.STEP name.procedure STEP name.DD name}

Note

If no DD statement specified with a backward reference exist, the job ends in the FLUSH state.

Example

The following example uses REFDD to fetch the attributes of RECFM and LRECL from DD1.

//DD1 DD DSN=NEW.DATASET,DISP=(NEW,CATLG),RECFM=FB,LRECL=80
//DD2 DD DSN=NEW2.DATASET,DISP=(NEW,CATLG),REFDD=*.DD1

Syntax

RLS = {NRI | CR}

Syntax

SECMODEL = value

Syntax

SEGMENT = value

Syntax

SPACE = ({TRK,}(initial value1[,additional value1][,directory1])[,RLSE] [,CONTIG][,ROUND])
         {CYL,}       [,]                  [,]     [,MXIG]
         {block length,}                                [,ALX]
         {record length,}                               [,]

The following parameters are supported.

Note

Examples

In the following example, 20 tracks are allocated for the data set 'DATA', which is newly created in the DD statement of JOB1. 5 tracks are additionally allocated whenever the space becomes insufficient. Unused space is released at CLOSE. RLSE is ignored in OpenFrame.

//JOB1 JOB
//     EXEC PGM=PROG1
//DS1  DD   DSN=DATA,UNIT=8598,
//          VOL=SER=A11111,
//          SPACE=(TRK,(20,5),RLSE)
//

In the following example, 20 directory blocks (256 bytes for each) are allocated for a directory by allocating consecutive 10 cylinders for the data set DATA, which is newly created in the DD statement of JOB2. The number of blocks (20) and the CONFIG parameter are ignored in OpenFrame. Based on the fact that the number of directory blocks is specified, a PDS is newly created.

//JOB2 JOB
//     EXEC PGM=PROG2
//DS2  DD   DSN=DATA,UNIT=8598,
//          VOL=SER=B11111,
//          SPACE=(CYL,(10,,20),,CONTIG)
//

Syntax

SPIN = {UNALLOC | NO}

Syntax

STORCLAS = class name

Note

An error may occur if the corresponding storage class is not configured in the sms subject under OpenFrame Configuration.

Example

The following example specifies the storage class as STOR01.

//DD1 DD DSN=NEW.DATASET,DISP=(NEW,CATLG),STORCLAS=STOR01

Syntax

SUBSYS = value

Syntax

SYMBOLS = {JCLONLY | EXECSYS | CNVTSYS}

Example

The following example substitutes A1 with TMAX. B1 is set on the SET statement, but only A1 symbolic parameters are exported on the EXPORT statement. Therefore, only AI symbolic parameters are substituted in in-stream data.

//EX1      EXPORT SYMLIST=A1
//SET1     SET  A1=TMAX,B1=SOFT
//SORTIN   DD   *,SYMBOLS=JCLONLY
1000&A1
2000&B1
/*

Syntax

SYSOUT = ([class][,program name][,template number])
          [*]

Example

The following example specifies an output class, an external writer program name and an output place as 8, USERWTR, and GROUPA, respectively. The information is passed to an external printer module.

//OUT DD SYSOUT=(8,USERWTR),DEST=GROUPA

Syntax

TERM = value

Syntax

UCS = value

Syntax

UNIT = ([ddd]       [,count][,DEFER])
        [/ddd]      [,P]
        [/dddd]     [,]
        [device type]
        [device group]
UNIT = AFF = DD name

Note

In the following cases where the system can identify the device information by itself, the UNIT operand may be omitted.

Example

The following example creates a temporary data set in a volume whose serial number is VOL001 in the EXDD1 DD statement. One device among many '3390' type devices is requested.

//EXDD1 DD UNIT=3390,SPACE=(CYL,(1,1,1)),
//         VOL=SER=VOL001

The following example requests the system to create a temporary data set in a volume whose serial number is VOL001 in the EXDD DD statement. The UNIT operand requests the allocation of one device from a device group 'SYSDA'.

//EXDD DD UNIT=SYSDA,SPACE=(CYL,(1,1)),VOL=VOL001

Syntax

{VOLUME | VOL}
=([PRIVATE][,RETAIN][,volume sequence number][,count][,][SER=volume serial number]                    )
           [,]      [,]                 [SER=(volume serial number[,volume serial number]...)]
                                        [REF=[data set name]]
                                        [REF=*.DD name]
                                        [REF=*.STEP name.DD name]
                                        [REF=*.STEP name.procedure STEP name.DD name]

The following parameters are supported.

Example

The following example requests the use of an existing data set in the volume whose serial number is 'VOL001' in the EXDD01 DD statement.

//EXDD01 DD UNIT=848X,VOL=SER=VOL001,
//          DISP=(OLD,KEEP),DSN=TAPEDS1

The following example creates a data set 'FILE.AUTH' in the direct access volume containing a cataloged data set 'FILE.ORG'.

//DD1 DD DSN=FILE.AUTH,DISP=(,KEEP),VOL=REF=FILE.ORG,
//       SPACE=(CYL,(5,1))

The following example expands a data set 'FILE' defined in DD1, which is the DD statement in the previous JOB STEP. OpenFrame ignores the PRIVATE parameter and volume count 2.

//STEP1 EXEC PGM=BUILD
//DD1   DD   DSN=FILE,DISP=(OLD,KEEP),VOL=SER=111111,
//           UNIT=8598
//STEP2 EXEC PGM=EXPAND
//DD2   DD   DSN=FILE,DISP=(MOD,KEEP),
//           VOL=(PRIVATE,,,2,REF=*.STEP1.DD1)

JOBLIB DD

What is specified with JOBLIB DD is referenced to find programs that will be executed in all STEPs in JOB. The JOBLIB DD statement is used between a JOB statement and the first EXEC statement.

STEPLIB DD

What is specified with STEPLIB DD is referenced to find programs that will be executed in the corresponding STEP. The STEPLIB DD statement is used between an EXEC statement and the next EXEC statement or the end of JOB.

JOBCAT DD

Specifies a catalog in which a data set used in all STEPs in JOB is registered. The JOBCAT DD statement is used between a JOB statement and the first EXEC statement.

STEPCAT DD

Specifies a catalog in which a data set used in the corresponding STEP is registered. The STEPCAT DD statement is used between an EXEC statement and the next EXEC statement or at the end of JOB.

Syntax

ACCT[.procedure STEP name] = value

Syntax

ADDRSPC[.procedure STEP name] = {VIRT}
                             {REAL}

Syntax

CCSID = value

Syntax

COND[.procedure STEP name]= ((code,operator[,STEP name[.procedure STEP name]]) )
                         ([,(code,operator[,STEP name[.procedure STEP name]])]...)
                         ([,EVEN] )
                         ([,ONLY] )
COND=EVEN
COND=ONLY

Whether to execute the current STEP is determined as follows:

Note

Example

In the following example, STEP2 is not executed because the condition is met; 12 in STEP2 is greater than 4, the return code of STEP1.

//JOB1     JOB  CLASS=A,MSGCLASS=A
//STEP1    EXEC RETURN,PARM=4
//STEP2    EXEC TMAXSOFT,COND=(12,GT)

In the following example, STEP2 is executed because neither conditions are met; 2 and 12 in STEP2 is less than and greater than 4, the return code of STEP1, respectively.

//JOB1     JOB  CLASS=A,MSGCLASS=A
//STEP1    EXEC RETURN,PARM=4
//STEP2    EXEC TMAXSOFT,COND=((2,GT),(12,LT))

In the following example, STEP2 is not executed because neither conditions are met. But, ONLY is specified in STEP2; STEP1's return code is 4, ONLY is specified in STEP2, and STEP1 is normally terminated.

//JOB1     JOB  CLASS=A,MSGCLASS=A
//STEP1    EXEC RETURN,PARM=4
//STEP2    EXEC TMAXSOFT,COND=((2,GT),(12,LT),ONLY)

In the following example, STEP2 is executed because neither conditions are met but ONLY is specified in STEP2; STEP1's return code is 4, ONLY is specified in STEP2, and STEP1 is abnormally terminated.

//JOB1     JOB  CLASS=A,MSGCLASS=A
//STEP1    EXEC ABEND,PARM=4
//STEP2    EXEC TMAXSOFT,COND=((2,GT),(12,LT),ONLY)

In the following example, STEP2 is unconditionally executed because STEP1's return code is 4 and EVEN is specified in STEP2.

//JOB1     JOB  CLASS=A,MSGCLASS=A
//STEP1    EXEC ABEND,PARM=4
//STEP2    EXEC TMAXSOFT,COND=EVEN

In the following example, STEP3 is not executed because STEP1's return code is met the condition in STEP3; STEP1's return code is 4 and STEP2's return code is 8, and they are compared with the condition in STEP3.

//JOB1     JOB  CLASS=A,MSGCLASS=A
//STEP1    EXEC RETURN,PARM=4
//STEP2    EXEC RETURN,PARM=8
//STEP3    EXEC TMAXSOFT,COND=(4,EQ)

In the following example, STEP3 is executed because the condition is not met; STEP1's return code is 4 and STEP2's return code is 8, and STEP2's return code is not equal to 4.

//JOB1     JOB  CLASS=A,MSGCLASS=A
//STEP1    EXEC RETURN,PARM=4
//STEP2    EXEC RETURN,PARM=8
//STEP3    EXEC TMAXSOFT,COND=(4,EQ,STEP2)

In the following example, STEP2 is not executed because the condition is met; the return code of PSTEP1, which is SETP1's procedure STEP, is 4, and this meets the condition in STEP2.

//JOB1     JOB  CLASS=A,MSGCLASS=A
//TMAXPROC PROC
//PSTEP1   EXEC PGM=RETURN,PARM=4
//PSTEP2   EXEC PGM=RETURN,PARM=8
//         PEND
//STEP1    EXEC TMAXPROC
//STEP2    EXEC TMAXSOFT,COND=(4,EQ,STEP1.PSTEP1)

In the following example, PSTEP1 is not executed because the condition is met; STEP1's return code is 4, and PSTEP1 meets the condition in STEP2's procedure STEP. PSTEP2 is executed because the COND operand is not applied.

//JOB1     JOB  CLASS=A,MSGCLASS=A
//TMAXPROC PROC
//PSTEP1   EXEC PGM=TMAXSOFT
//PSTEP2   EXEC PGM=TMAXSOFT
//         PEND
//STEP1    EXEC RETURN,PARM=4
//STEP2    EXEC TMAXPROC,COND.PSTEP1=(4,EQ)

Syntax

DYNAMNBR[.procedure STEP name] = value

Syntax

MEMLIMIT = {valueM|valueG|valueT|valueP}
            {NOLIMIT}

Syntax

PARM[.procedure STEP name] = parameter value
PARM[.procedure STEP name] = (parameter value,parameter value)
PARM[.procedure STEP name] = ('parameter value',parameter value)
PARM[.procedure STEP name] = 'parameter value,parameter value'

Example

The following example sends argv1 as a parameter of the PRINT program executed in STEP1.

//JOB1     JOB  CLASS=A,MSGCLASS=A
//STEP1    EXEC PRINT,PARM='argv1'

The following example sends argv1 and argv2 as parameters to PSTEP1, which is procedure STEP of STEP1, and PSTEP2, respectively.

//JOB1     JOB  CLASS=A,MSGCLASS=A
//TMAXPROC PROC
//PSTEP1   EXEC PGM=PRINT,PARM='argv2'
//PSTEP2   EXEC PGM=PRINT,PARM='argv2'
//         PEND
//STEP1    EXEC TMAXPROC,PARM.PSTEP1='argv1'

A catalog procedure means a procedure that is saved as a member of a data set, and it can be executed in any JOB.

An input stream procedure refers to a procedure that is specified in an input stream, and it can be temporarily executed in JOB in input streams.

Syntax

{PROC = procedure name}
{procedure name}

Note

Must be the first to be used before any other operands in the EXEC statement.

Example

The following example executes the TMAXPROC procedure.

//JOB1     JOB  CLASS=A,MSGCLASS=A
//STEP1    EXEC TMAXPROC

The following example executes the TMAXPROC procedure of an input stream.

//JOB1     JOB  CLASS=A,MSGCLASS=A
//TMAXPROC PROC
//PSTEP1   EXEC PGM=TMAXSOFT
//         PEND
//STEP1    EXEC TMAXPROC

Syntax

PERFORM = performance group number

Note

Example

The following example specifies PERFORM in STEP1 as 10.

//JOB1   JOB  PERFORM=100
//STEP1  EXEC PGM=TMAXSOFT,PERFORM=10

Syntax

RD[.procedure STEP name] = {R | RNC | NR |NC}

Syntax

REGION[.procedure STEP name] = {valueK | valueM}

Syntax

RLSTMOUT[.procedure STEP name] = value

Syntax

SPARM = '[SYSTEM parameter]=[value]]'

Example

The following example specifies the date and time as April 1, 2010 and 12:24:30 respectively in the DATE parameter.

//STEP1 EXEC PGM=IKJEFT01,SPARM='DATE=DATE=2010.04.01,TIME=12:24:30'

Syntax

TIME[.procedure STEP name] = {([minutes],[seconds])}
                            {1440       }
                            {NOLIMIT    }
                            {MAXIMUM    }
                            {0          }

Note

Example

The following example specifies TIME in STEP1 as 1 minute and 10 seconds.

//JOB1   JOB
//STEP1  EXEC PGM=TMAXSOFT,TIME=(1,10)

The following example specifies TIME in STEP1 as unlimited time.

//JOB1   JOB
//STEP1  EXEC PGM=TMAXSOFT,TIME=NOLIMIT

Syntax

Symbolic parameter = [value]

Note

While the '&symbolic parameter' format is used, if the corresponding symbolic parameter is not defined, the previous "&symbolic parameter" remains without being replaced.

Example

In the following example, the symbolic parameter A=step1 is specified, so that the values of PARM in PSETP1 and PSTEP2 become step1 and default respectively.

//JOB1     JOB  CLASS=A,MSGCLASS=A
//TMAXPROC PROC A=default,B=default
//PSTEP1   EXEC PGM=TMAXSOFT,PARM=&A
//PSTEP2   EXEC PGM=TMAXSOFT,PARM=&B
// PEND
//STEP1    EXEC TMAXPROC,A=step1

In the following example, the symbolic parameter A=,B=step1 is specified, so that the values of PARM in PSETP1 and PSTEP2 become NULL and step1 respectively.

//JOB1     JOB  CLASS=A,MSGCLASS=A
//TMAXPROC PROC A=default,B=default
//PSTEP1   EXEC PGM=TMAXSOFT,PARM=&A
//PSTEP2   EXEC PGM=TMAXSOFT,PARM=&B
// PEND
//STEP1    EXEC TMAXPROC,A=,B=step1

Syntax

// S procedure name,symbol parameter=value[,symbol parameter=value]...

Syntax

ADDRSPC = {VIRT}
          {REAL}

Syntax

BYTES = {value          }
        {(value,CANCEL) }
        {(value,DUMP)   }
        {(value,WORNING)}

Syntax

CARDS = {value          }
        {(value,CANCEL) }
        {(value,DUMP)   }
        {(value,WORNING)}

Syntax

CCSID = value

Syntax

CLASS = job class

Note

If the CLASS operand is omitted in a JOB statement, the CLASS parameter of the JOB is set to the value of the CLASS key in the JOB section from the tjclrun subject under OpenFrame Configuration. For more information about the tjes subject's configuration items, refer to OpenFrame Configuration Guide.

Example

The following example specifies the JOB CLASS as A.

//JOB1 JOB CLASS=A

Syntax

COND = ((code,operator),...)

Note

Example

The following specifies that JOB continues to be executed only when the return code is 0.

//JOB1 JOB COND=(0,NE)

The following specifies that JOB is terminated only when the return code is 4, 8, or 12.

//JOB1 JOB COND=((4,EQ),(8,EQ),(12,EQ))

The following specifies that JOB continues to be executed only when the return code is 0 through 12.

//JOB1 JOB COND=(12,LT)

The following specifies that JOB continues to be executed only when the return code is 4 through 12.

//JOB1 JOB COND=((4,GT),(12,LT))

Syntax

GROUP = value

Syntax

JESLOG = {SPIN | NOSPIN |SUPPRESS}

Syntax

LINES = {value          }
        {(value,CANCEL) }
        {(value,DUMP)   }
        {(value,WARNING)}

Syntax

MEMLIMIT = {valueM|valueG|valueT|valueP}
           {NOLIMIT}

Syntax

MSGCLASS = class

Note

If the MSGCLASS operand is omitted in a JOB statement, MSGCLASS is set to the value of the MSGCLASS key in the JOB section of the tjclrun subject under OpenFrame Configuration. For more information about the subject's configuration items, refer to OpenFrame Configuration Guide.

Example

The following specifies the MSGCLASS as Z.

//JOB1 JOB 8493,KIM,MSGCLASS=Z

Syntax

MSGLEVEL = ([값][,{0}])
                  {1}

Note

If the MSGLEVEL operand is omitted in a JOB statement, MSGLEVEL is set to the value of the MSGLEVEL key in the JOB section of the tjclrun subject under OpenFrame Configuration. For more information about the subject's configuration items, refer to OpenFrame Configuration Guide.

Example

The following specifies MSGCLASS as Z and MSGLEVEL as 1,0.

//JOB1 JOB MSGCLASS=Z,MSGLEVEL=(1,0)

Syntax

NOTIFY = {nodename.userid}
         {userid         }

Syntax

PAGES = {value          }
        {(value,CANCEL) }
        {(value,DUMP)   }
        {(value,WARNING)}

Syntax

PASSWORD = password

Example

The following example specifies USER and PASSWORD as KIM and tmaxsoft, respectively.

//JOB1 JOB USER=KIM,PASSWORD=tmaxsoft

The following example specifies USER as KIM, but does not set PASSWORD. Therefore, the TACF surrogate user is used.

//JOB1 JOB USER=KIM

Syntax

PERFORM = performance group number

Note

Example

The following example specifies PERFORM as 100.

//JOB1 JOB PERFORM=100

Syntax

PRTY = priority

Note

To use this operand, set the VALUE of the PRTYJOB key in the SCHEDULING section of the tjes subject under OpenFrame Configuration to YES.

Example

The following example specifies PRTY as 5.

//JOB1 JOB PRTY=5

Syntax

RD = {R | RNC | NR |NC}

Syntax

REGION = {valueK | valueM}

Syntax

RESTART =  {*}
           {STEP name }
           {stepname.procstepname}

Example

The following example specifies RESTART as an asterisk (*).

//JOB1 JOB RESTART=*

The following example specifies RESTART as STEP3.

//JOB1 JOB RESTART=STEP3

The following example specifies the STEP name within the procedure along with the procedure STEP name.

//JOB1 JOB RESTART=(STEP3.PSTEP4)

Syntax

SECLABEL = value

Syntax

SCHENV = value

Syntax

SPARM = '[SYSTEM parameter]=[value]]'

Example

The following example specifies the date and time as April 1, 2010 and 12:24:30 respectively in the DATE parameter of SPARM.

//JOB1 JOB CLASS=A,MSGCLASS=X,SPARM='DATE=2010.04.01,TIME=12:24:30'

Syntax

TIME = {([minutes],[seconds])}
       {1440       }
       {NOLIMIT    }
       {MAXIMUM    }
       {0          }

Note

Example

The following example specifies TIME in JOB1 as 10 seconds.

//JOB1    JOB   CLASS=A,MSGCLASS=A,TIME=(,10)
//STEP1   EXEC  PGM=IEFBR14
//SYSOUT  DD    SYSOUT=*
//

The following example specifies TIME in JOB1 as 2 minutes.

//JOB1    JOB   CLASS=A,MSGCLASS=A,TIME=2
//STEP1   EXEC  PGM=IEFBR14
//SYSOUT  DD    SYSOUT=*
//

The following example specifies TIME in JOB1 as MAXIMUM.

//JOB1    JOB   CLASS=A,MSGCLASS=A,TIME=MAXIMUM
//STEP1   EXEC  PGM=IEFBR14
//SYSOUT  DD    SYSOUT=*
//

Syntax

//{xxcyyddd}
  {xxdhhmm}
  {xxYDnn}

Note

Examples

The following example specifies the year as 2030.

//JOB1    JOB   000000000,'//TCP10'
//STEP1   EXEC  PGM=IEFBR14
//SYSOUT  DD    SYSOUT=*
//

The following example specifies the date as 20201231.

//JOB1    JOB   000000000,'//TC120365'
//STEP1   EXEC  PGM=IEFBR14
//SYSOUT  DD    SYSOUT=*
//

The following example specifies the system time plus 1 hour.

//JOB1    JOB   000000000,'//TCP0100'
//STEP1   EXEC  PGM=IEFBR14
//SYSOUT  DD    SYSOUT=*
//

Syntax

TYPRUN = {COPY}
         {HOLD}
         {JCLHOLD}
         {JEM}
         {SCAN}

Note

If the TYPRUN operand is not used, JCL is processed for submission and scheduled.

Examples

The following example specifies TYPRUN as SCAN.

//JOB1    JOB   CLASS=A,MSGCLASS=A,TYPRUN=SCAN
//STEP1   EXEC  PGM=IEFBR14
//SYSOUT  DD    SYSOUT=*
//

The following is the result recorded in SYSMSG.

------------------------------------------------------------------------------
 ** JCL SCAN start **
------------------------------------------------------------------------------
     1 //JOB1    JOB   CLASS=A,MSGCLASS=A,TYPRUN=SCAN
     2 //STEP1   PGM=IEFBR14
     3 //SYSOUT  DD    SYSOUT=*
       //
------------------------------------------------------------------------------
 ** JCL SCAN finish **
------------------------------------------------------------------------------

The following example of running TYPRUN as SCAN returns a JCL parsing error.

//JOB1    JOB   CLASS=A,MSGCLASS=A,TYPRUN=SCAN
//STEP1   EXEC  PGM=IEFBR14,  this comma is wrong.
//SYSOUT  DD    SYSOUT=*
//

The following is the result recorded in SYSMSG.

     1 //JOB1    JOB   CLASS=A,MSGCLASS=A,TYPRUN=SCAN
     2 //STEP1   EXEC  PGM=IEFBR14,  this comma is wrong.
     3 //SYSOUT  DD    SYSOUT=*
       //
Syntax Error [Line:2;Column: ;Keyword: ;Message:Expected continuation not received]

The following example of running TYPRUN as JEM returns JCL parsing errors. The IEFBR141 program specified in STEP01 and DD02 set as SHR in STEP02 do not exist.

//JEMTEST  JOB TYPRUN=JEM
//STEP01   EXEC PGM=IEFBR141
//DD01     DD DSN=TMAX.JEM.DATASET,DISP=(MOD,DELETE)
//STEP02   EXEC PGM=IEFBR14
//DD02     DD DSN=TMAX.JEM.DATASET,DISP=SHR
//STEP03   EXEC PGM=IEFBR14
//DD03     DD DSN=TMAX.JEM.DATASET,DISP=MOD

The following is the result recorded in SYSMSG.

 JOBID=JOB00028   JOBPOS=0   RUNPID=8998
 JEMTEST JEM (test)
 ==============================================================================
 ---------------------------- STEP01 EXEC PGM step ----------------------------
 EXEC PGM=IEFBR141 (JEM mode)
 (JRN0143F) no program file(IEFBR141) exist - check JCL JOBLIB, JCL STEPLIB, and environment PATH
 ---------------------------- STEP02 EXEC PGM step ----------------------------
 EXEC PGM=IEFBR14 (JEM mode)
 (JRN2008E) [OLDDD02] Dataset 'TMAX.JEM.DATASET' does not exists.
 ---------------------------- STEP03 EXEC PGM step ----------------------------
 EXEC PGM=IEFBR14 (JEM mode)
 ==============================================================================
 (JRN2010I) JEM RUN skip enqueue for output processing ok
 (JRN2017I) JEM RUN total error count : 2
 ---------------------------- JEM PROCESS FINISHED ----------------------------

Syntax

USER = user

Note

The option to check the permissions on DATASET and UTILITY can be set to the VALUE of the CHECK_DSAUTH and CHECK_UTAUTH keys in the TACF section of the tjclrun subject under OpenFrame Configuration. For more information about the subject, refer to OpenFrame Configuration Guide.

Examples

The following example specifies USER and PASSWORD as KIM and tmaxsoft, respectively.

//JOB1 JOB USER=KIM,PASSWORD=tmaxsoft

The following example specifies USER as KIM, but does not set PASSWORD. Therefore, the TACF surrogate user is used.

//JOB1 JOB USER=KIM