| FILE | 
458 | 
| NAME | 
ASA | 
| DESCRIPTION | 
This index promotes rapid access to all the ESR days for which a Supervisor
of a T&L unit must take action.
 
 | 
| SHORT DESCRIPTION | 
TEST | 
| TYPE | 
REGULAR | 
| EXECUTION | 
RECORD | 
| ACTIVITY | 
IR | 
| USE | 
SORTING ONLY | 
| ROOT TYPE | 
WHOLE FILE | 
| ROOT FILE | 
458.02 | 
| SET LOGIC | 
S ^PRST(458,"ASA",X(1),X(2),X(3),DA(2),DA(1),DA)="" | 
| SET CONDITION CODE | 
S X=$S($G(X(4))=4:1,1:0) | 
| CROSS-REFERENCE VALUES | 
- 
- ORDER NUMBER:    1
 
- SUBSCRIPT NUMBER:    1
 
- TYPE OF VALUE:    COMPUTED VALUE
 
- COMPUTED CODE:    S X=DA(1)
 
 
- 
- ORDER NUMBER:    2
 
- SUBSCRIPT NUMBER:    2
 
- TYPE OF VALUE:    COMPUTED VALUE
 
- COMPUTED CODE:    S X=$P(^PRST(458,DA(2),0),"^")
 
 
- 
- ORDER NUMBER:    3
 
- SUBSCRIPT NUMBER:    3
 
- TYPE OF VALUE:    FIELD
 
- FILE:    458.02
 
- FIELD:    .01
 
- COLLATION:    forwards
 
 
- 
- ORDER NUMBER:    4
 
- TYPE OF VALUE:    FIELD
 
- FILE:    458.02
 
- FIELD:    146
 
- COLLATION:    forwards
 
 
 
 | 
| KILL LOGIC | 
K ^PRST(458,"ASA",X(1),X(2),X(3),DA(2),DA(1),DA) | 
| KILL ENTIRE INDEX CODE | 
K ^PRST(458,"ASA") |