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

Package: IHS GPRA Information System

Routine: BGP0DLT


Information

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

Source Information

Source file <BGP0DLT.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^BGP0BAN  
VA Fileman 1 ^DIR  

Entry Points

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

External References

Name Field # of Occurrence
^%ZIS ZIS+2
HOME^%ZIS QUE+4
^%ZISC NOQUE+3
^%ZTLOAD QUE+3
$$RPTVER^BGP0BAN 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("Lab Taxonomy Report",80)
  • Line Location: START+5
Function Call: WRITE
  • Prompt: !,$$CTR($$RPTVER^BGP0BAN,80)
  • Line Location: START+6
Function Call: WRITE
  • Prompt: !!,"Site populated Lab Taxonomy Report for the: ",!?5,BGPRPTN," Report",!
  • Line Location: INTRO+1
Function Call: WRITE
  • Prompt: !,^BGPCTRL(BGPCTRL,43,X,0)
  • Line Location: INTRO+4
Function Call: WRITE
  • Prompt: !!?3,BGPC,".",?8,BGPTNAME,!?8,"WARNING - You are missing this taxonomy in the Lab Taxonomy file."
  • Line Location: N+17
Function Call: WRITE
  • Prompt: ?17,"NONE"
  • Line Location: N+29
Function Call: WRITE
  • Prompt: ?17,BGPY,") ",BGPLABS(BGPY)
  • Line Location: N+32
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("*** Lab Taxonomy Report ***",80),!
  • Line Location: HEADER1+5
Function Call: WRITE
  • Prompt: $$CTR($$RPTVER^BGP0BAN,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)
^ATXLAB - [#9002228] N+20
^ATXLAB("B" N+15
^BGPCTRL - [#90241.01] INTRO+4
^BGPCTRL("B" INTRO+3
^BGPTAXT - [#90377.08] N+6, N+7, N+8, N+12
^BGPTAXT("B" N+3, N+4
^DIC(4 - [#4] HEADER1+8, LOC+1
^LAB(60 - [#60] N+21
^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+27, N+31
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+16*, N+17, N+28
>> 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+27, N+31
BGPLABS N+19!, N+29
BGPLABS( N+24*, N+30, N+32
>> BGPLC N+19*
>> BGPLC1 N+19*, N+24*
>> BGPLTI N+15*, N+17, N+20
>> BGPNO( N+13
>> BGPPAGE START+2*, PRINT+1*, HEADER+1, HEADER1+1*, HEADER1+2, HEADER1+3, HEADER1+4
>> BGPQUIT PRINT+1*, N+2, N+3, N+20, N+27, N+30, N+31, 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+9
>> 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+12
>> BGPTNAME N+3*, N+4, N+15, N+17, N+28
>> BGPX N+20*, N+21
>> BGPY N+30*, N+32
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+10, N+12*, N+13*, N+14
IO ZIS+2*, NOQUE+1, HEADER+2
IO("Q" ZIS+3
IO("S" HEADER+2, 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+21, HEADER1+4, HEADER1+8, HEADER1+9, USR+1, LOC+1
X INTRO+4*, N+8*, N+9, N+12*, N+13, N+21*, N+22, N+24, 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