Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: DG1010PX

Package: Registration

Routine: DG1010PX


Information

DG1010PX ;ALB/REW - 1010 PRINT--FORM 10-10 (PART V EXTENSION) ; 8/18/00 9:54am

Source Information

Source file <DG1010PX.m>

Call Graph

Call Graph Total: 2

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

Caller Graph

Caller Graph Total: 1

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] Q11PTV+25

Label References

Name Line Occurrences
$$YN Q11PTV+2, Q11PTV+3, Q11PTV+4, Q11PTV+6, Q11PTV+7, Q11PTV+8, 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

Local Variables

Legend:

>> 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
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All