Routine: DG1010PX

Package	Total	Call Graph
Registration	2	($$DISP,$$POINT)^DG1010P0 PARTVI^DG1010P6

Package	Total	Caller Graph
Registration	1	DG1010P5

Entry Points

Name	Comments	DBIA/ICR reference
Q11PTV
YN(N,P)	; ; Ext Val of YES/NO -W/SPACES

External References

Name	Field # of Occurrence
$$DISP^DG1010P0	Q11PTV+9, Q11PTV+26
$$POINT^DG1010P0	Q11PTV+5, Q11PTV+24
PARTVI^DG1010P6	Q11PTV+29

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"11. OTHER ELIGIBILITY DATA",?131,$C(13),DGLUND Line Location: Q11PTV+0
Function Call: WRITE	Prompt: !,"A. VETERAN",?51,"\|",$$YN(DGP("VET"),1) Line Location: Q11PTV+2
Function Call: WRITE	Prompt: ?64,"\|\| ","L. SERVICE IN PERSIAN GULF THEATER",?117,"\|",$$YN(DGP(.322),10),?130,"\|",$C(13),DGLUND Line Location: Q11PTV+3
Function Call: WRITE	Prompt: !,"B. PRISONER OF WAR STATUS",$S((X="Y"):(": "_$$POINT^DG1010P0(DGP(.52),6,22)),1:""),?51,"\|",DGXX Line Location: Q11PTV+5
Function Call: WRITE	Prompt: ?64,"\|\| ","M. DENTAL INJ. \|",$$YN(DGP(.36),8),?95,"\| "," TEETH EXTRACTED",?117,"\|",$$YN(DGP(.36),9),?130,"\|",$C(13),DGLUND Line Location: Q11PTV+6
Function Call: WRITE	Prompt: !,"C. EXPOSURE TO AGENT ORANGE",?51,"\|",$$YN(DGP(.321),2) Line Location: Q11PTV+7
Function Call: WRITE	Prompt: !,"D. EXPOSURE TO RADIATION",?51,"\|",$$YN(DGP(.321),3) Line Location: Q11PTV+10
Function Call: WRITE	Prompt: ?64,"\|\| ","O. RECEIVING AID & ATTENDANCE",?117,"\|",$$YN(DGP(.362),12),?130,"\|",$C(13),DGLUND Line Location: Q11PTV+11
Function Call: WRITE	Prompt: !,"E. COMBAT SERVICE",?51,"\|",$$YN(DGP(.52),11) Line Location: Q11PTV+12
Function Call: WRITE	Prompt: ?64,"\|\| ","P. RECEIVING HOUSEBOUND",?117,"\|",$$YN(DGP(.362),13),?130,"\|",$C(13),DGLUND Line Location: Q11PTV+13
Function Call: WRITE	Prompt: !,"F. MILITARY DISABILITY",?51,"\|",$$YN(DGP(.36),2) Line Location: Q11PTV+14
Function Call: WRITE	Prompt: ?64,"\|\| ","Q. RECEIVING VA PENSION",?117,"\|",$$YN(DGP(.362),14),?130,"\|",$C(13),DGLUND Line Location: Q11PTV+15
Function Call: WRITE	Prompt: !,"G. VIETNAM SERVICE",?51,"\|",$$YN(DGP(.321),1) Line Location: Q11PTV+16
Function Call: WRITE	Prompt: ?64,"\|\| ","R. RECEIVING VA DISABILITY",?117,"\|",$$YN(DGP(.3),11),?130,"\|",$C(13),DGLUND Line Location: Q11PTV+17
Function Call: WRITE	Prompt: !,"H. LEBANON SERVICE",?51,"\|",$$YN(DGP(.322),1) Line Location: Q11PTV+18
Function Call: WRITE	Prompt: ?64,"\|\| ","S. SERVICE IN SOMALIA",?117,"\|",$$YN(DGP(.322),16),?130,"\|",$C(13),DGLUND Line Location: Q11PTV+19
Function Call: WRITE	Prompt: !,"I. GRENADA SERVICE",?51,"\|",$$YN(DGP(.322),4) Line Location: Q11PTV+20
Function Call: WRITE	Prompt: ?64,"\|\| ","T. SERVICE IN YUGOSLAVIA",?117,"\|",$$YN(DGP(.322),19),?130,"\|",$C(13),DGLUND Line Location: Q11PTV+21
Function Call: WRITE	Prompt: !,"J. PANAMA SERVICE",?51,"\|",$$YN(DGP(.322),7) Line Location: Q11PTV+22
Function Call: WRITE	Prompt: ?64,"\|\| ","U. PURPLE HEART RECIPIENT",?117,"\|",$$YN(DGP(.53),1),?130,"\|",$C(13),DGLUND Line Location: Q11PTV+23
Function Call: WRITE	Prompt: !,"K. PERSIAN GULF SERVICE",?51,"\|",$S($$POINT^DG1010P0(DGP(.32),3,21)["PERSIAN":" YES",1:" NO") Line Location: Q11PTV+24
Function Call: WRITE	Prompt: ?64,"\|\| ","V. VA MONETARY AMOUNT:",?97,DGXX,?130,"\|",$C(13),DGLUND Line Location: Q11PTV+28

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> DFN	Q11PTV+25
>> DGLUND	Q11PTV, Q11PTV+3, Q11PTV+6, Q11PTV+9, Q11PTV+11, Q11PTV+13, Q11PTV+15, Q11PTV+17, Q11PTV+19, Q11PTV+21 , Q11PTV+23, Q11PTV+28
>> DGP(	Q11PTV+3, Q11PTV+4, Q11PTV+5, Q11PTV+6, Q11PTV+7, Q11PTV+8, Q11PTV+9, Q11PTV+10, Q11PTV+11, Q11PTV+12 , Q11PTV+13, Q11PTV+14, Q11PTV+15, Q11PTV+16, Q11PTV+17, Q11PTV+18, Q11PTV+19, Q11PTV+20, Q11PTV+21, Q11PTV+22 , Q11PTV+23, Q11PTV+24, Q11PTV+26
>> DGP("VET"	Q11PTV+2
>> DGX	Q11PTV+25*, Q11PTV+26
>> DGXX	Q11PTV+4, Q11PTV+5, Q11PTV+8, Q11PTV+9, Q11PTV+26, Q11PTV+27, Q11PTV+28
N	YN~, YN+6
P	YN~, YN+6
U	Q11PTV+25
>> X	Q11PTV+5, Q11PTV+9, YN+6*, YN+7

Customize PDF page

Package: Registration

Routine: DG1010PX

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: