356.01 (443)    INDEX (.11)

Name Value
FILE 356.01
NAME D
SHORT DESCRIPTION Convert to Upper Case for lookups
TYPE REGULAR
EXECUTION FIELD
ACTIVITY IR
USE LOOKUP & SORTING
ROOT TYPE INDEX FILE
ROOT FILE 356.01
SET LOGIC S ^IBT(356.01,"D",$E(X,1,30),DA)=""
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    SUBSCRIPT NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   356.01
    FIELD:   .02
    TRANSFORM FOR STORAGE:   S X=$$UP^XLFSTR($E(X,1,30))
    MAXIMUM LENGTH:   30
    COLLATION:   forwards
KILL LOGIC K ^IBT(356.01,"D",$E(X,1,30),DA)
KILL ENTIRE INDEX CODE K ^IBT(356.01,"D")