Routine: DGDEP5

Information

DGDEP5 ;ALB/CAW - Delete Duplicate Dependents ;12/15/94

Source file <DGDEP5.m>

Package	Total	Call Graph
Registration	5	INIT^DGDEP SEL^DGDEPU SET^DGMTAUD (AFTER,PRIOR)^DGMTEVT DEP^DGMTSC1
VA Fileman	1	^DIK

Name	Comments	DBIA/ICR reference
EN	;
ASSOCQ
DIK(DA,DIK)	;Delete file entries
Q
ENQ
DEL(DFN,DGDEP,DGVDEP,DGMTI)	;Delete Dependent
ASSOC(DFN,DGDEP)	; Find out if dependent is associated with any MT

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"Cannot edit when viewing a means test." Line Location: EN+2
Function Call: WRITE	Prompt: !,"Not while viewing" Line Location: EN+3
Function Call: WRITE	Prompt: !!,"Access to this option requires a security key.",*7 Line Location: EN+4
Function Call: WRITE	Prompt: !!,"Dependent has been uploaded by IVM. Cannot delete." Line Location: EN+6
Function Call: WRITE	Prompt: !,"...deleting ANNUAL INCOME..." Line Location: DEL+13
Function Call: WRITE	Prompt: !,"...deleting INCOME RELATION..." Line Location: DEL+14
Function Call: WRITE	Prompt: !,"...deleting PERSON..." Line Location: DEL+15
Function Call: WRITE	Prompt: !,"...deleting INCOME PERSON..." Line Location: DEL+16

Name	Line Occurrences (* Changed, ! Killed)
^DGMT(408.21 - [#408.21]	DEL+6, ASSOC+7
^DGMT(408.22 - [#408.22]	DEL+7, ASSOC+6
^DGMT(408.31 - [#408.31]	ASSOC+4
^DGPR(408.12 - [#408.12]	DEL+5
^XUSEC("DG DEPDELETE"	EN+4

Name	Field # of Occurrence
BEG	EN+1~, EN+5*
DA	DEL+17!, DIK~
DATE	EN+1~, EN+6*
DFN	EN+7, DEL~, ASSOC~, ASSOC+4, ASSOC+6
DGDEP	DEL~, DEL+4, ASSOC~, ASSOC+8
DGDEP(	EN+6, EN+7
DGDEP(1	EN+7
>> DGERR	EN+5
DGINC	DEL+2~, DEL+6*, DEL+7
DGINCP	ASSOC+2~
DGINP	DEL+2~, DEL+5*, DEL+9
DGINR	DEL+2~, DEL+7*
DGMTA	DEL+2~
DGMTACT	EN+2, DEL+2~, DEL+3*
DGMTI	EN+2, EN+3, EN+7, DEL~, DEL+3, DEL+10
DGMTINF	DEL+2~, DEL+3*
DGMTP	DEL+2~
DGPER	ASSOC+2~, ASSOC+7*, ASSOC+8
DGPRI	DEL+2~, DEL+4*, DEL+5, DEL+6, DEL+8
>> DGRPV	EN+3
DGVDEP	DEL~, DEL+11
>> DGVIRI	DEL+11*
>> DGW	EN+6, EN+7
DGX	ASSOC+2~, ASSOC+3, ASSOC+4
DGY	ASSOC+2~, ASSOC+5, ASSOC+6, ASSOC+7
DGZ	ASSOC+2~, ASSOC+3, ASSOC+4, ASSOC+6, ASSOC+10, ASSOCQ
DIK	DEL+17!, DIK~
DUZ	EN+4
>> MTIEN	ASSOC+4*, ASSOC+6
U	EN+6, DEL+4, DEL+5, DEL+11, ASSOC+7, ASSOC+8
>> VALMBCK	ENQ*