Routine: BATSUM

Information

BATSUM ; IHS/CMI/LAB - ;

Call Graph

Call Graph Total: 7

Package	Total	Call Graph
IHS VA Utilities	2	($$VAL,ENP)^XBDIQ1 EN^XBVK
Asthma Tracking System	1	($$LASTAM,$$LASTAV,$$LASTDM,$$LASTETS,$$LASTPARM,$$LASTPBF,$$LASTSEV,$$NEXT,$$NREL,$$PLAST)^BATU
IHS Patient	1	($$AGE,$$DOB,$$HRN,$$SEX)^AUPNPAT
Kernel	1	($$FMADD,$$FMDIFF,$$FMTE)^XLFDT
Patient Care Component Reports	1	$$START1^APCLDF
VA Fileman	1	^DIR

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
Asthma Tracking System	1	BATVSUM

Entry Points

Name	Comments	DBIA/ICR reference
LAST1YRM	;
EOJ	;
S1	;
V
EP(DFN)	;PEP - ASthma register summary
SIG	;CONSTRUCT THE FULL TEXT FROM THE ENCODED SIG
SETARRAY	;set up array containing dm care summary
REF	;DETERMINE THE NUMBER OF REFILLS REMAINING
LASTHF(P,C,F)	;EP - get last factor in category C for patient P
EDUC(P,DATA)	;EP pass back array of all asthma educ topics
N	;more stuff
LAST5	;
HEADER	;
S(Y,F,C,T)	;set up array
W	;write out array
COMN	;if comments/notes in register print them
N1	;
HEAD1	;
RED(V)	;
EP2(DFN)	;EP - PASS DFN get back array of patient care summary
YELLOW(V)
GREEN(V)	;

External References

