Sample User Exits

For the exit definition module (DK1TX072) and each user exit point, DKL supplies sample source code in your.prefix.SRC. Sample JCL to assemble and link edit DK1TX072 is in your.prefix.CNTL(ALTX072). Sample DSECTs for the Communication Area and the Extended Field Definition Area are in your.prefix.SRC(DK1XU1).

The DK1TX072 load module provided by DKL has all exits disabled. Sample source code for DK1TX072 is shown in Figure 26.

Figure 26. Sample implementation of DX1EXDFN in DK1TX072
Sample implementation of DX1EXDFN in DK1TX072