704.108 (931)    INDEX (.11)

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