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 |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BGP4PDLS

Package: IHS GPRA Information System

Routine: BGP4PDLS


Information

BGP4PDLS ; IHS/CMI/LAB - IHS gpra print ;

Source Information

Source file <BGP4PDLS.m>

Call Graph

Call Graph Total: 3

Package Total Call Graph
IHS Patient 1 $$HRN^AUPNPAT  
Kernel 1 $$FMTE^XLFDT  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
IHS GPRA Information System 1 BGP4PDL  

Entry Points

Name Comments DBIA/ICR reference
LOC() ;EP - Return location name from file 4 based on DUZ(2).
HEADER ;EP
CTR(X,Y) ;EP - Center X in a field Y wide.
H1 ;
S(Y,F,P) ;set up array
START ;
USR() ;EP - Return name of current user from ^VA(200.
HEADER1 ;
GO
PRINTL ;print one line

External References

Name Field # of Occurrence
$$HRN^AUPNPAT PRINTL+3
^DIR HEADER+2
$$FMTE^XLFDT HEADER1+2, HEADER1+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: !?3,$P(^VA(200,DUZ,0),U,2),?35,$$FMTE^XLFDT(DT),?70,"Page ",BGPGPG,!
  • Line Location: HEADER1+2
Function Call: WRITE
  • Prompt: !,$$CTR("*** IHS 2014 Clinical Performance Measure Patient List ***",80),!
  • Line Location: HEADER1+3
Function Call: WRITE
  • Prompt: $$CTR($P(^DIC(4,DUZ(2),0),U),80),!
  • Line Location: HEADER1+4
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: HEADER1+5
Function Call: WRITE
  • Prompt: $$CTR($S(BGPLIST="A":"Entire Patient List",BGPLIST="R":"Random Patient List",1:"Patient List by Provider: "_BGPLPROV),80),!
  • Line Location: HEADER1+6
Function Call: WRITE
  • Prompt: !,$TR($J("",80)," ","-")
  • Line Location: HEADER1+7
Routine Call
  • DIR
  • Line Location:
    • HEADER+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^BGPINDJ - [#90552.01] GO+2, GO+6, GO+7, GO+10, GO+11, GO+12, GO+19, GO+20, GO+24, GO+25
, GO+26, GO+32, GO+33, GO+35, GO+36, GO+37, GO+38, GO+39, GO+40, GO+41
, GO+42, H1+6
^DIC(4 - [#4] HEADER1+4, LOC+1
^DPT - [#2] PRINTL+3
^TMP($J S+2*, S+3*, S+4*
^VA(200 - [#200] HEADER1+2, USR+1
^XTMP("BGP4D" GO+44, GO+45, GO+46, GO+47, PRINTL+4, PRINTL+5

Label References

Name Line Occurrences
$$CTR HEADER1+3, HEADER1+4, HEADER1+5, HEADER1+6
GO START+11, START+12
H1 GO+43
HEADER1 HEADER+1
PRINTL GO+47
S START+5, GO+1, GO+2, GO+3, GO+4, GO+12, GO+16, GO+17, GO+26, GO+30
, GO+34, GO+36, GO+37, GO+38, GO+39, GO+40, GO+41, GO+42, GO+51, GO+52
, GO+53, PRINTL+3, PRINTL+4, PRINTL+5, H1+1, H1+2, H1+3, H1+4, H1+5, H1+6
, H1+7, H1+8, H1+9

Naked Globals

Name Field # of Occurrence
^(0 USR+1, LOC+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % S+2*, S+3, S+4
>> BGPAGE GO+46*, GO+47, PRINTL+3, PRINTL+4, PRINTL+5
>> BGPAREAA START+1
>> BGPBD HEADER1+5
>> BGPCNT START+9*, START+10*, START+11*, START+12*, START+13*, PRINTL+1
>> BGPCOM GO+44*, GO+45, GO+46, GO+47, PRINTL+3, PRINTL+4, PRINTL+5
>> BGPCOUNT START+8*, GO+47*, PRINTL+1
>> BGPCPPL START+2
>> BGPED HEADER1+5
>> BGPGPG HEADER+1, HEADER1+1*, HEADER1+2
>> BGPH GO+44, GO+45, GO+46, GO+47, PRINTL+4, PRINTL+5
>> BGPIC GO+6, GO+7, GO+10, GO+11, GO+12, GO+19, GO+20, GO+24, GO+25, GO+26
>> BGPINDJ GO+10, GO+24
>> BGPJ GO+44, GO+45, GO+46, GO+47, PRINTL+4, PRINTL+5
>> BGPL START+7*, START+9, GO+2, GO+32, GO+33, GO+35, GO+36, GO+37, GO+38, GO+39
, GO+40, GO+41, GO+42, GO+44, GO+45, GO+46, GO+47, PRINTL+4, PRINTL+5, H1+6
>> BGPLIST START+3, START+11, HEADER1+6, H1+2
>> BGPLIST( START+7, START+9
>> BGPLPROV HEADER1+6, H1+2
>> BGPNODE GO+5*, GO+6, GO+7, GO+10, GO+11, GO+12, GO+18*, GO+19, GO+20, GO+24
, GO+25, GO+26, GO+31*, GO+32*, GO+33*, GO+35, GO+36
>> BGPNPL START+4
>> BGPPCNT START+8*, GO+53, PRINTL+2*
>> BGPQUIT HEADER+2*
>> BGPRTYPE GO+5, GO+10, GO+18, GO+24, GO+32, GO+33, H1+4
>> BGPSEX GO+45*, GO+46, GO+47, PRINTL+3, PRINTL+4, PRINTL+5
>> BGPSUMON GO+43
>> BGPX GO+6*, GO+7, GO+19*, GO+20, GO+35*, GO+36, GO+37*, GO+38, GO+39*, GO+40
, GO+41*, GO+42
>> BGPY GO+7*, GO+10, GO+11, GO+12, GO+20*, GO+24, GO+25, GO+26
>> BGPZ GO+11*, GO+12, GO+25*, GO+26
>> DFN GO+47*, PRINTL+3, PRINTL+4, PRINTL+5
DIR HEADER+2!
DIR(0 HEADER+2*
DT HEADER1+2
>> DTOUT HEADER+2
DUZ HEADER1+2, USR+1
DUZ(2 PRINTL+3, HEADER1+4, LOC+1
F S~, S+1*, S+2
IO HEADER+2
IO(0 HEADER+2
IOF HEADER1+1
IOM CTR+1
IOST HEADER+2
P S~, S+4
U GO+2, PRINTL+3, HEADER1+2, HEADER1+4, S+2, S+4, USR+1, LOC+1
X START+5*, GO+1*, GO+2*, GO+3*, GO+4*, GO+16*, GO+17*, GO+26*, GO+30*, GO+34*
, GO+36*, GO+37*, GO+38*, GO+39*, GO+40*, GO+41*, GO+42*, GO+51*, GO+52*, GO+53*
, PRINTL+3*, PRINTL+4*, PRINTL+5*, HEADER1+5*, H1+1*, H1+2*, H1+3*, H1+4*, H1+5*, H1+6*
, H1+7*, H1+8*, H1+9*, CTR~, CTR+1
Y GO+12*, HEADER+2, H1+6*, S~, S+4, CTR~, CTR+1
>> ZTQUEUED HEADER+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All