Routine: DG53426D

Package	Total	Call Graph
Registration	4	EN^DG53426E PRIOR^DGMTEVT $$LST^DGMTU ALL^DGMTU21
VA Fileman	2	^DIE (,IX1)^DIK
Income Verification Match	1	ADD^IVMCMB

Package	Total	Caller Graph
Registration	1	DG53426

Entry Points

Name	Comments	DBIA/ICR reference
DELTYPE(DFN,MTDATE,TYPE)	; ; Will delete any primary test for patient (DFN) for same income ; year as MTDATE for test of type = TYPE
DELETE(MTIEN,DFN,DGDOT)	;delete a copay or MT
ENQ
SETUPAR	; Create data array DGMAR1() where ; 1 - Subscript is MT Changes Type (#408.42) file node where type ; of change = Name, DOB, SSN, Sex, Relationship. ; 2 - 1st piece is #408.12 or #408.13 file. ; 3 - 2nd piece is #408.12 or #408.13 file field number.
EN(MTIEN)	; ; This line tage will process an income test deletion request from ; the post-installation portion of patch DG5.3426.
TYPECH	; Type of dependent change (#408.41/#408.42) file ; 1st piece - 408.42 table file node ; 2nd piece - file (#408.12 or 408.13) ; 3rd piece - 408.12 or 408.13 field
EN1	; Get zeroth node of file 408.31 entry.
DEL22	; Delete veteran, spouse, & dependent entries from the Income Relation ; (#408.22) file: ; ; - Veteran #408.22 record IEN
DEL21	; Delete veteran, spouse, & dependent children entries from the ; Individual Annual Income (#408.21) file:

External References

Name	Field # of Occurrence
EN^DG53426E	DEL21+73
PRIOR^DGMTEVT	DELETE+3
$$LST^DGMTU	DELTYPE+10, DELTYPE+17
ALL^DGMTU21	DELETE+5
^DIE	DEL21+65
^DIK	DEL22+8, DEL22+17, DEL22+27, DEL21+6, DEL21+15, DEL21+24, DEL21+47, DEL21+48, DEL21+68
IX1^DIK	DEL22+8, DEL22+17, DEL22+27, DEL21+6, DEL21+15, DEL21+24, DEL21+47, DEL21+48
ADD^IVMCMB	DELTYPE+19

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^DGPR(408.12 - [#408.12]	Classic Fileman Calls
^DGPR(408.13 - [#408.13]	Classic Fileman Calls
^DGMT(408.21 - [#408.21]	Classic Fileman Calls
^DGMT(408.22 - [#408.22]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DGMT(408.21 - [#408.21]	DEL21+5, DEL21+7, DEL21+14, DEL21+16, DEL21+23, DEL21+25
^DGMT(408.22 - [#408.22]	DEL22+7, DEL22+9, DEL22+16, DEL22+18, DEL22+26
^DGMT(408.31 - [#408.31]	EN1+1, EN1+4, DELTYPE+15
^DGPR(408.12 - [#408.12]	DEL21+33, DEL21+35, DEL21+42, DEL21+55, DEL21+57, DEL21+60
^DGPR(408.13 - [#408.13]	DEL21+40, DEL21+43

Label References

Name	Line Occurrences
$$EN	DELTYPE+16
DELETE	EN1+7, EN1+8
SETUPAR	DEL21+29

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
DA	DEL22+4, DEL22+5, DEL22+7, DEL22+9, DEL22+10!, DEL22+13, DEL22+14, DEL22+16, DEL22+18, DEL22+19! , DEL22+24, DEL22+26, DEL22+28!, DEL21+2, DEL21+3, DEL21+5, DEL21+7, DEL21+8!, DEL21+11, DEL21+12 , DEL21+14, DEL21+16, DEL21+17!, DEL21+22, DEL21+23, DEL21+25, DEL21+26!, DEL21+47!, DEL21+48!, DEL21+63* , DEL21+67*, DEL21+68!
DA(1	DEL21+63, DEL21+67, DEL21+68!
DFN	EN+11~, EN1+4*, EN1+7, EN1+8, DELETE~, DELETE+5, DELTYPE~, DELTYPE+4
>> DG12	DEL21+33*, DEL21+35, DEL21+40, DEL21+42, DEL21+47, DEL21+55, DEL21+57, DEL21+60, DEL21+64, DEL21+67
>> DG121	DEL21+55*, DEL21+57, DEL21+60, DEL21+63, DEL21+67
>> DG13	DEL21+42*, DEL21+43, DEL21+48
DG41	SETUPAR+6*, SETUPAR+8!
DG411	SETUPAR+6*, SETUPAR+7, SETUPAR+8!
>> DGDEP	DEL22+22, DEL22+23, DEL22+24, DEL21+20, DEL21+21, DEL21+22
>> DGDFN	DELTYPE+10, DELTYPE+17, DELTYPE+19
DGDONE	EN+11~, EN+12*, EN1+9
DGDOT	EN+11~, EN1+3*, EN1+7, EN1+8, DELETE~, DELETE+5
DGERR	EN+11~, EN1+6, DEL21+33, DEL21+36, DEL21+44, DEL21+58*
>> DGINC("C"	DEL21+21, DEL21+22
>> DGINC("S"	DEL21+11
>> DGINC("V"	DEL21+2
>> DGINR("C"	DEL22+23, DEL22+24
>> DGINR("S"	DEL22+13
>> DGINR("V"	DEL22+4
DGLINK	EN+11~, EN1+4*, EN1+5, EN1+6, EN1+7
>> DGMAR(	SETUPAR+7*
>> DGMTACT	DELETE+3*
>> DGMTI	DELETE+3*
DGNODE	DELTYPE+7~, DELTYPE+10*, DELTYPE+11, DELTYPE+12, DELTYPE+15, DELTYPE+16, DELTYPE+19
DGNODE0	EN+11~, EN1+1*, EN1+2, EN1+3, EN1+4
DGTOT	EN+11~, EN1+3*, EN1+5, EN1+6
>> DGTYPE	DELTYPE+17, DELTYPE+19
>> DGVACMA	DEL21+60, DEL21+62, DEL21+65
DGYEAR	DELTYPE+7~, DELTYPE+8*, DELTYPE+10
>> DIE	DEL21+64*
DIK	DEL22+6, DEL22+10!, DEL22+15, DEL22+19!, DEL22+25, DEL22+28!, DEL21+4, DEL21+8!, DEL21+13, DEL21+17! , DEL21+22, DEL21+26!, DEL21+47!, DEL21+48!, DEL21+67*, DEL21+68!
>> DR	DEL21+63*
DT	DELTYPE+17
MTDATE	DELTYPE~, DELTYPE+5, DELTYPE+8
MTIEN	EN~, EN1+1, EN1+4, EN1+8, DELETE~, DELETE+3, DELETE+5, DEL21+33, DEL21+55
>> MTNODE	DELTYPE+16
RET	DELTYPE+7~, DELTYPE+17, DELTYPE+18, DELTYPE+19
TYPE	DELTYPE~, DELTYPE+6, DELTYPE+10, DELTYPE+15
U	EN1+3, EN1+4, DEL21+40, DEL21+42, DEL21+60, DELTYPE+12, DELTYPE+15, DELTYPE+16, DELTYPE+18, DELTYPE+19
>> YEAR	DELTYPE+12, DELTYPE+18

Customize PDF page

Package: Registration

Routine: DG53426D

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 1

Entry Points

External References

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items