702.09 (905)    INDEX (.11)

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