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

Package: IHS GPRA Information System

Routine: BGP0ELH


Information

BGP0ELH ; IHS/CMI/LAB - cover page for ELDER 25 Jun 2009 10:20 AM ;

Source Information

Source file <BGP0ELH.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
IHS GPRA Information System 1 $$RPTVER^BGP0BAN  
IHS VA Utilities 1 $$VAL^XBDIQ1  
Kernel 1 $$FMTE^XLFDT  
VA Fileman 1 ^DIR  

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
IHS GPRA Information System 2 BGP0DELP  BGP0PHEL  

Entry Points

Name Comments DBIA/ICR reference
AREACP ;EP - area cover page
CTR(X,Y) ;EP - Center X in a field Y wide.
USR() ;EP - Return name of current user from ^VA(200.
ELDERHDR ;
EOP ;EP - End of page.
ENDTIME ;

External References

Name Field # of Occurrence
$$RPTVER^BGP0BAN BGP0ELH+8, AREACP+6
^DIR EOP+5
$$VAL^XBDIQ1 AREACP+8
$$FMTE^XLFDT BGP0ELH+9, BGP0ELH+12, BGP0ELH+13, BGP0ELH+14, AREACP+7, AREACP+10, AREACP+11, AREACP+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,$$CTR("Cover Page",80)
  • Line Location: BGP0ELH+6
Function Call: WRITE
  • Prompt: !!,$$CTR("*** IHS 2010 Elder Care Report ***",80)
  • Line Location: BGP0ELH+7
Function Call: WRITE
  • Prompt: !,$$CTR($$RPTVER^BGP0BAN,80)
  • Line Location: BGP0ELH+8
Function Call: WRITE
  • Prompt: !,$$CTR("Date Report Run: "_$$FMTE^XLFDT(DT),80)
  • Line Location: BGP0ELH+9
Function Call: WRITE
  • Prompt: !,$$CTR("Site where Run: "_$P(^DIC(4,DUZ(2),0),U),80)
  • Line Location: BGP0ELH+10
Function Call: WRITE
  • Prompt: !,$$CTR("Report Generated by: "_$$USR,80)
  • Line Location: BGP0ELH+11
Function Call: WRITE
  • Prompt: !,$$CTR(X,80)
  • Line Location: BGP0ELH+12
Function Call: WRITE
  • Prompt: !,$$CTR(X,80)
  • Line Location: BGP0ELH+13
Function Call: WRITE
  • Prompt: !,$$CTR(X,80)
  • Line Location: BGP0ELH+14
Function Call: WRITE
  • Prompt: !!,"Measures: Elder Care Performance Measures"
  • Line Location: BGP0ELH+15
Function Call: WRITE
  • Prompt: !!,"Measures: Selected Elder Care Performance Measures (User Defined)"
  • Line Location: BGP0ELH+16
Function Call: WRITE
  • Prompt: !!,"Population: ",$S(BGPBEN=1:"AI/AN Only (Classification 01)",BGPBEN=2:"non AI/AN Only (Classification NOT 01)",BGPBEN=3:"All (Both AI/AN and non AI/AN)",1:"")
  • Line Location: BGP0ELH+17
Function Call: WRITE
  • Prompt: !!,"A file will be created called BG10",$P(^AUTTLOC(DUZ(2),0),U,10)_".EL"_BGPRPT,".",!,"It will reside in the public/export directory.",!,"This file should be sent to your Area Office.",!
  • Line Location: BGP0ELH+20
Function Call: WRITE
  • Prompt: !!,"A delimited output file called ",BGPDELF,!,"has been placed in the public directory for your use in Excel or some",!,"other software package.",!,"See your site manager to access this file.",!
  • Line Location: BGP0ELH+21
Function Call: WRITE
  • Prompt: !!,"All Communities Included.",!
  • Line Location: BGP0ELH+22
Function Call: WRITE
  • Prompt: !!?10,"Community Taxonomy Name: ",$P(^ATXAX(BGPTAXI,0),U)
  • Line Location: BGP0ELH+23
Function Call: WRITE
  • Prompt: !!?10,"The following communities are included in this report:",!
  • Line Location: BGP0ELH+24
Function Call: WRITE
  • Prompt: !!?10,"MFI Visit Location Taxonomy Name: ",$P(^ATXAX(BGPMFITI,0),U)
  • Line Location: BGP0ELH+30
Function Call: WRITE
  • Prompt: !!?10,"The following locations are used for patient visits in this report:",!
  • Line Location: BGP0ELH+31
Function Call: WRITE
  • Prompt: !
  • Line Location: ELDERHDR+1
Function Call: WRITE
  • Prompt: !!,"RUN TIME (H.M.S): ",BGPHR,".",BGPM,".",BGPS
  • Line Location: ENDTIME+2
Function Call: WRITE
  • Prompt: !!,$$CTR("Cover Page",80)
  • Line Location: AREACP+3
Function Call: WRITE
  • Prompt: !!,$$CTR("*** IHS 2010 Elder Care Report ***",80)
  • Line Location: AREACP+4
Function Call: WRITE
  • Prompt: !,$$CTR("AREA AGGREGATE",80)
  • Line Location: AREACP+5
Function Call: WRITE
  • Prompt: !,$$CTR($$RPTVER^BGP0BAN,80)
  • Line Location: AREACP+6
Function Call: WRITE
  • Prompt: !,$$CTR("Date Report Run: "_$$FMTE^XLFDT(DT),80)
  • Line Location: AREACP+7
Function Call: WRITE
  • Prompt: !,$$CTR("Site where Run: "_$$VAL^XBDIQ1(9999999.06,DUZ(2),.04))
  • Line Location: AREACP+8
Function Call: WRITE
  • Prompt: !,$$CTR("Report Generated by: "_$$USR,80)
  • Line Location: AREACP+9
Function Call: WRITE
  • Prompt: !,$$CTR(X,80)
  • Line Location: AREACP+10
Function Call: WRITE
  • Prompt: !,$$CTR(X,80)
  • Line Location: AREACP+11
Function Call: WRITE
  • Prompt: !,$$CTR(X,80)
  • Line Location: AREACP+12
Function Call: WRITE
  • Prompt: !!,"Measures: Elder Care Performance Measures"
  • Line Location: AREACP+13
Function Call: WRITE
  • Prompt: !,"Population: ",$S(BGPBEN=1:"AI/AN Only (Classification 01)",BGPBEN=2:"non AI/AN Only (Classification NOT 01)",BGPBEN=3:"All (Both AI/AN and non AI/AN)",1:"")
  • Line Location: AREACP+14
Function Call: WRITE
  • Prompt: !!,"A file will be created called BG10",$P(^AUTTLOC(DUZ(2),0),U,10)_".EL"_BGPRPT,".",!,"It will reside in the public/export directory.",!,"This file should be sent to your Area Office.",!
  • Line Location: AREACP+19
Function Call: WRITE
  • Prompt: !!,"A delimited output file called ",BGPDELF,!,"has been placed in the public directory for your use in Excel or some",!,"other software package.",!,"See your site manager to access this file.",!
  • Line Location: AREACP+20
Function Call: WRITE
  • Prompt: !!?1,"Report includes data from the following facilities:"
  • Line Location: AREACP+21
Function Call: WRITE
  • Prompt: !!?1,"The following communities are included in this report:"
  • Line Location: AREACP+27
Function Call: WRITE
  • Prompt: !?10,$E($P(BGPXY,";",BGPX1),1,18),?30,$E($P(BGPXY,";",(BGPX1+1)),1,20),?60,$E($P(BGPXY,";",(BGPX1+2)),1,18)
  • Line Location: AREACP+41
Routine Call
  • DIR
  • Line Location:
    • EOP+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ATXAX - [#9002226] BGP0ELH+23, BGP0ELH+30, BGP0ELH+32
^AUTTLOC - [#9999999.06] BGP0ELH+20
^AUTTLOC("C" AREACP+25, AREACP+31
^BGPCTRL - [#90241.01] ELDERHDR+5, ELDERHDR+7
^BGPCTRL("B" ELDERHDR+4
^BGPELDCT - [#90379.03] AREACP+16, AREACP+17, AREACP+25, AREACP+26, AREACP+31, AREACP+32, AREACP+34, AREACP+36, AREACP+39, AREACP+40
^DIC(4 - [#4] BGP0ELH+10, BGP0ELH+32, AREACP+25, AREACP+31
^VA(200 - [#200] USR+1

Label References

Name Line Occurrences
$$CTR BGP0ELH+6, BGP0ELH+7, BGP0ELH+8, BGP0ELH+9, BGP0ELH+10, BGP0ELH+11, BGP0ELH+12, BGP0ELH+13, BGP0ELH+14, AREACP+3
, AREACP+4, AREACP+5, AREACP+6, AREACP+7, AREACP+8, AREACP+9, AREACP+10, AREACP+11, AREACP+12
$$USR BGP0ELH+11, AREACP+9
AREACP BGP0ELH+4
ELDERHDR BGP0ELH+19, AREACP+18
ENDTIME BGP0ELH+18, AREACP+15
EOP BGP0ELH+27, BGP0ELH+34, ELDERHDR+6

Naked Globals

Name Field # of Occurrence
^(0 USR+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BGPALLPT BGP0ELH+22, BGP0ELH+23, BGP0ELH+24
>> BGPAREAA BGP0ELH+4, ELDERHDR+2, ELDERHDR+3
>> BGPBBD BGP0ELH+14, AREACP+12
>> BGPBD BGP0ELH+12, AREACP+10
>> BGPBED BGP0ELH+14, AREACP+12
>> BGPBEN BGP0ELH+17, AREACP+14
>> BGPBT ENDTIME+1
>> BGPC AREACP+23*, AREACP+24*, AREACP+26, AREACP+29*, AREACP+30*, AREACP+32
>> BGPCHSN ELDERHDR+2, AREACP+17*
>> BGPCHSO ELDERHDR+2, ELDERHDR+3, AREACP+16*
>> BGPDELF BGP0ELH+21, AREACP+20
>> BGPED BGP0ELH+12, AREACP+10
>> BGPET ENDTIME+1
>> BGPEXPT BGP0ELH+20
>> BGPGUI BGP0ELH+21, AREACP+20
>> BGPHR ENDTIME+1*, ENDTIME+2
>> BGPIOSL BGP0ELH+27, BGP0ELH+34, ELDERHDR+6
>> BGPM ENDTIME+2*
>> BGPMFITI BGP0ELH+30, BGP0ELH+31, BGP0ELH+32
>> BGPNODEP ELDERHDR+2*, ELDERHDR+3*, ELDERHDR+5, ELDERHDR+7
>> BGPPBD BGP0ELH+13, AREACP+11
>> BGPPED BGP0ELH+13, AREACP+11
BGPQUIT BGP0ELH+37!, AREACP+43!
>> BGPROT BGP0ELH+21, AREACP+20
>> BGPRPT BGP0ELH+20
>> BGPS ENDTIME+2*
>> BGPSEAT BGP0ELH+23, BGP0ELH+24
>> BGPSUL( AREACP+16, AREACP+17, AREACP+23, AREACP+29
>> BGPTAX( BGP0ELH+25
>> BGPTAXI BGP0ELH+23
>> BGPTS ENDTIME+1*, ENDTIME+2*
BGPX BGP0ELH+37!, ELDERHDR+4*, ELDERHDR+5, ELDERHDR+7, AREACP+22~, AREACP+23*, AREACP+25, AREACP+26, AREACP+28~, AREACP+29*
, AREACP+31, AREACP+32, AREACP+34, AREACP+36, AREACP+39, AREACP+40, AREACP+43!
>> BGPX1 AREACP+37*, AREACP+38, AREACP+41*
>> BGPXN AREACP+36*, AREACP+37, AREACP+40*, AREACP+41
>> BGPXX AREACP+36*, AREACP+40*
>> BGPXY AREACP+36*, AREACP+38, AREACP+40*, AREACP+41
>> BGPY ELDERHDR+5*, ELDERHDR+7
>> BGPZZ BGP0ELH+15, BGP0ELH+16, BGP0ELH+25*, BGP0ELH+26*, BGP0ELH+28, BGP0ELH+32*, BGP0ELH+33*, BGP0ELH+35
>> C BGP0ELH+26*, BGP0ELH+33*, AREACP+37*, AREACP+41*
DFOUT EOP+4!
DIR EOP+3~
DIR(0 EOP+5*
DIRUT EOP+4!
DLOUT EOP+4!
DT BGP0ELH+9, AREACP+7
DTOUT EOP+4!
DUOUT EOP+4!
DUZ USR+1
DUZ(2 BGP0ELH+10, BGP0ELH+20, AREACP+8
IO("S" EOP+2
IOF ELDERHDR+6
IOM CTR+1
IOST EOP+1
>> IOT EOP+2
>> N BGP0ELH+25*, BGP0ELH+26, BGP0ELH+32*, BGP0ELH+33
U BGP0ELH+10, BGP0ELH+20, BGP0ELH+23, BGP0ELH+30, BGP0ELH+32, AREACP+16, AREACP+17, AREACP+25, AREACP+26, AREACP+31
, AREACP+32, AREACP+34, AREACP+36, AREACP+40, USR+1
X BGP0ELH+12*, BGP0ELH+13*, BGP0ELH+14*, AREACP+10*, AREACP+11*, AREACP+12*, AREACP+16*, AREACP+17*, AREACP+25*, AREACP+26
, AREACP+31*, AREACP+32, CTR~, CTR+1
Y BGP0ELH+25*, BGP0ELH+28, BGP0ELH+32*, BGP0ELH+35, CTR~, CTR+1
>> ZTQUEUED EOP+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All