| FILE | 
230 | 
| NAME | 
ADUP2 | 
| DESCRIPTION | 
This contributes the last initial / last 4 to the ADUP xref, which helps
in identifying patients with similar names or similar brief identifiers.
Only active (not closed) entries are in the cross reference.
 
 | 
| SHORT DESCRIPTION | 
SITE,AREA,LAST4,IEN for active patients | 
| TYPE | 
MUMPS | 
| EXECUTION | 
RECORD | 
| ACTIVITY | 
IR | 
| USE | 
SORTING ONLY | 
| ROOT TYPE | 
INDEX FILE | 
| ROOT FILE | 
230 | 
| SET LOGIC | 
S ^EDP(230,"ADUP",X(1),X(2),X(3),DA)="" | 
| SET CONDITION CODE | 
S X='X2(4) | 
| CROSS-REFERENCE VALUES | 
- 
- ORDER NUMBER:    1
 
- SUBSCRIPT NUMBER:    1
 
- TYPE OF VALUE:    FIELD
 
- FILE:    230
 
- FIELD:    .02
 
- COLLATION:    forwards
 
 
- 
- ORDER NUMBER:    2
 
- SUBSCRIPT NUMBER:    2
 
- TYPE OF VALUE:    FIELD
 
- FILE:    230
 
- FIELD:    .03
 
- COLLATION:    forwards
 
 
- 
- ORDER NUMBER:    3
 
- SUBSCRIPT NUMBER:    3
 
- TYPE OF VALUE:    FIELD
 
- FILE:    230
 
- FIELD:    .11
 
- COLLATION:    forwards
 
 
- 
- ORDER NUMBER:    4
 
- TYPE OF VALUE:    FIELD
 
- FILE:    230
 
- FIELD:    .07
 
- COLLATION:    forwards
 
 
 
 | 
| KILL LOGIC | 
K ^EDP(230,"ADUP",X(1),X(2),X(3),DA) |