DG53285 ;ALB/PAK-DG*5.3*285 POST-INSTALL TO CLEAN MEANS TEST ;4/24/2000
Source file <DG53285.m>
Package | Total | Call Graph |
---|---|---|
Registration | 7 | MAIL^DG53285M $$UPD^DGENDBS EN^DGMTCOR ($$SC,ADD,DOM,NOL,REQ)^DGMTR $$LST^DGMTU $$OLD^DGMTU4 $$SITE^VASITE |
Kernel | 2 | ($$DT,$$FMTE,$$NOW)^XLFDT ($$COMCP,$$NEWCP,$$PARCP,$$UPCP,$$VERCP,BMES,MES)^XPDUTL |
Income Verification Match | 1 | $$EN^IVMCMD |
VA FileMan | 1 | (,C)^%DTC |
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
|
Name | Field # of Occurrence |
---|---|
^%DTC | SCOPE+1 |
C^%DTC | POST+16 |
MAIL^DG53285M | EN1+48 |
$$UPD^DGENDBS | RQ2NPRM+30, RQ2NPRM+36 |
EN^DGMTCOR | REQ+35 |
$$SC^DGMTR | REQ+21 |
ADD^DGMTR | REQ+30 |
DOM^DGMTR | REQ+24 |
NOL^DGMTR | REQ+31 |
REQ^DGMTR | REQ+29 |
$$LST^DGMTU | EN1+23, RQ2NPRM+13 |
$$OLD^DGMTU4 | REQ+26 |
$$EN^IVMCMD | DELMT+12 |
$$SITE^VASITE | EN1+15 |
$$DT^XLFDT | POST+17 |
$$FMTE^XLFDT | EN1+8, EN1+50 |
$$NOW^XLFDT | EN1+8, EN1+50 |
$$COMCP^XPDUTL | EN1+49 |
$$NEWCP^XPDUTL | POST+6, POST+8 |
$$PARCP^XPDUTL | EN1+14 |
$$UPCP^XPDUTL | EN1+43, EN1+45 |
$$VERCP^XPDUTL | POST+5, POST+7, EN+3 |
BMES^XPDUTL | EN1+2, EN1+8 |
MES^XPDUTL | EN1+3, EN1+4, EN1+5, EN1+6, EN1+7, EN1+50 |
Name | Line Occurrences (* Changed, ! Killed) |
---|---|
^DGMT(408.31 - [#408.31] | EN1+16, EN1+19, EN1+32, DELMT+10, RQ2NPRM+27, RQ2NPRM+28, RQ2NPRM+41, REQ+25 |
^DIC(8 - [#8] | REQ+21 |
^DPT - [#2] | REQ+20, REQ+23 |
^XTMP( | POST+13 |
^XTMP("DG-" | POST+17* |
^XTMP("DG-MTERR" | EN1+41* |
^XTMP("DG-MTIY" | COUNT+6* |
Name | Field # of Occurrence |
---|---|
^( | REQ+20 |
>> | Not killed explicitly |
* | Changed |
! | Killed |
~ | Newed |
Name | Field # of Occurrence |
---|---|
% | POST+2~, POST+6*, POST+8*, EN+1~, EN+3*, EN+4*, EN+5, EN1+43*, EN1+45*, EN1+49* , COUNT+4~ |
DATA | RQ2NPRM+10~, RQ2NPRM+30, RQ2NPRM+36 |
DATA(2 | RQ2NPRM+29*, RQ2NPRM+35* |
DATE | COUNT~, COUNT+5 |
DFN | DELMT~, DELMT+10, RQ2NPRM~, RQ2NPRM+13, RQ2NPRM+27, RQ2NPRM+43, REQ~, REQ+20, REQ+21, REQ+23 |
DGADDF | RQ2NPRM+10~, REQ+30 |
DGCS | REQ~, REQ+26, REQ+29, REQ+30, REQ+31 |
DGDFN | EN1+11~, EN1+14*, EN1+17*, EN1+19*, EN1+23, EN1+32, EN1+33, EN1+38, EN1+43 |
DGDOM | REQ+17~, REQ+24, REQ+31 |
DGMSGF | REQ+17~, REQ+19* |
DGMT0 | REQ+17~, REQ+25* |
DGMTI | REQ~, REQ+25 |
DGMTIDT | EN1+11~, EN1+13*, EN1+14*, EN1+16*, EN1+18, EN1+19, EN1+31, EN1+32, EN1+33, EN1+38 , EN1+45 |
DGMTYPT | REQ+17~, REQ+19* |
DGQSENT | REQ+17~, REQ+19* |
DGREQF | RQ2NPRM+10~, REQ+19*, REQ+21*, REQ+22*, REQ+23*, REQ+24*, REQ+29, REQ+30, REQ+31 |
DGRGAUTO | REQ+17~ |
DT | POST+14 |
ENTR | DELMT~, DELMT+11 |
ERR | DELMT+7~, RQ2NPRM+10~, RQ2NPRM+30, RQ2NPRM+36 |
ERRS | DELMT~, RQ2NPRM~ |
ERRS( | DELMT+12*, RQ2NPRM+30*, RQ2NPRM+36* |
FILERR | EN1+11~, EN1+20~, EN1+33, EN1+38, EN1+41 |
I | POST+2~, POST+12*, POST+13, POST+17 |
IDT | RQ2NPRM~, RQ2NPRM+27, RQ2NPRM+33, RQ2NPRM+43, REQ~, REQ+26 |
IEN | DELMT+7~, DELMT+9*, DELMT+10*, DELMT+11, DELMT+12 |
IY | COUNT+4~, COUNT+5*, COUNT+6 |
MTIDT | DELMT~, DELMT+10, DELMT+14 |
MTIEN | EN1+11~, EN1+31*, EN1+32*, EN1+33 |
NODE | EN1+23*, EN1+31, EN1+38, RQ2NPRM~, RQ2NPRM+28 |
NODE1 | RQ2NPRM+10~, RQ2NPRM+13*, RQ2NPRM+33, RQ2NPRM+36 |
NODE2 | RQ2NPRM+10~, RQ2NPRM+41*, RQ2NPRM+42 |
OLD | REQ+17~, REQ+19*, REQ+26*, REQ+29, REQ+30 |
REC31 | RQ2NPRM+10~, RQ2NPRM+27*, RQ2NPRM+28, RQ2NPRM+30, RQ2NPRM+40, RQ2NPRM+41, RQ2NPRM+43 |
STA | EN1+11~, EN1+15*, EN1+38, RQ2NPRM~, RQ2NPRM+42 |
U | EN1+31, RQ2NPRM+28, RQ2NPRM+33, RQ2NPRM+42 |
X | POST+2~, POST+17, SCOPE+2, REQ+20*, REQ+21, REQ+22 |
X1 | POST+2~, POST+14*, SCOPE~ |
X2 | POST+2~, POST+15*, SCOPE~ |
>> XPDNM | POST+3, EN+3, EN1+13, EN1+14, EN1+43, EN1+45, EN1+49 |
YR | EN1+11~, EN1+18*, EN1+23, EN1+38, RQ2NPRM~, RQ2NPRM+13, RQ2NPRM+33 |