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

Package: IHS GPRA Information System

Routine: BGPDP22A


Information

BGPDP22A ; IHS/CMI/LAB - print ind 22 ;

Source Information

Source file <BGPDP22A.m>

Call Graph

Call Graph Total: 2

Package Total Call Graph
IHS GPRA Information System 1 HEADER^BGPDPH  
VA Fileman 1 COMMA^%DTC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS GPRA Information System 1 BGPDP22  

Entry Points

Name Comments DBIA/ICR reference
VA ;
AAGE ;EP
HAGE ;
H ;
V(R,N,P) ;
C(X,X2,X3) ;
CALC(N,O) ;ENTRY POINT

External References

Name Field # of Occurrence
COMMA^%DTC CALC+4, CALC+5, C+1
HEADER^BGPDPH AAGE+1, AAGE+6, AAGE+11, AAGE+16, HAGE+1, HAGE+6, HAGE+11, HAGE+16

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"# of PHN Visits -",!?2," any Setting",!?2,"Neonate 0-28 days",?21,$$C($P($$V(BGPRPT,88,5),"!",1)+$P($$V(BGPRPT,88,5),"!",2),0,9),?37,$$C($P($$V(BGPRPT,48,5),"!",1)+$P($$V(BGPRPT,48,5),"!",2),0,9)
  • Line Location: AAGE+2
Function Call: WRITE
  • Prompt: ?52,$$C($P($$V(BGPRPT,18,5),"!",1)+$P($$V(BGPRPT,18,5),"!",2),0,9)
  • Line Location: AAGE+3
Function Call: WRITE
  • Prompt: ?67,$J(%,5,1)
  • Line Location: AAGE+4
Function Call: WRITE
  • Prompt: ?74,$J(%,5,1)
  • Line Location: AAGE+5
Function Call: WRITE
  • Prompt: !!,"# of PHN Visits -",!?2," any Setting",!?2,"Infants 28d - 12m",?21,$$C($P($$V(BGPRPT,88,6),"!",1)+$P($$V(BGPRPT,88,6),"!",2),0,9),?37,$$C($P($$V(BGPRPT,48,6),"!",1)+$P($$V(BGPRPT,48,6),"!",2),0,9)
  • Line Location: AAGE+7
Function Call: WRITE
  • Prompt: ?52,$$C($P($$V(BGPRPT,18,6),"!",1)+$P($$V(BGPRPT,18,6),"!",2),0,9)
  • Line Location: AAGE+8
Function Call: WRITE
  • Prompt: ?67,$J(%,5,1)
  • Line Location: AAGE+9
Function Call: WRITE
  • Prompt: ?74,$J(%,5,1)
  • Line Location: AAGE+10
Function Call: WRITE
  • Prompt: !!,"# of PHN Visits -",!?2," any Setting",!?2,"Pats 1-64 yrs",?21,$$C($P($$V(BGPRPT,88,7),"!",1)+$P($$V(BGPRPT,88,7),"!",2),0,9),?37,$$C($P($$V(BGPRPT,48,7),"!",1)+$P($$V(BGPRPT,48,7),"!",2),0,9)
  • Line Location: AAGE+12
Function Call: WRITE
  • Prompt: ?52,$$C($P($$V(BGPRPT,18,7),"!",1)+$P($$V(BGPRPT,18,7),"!",2),0,9)
  • Line Location: AAGE+13
Function Call: WRITE
  • Prompt: ?67,$J(%,5,1)
  • Line Location: AAGE+14
Function Call: WRITE
  • Prompt: ?74,$J(%,5,1)
  • Line Location: AAGE+15
Function Call: WRITE
  • Prompt: !!,"# of PHN Visits -",!?2," any Setting",!?2,"Elders >65 yrs old",?21,$$C($P($$V(BGPRPT,88,8),"!",1)+$P($$V(BGPRPT,88,8),"!",2),0,9),?37,$$C($P($$V(BGPRPT,48,8),"!",1)+$P($$V(BGPRPT,48,8),"!",2),0,9)
  • Line Location: AAGE+17
