704.119 (961)    INDEX (.11)

Name Value
FILE 704.119
NAME APREV
DESCRIPTION
This will provide a quick sort of audited observations and the relative 
observations.
SHORT DESCRIPTION Flags the previous observation that was replaced by this one
TYPE REGULAR
EXECUTION RECORD
ACTIVITY IR
USE SORTING ONLY
ROOT TYPE INDEX FILE
ROOT FILE 704.119
SET LOGIC S ^MDC(704.119,"APREV",$E(X(1),1,38),$E(X(2),1,38),DA)=""
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    SUBSCRIPT NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   704.119
    FIELD:   .08
    MAXIMUM LENGTH:   38
    COLLATION:   forwards
  • ORDER NUMBER:   2
    SUBSCRIPT NUMBER:   2
    TYPE OF VALUE:   FIELD
    FILE:   704.119
    FIELD:   .03
    MAXIMUM LENGTH:   38
    COLLATION:   forwards
KILL LOGIC K ^MDC(704.119,"APREV",$E(X(1),1,38),$E(X(2),1,38),DA)
KILL ENTIRE INDEX CODE K ^MDC(704.119,"APREV")