| FILE | 
2006.5849 | 
| NAME | 
E | 
| SHORT DESCRIPTION | 
Allow sorting by Acquisition Site and Date | 
| TYPE | 
REGULAR | 
| EXECUTION | 
RECORD | 
| ACTIVITY | 
IR | 
| USE | 
LOOKUP & SORTING | 
| ROOT TYPE | 
INDEX FILE | 
| ROOT FILE | 
2006.5849 | 
| SET LOGIC | 
S ^MAG(2006.5849,"E",$E(X(1),1,4),$E(X(2),1,7),DA)="" | 
| CROSS-REFERENCE VALUES | 
- 
- ORDER NUMBER:    1
 
- SUBSCRIPT NUMBER:    1
 
- TYPE OF VALUE:    FIELD
 
- FILE:    2006.5849
 
- FIELD:    1
 
- MAXIMUM LENGTH:    4
 
- COLLATION:    forwards
 
 
- 
- ORDER NUMBER:    2
 
- SUBSCRIPT NUMBER:    2
 
- TYPE OF VALUE:    FIELD
 
- FILE:    2006.5849
 
- FIELD:    17
 
- TRANSFORM FOR STORAGE:    S X=$E($P(X,"."),1,30)
 
- MAXIMUM LENGTH:    7
 
- COLLATION:    forwards
 
 
 
 | 
| KILL LOGIC | 
K ^MAG(2006.5849,"E",$E(X(1),1,4),$E(X(2),1,7),DA) | 
| KILL ENTIRE INDEX CODE | 
K ^MAG(2006.5849,"E") |