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 |