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: DGRPTP2

Package: Registration

Routine: DGRPTP2


Information

DGRPTP2 ;ALB/RMO - Print 10-10T Registration Cont.;10 JAN 1997 09:06 am

Source Information

Source file <DGRPTP2.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Registration 4 ($$DATENP,$$DISP,$$POINT)^DG1010P0  ALL^DGMTU21  (FT,HD)^DGRPTP  EN^DGRPTP3  
Integrated Billing 1 ALL^IBCNS1  
VA Fileman 1 Y^DIQ  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Registration 1 DGRPTP1  

Entry Points

Name Comments DBIA/ICR reference
EN(DFN,DFN1,DGNAM,DGSSN,DGLNE,DGPGE) ;Entry point to print 10-10T cont.
; Input -- DFN Patient IEN
; DFN1 Disposition multiple IEN (optional)
; DGNAM Patient name
; DGSSN Patient ssn
; DGLNE Line format array
; DGPGE Page number
; Output -- None
INS(DFN,DGLNE) ;Insurance
; Input -- DFN Patient IEN
; DGLNE Line format array
; Output -- None
SPO(DFN,DGLNE) ;Spouse and income
; Input -- DFN Patient IEN
; DGLNE Line format array
; Output -- None
SER(DFN,DGLNE) ;Service branch and number, marital status
; Input -- DFN Patient IEN
; DGLNE Line format array
; Output -- None

External References

Name Field # of Occurrence
$$DATENP^DG1010P0 SPO+23
$$DISP^DG1010P0 SER+10, SPO+12
$$POINT^DG1010P0 INS+15, SER+9
ALL^DGMTU21 SPO+8
FT^DGRPTP EN+11, EN+14
HD^DGRPTP EN+12
EN^DGRPTP3 EN+13
Y^DIQ INS+9, SER+14
ALL^IBCNS1 INS+11

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"14A. Do You Have Health Coverage",?40,"|14B. Name of Health Insurance Carrier"
  • Line Location: INS+7
Function Call: WRITE
  • Prompt: ?40,"| ",$$POINT^DG1010P0(DGINS,1,36)
  • Line Location: INS+15
Function Call: WRITE
  • Prompt: ?40,"| ","NO ACTIVE (UNEXPIRED) INSURANCE ON FILE FOR THIS APPLICANT"
  • Line Location: INS+17
Function Call: WRITE
  • Prompt: ?131,$C(13)
  • Line Location: INS+18
Function Call: WRITE
  • Prompt: !
  • Condition for execution: DGLNE("ULC")="-"
  • Line Location: INS+18
Function Call: WRITE
  • Prompt: DGLNE("UL")
  • Line Location: INS+18
Function Call: WRITE
  • Prompt: !,"15. Branch of Service",?33,"|16. Latest Service Number",?65,"|17. Marital Status"
  • Line Location: SER+7
Function Call: WRITE
  • Prompt: !?4,$E($$POINT^DG1010P0(DGRP(.32),5,23),1,20)
  • Line Location: SER+9
Function Call: WRITE
  • Prompt: ?33,"| ",$$DISP^DG1010P0(DGRP(.32),8)
  • Line Location: SER+10
Function Call: WRITE
  • Prompt: ?131,$C(13)
  • Line Location: SER+16
Function Call: WRITE
  • Prompt: !
  • Condition for execution: DGLNE("ULC")="-"
  • Line Location: SER+16
Function Call: WRITE
  • Prompt: DGLNE("UL")
  • Line Location: SER+16
Function Call: WRITE
  • Prompt: !,"18A. Spouse's Name",?65,"|18B. Spouse's Social Security Number"
  • Line Location: SPO+7
Function Call: WRITE
  • Prompt: !?5,$$DISP^DG1010P0(DGSP(0),1)
  • Line Location: SPO+12
Function Call: WRITE
  • Prompt: !?5,"NOT APPLICABLE"
  • Line Location: SPO+16
Function Call: WRITE
  • Prompt: ?65,"|"
  • Line Location: SPO+17
Function Call: WRITE
  • Prompt: ?131,$C(13)
  • Line Location: SPO+18
Function Call: WRITE
  • Prompt: !
  • Condition for execution: DGLNE("ULC")="-"
  • Line Location: SPO+18
Function Call: WRITE
  • Prompt: DGLNE("UL")
  • Line Location: SPO+18
Function Call: WRITE
  • Prompt: !,"18C. Year of Marriage",?33,"|18D. Number of Dependents",?65,"|19. Last Year's Estimated ""Household"" Taxable Income",!
  • Line Location: SPO+21
Function Call: WRITE
  • Prompt: ?5,$$DATENP^DG1010P0($G(^DGPR(408.12,+DGREL("S"),"E",1,0)),1)
  • Line Location: SPO+23
Function Call: WRITE
  • Prompt: ?33,"|"
  • Line Location: SPO+25

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(2 INS+9, SER+14
^DGMT(408.21 - [#408.21] SPO+24
^DGPR(408.12 - [#408.12] SPO+23
^DPT - [#2] INS+8, SER+8, SER+13

Label References

Name Line Occurrences
INS EN+8
SER EN+9
SPO EN+10

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
C INS+4~, INS+9*, INS+12*, INS+13*, INS+14, SER+4~, SER+14*, SPO+4~
DFN EN~, EN+8, EN+9, EN+10, EN+11, EN+14, INS~, INS+8, INS+11, SER~
, SER+8, SER+13, SPO~, SPO+8
DFN1 EN~, EN+11, EN+14
DGDEP SPO+4~
DGINC SPO+4~
DGINC("V" SPO+24
DGINR SPO+4~
DGINS INS+4~, INS+12*, INS+15, INS+16
DGINS( INS+12
DGLNE EN~, EN+8, EN+9, EN+10, EN+11, EN+12, EN+13, EN+14, INS~, SER~
, SPO~
DGLNE("UL" INS+18, SER+16, SPO+18
DGLNE("ULC" INS+18, SER+16, SPO+18
DGLYINC SPO+4~, SPO+24*, SPO+26
DGNAM EN~, EN+12
DGPGE EN~, EN+11*, EN+14*
DGREL SPO+4~
DGREL("S" SPO+9, SPO+23
DGRP INS+4~, SER+4~
DGRP( INS+8*, INS+9, SER+8*, SER+9, SER+10
DGRP(0 SER+13*, SER+14
DGSP SPO+4~
DGSP(0 SPO+10*, SPO+11, SPO+12, SPO+13, SPO+22
DGSSN EN~, EN+12
DT INS+11, SPO+8
I INS+4~, INS+12*
U INS+9, SER+14, SPO+9, SPO+10, SPO+13, SPO+24
X SPO+4~, SPO+9*, SPO+10, SPO+13*, SPO+14
Y INS+4~, INS+9*, INS+10, SER+4~, SER+14*, SER+15, SPO+4~
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All