E15 interface with COBOL

Each time the E15 user exit is called, DFSORT supplies the following fields:

Record flags
New record
Length of the new record (for variable-length records)
Length of user exit area
User exit area.

When E15 returns to DFSORT, the E15 user exit provides to DFSORT some or all of the fields mentioned in the following. The first field is required; the others can be modified as appropriate.

RETURN-CODE (assigned by the user exit by setting the COBOL special register RETURN-CODE)
Return record
Length of the return record (for VLR)
Length of user exit area
User Exit area.

For more information on how these fields are used in a COBOL E15 user exit, see E15 LINKAGE SECTION fields for fixed-length and variable-length records.

Figure 1 details the interface to COBOL for the E15 user exit.

Figure 1. E15 DFSORT Interface with COBOL