2 (640)    INDEX (.11)

Name Value
FILE 2
NAME ASERLAST
DESCRIPTION
This cross-reference indexes the LAST ENTRY and SEPARATION dates.
The form of the index is:
  ^DPT("ASERVICE",SEPARATION DATE,ENTRY DATE,DA,"LAST")

If one of the dates is missing the corresponding subscript is replaced by U_DA.
SHORT DESCRIPTION Index LAST ENTRY and SEPARATION dates
TYPE MUMPS
EXECUTION RECORD
ACTIVITY R
USE ACTION
ROOT TYPE INDEX FILE
ROOT FILE 2
SET LOGIC D SSERV^DGSRVICE(.X,.DA,"LAST")
CROSS-REFERENCE VALUES
  • ORDER NUMBER:   1
    TYPE OF VALUE:   FIELD
    FILE:   2
    FIELD:   .326
  • ORDER NUMBER:   2
    TYPE OF VALUE:   FIELD
    FILE:   2
    FIELD:   .327
KILL LOGIC D KSERV^DGSRVICE(.X,.DA,"LAST")
KILL ENTIRE INDEX CODE K ^DPT("ASERVICE")