DG53296 ;ALB/JAT DG*5.3*296 POST-INSTALL TO MAILMAN MSG;01 JUNE 2000
Source file <DG53296.m>
| Name | Comments | DBIA/ICR reference |
|---|---|---|
| POST | ;
; post-install set up checkpoints and tracking global... |
|
| EN | ; begin processing...
|
|
| EN1 | ; begin purge...
; write message to installation device and to INSTALL file (#9.7) |
|
| DGDTE | ;Loop through dates by patient.
|
|
| DGIEN | ;Loop through IEN numbers by patient and date.
|
|
| PREDEL | ;Validate records to delete
|
|
| DELETE(IEN1) | ;Delete non-primary test with source of DCD or Other Facility.
; Input: ; IEN1 = Internal Entry Number from 408.31 |
|
| COUNT(DATE) | ; update process tracking mechanisms
; Input: ; DATE = inverse date from 408.31 |
