Register contents when Exit 6 gets control

Start of change The interface to this exit is the same as the interface to exit 60, with the exception of the contents of register 11. End of change The contents of the registers on entry to this exit are:

Register

Contents

0

A code indicating the status of conversion processing

0: Indicates that a JCL statement has been converted to C/I text.
4: Indicates that the converter has completed converting the job to C/I text. This is the final invocation of Exit 6 for the job.

1

Address of a 6-word parameter list

Word 1 (+0)

Address of a 16-byte work area available to the installation.

Word 2 (+4)

If the code passed in R0 is:

0, this word points to the address of a 8192 (2000 hex) byte buffer that contains the C/I text of the converted JCL statement.
4, this word contains the address of the converter's return code.

Word 3 (+8)

Address of the $DTE

Word 4 (+12)

Address of the $JCT

Word 5 (+16)

JES2 sets this to 0 before it passes control to the exit routine.

Word 6 (+20)

Address of the $CIWORK are for this subtask End of change

2

Parameter list address mapped by $XPL. Register 1 points into this area for compatibility with existing exits that do not understand the $XPL data structure. The parameter list has the following structure:

XPLID

Eyecatcher ('$XPL')

XPLLEVEL

Indicates the version number of Exit 6

XPLXITID

Exit identifier - 6

XPLEXLEV

Version level of the exit

X006IND

Indicator byte:

X006TEXT: Internal text exit
X006CEND: End of conversion

X006COND

Condition byte:

X006TSU: Converting a TSO user
X006STC: Converting a started task
X006JOB: Converting a batch job

X006RESP

Response byte:

X006HOLD: Batch job hold indicator. Set on input as the current hold state and can be modified by the exit.

X006PLUS

Exit 06 parameter list (register 1 points here)

X006WORK

16 byte work area address

X006ITXT

Internal text image address (when X006IND = X006TEXT)

X006CRET

Address of Converter RC (when X006IND = X006CEND)

X006CNVW

JES2 DTE work area address

X006JCT

JCT address

X006CNMB

Address of message buffer

X006CIW

CIWORK data area address

X006JCLS

Current job class that is associated with the job. For batch jobs, the exit can update this field to alter the job class that is associated with the job.

X006SCHE

Current scheduling environment (SCHENV) that is associated with the job. For batch jobs, the exit can update this field to alter the scheduling environment that is associated with the job.

3-10

Not applicable

11

Address of the $HCT

12

N/A

13

Address of an 18-word OS-style save area

14

Return address

15

Entry address