9.11.1 User Defined Developer Services Exit Programs
You can have up to 3 user defined developer services exit programs available for use on the Developer Services Menu, simply by defining their names and descriptions in the extended information data area DC@A07.
To enable the first user defined developer services exit program to be invoked these steps must be taken:
Step 1
Change the extended information data area DC@A07 by inserting the name and description of the user defined developer services program into positions 21 to 60, using the following command:
CHGDTAARA DTAARA(DC@A07 (21 40))
VALUE('AAAAAAAAAABBBBBBBBBBBBBB...')
Replace:
'AAAAAAAAAA' with the user defined developer services exit program name. Use UPPERCASE characters only.
'BBBBBBBBBBBBBBBBBBBB' with the user defined developer services exit program description.
Step 2
The user defined developer services exit program will have no parameters passed to it.
To enable the second and third user defined developer services exit program to be invoked, repeat the steps above ensuring the start position on the CHGDTAARA command described in step 1 is changed to:
Developer Services Exit program 02:
CHGDTAARA DTAARA(DC@A07 (61 40))
VALUE('AAAAAAAAAABBBBBBBBBBBBBB...')
and Developer Services Exit program 03:
CHGDTAARA DTAARA(DC@A07 (101 40))
VALUE('AAAAAAAAAABBBBBBBBBBBBBB...')