Function Call: WRITE
  • Prompt: ?52,$$C($P($$V(BGPRPT,18,8),"!",1)+$P($$V(BGPRPT,18,8),"!",2),0,9)
  • Line Location: AAGE+18
Function Call: WRITE
  • Prompt: ?67,$J(%,5,1)
  • Line Location: AAGE+19
Function Call: WRITE
  • Prompt: ?74,$J(%,5,1)
  • Line Location: AAGE+20
Function Call: WRITE
  • Prompt: !!,"# of PHN Visits -",!?2," in Home Setting",!?2,"Neonate 0-28 days",?21,$$C($P($$V(BGPRPT,88,9),"!",1)+$P($$V(BGPRPT,88,9),"!",2),0,9),?37,$$C($P($$V(BGPRPT,48,9),"!",1)+$P($$V(BGPRPT,48,9),"!",2),0,9)
  • Line Location: HAGE+2
Function Call: WRITE
  • Prompt: ?52,$$C($P($$V(BGPRPT,18,9),"!",1)+$P($$V(BGPRPT,18,9),"!",2),0,9)
  • Line Location: HAGE+3
Function Call: WRITE
  • Prompt: ?67,$J(%,5,1)
  • Line Location: HAGE+4
Function Call: WRITE
  • Prompt: ?74,$J(%,5,1)
  • Line Location: HAGE+5
Function Call: WRITE
  • Prompt: !!,"# of PHN Visits -",!?2," in Home Setting",!?2,"Infants 28d - 12m",?21,$$C($P($$V(BGPRPT,88,10),"!",1)+$P($$V(BGPRPT,88,10),"!",2),0,9),?37,$$C($P($$V(BGPRPT,48,10),"!",1)+$P($$V(BGPRPT,48,10),"!",2),0,9)
  • Line Location: HAGE+7
Function Call: WRITE
  • Prompt: ?52,$$C($P($$V(BGPRPT,18,10),"!",1)+$P($$V(BGPRPT,18,10),"!",2),0,9)
  • Line Location: HAGE+8
Function Call: WRITE
  • Prompt: ?67,$J(%,5,1)
  • Line Location: HAGE+9
Function Call: WRITE
  • Prompt: ?74,$J(%,5,1)
  • Line Location: HAGE+10
Function Call: WRITE
  • Prompt: !!,"# of PHN Visits -",!?2," in Home Setting",!?2,"Pats 1-64 yrs",?21,$$C($P($$V(BGPRPT,88,11),"!",1)+$P($$V(BGPRPT,88,11),"!",2),0,9),?37,$$C($P($$V(BGPRPT,48,11),"!",1)+$P($$V(BGPRPT,48,11),"!",2),0,9)
  • Line Location: HAGE+12
Function Call: WRITE
  • Prompt: ?52,$$C($P($$V(BGPRPT,18,11),"!",1)+$P($$V(BGPRPT,18,11),"!",2),0,9)
  • Line Location: HAGE+13
Function Call: WRITE
  • Prompt: ?67,$J(%,5,1)
  • Line Location: HAGE+14
Function Call: WRITE
  • Prompt: ?74,$J(%,5,1)
  • Line Location: HAGE+15
Function Call: WRITE
  • Prompt: !!,"# of PHN Visits -",!?2," in Home Setting",!?2,"Elders >65 yrs old",?21,$$C($P($$V(BGPRPT,88,12),"!",1)+$P($$V(BGPRPT,88,12),"!",2),0,9),?37,$$C($P($$V(BGPRPT,48,12),"!",1)+$P($$V(BGPRPT,48,12),"!",2),0,9)
  • Line Location: HAGE+17
Function Call: WRITE
  • Prompt: ?52,$$C($P($$V(BGPRPT,18,12),"!",1)+$P($$V(BGPRPT,18,12),"!",2),0,9)
  • Line Location: HAGE+18
Function Call: WRITE
  • Prompt: ?67,$J(%,5,1)
  • Line Location: HAGE+19
Function Call: WRITE
  • Prompt: ?74,$J(%,5,1)
  • Line Location: HAGE+20
Function Call: WRITE
  • Prompt: !?1,"DX",?8,"ICD NARRATIVE",?42,"PERIOD",?52," %"
  • Line Location: H+1