Name	Field # of Occurrence
$$START1^APCLDF	EDUC+7
$$AGE^AUPNPAT	SETARRAY+4
$$DOB^AUPNPAT	SETARRAY+4
$$HRN^AUPNPAT	SETARRAY+3
$$SEX^AUPNPAT	SETARRAY+4
$$LASTAM^BATU	SETARRAY+20
$$LASTAV^BATU	SETARRAY+10
$$LASTDM^BATU	SETARRAY+25
$$LASTETS^BATU	SETARRAY+23
$$LASTPARM^BATU	SETARRAY+24
$$LASTPBF^BATU	SETARRAY+11, SETARRAY+12
$$LASTSEV^BATU	SETARRAY+17, SETARRAY+19
$$NEXT^BATU	SETARRAY+10
$$NREL^BATU	N+1
$$PLAST^BATU	SETARRAY+6
^DIR	HEADER+1
$$VAL^XBDIQ1	SETARRAY+4, SETARRAY+9, LASTHF+16
ENP^XBDIQ1	COMN+3
EN^XBVK	EOJ+1
$$FMADD^XLFDT	N+1, N+21, LAST1YRM+6
$$FMDIFF^XLFDT	N+20
$$FMTE^XLFDT	HEAD1+3, SETARRAY+2, SETARRAY+10, SETARRAY+27, V+6, N+1, N+15, N+21, N+23, N+36

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: HEADER+1
Function Call: WRITE	Prompt: !,APCHSHDR Line Location: HEAD1+2
Function Call: WRITE	Prompt: !,"ASTHMA PATIENT CARE SUMMARY Report Date: ",$$FMTE^XLFDT(DT),! Line Location: HEAD1+3
Routine Call	DIR Line Location: HEADER+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	LAST1YRM+8
^ATXAX("B"	N+4, N+6, N+8, LAST1YRM+2, LAST1YRM+3, LAST1YRM+4
^AUPNVAST - [#9000010.41]	V+6, V+7
^AUPNVAST("AA"	LAST5+2, LAST5+3
^AUPNVHF - [#9000010.23]	LASTHF+15
^AUPNVHF("AA"	LASTHF+8, LASTHF+9, LASTHF+11
^AUPNVMED - [#9000010.14]	N+14, N+24, LAST1YRM+8
^AUPNVMED("AA"	LAST1YRM+7, LAST1YRM+8
^AUPNVSIT - [#9000010]	V+6, N+15, N+19
^AUTTHF("AC"	LASTHF+7
^AUTTHF("B"	LASTHF+4
^BATREG - [#90181.01]	COMN+1
^DPT - [#2]	SETARRAY+3
^PS(51 - [#51]	SIG+2
^PS(55 - [#55]	N+17
^PSDRUG - [#50]	N+22
^PSRX - [#52]	REF+2
^PSRX("APCC"	N+16
^TMP("APCHAST"	S1+1, S1+2, W+3, W+5, EP2+2!, EP2+3*
^TMP($J	EDUC+5!, EDUC+8, EDUC+9, EDUC+10, EDUC+14!

Label References

Name	Line Occurrences
$$GREEN	SETARRAY+14
$$LASTHF	SETARRAY+27
$$RED	SETARRAY+16
$$YELLOW	SETARRAY+15
COMN	N+5, N+7, N+9, N+11
EDUC	N+33
EOJ	W+8
EP2	EP+1
HEADER	W+4
LAST1YRM	N+10
LAST5	V
N	V+4
REF	N+27
S	SETARRAY+1, SETARRAY+2, SETARRAY+3, SETARRAY+4, SETARRAY+8, SETARRAY+9, SETARRAY+10, SETARRAY+12, SETARRAY+13, SETARRAY+14 , SETARRAY+15, SETARRAY+16, SETARRAY+18, SETARRAY+19, SETARRAY+20, SETARRAY+21, SETARRAY+22, SETARRAY+23, SETARRAY+24, SETARRAY+25 , SETARRAY+27, V+1, V+2, V+3, V+4, V+7, N+2, N+5, N+7, N+9 , N+11, N+12, N+28, N+29, N+30, N+35, N+36, COMN+2, COMN+4, N1+1
S1	S+5, S+7, S+10
SETARRAY	EP2+4
SIG	N+26

Naked Globals

Name	Field # of Occurrence
^(	N+16
^(9	SIG+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	S+3~, S+8, S+9, S1+1, S1+2, EOJ+2!, EDUC+4~, EDUC+9, EDUC+10
A	EDUC+4~, EDUC+6*, EDUC+7
APCHQUIT	W+2!, W+3, W+4, W+7, HEADER+1*
>> APCHSHDR	HEAD1+2, SETARRAY+1
>> APCHSQIT	W+7*
>> APCHX	W+3*, W+5
B	EOJ+2!
BATAR	COMN+3!, N1+2!
BATAR(1100	COMN+4
>> BATCRN	N+17*, N+28
>> BATD	N+15*, N+28
>> BATDC	N+16*, N+23, N+25
>> BATDTM	N+19*, N+20, N+21
>> BATDYS	N+16*, N+21, N+28
BATE	EDUC+4~, EDUC+14!
BATE(	EDUC+12*, EDUC+13
BATEDUC	N+33!, N+34
BATEDUC(	N+36
>> BATEXP	N+19, N+21, N+23, N+25, N+28
BATL	V+4, N+11, LAST1YRM+5!, LAST5+1!
BATL(	V+5, N+13, N+14, LAST1YRM+8, LAST5+5
BATL1	LAST5+3!
BATL1(	LAST5+5
BATL1(9999999	LAST5+4*
>> BATMED	N+22*, N+28
>> BATMFX	N+16*, N+22
>> BATORTS	N+24*, N+25
>> BATPBF	SETARRAY+11*, SETARRAY+12, SETARRAY+13, SETARRAY+14, SETARRAY+15, SETARRAY+16
>> BATQTY	N+18*, N+28
>> BATREF	N+27, REF+1, REF+2, REF+3*
>> BATRFL	REF+2*, REF+3
>> BATRX	N+16*, N+17, REF+1, REF+2
BATSIG	N+18, N+26, N+27*, N+29, N+30, N1+2!, SIG+1, SIG+2
BATSP	N1+2!, SIG+1*, SIG+2
BATSSGY	N+26, N1+2!, SIG+1, SIG+3
C	S~, S+7, EOJ+2!, LAST5+2~, LAST5+5, LASTHF~, LASTHF+2, LASTHF+4*, LASTHF+5, LASTHF+7
D	N+13, N+14, LAST1YRM+1~, LAST1YRM+7, LAST1YRM+8, LAST5+2~, LAST5+3, EDUC+4~, EDUC+10, EDUC+12 , LASTHF+6~, LASTHF+9, LASTHF+10, LASTHF+11, LASTHF+13, LASTHF+14, LASTHF+15, LASTHF+16
DATA	EDUC~, EDUC+2!
DATA(	EDUC+13*
DFN	EP~, EP+1, EP2~, SETARRAY+3, SETARRAY+4, SETARRAY+6, SETARRAY+9, SETARRAY+10, SETARRAY+11, SETARRAY+12 , SETARRAY+17, SETARRAY+19, SETARRAY+20, SETARRAY+23, SETARRAY+24, SETARRAY+25, SETARRAY+27, N+1, N+17, N+33 , COMN+1, COMN+3, LAST1YRM+7, LAST1YRM+8, LAST5+2, LAST5+3
DIR	HEADER+1!
DIR(0	HEADER+1*
DT	HEAD1+3, SETARRAY+2, N+1, N+20, LAST1YRM+6
>> DTOUT	HEADER+1
DUZ(2	SETARRAY+3
E	EOJ+2!, V+5, V+6, V+7, N+14, N+16, N+24, LAST1YRM+1~, LAST1YRM+6, LAST1YRM+7 , LAST5+2~, LAST5+3, LAST5+4, LAST5+5, EDUC+4~, EDUC+7
F	S~, S+1, S+5, EOJ+2!, COMN+4, LASTHF~, LASTHF+3, LASTHF+15
G	EDUC+4~
H	EOJ+2!, LASTHF+6~, LASTHF+7, LASTHF+8, LASTHF+9, LASTHF+11
IO	HEADER+1
IO(0	HEADER+1
IOF	W+1, HEAD1+1
IOSL	W+4
IOST	HEADER+1
L	S+7*, EOJ+2!
M	EOJ+2!, LAST1YRM+1~, LAST1YRM+8*
N	EOJ+2!, N+14, N+15, N+16, N+18, N+19, N+22, N+36, EDUC+4~, EDUC+10* , EDUC+11, EDUC+12, EDUC+13*
O	LASTHF+6~!
O(	LASTHF+11*, LASTHF+15, LASTHF+16
O(0	LASTHF+13
P	EOJ+2!, GREEN+1~, GREEN+2, GREEN+3, YELLOW+1~, YELLOW+2, YELLOW+3, RED+1~, RED+2*, RED+3 , EDUC~, EDUC+3, EDUC+7, LASTHF~, LASTHF+1, LASTHF+8, LASTHF+9, LASTHF+11
P1	GREEN+1~, GREEN+2, YELLOW+1~, YELLOW+2, YELLOW+3, RED+1~
T	S~, S+2, S+7, S+8, S+9, EOJ+2!, N+4, N+5, N+6, N+7 , N+8, N+9, LAST1YRM+1~, LAST1YRM+2, LAST1YRM+8
T1	EOJ+2!, LAST1YRM+1~, LAST1YRM+3*, LAST1YRM+8
T2	EOJ+2!, LAST1YRM+1~, LAST1YRM+4*, LAST1YRM+8
T3	EOJ+2!
U	S1+1, SETARRAY+3, SETARRAY+27, V+6, V+7, N+15, N+16, N+18, N+19, N+22 , REF+2, LAST1YRM+8, EDUC+10, LASTHF+15
V	GREEN~, GREEN+2, GREEN+3, YELLOW~, YELLOW+2, RED~, RED+2
W	EOJ+2!
X	S+3~, S+5, S+6, S+8, S+9, S1+2, EOJ+2!, SETARRAY+1, SETARRAY+2, SETARRAY+3* , SETARRAY+4, SETARRAY+5, SETARRAY+8, SETARRAY+9, SETARRAY+10, SETARRAY+12, SETARRAY+13, SETARRAY+14, SETARRAY+15, SETARRAY+16 , SETARRAY+18, SETARRAY+19, SETARRAY+20, SETARRAY+21, SETARRAY+22, SETARRAY+23, SETARRAY+24, SETARRAY+25, SETARRAY+27, V+1 , V+2, V+3, V+4, V+6, V+7, N+2, N+5, N+7, N+9, N+11 , N+12, N+20, N+21, N+28, N+29, N+30, N+35, N+36, COMN+2, COMN+4* , N1+1, SIG+1, SIG+2, SIG+3, EDUC+4~, EDUC+7
Y	S~, S+6, S+7, S+9, EOJ+2!, HEADER+1, SETARRAY+4, SETARRAY+6, SETARRAY+7, SETARRAY+8 , SETARRAY+17, SETARRAY+18, SETARRAY+19, SETARRAY+20, SETARRAY+21, SETARRAY+23, SETARRAY+24, SETARRAY+25, SETARRAY+27, V+5 , N+1, N+2, N+21, N+23, N+25, SIG+2, LAST1YRM+1~, LAST1YRM+8*

Customize PDF page

Package: Asthma Tracking System

Routine: BATSUM

Information

Source Information

Call Graph

Call Graph Total: 7

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: