50.416 (223)    INDEX (.11)

Name Value
FILE 50.416
NAME P1
DESCRIPTION
 
SHORT DESCRIPTION CROSS REFERENCE ON PRIMARY INGREDIENT
TYPE MUMPS
EXECUTION RECORD
ACTIVITY IR
USE LOOKUP & SORTING
ROOT TYPE INDEX FILE
ROOT FILE 50.416
SET LOGIC I X2(1)'="",X2(2)="" S ^PS(50.416,"P",X2(1),DA)=""
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   50.416
    FIELD:   .01
    COLLATION:   forwards
  • ORDER NUMBER:   2
    TYPE OF VALUE:   FIELD
    FILE:   50.416
    FIELD:   2
    COLLATION:   forwards
KILL LOGIC I X2(1)=""!(X2(2)'="")!(X1(1)'=X2(1)) K ^PS(50.416,"P",X1(1),DA)
KILL ENTIRE INDEX CODE K ^PS(50.416,"P")