SROXPR ;B'HAM ISC/MAM - RESTRICTED PERSON FIELDS ; 26 DEC 1991 9:15 AM
Source file <SROXPR.m>
| Name | Comments | DBIA/ICR reference | 
|---|---|---|
| KXREF | ; kill logic for 'AX' cross reference in file 131 | |
| XREF | ; set logic for 'AX' cross reference in file 131 | |
| END | ||
| KEY | ; determine whether field is restricted | 
| Name | Line Occurrences (* Changed, ! Killed) | 
|---|---|
| ^SRP - [#131] | XREF+1, KXREF+1 | 
| ^SRP("AX" | KEY+2, KEY+3, XREF+1*, KXREF+1! | 
| ^XUSEC( | KEY+3 | 
| >> | Not killed explicitly | 
| * | Changed | 
| ! | Killed | 
| ~ | Newed | 
| Name | Field # of Occurrence | 
|---|---|
| >> DA(1 | XREF+1, KXREF+1 | 
| ENTRY | END!, XREF+1! | 
| KEY | KEY+3*, END! | 
| RESTRICT | KEY+2, KEY+3, END! | 
| SRENTRY | XREF+1*, KXREF+1*! | 
| SROK | KEY+1!, KEY+2*, KEY+3* | 
| >> X | XREF+1, KXREF+1 | 
| >> Y | KEY+1, KEY+3 |