Function Call: WRITE
  • Prompt: !?1,"--",?8,"---------------------------------",?42,"--------",?52,"-----"
  • Line Location: H+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BGPD - [#90240.01] V+3, VA+2

Label References

Name Line Occurrences
$$C AAGE+2, AAGE+3, AAGE+7, AAGE+8, AAGE+12, AAGE+13, AAGE+17, AAGE+18, HAGE+2, HAGE+3
, HAGE+7, HAGE+8, HAGE+12, HAGE+13, HAGE+17, HAGE+18
$$V AAGE+2, AAGE+3, AAGE+4, AAGE+5, AAGE+7, AAGE+8, AAGE+9, AAGE+10, AAGE+12, AAGE+13
, AAGE+14, AAGE+15, AAGE+17, AAGE+18, AAGE+19, AAGE+20, HAGE+2, HAGE+3, HAGE+4, HAGE+5
, HAGE+7, HAGE+8, HAGE+9, HAGE+10, HAGE+12, HAGE+13, HAGE+14, HAGE+15, HAGE+17, HAGE+18
, HAGE+19, HAGE+20
VA V+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % AAGE+4*, AAGE+5*, AAGE+9*, AAGE+10*, AAGE+14*, AAGE+15*, AAGE+19*, AAGE+20*, HAGE+4*, HAGE+5*
, HAGE+9*, HAGE+10*, HAGE+14*, HAGE+15*, HAGE+19*, HAGE+20*
B VA+1~, VA+5*, VA+6*
>> BGPAREAA V+2
>> BGPQUIT AAGE+1, AAGE+6, AAGE+11, AAGE+16, HAGE+1, HAGE+6, HAGE+11, HAGE+16
>> BGPRPT AAGE+2, AAGE+3, AAGE+4, AAGE+5, AAGE+7, AAGE+8, AAGE+9, AAGE+10, AAGE+12, AAGE+13
, AAGE+14, AAGE+15, AAGE+17, AAGE+18, AAGE+19, AAGE+20, HAGE+2, HAGE+3, HAGE+4, HAGE+5
, HAGE+7, HAGE+8, HAGE+9, HAGE+10, HAGE+12, HAGE+13, HAGE+14, HAGE+15, HAGE+17, HAGE+18
, HAGE+19, HAGE+20
>> BGPSUL( VA+1
>> BGPSUMR V+2
C VA+1~*, VA+3*, VA+4, VA+7*, VA+9
F VA+1~, VA+4*, VA+6
FT VA+1~, VA+4*, VA+6*, VA+7
IOSL AAGE+1, AAGE+6, AAGE+11, AAGE+16, HAGE+1, HAGE+6, HAGE+11, HAGE+16
M VA+1~, VA+4*, VA+5
MT VA+1~, VA+4*, VA+5*, VA+7
N CALC~, CALC+2, CALC+4*, CALC+7, V~, V+3, VA+2
O CALC~, CALC+2, CALC+5*, CALC+6, CALC+7
P V~, V+3, VA+2
R V~, V+3
U V+3, VA+2
V VA+1~, VA+2*, VA+3, VA+4
X AAGE+4*, AAGE+5*, AAGE+9*, AAGE+10*, AAGE+14*, AAGE+15*, AAGE+19*, AAGE+20*, HAGE+4*, HAGE+5*
, HAGE+9*, HAGE+10*, HAGE+14*, HAGE+15*, HAGE+19*, HAGE+20*, CALC+3~, CALC+4*, CALC+5*, VA+1~*
, VA+2, C~, C+2
X2 CALC+3~, CALC+4*, CALC+5*, C~
X3 CALC+3~, CALC+4*, CALC+5*, C~
Y AAGE+4*, AAGE+5*, AAGE+9*, AAGE+10*, AAGE+14*, AAGE+15*, AAGE+19*, AAGE+20*, HAGE+4*, HAGE+5*
, HAGE+9*, HAGE+10*, HAGE+14*, HAGE+15*, HAGE+19*, HAGE+20*, V+1~
Z CALC+1~, CALC+7*, CALC+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All