| FILE | 
798 | 
| NAME | 
KEY | 
| DESCRIPTION | 
This index guarantees uniqueness of the patient 
record in the particular registry and allows users
to easily find this record.
 
 | 
| SHORT DESCRIPTION | 
Uniqueness Index for Key 'A' of File #798 | 
| TYPE | 
REGULAR | 
| EXECUTION | 
RECORD | 
| ACTIVITY | 
IR | 
| USE | 
LOOKUP & SORTING | 
| ROOT TYPE | 
INDEX FILE | 
| ROOT FILE | 
798 | 
| SET LOGIC | 
S ^RORDATA(798,"KEY",X(1),X(2),DA)="" | 
| CROSS-REFERENCE VALUES | 
- 
- ORDER NUMBER:    1
 
- SUBSCRIPT NUMBER:    1
 
- TYPE OF VALUE:    FIELD
 
- FILE:    798
 
- FIELD:    .01
 
 
- 
- ORDER NUMBER:    2
 
- SUBSCRIPT NUMBER:    2
 
- TYPE OF VALUE:    FIELD
 
- FILE:    798
 
- FIELD:    .02
 
 
 
 | 
| KILL LOGIC | 
K ^RORDATA(798,"KEY",X(1),X(2),DA) | 
| KILL ENTIRE INDEX CODE | 
K ^RORDATA(798,"KEY") |