Routine: DGMTSC31

Package	Total	Call Graph
Registration	4	UP^DGHELP $$AMT^DGMTSCU1 $$NAME^DGMTU1 ALL^DGMTU21
VA Fileman	1	^DIE

Package	Total	Caller Graph
Registration	3	DGMTP DGMTSC3 DGMTSC3V

Entry Points

Name	Comments	DBIA/ICR reference
SET	;Set variables for selectable dependent children ;DGMTP also calls
CHK	;Check if child has income available to the veteran and his/her own
Q
EN	;Entry point for dependent children
SETQ
EDT	;Edit dependent child expenses
CHILD	;Display employment income and expenses for a dependent child
DIS	;Display dependent children with employment income

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Enter: R to REDISPLAY information on dependent children" Line Location: EN+2
Function Call: WRITE	Prompt: !?8,"1-",DGDEP," to edit information for the child listed after that number" Line Location: EN+3
Function Call: READ	Prompt: "Enter CHOICE: " Formatting: ! Timeout: DTIME Variable: X Line Location: EN+4
Function Call: WRITE	Prompt: !!?8,"Post-secondary education expenses are not applicable for this child." Line Location: EN+12
Function Call: WRITE	Prompt: !!?8,"Child's",?24,"Employment",?36,"Post-secondary" Line Location: DIS+2
Function Call: WRITE	Prompt: !?8,"First Name",?24,"Income",?36,"Education Expenses" Line Location: DIS+3
Function Call: WRITE	Prompt: !?8,"------------",?24,"----------",?36,"------------------" Line Location: DIS+4
Function Call: WRITE	Prompt: !?4,DGLP,".",?8,$E($P($$NAME^DGMTU1(+DGREL("C",DGCNT)),",",2),1,12) Line Location: CHILD+3
Function Call: WRITE	Prompt: ?24,$J($$AMT^DGMTSCU1($P(DGIN0,"^",14)),10) Line Location: CHILD+4
Function Call: WRITE	Prompt: ?44,$J($S(($P(DGIN0,"^",14)-$P(DGMTPAR,"^",17))>0:$$AMT^DGMTSCU1($P(DGIN1,"^",3)),1:"N/A"),10) Line Location: CHILD+5
Routine Call	DIE Line Location: EDT+3 EDT+5

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

Name	Line Occurrences (* Changed, ! Killed)
^DGMT(408.21 - [#408.21]	EN+12, CHILD+2, CHK+3, EDT+2, EDT+5
^DGMT(408.22 - [#408.22]	CHK+3

Name	Field # of Occurrence
^(0	EN+12, CHK+3
^(1	CHILD+2

Name	Field # of Occurrence
DA	EDT+1~, EDT+3*
>> DFN	SET+2
DGCNT	SET+1~, SET+4, SET+5, DIS+5, CHILD+2, CHILD+3, CHK+3
DGDCS	EN+1!, Q+1!
DGDCS(	EN+10, EN+11, SET+5*, DIS+5
DGDEP	EN+3, Q+1!, SET+4, SET+5
DGFIN	EDT+1~, EDT+4
DGFL	EN+1, EN+4, EN+9, EN+13, Q, Q+1!, EDT+4*
DGIN0	CHILD+1~, CHILD+2*, CHILD+4, CHILD+5
DGIN1	CHILD+1~, CHILD+2, CHILD+5, EDT+1~, EDT+2, EDT+5
DGINC	Q+1!
DGINC("C"	EN+11, CHILD+2, CHK+3
DGINI	EN+11*, EN+12, EN+13, Q+1!, EDT+2, EDT+3, EDT+5
DGINR	Q+1!
DGINR("C"	CHK+3
DGLP	DIS+1~, DIS+5*, CHILD+3
>> DGMTDT	SET+2
>> DGMTI	SET+2
>> DGMTOUT	Q*
>> DGMTPAR	EN+12, SET+3, CHILD+5
DGREL	Q+1!
DGREL("C"	SET+4, CHILD+3
DIE	EDT+1~, EDT+3*
DR	EDT+1~, EDT+3, EDT+5
DTIME	EN+4
DTOUT	Q+1!, EDT+4
DUOUT	Q+1!, EDT+4
X	EN+4*, EN+5, EN+9, EN+10, EN+11, Q+1!
Y	SET+1~, SET+5, CHK+2, CHK+3