This sample ADATA exit uses parameters specified on the assembler EXIT option, to determine which associated data record types are to be reformatted from the High Level Assembler Release 5 format back to the Release 4 format. The exit accepts records from the assembler, from a PROCESS request, and it decides whether the record should be reformatted.

High Level Assembler Release 5 has restructured the associated data records. This sample exit is provided as a migration aid to allow existing associated data processing utilities to continue to function during the transition from Release 4 to Release 5.