702.01 (904)    INDEX (.11)

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