Natural Security

If a security routine is specified (see below), then PEEK will call the subprograms NSC---L (to check the security link between the user and the nominated library), and NSCLI (to check whether update modules are permitted). These modules should also be copied to SYSTEM.

1060 * Choose which security routine to use:
1070 *
1080 *   1) the PEEK-provided 'PKSECN01'
1090 *   2) a site-provided module
1100 *   3) no security (leave #SECURITY-ROUTINE blank)
1110 *
1120 * If using option #2, the calling parameters are as follows:
1130 *
1140 *    --->  #FSEC-FN          (B2)
1150 *    --->  #FSEC-DB          (B2)
1160 *    --->  #DDM-NAME         (A32)
1170 *    --->  #LIBRARY-NAME     (A8)
1180 *    <---  #FILE-MODIFIABLE  (L)    Whether the file may be updated
1190 *    <---  #SECURITY-STATUS  (P3)   0 = success, non-zero = failure
1200 *
1210   #SECURITY-ROUTINE := 'PKSECN01'