704.109 (932)    INDEX (.11)

Name Value
FILE 704.109
NAME PK
DESCRIPTION
This will allow quick sorting of unique term mapping pairs in this file.
SHORT DESCRIPTION Uniqueness Index for Key 'A' of File #704.109
TYPE REGULAR
EXECUTION RECORD
ACTIVITY IR
USE LOOKUP & SORTING
ROOT TYPE INDEX FILE
ROOT FILE 704.109
SET LOGIC S ^MDC(704.109,"PK",$E(X(1),1,38),$E(X(2),1,240),$E(X(3),1,38),DA)=""
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    SUBSCRIPT NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   704.109
    FIELD:   .01
    MAXIMUM LENGTH:   38
  • ORDER NUMBER:   2
    SUBSCRIPT NUMBER:   2
    TYPE OF VALUE:   FIELD
    FILE:   704.109
    FIELD:   .1
    MAXIMUM LENGTH:   240
  • ORDER NUMBER:   3
    SUBSCRIPT NUMBER:   3
    TYPE OF VALUE:   FIELD
    FILE:   704.109
    FIELD:   .03
    MAXIMUM LENGTH:   38
KILL LOGIC K ^MDC(704.109,"PK",$E(X(1),1,38),$E(X(2),1,240),$E(X(3),1,38),DA)
KILL ENTIRE INDEX CODE K ^MDC(704.109,"PK")