If you do not intend to use PADS, you need to protect a program in a link list application library to control its use, you can use something similar to the following:

1. SETROPTS WHEN(PROGRAM)
       /* activates program control                                     */

2. ADDSD 'APPL.LOADLIB' UACC(NONE)
       /* prevents users from copying programs                          */

3. RDEFINE PROGRAM MYPROG ADDMEM('APPL.LOADLIB'/VOL123/NOPADCHK) UACC(NONE)
       /* makes MYPROG a controlled program. MYPROG must be a member    */
       /* of 'APPL.LOADLIB' on volume 123                               */

4. SETROPTS WHEN(PROGRAM) REFRESH
       /* puts the new PROGRAM profile into storage                     */