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 |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: BGP3DMT

Package: IHS GPRA Information System

Routine: BGP3DMT


Information

BGP3DMT ; IHS/CMI/LAB - national patient list 20 Dec 2004 9:24 AM ;

Source Information

Source file <BGP3DMT.m>

Call Graph

Call Graph Total: 9

Package Total Call Graph
Kernel 5 (,HOME)^%ZIS  ^%ZISC  ^%ZTLOAD  $$FMTE^XLFDT  $$REPEAT^XLFSTR  
IHS VA Utilities 2 ^XBFMK  EN^XBVK  
IHS GPRA Information System 1 $$RPTVER^BGP3BAN  
VA Fileman 1 ^DIR  

Entry Points

Name Comments DBIA/ICR reference
CRS ;EP
HEDIS ;EP
NOQUE ;
GPRA ;EP
EOP ;EP - End of page.
PRINT ;
CMS ;EP
LOC() ;EP - Return location name from file 4 based on DUZ(2).
ONM ;EP
CTR(X,Y) ;EP - Center X in a field Y wide.
INTROT ;introductory text
HEADER1 ;
EO ;EP
ZIS ;call to XBDBQUE
N ;GATHER UP AND DISPLAY ALL NATIONAL GPRA
HEADER ;EP
XIT ;
START ;
USR() ;EP - Return name of current user from ^VA(200.
ELDER ;EP
INTRO ;
QUE ;

External References

Name Field # of Occurrence
^%ZIS ZIS+2
HOME^%ZIS QUE+4
^%ZISC NOQUE+3
^%ZTLOAD QUE+3
$$RPTVER^BGP3BAN START+6, HEADER1+6
^DIR INTRO+5, HEADER+2, EOP+5
^XBFMK XIT+2
EN^XBVK XIT+1
$$FMTE^XLFDT HEADER1+7
$$REPEAT^XLFSTR HEADER1+12

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$$CTR("Medication Taxonomy Report",80)
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !,$$CTR($$RPTVER^BGP3BAN,80)
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !!,"Site populated Medication Taxonomy Report for the: ",!?5,BGPRPTN," Report",!
  • Line Location: INTRO+1
Function Call: WRITE
  • Prompt: !,^BGPCTRL(BGPCTRL,44,X,0)
  • Line Location: INTRO+4
Function Call: WRITE
  • Prompt: !!?3,BGPC,".",?8,BGPTNAME,!?8,"WARNING - You are missing this taxonomy in the Taxonomy file."
  • Line Location: N+16
Function Call: WRITE
  • Prompt: ?17,"NONE"
  • Line Location: N+28
Function Call: WRITE
  • Prompt: ?17,BGPY,") ",BGPLABS(BGPY)
  • Line Location: N+31
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER+2
Function Call: WRITE
  • Prompt: "ZZZZZZZ",!
  • Line Location: HEADER1+3
Function Call: WRITE
  • Prompt: $P(^VA(200,DUZ,0),U,2),?70,"Page ",BGPPAGE,!
  • Line Location: HEADER1+4
Function Call: WRITE
  • Prompt: $$CTR("*** Medication Taxonomy Report ***",80),!
  • Line Location: HEADER1+5
Function Call: WRITE
  • Prompt: $$CTR($$RPTVER^BGP3BAN,80),!
  • Line Location: HEADER1+6
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: HEADER1+7
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: HEADER1+8
Function Call: WRITE
  • Prompt: $$CTR(X,80),!
  • Line Location: HEADER1+9
Function Call: WRITE
  • Prompt: !!,$$CTR(BGPSUBH1_" TAXONOMIES",80),!
  • Line Location: HEADER1+11
Function Call: WRITE
  • Prompt: !,X
  • Line Location: HEADER1+12
Function Call: WRITE
  • Prompt: !
  • Line Location: HEADER1+13
Function Call: WRITE
  • Prompt: !
  • Line Location: EOP+5
Routine Call
  • %ZIS
  • Line Location:
    • QUE+4
Routine Call
  • DIR
  • Line Location:
    • INTRO+5
    • HEADER+2
    • EOP+5
Routine Call
  • %ZIS
  • Line Location:
    • ZIS+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ATXAX - [#9002226] N+19
^ATXAX("B" N+14
^BGPCTRL - [#90241.01] INTRO+4
^BGPCTRL("B" INTRO+3
^BGPTAXH - [#90550.08] N+6, N+7, N+8, N+11
^BGPTAXH("B" N+3, N+4
^DIC(4 - [#4] HEADER1+8, LOC+1
^PSDRUG - [#50] N+20
^VA(200 - [#200] HEADER1+4, HEADER1+9, USR+1

Label References

Name Line Occurrences
$$CTR START+5, START+6, HEADER1+5, HEADER1+6, HEADER1+7, HEADER1+8, HEADER1+9, HEADER1+11
EOP PRINT+5
HEADER PRINT+3, N+2, N+26, N+30
HEADER1 HEADER+1
N PRINT+4
PRINT NOQUE+2
QUE ZIS+3
START CMS+3, ELDER+3, HEDIS+3, CRS+3, ONM+3, GPRA+3, EO+3
XIT INTRO+6, INTRO+7, NOQUE+4, QUE+5, CMS+1, ELDER+1, HEDIS+1, CRS+1, ONM+1, GPRA+1
, EO+1

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS ZIS+2!*
>> BGPC N+1*, N+15*, N+16, N+27
>> BGPCTRL INTRO+3*, INTRO+4
>> BGPGUI START+1, START+4, CMS+1, ELDER+1, HEDIS+1, CRS+1, ONM+1, GPRA+1, EO+1, PRINT+2
, HEADER1+3
>> BGPIOSL PRINT+2*, N+2, N+26, N+30
BGPLABS N+18!, N+28
BGPLABS( N+23*, N+29, N+31
>> BGPLC N+18*
>> BGPLC1 N+18*, N+23*
>> BGPLTI N+14*, N+16, N+19
>> BGPNO( N+12
>> BGPPAGE START+2*, PRINT+1*, HEADER+1, HEADER1+1*, HEADER1+2, HEADER1+3, HEADER1+4
>> BGPQUIT PRINT+1*, N+2, N+3, N+19, N+26, N+29, N+30, HEADER+2*
>> BGPRPTN START+3, INTRO+1, INTRO+2, CMS+2*, ELDER+2*, HEDIS+2*, CRS+2*, ONM+2*, GPRA+2*, EO+2*
>> BGPRT( N+8
>> BGPRT(1 GPRA+2*
>> BGPRT(2 CRS+2*
>> BGPRT(3 HEDIS+2*
>> BGPRT(4 ELDER+2*
>> BGPRT(5 CMS+2*
>> BGPRT(7 ONM+2*
>> BGPRT(8 EO+2*
>> BGPSUBH START+3*, INTRO+2*
>> BGPSUBH1 START+3*, INTRO+2*, HEADER1+11
>> BGPTIEN N+4*, N+5, N+6, N+7, N+8, N+11
>> BGPTNAME N+3*, N+4, N+14, N+16, N+27
>> BGPX N+19*, N+20
>> BGPY N+29*, N+31
DA INTRO+5!
DFOUT EOP+4!
DIR INTRO+5!, HEADER+2!, EOP+3~, EOP+4!, EOP+5!
DIR("A" INTRO+5*, EOP+5*
DIR("B" INTRO+5*
DIR(0 INTRO+5*, HEADER+2*, EOP+5*
DIRUT INTRO+6, EOP+4!
DLOUT EOP+4!
DT HEADER1+7
DTOUT HEADER+2, EOP+4!
DUOUT EOP+4!
DUZ HEADER1+4, HEADER1+9, USR+1
DUZ(2 HEADER1+8, LOC+1
>> G N+8*, N+9, N+11*, N+12*, N+13
IO ZIS+2*, NOQUE+1, HEADER+2
IO("Q" ZIS+3
IO("S" EOP+2
IO(0 ZIS+2, HEADER+2
IOF START+4, HEADER1+2
IOM CTR+1
ION QUE+2
IOP ZIS+2!
IOSL PRINT+2
IOST HEADER+2, EOP+1
>> IOT EOP+2
>> POP ZIS+2
U N+7, N+20, HEADER1+4, HEADER1+8, HEADER1+9, USR+1, LOC+1
X INTRO+4*, N+8*, N+11*, N+12, N+20*, N+21, N+23, HEADER1+7*, HEADER1+8*, HEADER1+9*
, HEADER1+12*, CTR~, CTR+1
Y INTRO+7, HEADER+2, CTR~, CTR+1
>> ZTDESC QUE+2*
>> ZTDTH QUE+2*
>> ZTIO QUE+2*
>> ZTQUEUED XIT+1, HEADER+2, EOP+2
>> ZTREQ XIT+1*
>> ZTRTN QUE+2*
ZTSAVE QUE+1!
ZTSAVE("BGP*" QUE+1*
ZTSK ZIS+1!
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All