798.31 (156)    INDEX (.11)

Name Value
FILE 798.31
NAME B
SHORT DESCRIPTION Uniqueness Index for the "A" key of Subfile #798.31
TYPE REGULAR
EXECUTION FIELD
ACTIVITY IR
USE LOOKUP & SORTING
ROOT TYPE INDEX FILE
ROOT FILE 798.31
SET LOGIC S ^RORDATA(798.3,DA(1),1,"B",X,DA)=""
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    SUBSCRIPT NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   798.31
    FIELD:   .01
KILL LOGIC K ^RORDATA(798.3,DA(1),1,"B",X,DA)
KILL ENTIRE INDEX CODE K ^RORDATA(798.3,DA(1),1,"B")