Routine: BDMPA19

Package	Total	Call Graph
IHS VA Utilities	2	^XBCLS ^XBDBQUE
VA Fileman	1	^DIR

Package	Total	Caller Graph
Diabetes Registry	2	BDMPA1 BDMPA16

Entry Points

Name	Comments	DBIA/ICR reference
ZIS	;
TEXTD	;EP
LASTHF(P,C,BDATE,EDATE,F)	;EP - get last factor in category C for patient P
TAXCHK	;EP
LAB	;
XIT	;EP
PRINT
DONE	;
TAXS	;
BANNER	;EP - banner for 2003 audit menu
PAGE	;
BMIEPI(H,W)	;EP ;

External References

Name	Field # of Occurrence
^DIR	DONE+1, PAGE+1
^XBCLS	PRINT
^XBDBQUE	ZIS+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Checking for Taxonomies to support the 2013 Pre-Diabetes Audit. ",!,"Please enter the device for printing.",! Line Location: BDMPA19+5
Function Call: WRITE	Prompt: !,"Checking for Taxonomies to support the 2013 Pre-Diabetes Audit...",! Line Location: TAXCHK+3
Function Call: WRITE	Prompt: !,"All taxonomies are present.",! Line Location: TAXCHK+21
Function Call: WRITE	Prompt: !!,"In order for the 2013 Diabetes Audit to find all necessary data, several",!,"taxonomies must be established. The following taxonomies are missing, have",!,"no entries or contain a panel test and should not:",! Line Location: TAXCHK+22
Function Call: WRITE	Prompt: !?80-$L(BDMX)\2,BDMX Line Location: PRINT+1
Function Call: WRITE	Prompt: !?80-(8+$L(BDM("VERSION")))/2,"Version ",BDM("VERSION") Line Location: PRINT+2
Function Call: WRITE	Prompt: !!?80-$L(BDM("SITE"))\2,BDM("SITE") Line Location: PRINT+3
Function Call: WRITE	Prompt: ! Line Location: PAGE+1
Routine Call	DIR Line Location: DONE+1 PAGE+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^ATXAX - [#9002226]	TAXCHK+10
^ATXAX("B"	TAXCHK+8, TAXCHK+9
^ATXLAB - [#9002228]	TAXCHK+14, TAXCHK+15, TAXCHK+17, TAXCHK+18
^ATXLAB("B"	TAXCHK+12, TAXCHK+13
^AUPNVHF - [#9000010.23]	LASTHF+16
^AUPNVHF("AA"	LASTHF+8, LASTHF+9, LASTHF+12
^AUTTHF - [#9999999.64]	LASTHF+16
^AUTTHF("AC"	LASTHF+7
^AUTTHF("B"	LASTHF+4
^DIC(4 - [#4]	PRINT+3
^LAB(60 - [#60]	TAXCHK+19

Label References

Name	Line Occurrences
DONE	TAXCHK+27
PAGE	TAXCHK+20, TAXCHK+24
XIT	ZIS+3, PRINT+3, PRINT+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	BMIEPI+1~, BMIEPI+4*, BMIEPI+5
A	TAXCHK+4~, TAXCHK+5!, TAXCHK+21!
A(	TAXCHK+8, TAXCHK+10, TAXCHK+12, TAXCHK+14, TAXCHK+23, TAXCHK+25
B	TAXCHK+4~, TAXCHK+5!, TAXCHK+21
B(	TAXCHK+19*, TAXCHK+28, TAXCHK+29, TAXCHK+30
BDATE	LASTHF~, LASTHF+11
BDM	XIT+1!
BDM("SITE"	PRINT+3*
BDM("VERSION"	BANNER+1*, PRINT+2
>> BDMDUZ2	PRINT+3
BDMJ	XIT+1!, BANNER+2, PRINT+1
BDMLINE	XIT+1!, BANNER+2*, PRINT+1
BDMQUIT	TAXCHK+2!, TAXCHK+23, TAXCHK+24, TAXCHK+27, TAXCHK+28, TAXCHK+29, XIT+1!, PAGE+1*
BDMTEXT	XIT+1!, BANNER+1*
BDMX	TAXCHK+4~, TAXCHK+7, TAXCHK+8, TAXCHK+9, TAXCHK+10, TAXCHK+11, TAXCHK+12, TAXCHK+13, TAXCHK+14, TAXCHK+19 , TAXCHK+21!, TAXCHK+23, TAXCHK+25, TAXCHK+28, TAXCHK+29, TAXCHK+30, XIT+1!, BANNER+2, PRINT+1!
BDMY	TAXCHK+4~, TAXCHK+18, TAXCHK+19, TAXCHK+29, TAXCHK+30
C	TAXCHK+4~, TAXCHK+6, TAXCHK+19, LASTHF~, LASTHF+2, LASTHF+4*, LASTHF+5, LASTHF+7
D	LASTHF+6~, LASTHF+9, LASTHF+10, LASTHF+11, LASTHF+12, LASTHF+14, LASTHF+15, LASTHF+16
DIR	DONE+1!, PAGE+1!
DIR("A"	DONE+1*
DIR(0	DONE+1, PAGE+1
>> DIRUT	DONE+1*
>> DTOUT	PAGE+1
>> DUOUT	DONE+1
DUZ(2	PRINT+3
EDATE	LASTHF~, LASTHF+10
F	LASTHF~, LASTHF+3*, LASTHF+16
H	LASTHF+6~, LASTHF+7, LASTHF+8, LASTHF+9, LASTHF+12, BMIEPI~, BMIEPI+2, BMIEPI+4*
I	TAXCHK+4~, TAXCHK+9, TAXCHK+10, TAXCHK+13, TAXCHK+14, TAXCHK+15, TAXCHK+17, TAXCHK+18, TAXCHK+21!
IO	DONE+1, PAGE+1
IO(0	DONE+1, PAGE+1
IOF	BDMPA19+4, TAXCHK+1, PRINT
IOSL	TAXCHK+20, TAXCHK+24
IOST	DONE+1, PAGE+1
J	TAXCHK+4~, TAXCHK+7, TAXCHK+11, XIT+2!
O	LASTHF+6~!
O(	LASTHF+12*, LASTHF+16
O(0	LASTHF+14
P	LASTHF~, LASTHF+1, LASTHF+8, LASTHF+9, LASTHF+12
>> T	TAXCHK+7, TAXCHK+11
U	TAXCHK+15, TAXCHK+17, TAXCHK+19, TAXCHK+25, TAXCHK+30, LASTHF+16
W	BMIEPI~, BMIEPI+3, BMIEPI+4*
X	XIT+2!
>> XBNS	ZIS+1*
>> XBRC	ZIS+1*
>> XBRP	ZIS+1*
>> XBRX	ZIS+1*
Y	TAXCHK+4~, TAXCHK+7, TAXCHK+8, TAXCHK+10, TAXCHK+11, TAXCHK+12, TAXCHK+14, TAXCHK+19, TAXCHK+21!, XIT+2! , PAGE+1
Z	TAXCHK+4~, TAXCHK+7, TAXCHK+11, TAXCHK+21!

Customize PDF page

Package: Diabetes Registry

Routine: BDMPA19

Information

Source Information

Call Graph

Call Graph Total: 3

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend:

Marked Items

Name	Field # of Occurrence
$T(@BDMTEXT+BDMJ	BANNER+2, PRINT+1
$T(@T+J	TAXCHK+7, TAXCHK+11