773 (347)    INDEX (.11)

Name Value
FILE 773
NAME AJ
SHORT DESCRIPTION Removes record from the "AI" x-ref if Fast Purge Date/Time is edited.
TYPE MUMPS
EXECUTION FIELD
USE ACTION
ROOT TYPE INDEX FILE
ROOT FILE 773
SET LOGIC Q
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    SUBSCRIPT NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   773
    FIELD:   2.02
    COLLATION:   forwards
KILL LOGIC K:$G(X1(1)) ^HLMA("AI",X1(1),773,+$G(DA))