458 (707)    INDEX (.11)

Name Value
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")