| FILE | 
704.005 | 
| NAME | 
APIMS | 
| DESCRIPTION | 
This index will maintain a relationship with PIMS patient movement data.  
Even when patient movement data may no longer exist within the PIMS, this 
index maintains these relationships as needed by the CP Flowsheets.
 
 | 
| SHORT DESCRIPTION | 
Index by PIMS event ID | 
| TYPE | 
REGULAR | 
| EXECUTION | 
RECORD | 
| ACTIVITY | 
IR | 
| USE | 
SORTING ONLY | 
| ROOT TYPE | 
INDEX FILE | 
| ROOT FILE | 
704.005 | 
| SET LOGIC | 
S ^MDC(704.005,"APIMS",$E(X(1),1,30),$E(X(2),1,30),$E(X(3),1,30),DA)="" | 
| CROSS-REFERENCE VALUES | 
- 
- ORDER NUMBER:    1
 
- SUBSCRIPT NUMBER:    1
 
- TYPE OF VALUE:    FIELD
 
- FILE:    704.005
 
- FIELD:    .08
 
- MAXIMUM LENGTH:    30
 
- COLLATION:    forwards
 
 
- 
- ORDER NUMBER:    2
 
- SUBSCRIPT NUMBER:    2
 
- TYPE OF VALUE:    FIELD
 
- FILE:    704.005
 
- FIELD:    .01
 
- MAXIMUM LENGTH:    30
 
- COLLATION:    forwards
 
 
- 
- ORDER NUMBER:    3
 
- SUBSCRIPT NUMBER:    3
 
- TYPE OF VALUE:    FIELD
 
- FILE:    704.005
 
- FIELD:    .04
 
- MAXIMUM LENGTH:    30
 
- COLLATION:    forwards
 
 
 
 | 
| KILL LOGIC | 
K ^MDC(704.005,"APIMS",$E(X(1),1,30),$E(X(2),1,30),$E(X(3),1,30),DA) | 
| KILL ENTIRE INDEX CODE | 
K ^MDC(704.005,"APIMS") |