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 |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: DGVPTDV1

Package: Registration

Routine: DGVPTDV1


Information

DGVPTDV1 ;alb/mjk - DVBHS5 for export with PIMS v5.3; 4/21/93

Source Information

Source file <DGVPTDV1.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
HINQ 2 AAA^DVBHQM2  SCRHD^DVBHUTIL  
VA Fileman 1 EN^DIQ1  

Entry Points

Name Comments DBIA/ICR reference
LINE
DVBHS5 ; ALB/JLU;Routine for HINQ screen 5; 10/04/91

External References

Name Field # of Occurrence
EN^DIQ1 DVBHS5+9
AAA^DVBHQM2 DVBHS5+18
SCRHD^DVBHUTIL DVBHS5+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Check Amt.: ",$S($D(DVBCHECK):"$"_DVBCHECK,1:"")
  • Line Location: DVBHS5+14
Function Call: WRITE
  • Prompt: ?28,"Combined %: ",$S($D(DVBDXPCT):DVBDXPCT_"%",1:"")
  • Line Location: DVBHS5+15
Function Call: WRITE
  • Prompt: ?48,"Net Award Amt.: ",$S($D(DVBBAS(1)):"$"_$P(DVBBAS(1),U,20),1:"")
  • Line Location: DVBHS5+16
Function Call: WRITE
  • Prompt: !,"Entitlement:",?15,$S($D(DVBENT):DVBENT,1:""),!,"Aid & Attendance: "
  • Line Location: DVBHS5+18
Function Call: WRITE
  • Prompt: Y
  • Line Location: DVBHS5+18
Function Call: WRITE
  • Prompt: !,"--- ",DVBON,"Patient Data",DVBOFF," ---"
  • Line Location: DVBHS5+22
Function Call: WRITE
  • Prompt: !,DVBON,"(1)",DVBOFF," Elig. Stat.: ",$E(DVBDIQ(2,DFN,.3611,"E"),1,20)
  • Line Location: DVBHS5+23
Function Call: WRITE
  • Prompt: ?38,"Elig. Stat. ent. by: ",$E(DVBDIQ(2,DFN,.3616,"E"),1,18)
  • Line Location: DVBHS5+24
Function Call: WRITE
  • Prompt: !,?5,"Stat. date: ",DVBDIQ(2,DFN,.3612,"E")
  • Line Location: DVBHS5+25
Function Call: WRITE
  • Prompt: ?37,"Monetary Ben. Verif.: ",DVBDIQ(2,DFN,.306,"E")
  • Line Location: DVBHS5+26
Function Call: WRITE
  • Prompt: !,?3,"Verif. Meth.: ",$E(DVBDIQ(2,DFN,.3615,"E"),1,50)
  • Line Location: DVBHS5+27
Function Call: WRITE
  • Prompt: ?44,"Patient Elig.: "
  • Line Location: DVBHS5+28
Function Call: WRITE
  • Prompt: $E(DVBOH,1,18)
  • Line Location: DVBHS5+29
Function Call: WRITE
  • Prompt: !!,DVBON,"(2)",DVBOFF," Pat. Type: ",$E(DVBDIQ(2,DFN,391,"E"),1,30)
  • Line Location: DVBHS5+30
Function Call: WRITE
  • Prompt: ?40,"Vet. (Y/N)?: ",DVBDIQ(2,DFN,1901,"E")
  • Line Location: DVBHS5+31
Function Call: WRITE
  • Prompt: !,?4,"Ser. Con.: ",DVBDIQ(2,DFN,.301,"E")
  • Line Location: DVBHS5+32
Function Call: WRITE
  • Prompt: ?40,"Ser. Con. %: ",DVBDIQ(2,DFN,.302,"E")
  • Line Location: DVBHS5+33
Function Call: WRITE
  • Prompt: !,?3,"Elig. Code: ",$E(DVBDIQ(2,DFN,.361,"E"),1,30)
  • Line Location: DVBHS5+34
Function Call: WRITE
  • Prompt: !!,DVBON,"(3)",DVBOFF," A&A: ",DVBDIQ(2,DFN,.36205,"E")
  • Line Location: DVBHS5+35
Function Call: WRITE
  • Prompt: ?41,"VA Pension: ",DVBDIQ(2,DFN,.36235,"E")
  • Line Location: DVBHS5+37
Function Call: WRITE
  • Prompt: !,"House Bound: ",DVBDIQ(2,DFN,.36215,"E")
  • Line Location: DVBHS5+39
Function Call: WRITE
  • Prompt: ?38,"VA Disability: ",DVBDIQ(2,DFN,.3025,"E")
  • Line Location: DVBHS5+41
Function Call: WRITE
  • Prompt: !,"Tot.Ann. VA Check Amt.: $",DVBDIQ(2,DFN,.36295,"E")
  • Line Location: DVBHS5+43
Function Call: WRITE
  • Prompt: !,"------------------------------------------------------------------------------"
  • Line Location: LINE+0

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^DPT - [#2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(8 - [#8] DVBHS5+29
^DPT - [#2] DVBHS5+29
^DVB(395.1 DVBHS5+17

Label References

Name Line Occurrences
LINE DVBHS5+20

Naked Globals

Name Field # of Occurrence
^(0 DVBHS5+29

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DFN DVBHS5+23, DVBHS5+24, DVBHS5+25, DVBHS5+26, DVBHS5+27, DVBHS5+29, DVBHS5+30, DVBHS5+31, DVBHS5+32, DVBHS5+33
, DVBHS5+34, DVBHS5+35, DVBHS5+37, DVBHS5+39, DVBHS5+41, DVBHS5+43, DVBHS5+44, DVBHS5+45
>> DIC DVBHS5+6*
>> DIQ DVBHS5+6*
>> DIQ(0 DVBHS5+6*
>> DR DVBHS5+8*
>> DVBAAHB DVBHS5+18
>> DVBBAS(1 DVBHS5+16
>> DVBCHECK DVBHS5+14
DVBDIQ DVBHS5+4!, DVBHS5+44!
DVBDIQ(2 DVBHS5+23, DVBHS5+24, DVBHS5+25, DVBHS5+26, DVBHS5+27, DVBHS5+30, DVBHS5+31, DVBHS5+32, DVBHS5+33, DVBHS5+34
, DVBHS5+35, DVBHS5+37, DVBHS5+39, DVBHS5+41, DVBHS5+43, DVBHS5+44, DVBHS5+45*
>> DVBDXPCT DVBHS5+15
>> DVBENT DVBHS5+17*, DVBHS5+18
>> DVBJS DVBHS5+13*
>> DVBLIT1 DVBHS5+23, DVBHS5+30, DVBHS5+35
>> DVBOFF DVBHS5+22, DVBHS5+23, DVBHS5+30, DVBHS5+35
>> DVBOH DVBHS5+29*
>> DVBON DVBHS5+22, DVBHS5+23, DVBHS5+30, DVBHS5+35
>> DVBP(1 DVBHS5+17
DVBSCR DVBHS5+20!
>> DVBSCRN DVBHS5+12*
>> DVBX(1 DVBHS5+3!, DVBHS5+5*, DVBHS5+10!
NEW DVBHS5+44*, DVBHS5+45!
NEW2 DVBHS5+44*, DVBHS5+45!
T1 DVBHS5+17*, DVBHS5+18!
T2 DVBHS5+17*, DVBHS5+18!
U DVBHS5+16, DVBHS5+17, DVBHS5+29
>> X(1 DVBHS5+5, DVBHS5+10*
Y DVBHS5+2~, DVBHS5+18*
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All