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 |  Marked Items |  All
Print Page as PDF
Routine: BATU

Package: Asthma Tracking System

Routine: BATU


Information

BATU ; IHS/CMI/LAB - NO DESCRIPTION PROVIDED ;

Source Information

Source file <BATU.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
IHS VA Utilities 2 $$VAL^XBDIQ1  $$EXTSET^XBFUNC  
Kernel 1 ($$FMADD,$$FMTE)^XLFDT  
Patient Care Component Reports 1 $$START1^APCLDF  

Caller Graph

Caller Graph Total: 22

Package Total Caller Graph
Asthma Tracking System 20 BATAAP  BATAF  BATLOP  BATLRP  BATLRP1  BATREG  BATRP10  BATRP11  
BATRPT0  BATRPT1  BATRPT2  BATRPT3  BATRPT4  BATRPT5  BATRPT6  BATRPT7  
BATRPT8  BATRPT9  BATSUM  BATVSUM  
Health Summary Components 1 BHSHS2  
Patient Care Component 1 APCDEREG  

Entry Points

Name Comments DBIA/ICR reference
TEXT ;
LASTFV2(P,F) ;EP - return last fev25-75
USR() ;EP - Return name of current user from ^VA(200.
LASTDM(P,F) ;EP
NEXT(E) ;EP - called from trigger
PRINT
BANNER ;EP
NREL(P,BDATE,EDATE) ;EP
LASTETS(P,F) ;EP
LOC() ;EP - Return location name from file 4 based on DUZ(2).
CTR(X,Y) ;EP - Center X in a field Y wide.
PLN(E) ;
TEXTL ;
TEXTR ;
TEXTS ;;
TEXTP ;;
TEXTX ;;
LASTPBF(P,F) ;EP
PLAST(P,F) ;PEP
LASTDX(P) ;EP - return date of last asthma diagnosis
LASTSEV(P,F) ;PEP;return last severity recorded
XTMP(N,D) ;EP - set xtmp 0 node
SITE
V ; GET VERSION
TEXTG ;;
LASTPARM(P,F) ;EP
LASTAM(P,F) ;EP - return date of last asthma management plan = yes
DXAST(P) ;PEP
LASTSEVD(P,F,EDATE) ;EP - return last severity before a certain date
LASTAV(P,F) ;EP;return last visit with an Asthma V file entry

External References

Name Field # of Occurrence
$$START1^APCLDF NREL+3, LASTDX+5
$$VAL^XBDIQ1 PLN+3, LASTETS+7, LASTPARM+7, LASTDM+7
$$EXTSET^XBFUNC LASTSEVD+19, LASTSEVD+20, LASTSEV+17, LASTSEV+18
$$FMADD^XLFDT NEXT+8, XTMP+2
$$FMTE^XLFDT LASTPBF+11, LASTFV2+11, LASTSEVD+18, LASTETS+11, LASTPARM+11, LASTDM+11, LASTSEV+16, LASTAM+6, LASTAV+9

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$$CTR(BATX,80)
  • Line Location: PRINT+1
Function Call: WRITE
  • Prompt: !,$$CTR("Version "_BATV)
  • Line Location: PRINT+2
Function Call: WRITE
  • Prompt: !!,$$CTR($$LOC)
  • Line Location: SITE+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^AUPNPROB - [#9000011] PLAST+7, PLN+2, PLN+3
^AUPNPROB("AC" PLAST+6
^AUPNVAST - [#9000010.41] LASTPBF+7, LASTFV2+7, LASTETS+7, LASTPARM+7, LASTDM+7, LASTAV+7, LASTAV+8, LASTAV+9
^AUPNVAST("AA" LASTPBF+6, LASTPBF+7, LASTFV2+6, LASTFV2+7, LASTETS+6, LASTETS+7, LASTPARM+6, LASTPARM+7, LASTDM+6, LASTDM+7
, LASTAV+3, LASTAV+5
^AUPNVAST("AM" LASTAM+3
^AUPNVAST("AS" LASTSEVD+11, LASTSEVD+13, LASTSEVD+15, LASTSEV+9, LASTSEV+11, LASTSEV+13
^AUPNVPOV - [#9000010.07] DXAST+5
^AUPNVPOV("AA" DXAST+3, DXAST+4
^AUPNVSIT - [#9000010] LASTAV+8, LASTAV+9
^AUTTLOC - [#9999999.06] PLN+2
^BATREG - [#90181.01] NEXT+2, NEXT+6
^DIC(4 - [#4] LOC+1
^ICD9 - [#80] PLAST+7, DXAST+5
^VA(200 - [#200] USR+1
^XTMP( XTMP+2*

Label References

Name Line Occurrences
$$CTR PRINT+1, PRINT+2, SITE
$$LASTAV NEXT+4
$$LASTSEV NEXT+6
$$LOC SITE
$$PLN PLAST+13
PRINT V+3

Naked Globals

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

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A PLAST+5~, PLAST+6*, PLAST+7, PLAST+9, DXAST+2~, DXAST+5*, DXAST+6
B PLAST+5~
BATJ V+1~, V+5*, PRINT+1*
BATL NREL+2~, LASTPBF+5~, LASTPBF+6!, LASTPBF+7!, LASTPBF+8, LASTPBF+9, LASTFV2+5~, LASTFV2+6!, LASTFV2+7!, LASTFV2+8
, LASTFV2+9, LASTETS+5~, LASTETS+6!, LASTETS+7!, LASTETS+8, LASTETS+9, LASTPARM+5~, LASTPARM+6!, LASTPARM+7!, LASTPARM+8
, LASTPARM+9, LASTDM+5~, LASTDM+6!, LASTDM+7!, LASTDM+8, LASTDM+9, V+1~, V+3*, V+5*, PRINT+1
BATL( NREL+5, LASTPBF+8, LASTFV2+8, LASTETS+8, LASTPARM+8, LASTDM+8
BATL(0 LASTPBF+8, LASTFV2+8, LASTETS+8, LASTPARM+8, LASTDM+8
BATL(1 NREL+4
BATL(9999999 LASTPBF+7*, LASTFV2+7*, LASTETS+7*, LASTPARM+7*, LASTDM+7*
BATLD NEXT+3~, NEXT+4*, NEXT+5, NEXT+8
>> BATLS NEXT+6*, NEXT+7
BATTEXT V+3*, V+4*, SITE+1!
BATV V+1~, V+2*, PRINT+2
BATX LASTDX+2~, LASTDX+3!, V+1~, V+5*, PRINT+1*
BATX(1 LASTDX+6, LASTDX+7
BATY LASTDX+2~, LASTDX+4*, LASTDX+5
BDATE NREL~, NREL+3
C NREL+5~*, NREL+6
D DXAST+2~, DXAST+3*, DXAST+4, LASTPBF+5~, LASTPBF+6*, LASTPBF+7, LASTFV2+5~, LASTFV2+6*, LASTFV2+7, LASTSEVD+6~
, LASTSEVD+11*, LASTSEVD+12, LASTSEVD+13, LASTSEVD+15, LASTSEVD+17, LASTSEVD+18, LASTETS+5~, LASTETS+6*, LASTETS+7, LASTPARM+5~
, LASTPARM+6*, LASTPARM+7, LASTDM+5~, LASTDM+6*, LASTDM+7, LASTSEV+6~, LASTSEV+9*, LASTSEV+10, LASTSEV+11, LASTSEV+13
, LASTSEV+15, LASTSEV+16, LASTAM+3~*, LASTAM+4, LASTAM+5, LASTAM+6, LASTAV+3~*, LASTAV+4, LASTAV+5, XTMP~
, XTMP+2
D1 LASTPBF+5~, LASTPBF+8*, LASTPBF+11, LASTPBF+12, LASTFV2+5~, LASTFV2+8*, LASTFV2+11, LASTFV2+12, LASTETS+5~, LASTETS+8*
, LASTETS+11, LASTPARM+5~, LASTPARM+8*, LASTPARM+11, LASTDM+5~, LASTDM+8*, LASTDM+11
DT LASTSEVD+8, XTMP+2
DUZ USR+1
DUZ(2 LOC+1
E NREL+2~, NREL+3*, PLN~, PLN+2, PLN+3, NEXT~, NEXT+1, NEXT+2, NEXT+4, NEXT+6
, LASTPBF+5~, LASTPBF+7*, LASTPBF+8*, LASTFV2+5~, LASTFV2+7*, LASTFV2+8*, LASTSEVD+6~, LASTSEVD+13*, LASTETS+5~, LASTETS+7*
, LASTETS+8*, LASTPARM+5~, LASTPARM+7*, LASTPARM+8*, LASTDM+5~, LASTDM+7*, LASTDM+8*, LASTSEV+6~, LASTSEV+11*, LASTAV+5~*
, LASTAV+6, LASTAV+7, LASTAV+8, LASTAV+9, LASTDX+2~, LASTDX+5*
EDATE NREL~, NREL+3, LASTSEVD~, LASTSEVD+8*, LASTSEVD+10
EDATE1 LASTSEVD+10~*, LASTSEVD+11
F PLAST~, PLAST+4*, PLAST+12, PLAST+13, LASTPBF~, LASTPBF+4*, LASTPBF+10, LASTPBF+11, LASTPBF+12, LASTFV2~
, LASTFV2+4*, LASTFV2+10, LASTFV2+11, LASTFV2+12, LASTSEVD~, LASTSEVD+9*, LASTSEVD+16, LASTSEVD+17, LASTSEVD+18, LASTSEVD+19
, LASTSEVD+20, LASTETS~, LASTETS+4*, LASTETS+10, LASTETS+11, LASTPARM~, LASTPARM+4*, LASTPARM+10, LASTPARM+11, LASTDM~
, LASTDM+4*, LASTDM+10, LASTDM+11, LASTSEV~, LASTSEV+8*, LASTSEV+14, LASTSEV+15, LASTSEV+16, LASTSEV+17, LASTSEV+18
, LASTAM~, LASTAM+2*, LASTAM+5, LASTAM+6, LASTAV~, LASTAV+2*, LASTAV+7, LASTAV+8, LASTAV+9
G PLAST+5~, PLAST+6*, PLAST+9*, PLAST+11, PLAST+13*, DXAST+2~, DXAST+3*, DXAST+4, DXAST+7*, DXAST+10
, LASTPBF+5~, LASTPBF+6*, LASTPBF+8*, LASTPBF+10, LASTFV2+5~, LASTFV2+6*, LASTFV2+8*, LASTFV2+10, LASTETS+5~, LASTETS+6*
, LASTETS+8*, LASTETS+10, LASTPARM+5~, LASTPARM+6*, LASTPARM+8*, LASTPARM+10, LASTDM+5~, LASTDM+6*, LASTDM+8*, LASTDM+10
I PLAST+5~, PLAST+7*, PLAST+8, DXAST+2~, DXAST+4*, DXAST+5, LASTDX+2~
IOF PRINT
IOM CTR+1
LAST LASTSEVD+6~, LASTSEVD+13*, LASTSEVD+14, LASTSEVD+15, LASTSEV+6~, LASTSEV+11*, LASTSEV+12, LASTSEV+13
N XTMP~, XTMP+1, XTMP+2
P NREL~, NREL+3, PLAST~, PLAST+3, PLAST+6, DXAST~, DXAST+1, DXAST+3, DXAST+4, LASTPBF~
, LASTPBF+3, LASTPBF+6, LASTPBF+7, LASTFV2~, LASTFV2+3, LASTFV2+6, LASTFV2+7, LASTSEVD~, LASTSEVD+7, LASTSEVD+11
, LASTSEVD+13, LASTSEVD+15, LASTETS~, LASTETS+3, LASTETS+6, LASTETS+7, LASTPARM~, LASTPARM+3, LASTPARM+6, LASTPARM+7
, LASTDM~, LASTDM+3, LASTDM+6, LASTDM+7, LASTSEV~, LASTSEV+7, LASTSEV+9, LASTSEV+11, LASTSEV+13, LASTAM~
, LASTAM+1, LASTAM+3, LASTAV~, LASTAV+1, LASTAV+3, LASTAV+5, LASTDX~, LASTDX+1, LASTDX+5
S PLAST+5~, PLN+1~, PLN+2*, PLN+3, LASTSEVD+6~, LASTSEVD+15*, LASTSEVD+16, LASTSEVD+19, LASTSEVD+20, LASTSEV+6~
, LASTSEV+13*, LASTSEV+14, LASTSEV+17, LASTSEV+18, LASTDX+2~, LASTDX+5*
U PLAST+7, DXAST+5, PLN+2, PLN+3, LASTPBF+7, LASTPBF+8, LASTFV2+7, LASTFV2+8, LASTETS+7, LASTETS+8
, LASTPARM+7, LASTPARM+8, LASTDM+7, LASTDM+8, LASTAV+7, LASTAV+8, LASTAV+9, LASTDX+7, USR+1, LOC+1
X NREL+2~, NREL+3*, NREL+5~*, CTR~, CTR+1
Y CTR~, CTR+1

Marked Items

Name Field # of Occurrence
$T(@BATTEXT+BATJ V+5, PRINT+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All