26.13 (208)    INDEX (.11)

Name Value
FILE 26.13
NAME DBRS
DESCRIPTION
This index is used by a KEY to ensure that a DBRS Number is entered once 
and only once in this VistA System.
SHORT DESCRIPTION Index entire file by DBRS#
TYPE REGULAR
EXECUTION FIELD
ACTIVITY IR
USE LOOKUP & SORTING
ROOT TYPE WHOLE FILE
ROOT FILE 26.131
SET LOGIC S ^DGPF(26.13,"DBRS",$E(X,1,30),DA(1),DA)=""
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    SUBSCRIPT NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   26.131
    FIELD:   .01
    MAXIMUM LENGTH:   30
    COLLATION:   forwards
KILL LOGIC K ^DGPF(26.13,"DBRS",$E(X,1,30),DA(1),DA)
KILL ENTIRE INDEX CODE K ^DGPF(26.13,"DBRS")