Exit E39 is used mainly for SORTOUT write error routines. The exit is entered once at the beginning of merge or copy processing or the start of sort Phase 3. At this time MFX checks Register 1 for the address of a user parameter list specifying the various routines that you want MFX to include. MFX will then enter these routines at the appropriate times during execution. The use of an E39 exit forces the use of BSAM on the output file; this may degrade performance somewhat.
The format of the parameter list is given below.
|
Byte 1 |
Byte 2 |
Byte 3 |
Byte 4 |
|---|---|---|---|
|
01 |
SYNAD field |
||
|
02 |
EXLST field |
||
|
00 |
00 |
00 |
00 |
SYNAD field |
Indicated by 01 in byte 1. The SYNAD field contains the address of a synchronous write error routine, assembled as part of the exit program. Note that you may not use Register 13 as a save area pointer on entry to your routine. You must either provide your own save area or use the SYNADAF macro instruction. |
EXLST field |
Indicated by 02 in byte 1. The EXLST field contains the address of a list of pointers to user routines that perform operations such as label checking. If the EXLST field is specified, CHECKPOINT processing will not be performed by MFX. |
Exit E39 may be used to supply a VSAM exit list or password list for the output file in the same manner as described for exits E18 and E38. Note that unlike E18 there is no EODAD field with this exit.