220 (826)    INDEX (.11)

Name Value
FILE 220
NAME AM
DESCRIPTION
Only keeps one index per day per patient.  We don't need to know every 
day that the monitor was run, just if it was run for the current date. 
Xref contains the monitor flag, field #8.
SHORT DESCRIPTION Sort by Patient and Monitor Run Date
TYPE MUMPS
EXECUTION RECORD
ACTIVITY IR
USE SORTING ONLY
ROOT TYPE INDEX FILE
ROOT FILE 220
SET LOGIC S ^DENT(220,"AM",X(1),X(2))=+$P($G(^DENT(220,DA,0)),U,8)
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    SUBSCRIPT NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   220
    FIELD:   .01
    MAXIMUM LENGTH:   15
    COLLATION:   forwards
  • ORDER NUMBER:   2
    SUBSCRIPT NUMBER:   2
    TYPE OF VALUE:   FIELD
    FILE:   220
    FIELD:   5
    MAXIMUM LENGTH:   7
    COLLATION:   forwards
KILL LOGIC K ^DENT(220,"AM",X(1))
KILL ENTIRE INDEX CODE K ^DENT(220,"AM")