DG53528P ;ALB/ERC - COMBAT VET PRE & POSTINSTALLS ;7/22/03
Source file <DG53528P.m>
Name | Comments | DBIA/ICR reference |
---|---|---|
PRE | ;add 5 new entries to the INCONSISTENT DATA ELEMENTS file (#38.6)
|
|
ADD | ;set up FDA arrays for the addition of new entries in 38.6
|
|
UPD | ;call UPDATE^DIE
|
|
SET | ;set the entry field values into variables
|
|
POST | ;post install routine for Combat Veteran - will loop through the
|
|
POST1 | ;check to see if process already finished, already started or currently
|
|
ACTIVE(DGTASK) | ;check to see if task already running
; DGTASK - taskman task number ; output - (1,0) is the task running? |
|
POSTQ | ;queue the task
|
|
LOOP | ;
|
|
REQUE | ;requeue initial seeding if interrupted
|
FileNo | Call Tags |
---|---|
^DPT - [#2] | GET1^DIQ |