Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: DG53401P

Package: Registration

Routine: DG53401P


Information

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

Source Information

Source file <DG53401P.m>

Call Graph

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

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*

Label References

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

Naked Globals

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
Info |  Source |  Call Graph |  Entry Points |  External References |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All