Coding the other pieces

In addition to coding the installation DTE table, you need to:

Write a HASPXJ00 module that holds the DTE subtask code
Create a macro called $SCDWORK to map the DTE extension. An equate named SCDLEN is required within the macro to define the length of the extension area needed.
Code two fields and one equate in the installation $UCT
- UDTESCTY EQU 255 ID OF SCTY DTE
  An equate for the identifier of the subtask. We specify the equate UDTESCTY with a value of 255.
- UCTMDSCY DC A(*-*) ADDR OF ENTRYPT
  The address of the entry point for the HASPXJ00 module for the installation DTE
- UCTSYDTE DC A(*-*) ADDR OF SCTY DTE
  The address of the first security DTE
Code Exit 0 code. Exit 0 must:
- Obtain the $UCT and place the $UCT's address in the $HCT.
- Initialize the $UCT.
- Place the installation DTE table address in the MCTDTETU field in the $MCT in module HASPTABS. This is not necessary for dynamic tables. Dynamic tables should be linked to the table pair by placing a LOAD initialization statement in your JES2 initialization stream for the module containing the dynamic DTE table.