Writing your exit

Z Data Tools does not supply a default scrambling exit. If you plan to use a scrambling exit you must provide one or more for your installation.

Any exit you provide must be in the form of a load module, in any load library available to Z Data Tools, either by a STEPLIB DD statement, or in LINKLIST, or LPALIST. If Z Data Tools attempts to load an exit and is unable to find it, an error message is displayed.

You can write your own exit in any high level language, for example, COBOL, PL/I, or High Level Assembler. Sample exits for COBOL, PL/I, and HLASM are provided in HFM.SHFMSAM1. They are:
Sample HLASM exit
Sample COBOL exit
Sample PL/I exit
These samples perform a simple scrambling algorithm of changing all uppercase characters to 'A', all lowercase characters to 'a', and all numbers to '1'. They are designed purely to demonstrate the capabilities of an exit. Refer to the prolog in each sample for more information about coding your exit.
Copybooks providing the scrambling exit control blocks for COBOL, PL/I, and HLASM are distributed in the Z Data Tools macro library, HFM.SHFMMAC1. They are:
Control block for HLASM programs
Control block for COBOL programs
Control block for PL/I programs
These copybooks are described in Exit control block description. See Using the scrambling exit control block for information on how to write your exit using the copybooks.
  1. The Z Data Tools I/O exit does not support 24-bit addressing mode.
  2. Z Data Tools supports an exit written in any supported release of COBOL and PL/I.
  3. Z Data Tools provides information concerning the input and output field formats as described by the exit control block. See Table 1