Z/OS JCL in the Batch Runtime Environment

This chapter contains the following topics:

•	Introduction to z/OS JCL in the Batch Runtime Environment

•	z/OS JCL Cards in the Batch Runtime Environment

•	Sort Utilities

•	DB2 Utilities

Introduction to z/OS JCL in the Batch Runtime Environment

This section describes how to find equivalents for z/OS JCL statements in the target environment. Some of these equivalents point to the Batch Runtime functions, other equivalents may rely directly on UNIX or Tuxedo features. In some cases, there may be no equivalent and a work-around solution may be necessary.

It is not the purpose of this document to describe z/OS JCL, for any explanation of JCL statements, please see the z/OS Internet Library.

z/OS JCL Cards in the Batch Runtime Environment

The following tables lists the JCL card parameters and the related command in the Batch Runtime:

In the column “status”, the following abbreviations are used:

N.R. means “not relevant”

N.S. means “not supported”

JCL Card Equivalence Table

 

Table 2‑1 JCL Card Equivalences

JCL Card	Parameter	Equivalent in Target Environment	Status
//*		Comments	supported
/*		In-stream data delimiter	supported
//		End of job	supported
COMMAND			N.S.
CNTL/ENDCNTL			N.R.
DD	*	m_FileAssign -i	supported
	ACCODE		N.R.
	AMP		N.R.
	AVGREC		N.R.
	BLKSIZE		N.R.
	BLKSZLIM		N.R.
	CCSID		N.R.
	CHKPT		N.S.
	CNTL		N.R.
	DATA	m_FileAssign	supported
	DATACLAS	see DATACLAS chapter	supported
	DCB	see DCB chapter	supported
	DISP	m_FileAssign -d <DISP option>	supported
	DLM	m_FileAssign -D <delimiter>	supported
	DSID		N.R.
	DSNAME	m_FileAssign	supported
DD (continued)	DSNTYPE		N.S.
	DUMMY	m_FileAssign with /dev/null	supported
	DYNAM	m_FileAssign with /dev/null	supported
	EXPDT	m_FileAssign -e	supported
	FILEDATA		N.R.
	FREE		N.R.
	KEYLEN	m_FileAssign -k	supported
	KEYOFF	m_FileAssign -k	supported
	LABEL		N.R.
	LGSTREAM		N.R.
	LIKE	m_FileAssign -s	supported
	LRECL	m_FileAssign -r	supported
	MGMTCLAS		N.R.
	MSVGP		N.R.
	PATH		N.R.
	PATHDISP		N.R.
	PATHMODE		N.R.
	PATHOPTS		N.R.
	PROTECT		N.R.
	QNAME		N.R.
	RECFM	m_FileAssign -r	supported
	RECORG	m_FileAssign -t	supported
DD (continued)	REFDD		N.S.
	RETPD	m_FileAssign -e	supported
	RLS		N.R.
	SECMODEL		N.R.
	SPACE		N.R.
	STORCLAS		N.R.
	SUBSYS		N.S.
	TERM		N.R.
	UNIT		N.R.
	VOLUME	m_FileAssgin -v	supported
DD : Printing parameters	BURST		N.S.
	CCSID		N.R.
	CHARS		N.S.
	COPIES	m_OutputAssign -c	supported
	DEST	m_OutputAssign -d	supported
	FCB		N.S.
	FLASH		N.S.
	HOLD	m_OutputAssign -H	supported
	MODIFY		N.S.
	OUTLIM		N.S.
	OUTPUT	m_OutputAssign -o	supported
	SEGMENT		N.R.
	SPIN		N.S.
	SYSOUT	see SYSOUT chapter	supported
	UCS		N.S.
DD: Special statements	JOBLIB	m_JobLibset	supported
	STEPLIB	m_StepLibset	supported
	SYSABEND		N.S.
	SYSMDUMP		N.S.
	SYSUDUMP		N.S.
	SYSCHK		N.S.
	SYSIN	m_FileAssign	supported
	SYSCKEOV		N.S.
EXEC	ACCT		N.S.
	ADDRSPC		N.R.
	CCSID		N.R.
	COND	m_CondExec	supported
	DPRTY		N.R.
	DYNAMNBR		N.R.
	MEMLIMIT		N.R.
	PARM	m_ProgramExec	supported
	PERFORM		N.R.
	PGM	m_ProgramExec	supported
	PROC		supported
	RD		N.S.
	REGION		N.R.
	RLSTMOUT		N.R.
	TIME		N.S.
IF THEN ELSE END		m_CondIf   m_CondElse m_CondEndif	supported
INCLUDE	MEMBER	m_ShellInclude
JCLLIB	ORDER	m_JclLibSet
JOB	<jobname>	m_JobBegin	supported
	<accounting>		N.S.
	<prog. name>		N.S.
	ADDRSPC		N.R.
	BYTES		N.S.
	CARDS		N.R.
	CCSID		N.S.
	CLASS	m_JobBegin -c (with TuxJES).	supported
	COND	m_JobBegin -C	supported
	GROUP		N.R.
	JESLOG		N.S.
	LINES		N.S.
	MEMLIMIT		N.R.
	MSGCLASS		N.S.
	MSGLEVEL		N.S.
	NOTIFY		N.S.
	PAGES		N.S.
	PASSWORD		N.R.
	PERFORM		N.R.
	PRTY	m_JobBegin -p (with TuxJES).	supported
	RD		N.S.
	REGION		N.R.
	RESTART	see RESTART chapter	Partially supported
JOB (continued)	SECLABEL		N.R.
	SCHENV		N.R.
	TIME		N.S.
	TYPRUN	m_JobBegin -t (with TuxJES)	supported
	USER		N.S.
OUTPUT	ADDRESS		N.S.
	AFPSTATS		N.S.
	BUILDING		N.S.
	BURST		N.S.
	CHARS		N.S.
	CKPTLINE		N.S.
	CKPTPAGE		N.S.
	CKPTSEC		N.S.
	CLASS	m_OutputSet -c	supported
	COLORMAP		N.S.
	COMPACT		N.S.
	COMSETUP		N.S.
	CONTROL		N.S.
	COPIES	m_OutputSet -n	supported
	DATACK		N.S.
	DEFAULT	m_OutputSet -D	supported
	DEPT		N.S.
	DEST	m_OutputSet -d	supported
OUTPUT (continued)	DPAGELBL		N.S.
	DUPLEX		N.S.
	FCB		N.S.
	FLASH		N.S.
	FORMDEF		N.S.
	FORMLEN		N.S.
	FORMS	m_OutputSet -f	supported
	FSSDATA		N.S.
	GROUPID		N.S.
	INDEX		N.S.
	INTRAY		N.S.
	JESDS		N.S.
	LINDEX		N.S.
	LINECT		N.S.
	MAILBCC		N.S.
	MAILCC		N.S.
	MAILFILE		N.S.
	MAILFROM		N.S.
	MAILTO		N.S.
	MODIFY		N.S.
	NAME		N.S.
	NOTIFY		N.S.
	OFFSETXB		N.S.
OUTPUT (continued)	OFFSETXF		N.S.
	OFFSETYB		N.S.
	OFFSETYF		N.S.
	OUTBIN		N.S.
	OUTDISP		N.S.
	OVERLAYB		N.S.
	OVERLAYF		N.S.
	OVFL		N.S.
	PAGEDEF		N.S.
	PIMSG		N.S.
	PORTNO		N.S.
	PRMODE		N.S.
	PRTATTRS		N.S.
	PRTERROR		N.S.
	PRTOPTNS		N.S.
	PRTQUEUE		N.S.
	PRTY	m_OutputSet -p	supported
	REPLYTO		N.S.
	RESFMT		N.S.
	RETAINF		N.S.
	RETAINS		N.S.
	RETRYL		N.S.
	RETRYT		N.S.
OUTPUT (continued)	ROOM		N.S.
	SYSAREA		N.S.
	THRESHLD		N.S.
	TITLE		N.S.
	TRC		N.S.
	UCS		N.S.
	USERDATA		N.S.
	USERLIB		N.S.
	USERPATH		N.S.
	WRITER	m_OutputSet -w	supported
PROC		m_ProcInclude	supported
in-stream PROC		m_ProcBegin	supported
in-stream PEND		m_ProcEnd	supported
SET		m_SymbolSet	supported
XMIT (Records)			N.S.
XMIT (JOB)		m_SetJobExecLocation	supported
XEQ		m_SetJobExecLocation	supported
ROUTE	PRINT	Share with NFS	supported
	PUNCH	Share with NFS	supported
	XEQ	m_SetJobExecLocation	supported

DCB Parameter of DD Statement

 

Table 2‑2 DCB Parameter of DD Statement

DCB parameter	Equivalent in Target Environment	Status
BFANL		N.R.
BFTEK		N.R.
BLKSIZE		N.R.
BUFIN		N.R.
BUFL		N.R.
BUFMAX		N.R.
BUFNO		N.R.
BUFOFF		N.R.
BUFOUT		N.R.
BUFSIZE		N.R.
CPRI		N.R.
CYLOFL		N.R.
DEN		N.R.
DIAGNS		N.R.
DSORG	m_FileAssign -t	supported
EROPT		N.R.
FUNC		N.R.
GNCP		N.R.
INTVL		N.R.
IPLTXID		N.R.
KEYLEN	m_FileAssign -k	supported
LIMCT		N.R.
LRECL	m_FileAssign -r	supported
MODE		N.R.
NCP		N.R.
NTM		N.R.
OPTCD		N.R.
PCI		N.R.
PRTSP		N.R.
RECFM	m_FileAssign -r	supported
RESERVE		N.R.
RKP	m_FileAssign -t	supported
STACK		N.R.
TRESH		N.R.
TRTCH		N.R.

SYSOUT Parameter of DD Statement

 

Table 2‑3 SYSOUT Parameter of DD Statement

SYSOUT parameter	Usage	Equivalent in Target Environment	Status
First parameter	Class	m_OutputAssign -c	supported
Second parameter	INTRDR	m_OutputAssign -w	supported
	SMTP	m_OutputAssign -w	supported
	<writer>	m_OutputAssign -w	supported
Third parameter	Form name	m_OutputAssign -f	supported
	Code name		N.S.

DATACLAS Parameter of DD Statement

The DATACLAS parameter is taken into account at WB JCL level only.

Using the DATACLASS informations, extracted from z/OS, the WB JCL updates the m_FileAssign function (or m_FileBuild from DATACLAS parameter in IDCAMS DEFINE commands).

RESTART Parameter of JOB Statement

Only the Deferred Step Restart type is managed.

The other types, Automatic Restart (Step or Checkpoint) and Deferred Checkpoint Restart, are not managed.

A deferred step restart of a job is caused by coding the function m_JobBegin with the -r parameter containing a job step and by submiting the job again.

In-Stream File

The in-stream files are supported using the m_FileAssign function with the -i parameter.

Concatenation of Files

The concatenation of files (or in-stream files) is supported using the m_FileAssign function with the -C parameter.

Override of Files

The overriding feature is supported.

Use the m_FileOverride function for the files managed by the m_FileAssign function.

Use the m_OutputOverride function for the files managed by the m_OutputAssign function.

Execution of External Sysin

Use the m_UtilityExec function in order to execute commands stored in a file.

Network Job Entry (NJE)

The following table describes the supported JES2 control statements and parameters in Oracle Tuxedo Application Rehosting Workbench and Batch Runtime.

 

Table 2‑4 Supported Parameters

Statement	Supported Parameter
/*XEQ	/*XEQ nodename
/*ROUTE	/*ROUTE PRINT LOCAL /*ROUTE PRINT nodename /*ROUTE PUNCH nodename /*ROUTE XEQ nodename
/*XMIT	/*XMIT nodename

ABEND Routine

The implementation of ILBOABN0 is different between MicroFocus and COBOL-IT.

Microfocus provides a mechanism to register an exit routine, which can be automatically called when the ABEND routine calls stop run. stop run terminates the process after the registered callback function completes cleaning.

COBOL-IT does not provide such mechanism. In the ABEND routine for COBOL-IT, the function mentioned above is called explicitly, stop run is called, and then the process is terminated directly at ILBOABN0.

The source of ILBOABN0.cbl is under Batch_RT/ejr/SAMPLE directory.

General Utility Commands Equivalence Table

 

Table 2‑5 General Utility Commands Equivalences

Utility	Command	Equivalent in Target Environment	Status
IDCAMS (modal commands)	IF/THEN/ELSE		supported
	SET		supported
	CANCEL		N.S.
	DO/END		N.S.
	MAXCC		supported
	LASTCC		supported
IDCAMS	ALLOCATE (main parameters)	m_FileBuild	supported
	ALTER NEWNAME	m_FileRename	supported Note: Renaming for VSAM RDB files is not supported.
	ALTER LIBRARYENTRY		N.R.
	ALTER VOLUMEENTRY		N.R.
	BLDINDEX		N.R.
	CREATE LIBRARYENTRY		N.R.
	CREATE VOLUMEENTRY		N.R.
	DCOLLECT		N.S.
	DEFINE ALIAS		N.S.
	DEFINE AIX	m_FileBuild -K	supported
	DEFINE CLUSTER	m_FileBuild	supported
	DEFINE GDG	m_GenDefine	supported
	DEFINE NONVSAM		N.S.
	DEFINE PAGESPACE		N.R.
	DEFINE PATH		N.R.
	DEFINE USERCATALOG		N.R.
	DELETE ALAIS		N.S.
	DELETE AIX	m_FileBuild -R	supported
	DELETE CLUSTER	m_FileDelete	supported
	DELETE GDG	m_FileDelete	supported
	DELETE LIBRARYENTRY		N.R.
	DELETE NONVSAM	m_FileDelete	supported
IDCAMS (continued)	DELETE NVR		N.S.
	DELETE PAGESPACE		N.R.
	DELETE PATH		N.R.
	DELETE TRUENAME		N.S.
	DEL USERCATALOG		N.R.
	DELETE VOLUMEENTRY		N.R.
	DELETE VVR		N.R.
	DIAGNOSE		N.S.
	EXAMINE		N.S.
	EXPORT		N.S.
	EXPORT DISCONNECT		N.R.
	IMPORT		N.S.
	IMPORT CONNECT		N.R.
	LISTCAT	m_FileListcat	supported
	LISTDATA		N.S.
	PRINT	m_FilePrint	supported
	REPRO	m_FileRepro	supported
	SETCACHE		N.R.
	SHCDS		N.R.
	VERIFY		N.S.
IEBCOPY	ALTERMOD		N.R.
	COPY	m_DirCopy	supported
	COPYGRP		N.R.
	COPYMOD		N.R.
	EXCLUDE	m_DirCopy -e	supported
	SELECT	m_DirCopy -s	supported
IEBGENER	With SYSIN DUMMY	m_FileLoad	supported
	GENERATE MEMBER		N.S.
	GENERATE RECORD	m_FileSort	supported
IEFBR14		m_ProgramExec IEFBR14	supported
IEFBR15		m_ProgramExec IEFBR15	supported
PKZIP	Main parameters	m_Pkzip	supported
PKUNZIP	Main parameters	m_Pkunzip	supported
SMTP		m_Smtp	supported
XMITIP		m_SendMail	supported
ZIP390	ACTION : ZIP	m_Pkzip	supported
	ACTION : UNZIP	m_Pkunzip	supported
	ENCRYPT		N.S.
	IFILE		supported
	OFILE		supported
	ARCHIVE		supported
	OVERWRITE		supported

 

Sort Utilities

Sort Utilities Equivalence Tables

SORT, SORTD, DFSORT, ICEMAN, SYNCSORTT

 

Table 2‑6 Sort Utilities Equivalences

Sort Statement	Parameter	Equivalent in Target Environment	MFSORT	SyncSort
SORT		m_FileSort	Supported	Supported
MERGE		m_FileSort	Supported	Supported
OPTION		m_FileSort
	COPY		Supported	Supported
	SKIPREC		Supported	Supported
	STOPAFT		Supported	Supported
	INCLUDE		Supported	Supported
	OMIT		Supported	Supported
	OUTFILE		Supported	Supported
	OUTREC		Supported	Supported
	END		Supported	Supported
	RECORD		Supported	Supported
	SUM		Supported	Supported

ICETOOL

 

Table 2‑7 ICETOOL Equivalences

Sort Statement	Equivalent in Target Environment	MFSORT	SyncSort
SORT	m_FileSort	supported	supported
COPY	m_FileSort	supported	supported
MERGE	m_FileSort	supported	supported

Sort Limitations

when using syncsort utility, there are some limitations:

•	DFSORT (DATE3) format has no equivalent on syncsort.

•	DFSORT statements (outrec, inrec) are not fully suppported in the following situations:

•	If a key or a filed definition of an outrec field cut a field constant type, an error shows up (MT_ERROR in SYSIN translation) and :#PHX in ksh.

•	If a key or a field definition of an outrec field is not included in the inrec, an error shows up.

•	Cases with SUM are not handled.

DB2 Utilities

Only DB2 Connect 9.7 or above is supported.

 

Table 2‑8 DB2 Utilities

Command	Parameter	Equivalent in Target Environment	0racle	DB2LUW
DSNTEP2	SQL	m_ExecSQL	supported	supported
DSNTEP4	SQL	m_ExecSQL	supported	supported
DSNTIAD	SQL	m_ExecSQL	supported	supported
DSNTIAUL	SQL	m_ExecSQL	supported	supported
	“Unload”	m_DBTableUnload	supported	supported
DSNUTILB	EXEC SQL	m_ExecSQL	supported	supported
	LOAD	m_DBTableLoad	supported	supported
	UNLOAD	m_DBTableUnload	supported	supported