Routine: EASECSC5

Package	Total	Call Graph
Enrollment Application System	5	EN^EASECSCR HD^EASECSCU (DEP,INC)^EASECSU3 GETIENS^EASECU2 ALL^EASECU21
Registration	2	($$AMT,HIGH)^DGMTSCU1 $$NAME^DGMTU1
VA FileMan	1	^DIE

Entry Points

Name	Comments	DBIA/ICR reference
EN	;Entry point for calendar year income screen
EN1	;Entry point for read processor return
Q
DIS	;Display income
FLD(DGIN,DGPCE,DGTXT)	;Display income fields
EDT	;Edit income fields
EDTQ

Name	Field # of Occurrence
$$AMT^DGMTSCU1	DIS+26, FLD+15, FLD+22, FLD+25
HIGH^DGMTSCU1	DIS+7, DIS+8, DIS+9, DIS+12, DIS+13, DIS+14, DIS+15, DIS+16, DIS+17, DIS+18 , DIS+19, DIS+20, DIS+21, DIS+22, DIS+23, DIS+24, DIS+25
$$NAME^DGMTU1	EDT+3
^DIE	EDT+8, EDT+12
EN^EASECSCR	EN+3
HD^EASECSCU	EN+1
DEP^EASECSU3	DIS+2
INC^EASECSU3	DIS+2
GETIENS^EASECU2	EDT+2
ALL^EASECU21	EN1+1

Name	Line Occurrences
Function Call: WRITE	Prompt: !!?39,"Veteran" Line Location: DIS+3
Function Call: WRITE	Prompt: ?56,"Spouse" Condition for execution: DGSP Line Location: DIS+3
Function Call: WRITE	Prompt: ?73,"Total" Line Location: DIS+3
Function Call: WRITE	Prompt: !?36,"------------------------------------------" Line Location: DIS+4
Function Call: WRITE	Prompt: !?56,"Total -->",?66,$J($$AMT^DGMTSCU1(DGINT),12) Line Location: DIS+26
Function Call: WRITE	Prompt: " ",$E(DGTXT_DGBL,1,26) Line Location: FLD+13
Function Call: WRITE	Prompt: $J(AMT,15) Line Location: FLD+20
Function Call: WRITE	Prompt: " ",$S($D(DGIN("S")):$J($$AMT^DGMTSCU1($P(DGIN("S"),"^",DGPCE)),15),1:$E(DGBL,1,15)) Line Location: FLD+22
Function Call: WRITE	Prompt: " " Line Location: FLD+23
Function Call: WRITE	Prompt: " ",$J($$AMT^DGMTSCU1(DGTOT),12) Line Location: FLD+25
Function Call: WRITE	Prompt: !!,"NAME: ",$$NAME^DGMTU1(DGPRI) Line Location: EDT+3
Routine Call	DIE Line Location: EDT+8 EDT+12

FileNo	Call Tags
^DGMT(408.21 - [#408.21]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DGMT(408.21 - [#408.21]	EDT+4, EDT+9, EDT+11
^DPT - [#2]	FLD+19

Name	Line Occurrences
DIS	EN+2
EDT	EN1+2, EN1+3
EDTQ	EDT+2
EN	Q+1
FLD	DIS+7, DIS+8, DIS+9, DIS+12, DIS+13, DIS+14, DIS+15, DIS+16, DIS+17, DIS+18 , DIS+19, DIS+20, DIS+21, DIS+22, DIS+23, DIS+24, DIS+25

Name	Field # of Occurrence
AMT	FLD+10~, FLD+15, FLD+17, FLD+19*, FLD+20
DA	EDT+1~, EDT+7*
>> DFN	EN1+1, FLD+19, EDT+2
>> DGBL	FLD+11*, FLD+13, FLD+22
DGCNT	Q!, DIS+1~, DIS+2, FLD+12, FLD+26
DGDC	DIS+1~
DGDEP	Q!
DGDET	DIS+1~
DGDR	Q!
DGERR	EDT+1~, EDT+2
DGFIN	EDT+1~, EDT+8
>> DGFORM	EN+3, DIS+6, DIS+11, EDT+7
DGIN	FLD~
DGIN(	FLD+24
DGIN("S"	FLD+22
DGIN("V"	FLD+15
DGIN0	DIS+1~, DIS+7, DIS+8, DIS+9, DIS+12, DIS+13, DIS+14, DIS+15, DIS+16, DIS+17 , DIS+18, DIS+19, DIS+20, DIS+21, DIS+22, DIS+23, DIS+24, DIS+25, EDT+1~, EDT+4* , EDT+9
DGIN1	DIS+1~
DGIN2	DIS+1~
DGINI	EDT+1~, EDT+4, EDT+7, EDT+9, EDT+11
DGINT	DIS+1~, DIS+26
DGINTF	DIS+1~
DGIRI	EDT+1~
>> DGMTACT	DIS+7, DIS+8, DIS+9, DIS+12, DIS+13, DIS+14, DIS+15, DIS+16, DIS+17, DIS+18 , DIS+19, DIS+20, DIS+21, DIS+22, DIS+23, DIS+24, DIS+25
>> DGMTDT	EN1+1, EDT+2
>> DGMTI	EN1+1
DGMTOUT	EN1+3, Q!, EDT+8*
>> DGMTSCI	EN+1*
DGNC	DIS+1~
DGND	DIS+1~
DGNWT	DIS+1~
DGNWTF	DIS+1~
DGPCE	FLD~, FLD+15, FLD+17, FLD+19, FLD+22, FLD+24
DGPRI	EN1+2, EN1+3, Q!, EDT+2, EDT+3
DGPRTY	EN1+2, EN1+3, Q!
DGREL	Q!
DGREL("S"	EN1+3
>> DGRNG	EN+3*
DGSEL	EN1+3, Q!, EDT+3
DGSELTY	EN1+2, EN1+3, Q!
DGSP	DIS+1~, DIS+3
DGTOT	FLD+10~, FLD+24*, FLD+25
DGTXT	FLD~, FLD+13
DGVIR0	DIS+1~
>> DGVPRI	EN1+2
DGX	EN1+2, EN1+3, Q!
DGY	Q!
DIE	EDT+1~, EDT+7*
DR	EDT+1~, EDT+7, EDT+10, EDT+11*
DTOUT	Q!
DUOUT	Q!
I	FLD+10~, FLD+24*
U	FLD+15, FLD+19
Y	Q!