Reassemble of User exits SARSTCUX, SARSPFUX and SARFVCUX
search cancel

Reassemble of User exits SARSTCUX, SARSPFUX and SARFVCUX

book

Article ID: 117810

calendar_today

Updated On:

Products

OM View

Issue/Introduction

In View 12.2/z/OS 2.1 environment, upgrade to z/OS 2.3 necessitated the reassembly of modified user exits SARSTCUX, SARSPFUX, and SARFVCUX.
The reassembly of the SARSTCUX exit failed using the 2.3 macro libraries:

ASSEMBLER PROCESSING FAILED FOR MODULE SARSTCUX IN THE CVDESRC LIBRARY.
RETURN CODE WAS 12. --- POSSIBLE CAUSES ---
 1. THE ASSEMBLER TEXT WAS IN ERROR.
 2. THE WRONG LEVEL OF MACROS WAS BEING USED.
 3. THE WRONG SET OF MACLIBS WAS BEING USED.

** ASMA068S Length error - L(IOBLENG)
** ASMA435I Record 484 in SYS1.SHASMAC($BUFFER) on volume:
** ASMA044E Undefined symbol - IOBINCAM
** ASMA435I Record 490 in SYS1.SHASMAC($BUFFER) on volume:
** ASMA044E Undefined symbol - IOBINCAM
** ASMA435I Record 491 in SYS1.SHASMAC($BUFFER) on volume:
** ASMA044E Undefined symbol - IOBXTENT
** ASMA435I Record 492 in SYS1.SHASMAC($BUFFER) on volume:
** ASMA044E Undefined symbol - IOBXTENT
** ASMA435I Record 493 in SYS1.SHASMAC($BUFFER) on volume:

Environment

View 12.2
z/OS 2.3

Resolution

To fix this error, the following code can be added In the SARSTCUX exit:

IEZIOB , MVS Input/Output Block
IOBDSECT EQU IOBSTDRD,0,C'J' Start of I/O Block DSECT
IOBLENG EQU IOBEXTEN-IOBSTDRD+L'IOBSEEK Length of IOB

Or they can use the JES2 $MODULE MACRO and specify $BUFFER with it, like this:
$MODULE TITLE='JES2 Macros',
+ $BUFFER

Note: The $MODULE MACRO contains code that will include IEZIOB and generate the above equates automatically.

After adding the above code assemble completed successfully.