55 (414)    INDEX (.11)

Name Value
FILE 55
NAME ACX
DESCRIPTION
This cross-reference builds an index used for finding
all child orders associated with a particular CPRS
parent order. The indexes are stored as
 ^PS(55,"ACX",PARENT,ON)
SHORT DESCRIPTION Complex Order index.
TYPE MUMPS
EXECUTION RECORD
ACTIVITY IR
USE SORTING ONLY
ROOT TYPE WHOLE FILE
ROOT FILE 55.06
SET LOGIC S ^PS(55,"ACX",$E(X(1),1,30),$E(X(2),1,30),DA_"U")=""
SET CONDITION CODE S X=1
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    SUBSCRIPT NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   55.06
    FIELD:   125
    COLLATION:   forwards
  • ORDER NUMBER:   2
    SUBSCRIPT NUMBER:   2
    TYPE OF VALUE:   FIELD
    FILE:   55.06
    FIELD:   66
    COLLATION:   forwards
KILL LOGIC K ^PS(55,"ACX",$E(X(1),1,30),$E(X(2),1,30),DA_"U")
KILL CONDITION CODE S X=1
KILL ENTIRE INDEX CODE K ^PS(55,"ACX")