351.6 (41)    INDEX (.11)

Name Value
FILE 351.6
NAME AD
SHORT DESCRIPTION Patient's preferred (enrolled) facility OR overridden facility
TYPE REGULAR
EXECUTION RECORD
ACTIVITY IR
USE SORTING ONLY
ROOT TYPE INDEX FILE
ROOT FILE 351.6
SET LOGIC S ^IBAT(351.6,"AD",X(3),DA)=""
SET CONDITION CODE S X=X(3)
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   351.6
    FIELD:   .1
    COLLATION:   forwards
  • ORDER NUMBER:   2
    TYPE OF VALUE:   FIELD
    FILE:   351.6
    FIELD:   .03
    COLLATION:   forwards
  • ORDER NUMBER:   3
    SUBSCRIPT NUMBER:   1
    TYPE OF VALUE:   COMPUTED VALUE
    COMPUTED CODE:   S X=+$S($G(X(1)):X(1),1:$G(X(2)))
KILL LOGIC K ^IBAT(351.6,"AD",X(3),DA)
KILL CONDITION CODE S X=X(3)
KILL ENTIRE INDEX CODE K ^IBAT(351.6,"AD")