Routine: DG53401P

Customize PDF page

Select the objects that you wish to see in the downloaded PDF

Info
Source
Call Graph
Entry Points
External References
Global Variables Directly Accessed
Label References
Naked Globals
Local Variables

Information

DG53401P ;ALB/AEG - CLEAN UP REQUIRED TESTS THAT SHOULD BE NLR

Source Information

Source file <DG53401P.m>

Call Graph

Call Graph Total: 10

Package	Total	Call Graph
Registration	5	EN^DGMTCOR ($$SC,DOM,NOL)^DGMTR $$LYR^DGMTSCU1 $$MTS^DGMTU $$OLD^DGMTU4
Kernel	2	($$DT,$$FMTE,$$NOW)^XLFDT ($$COMCP,$$NEWCP,$$UPCP,$$VERCP,BMES,MES)^XPDUTL
VA Fileman	2	^%DT C^%DTC
MailMan	1	^XMD

Entry Points

Name	Comments	DBIA/ICR reference
EN	; Post-install entry point
BLDSTR(P1,P2,P3)	;Build a string from input variables ; Input - P1 (Parameter 1) = Patient Name ; P2 ( "" 2) = "" SSN ; P3 ( "" 3) = "" MT Date
EN1	;
LIY(DT)	;Determine Last Income year
REQ(DFN,DGMTI,DGCS,IDT)	; Determine if test is Required
START	;Main control of action starts here
INIT	; Initialize tracking global and associated checkpoints.
DONE	;
BUILD	;Build ^UTILITY($J, nodes for use by mailman.
MAIL	;Send an email notifying user of what records were successfully

External References

Name	Field # of Occurrence
^%DT	LIY+2
C^%DTC	INIT+15
EN^DGMTCOR	REQ+34
$$SC^DGMTR	REQ+21
DOM^DGMTR	REQ+24
NOL^DGMTR	REQ+30
$$LYR^DGMTSCU1	LIY+3
$$MTS^DGMTU	EN1+26
$$OLD^DGMTU4	REQ+26
$$DT^XLFDT	INIT+16
$$FMTE^XLFDT	EN1+10
$$NOW^XLFDT	EN1+10
^XMD	MAIL+6
$$COMCP^XPDUTL	START+3, START+4, START+5
$$NEWCP^XPDUTL	INIT+6, INIT+8, INIT+10
$$UPCP^XPDUTL	EN1+32, EN1+34, EN1+36
$$VERCP^XPDUTL	INIT+5, INIT+7, INIT+9, INIT+20
BMES^XPDUTL	EN1+1, EN1+10, EN1+11, MAIL+7
MES^XPDUTL	EN1+2, EN1+3, EN1+4, EN1+5, EN1+6, EN1+7, EN1+8, EN1+9

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	BLDSTR+14
^DGMT(408.31 - [#408.31]	EN1+19, EN1+21, EN1+23, EN1+24, REQ+25, BUILD+24
^DIC(8 - [#8]	REQ+21
^DPT - [#2]	EN1+13, EN1+16, EN1+17, REQ+20, REQ+23, REQ+27, BUILD+22, BUILD+23
^TMP($J	INIT+1!, EN1+29*, DONE+1!, BUILD+1, BUILD+4, BUILD+19, BUILD+30
^UTILITY($J	DONE+1!, BUILD+2, BUILD+3, BUILD+5, BUILD+6, BUILD+7, BUILD+8, BUILD+9, BUILD+10, BUILD+11* , BUILD+12, BUILD+13, BUILD+14, BUILD+15, BUILD+16, BUILD+26, BUILD+29, BUILD+30
^XTMP("DG-"	INIT+14, INIT+16, INIT+17
^XTMP("DG-DFN"	INIT+1!, INIT+18, INIT+21, EN1+15*
^XTMP("DG-DGIDT"	INIT+1!, INIT+18, INIT+22, EN1+20*
^XTMP("DG-DGMTI"	INIT+1!, INIT+18, INIT+23, EN1+29*

Name	Line Occurrences
$$BLDSTR	BUILD+15, BUILD+16, BUILD+26
$$LIY	BUILD+25
$$REQ	EN1+28
BUILD	START+6
DONE	START+6
EN1	START+1
INIT	EN+1
MAIL	START+6
START	INIT+25

Name	Field # of Occurrence
^(	REQ+20
^("PRIM"	EN1+26

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	INIT+2~, INIT+6, INIT+8, INIT+10, INIT+20, INIT+24, INIT+25, START+3, START+4, START+5 , EN1+32, EN1+34, EN1+36*, MAIL+2~
%DT	LIY+1~, LIY+2*
DFN	EN1+12~, EN1+13*, EN1+16, EN1+17, EN1+19, EN1+21, EN1+26, EN1+28, EN1+29, EN1+36 , REQ~, REQ+20, REQ+21, REQ+23, REQ+27
DGCNT	EN1+12~, EN1+13*, EN1+14
DGCS	EN1+12~, REQ~, REQ+26, REQ+30
DGDFN	BUILD+17~, BUILD+18, BUILD+19, BUILD+20, BUILD+21
DGDFN1	BUILD+17~, BUILD+18, BUILD+20, BUILD+22, BUILD+23
DGDOA	EN1+12~, EN1+17*
DGDOM	REQ+17~, REQ+24, REQ+30
DGDT	EN1+12~, EN1+18*
DGIDT	EN1+12~, EN1+18, EN1+19, EN1+21, EN1+22, EN1+28, EN1+34
DGIDT1	EN1+12~, EN1+22*
DGINY	LIY+1~, LIY+3*, LIY+4
DGMSGF	REQ+17~, REQ+19*
DGMT0	REQ+17~, REQ+25*
DGMTD	BUILD+17~, BUILD+24*
DGMTI	EN1+12~, EN1+21, EN1+23, EN1+24, EN1+26, EN1+28, EN1+29, EN1+32, REQ~, REQ+25 , BUILD+17~, BUILD+18, BUILD+21*, BUILD+24
DGMTMSG	REQ+19*, DONE+2!
DGMTST	EN1+12~, EN1+23*, EN1+26, EN1+28, EN1+29
DGMTYPT	REQ+17~, REQ+19*
DGNODE	EN1+12~, EN1+23*, EN1+25, EN1+26
DGQSENT	REQ+17~, REQ+19*
DGREQF	REQ+17~, REQ+19, REQ+21, REQ+22, REQ+23, REQ+24, REQ+27, REQ+30
DGRGAUTO	REQ+17~
DGSSN	BUILD+17~, BUILD+18, BUILD+23
DIFROM	MAIL+2~
DT	INIT+15, EN1+18, BUILD+25, LIY~
DUZ	MAIL+3
I	INIT+2~, INIT+13, INIT+14, INIT+16, INIT+17, BUILD+17~, BUILD+19, BUILD+26
IDT	REQ~, REQ+26
MTIEN	EN1+12~, EN1+26*, EN1+27
NSTAT	BUILD+17~
OLD	REQ+17~, REQ+19, REQ+26
OSTAT	BUILD+17~
P1	BUILD+22*, BUILD+26, BLDSTR~, BLDSTR+9
P2	BUILD+23*, BUILD+26, BLDSTR~, BLDSTR+10
P3	BUILD+24*, BUILD+25, BUILD+26, BLDSTR~, BLDSTR+14
PNAME	BUILD+17~, BUILD+22*
S1	BLDSTR+8~, BLDSTR+9*, BLDSTR+15
S2	BLDSTR+8~, BLDSTR+10, BLDSTR+11, BLDSTR+12, BLDSTR+13, BLDSTR+15
S3	BLDSTR+8~, BLDSTR+14*, BLDSTR+15
SUCCESS	EN1+28, EN1+29, REQ+17~, REQ+19, REQ+30*, REQ+35
U	INIT+16, EN1+16, EN1+17, EN1+23, EN1+25, EN1+26, EN1+27, REQ+27, BUILD+22, BUILD+23 , BUILD+24
X	INIT+2~, INIT+16, REQ+20, REQ+21, REQ+22, LIY+1~, LIY+2
X1	INIT+2~, INIT+15*
X2	INIT+2~, INIT+15*
XMDUZ	MAIL+2~, MAIL+3*
XMSUB	MAIL+2~, MAIL+5*
XMTEXT	MAIL+2~, MAIL+4*
XMY	MAIL+2~
XMY(	MAIL+3*
XMZ	MAIL+2~, MAIL+7
>> XPDNM	INIT+4, INIT+18, INIT+20, START+2, EN1+32, EN1+34, EN1+36
Y	MAIL+2~, BLDSTR+14*, LIY+1~, LIY+3
>> ZTQUEUED	EN1+14

Customize PDF page

Package: Registration

Routine: DG53401P

Call Graph Total: 10