704.116 (949)    INDEX (.11)

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