DG53285 ;ALB/PAK-DG*5.3*285 POST-INSTALL TO CLEAN MEANS TEST ;4/24/2000
Source file <DG53285.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) |
|
| DELMT(MTIDT,DFN,ENTR,ERRS) | ;
; Input: ; MTIDT - Inverse Means Tets Date ; DFN - Patient identifier ; ENTR - Entry # to ignore ; ERRS - DBS file error {by reference} |
|
| RQ2NPRM(IDT,DFN,STA,YR,NODE,ERRS) | ; change Required test to NON primary
|
|
| SCOPE(X1,X2) | ; Check if dates within 365 days of one another
|
|
| COUNT(DATE) | ; update process tracking mechanisms...
; Input: ; DATE = inverse date from "AS" x-ref in 408.31 |
|
| REQ(DFN,DGMTI,DGCS,IDT) | ; Determine if test is Required
|