4 (339)    INDEX (.11)

Name Value
FILE 4
NAME XUMFID
SHORT DESCRIPTION Enables lookup by coding system concatenated with ID.
TYPE REGULAR
EXECUTION RECORD
ACTIVITY IR
USE LOOKUP & SORTING
ROOT TYPE WHOLE FILE
ROOT FILE 4.9999
SET LOGIC S ^DIC(4,"XUMFID",X(3),DA(1),DA)=""
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   4.9999
    FIELD:   .01
    MAXIMUM LENGTH:   30
    COLLATION:   forwards
  • ORDER NUMBER:   2
    TYPE OF VALUE:   FIELD
    FILE:   4.9999
    FIELD:   .02
    MAXIMUM LENGTH:   30
    COLLATION:   forwards
  • ORDER NUMBER:   3
    SUBSCRIPT NUMBER:   1
    TYPE OF VALUE:   COMPUTED VALUE
    COMPUTED CODE:   S X=X(1)_X(2)
    LOOKUP PROMPT:   CODING SYSTEM/ID PAIR
KILL LOGIC K ^DIC(4,"XUMFID",X(3),DA(1),DA)
KILL ENTIRE INDEX CODE K ^DIC(4,"XUMFID")