Routine: BGPMUEP

Package	Total	Call Graph
IHS GPRA Information System	4	(EN,ENM)^BGPMUDSI (EN,PT,RT)^BGPMUDSL ^BGPMUEPD ^BGPMUPP
IHS VA Utilities	4	^XBDBQUE ^XBFMK $$C^XBFUNC EN^XBVK
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD ($$FMADD,$$FMTE)^XLFDT
VA Fileman	3	C^%DTC ^DIC ^DIR
IHS Patient	1	KILL^AUPNPAT

Package	Total	Caller Graph
IHS GPRA Information System	2	BGPMUEH BGPMUXML

Entry Points

Name	Comments	DBIA/ICR reference
BEN	;
SUM	;display summary of this report
USR()	;EP - Return name of current user from ^VA(200.
EOP	;EP - End of page.
TSKMN	;EP ENTRY POINT FROM TASKMAN
BY	;get previous year
NODEV	;
LOC()	;EP - Return location name from file 4 based on DUZ(2).
CTR(X,Y)	;EP - Center X in a field Y wide.
TP	;get time period
EP	;collect eligible provider to run report for
CI	;
E	;report start date
ZIS	;call to XBDBQUE
F	;report start date
AI	;
GETBE	;EP
DRIVER	;
XIT	;
NODEV1	;
SETIND	;
GI	;gather all measures
MUCHECK	;Site must have EHR 1.1 Patch 8 installed to qualify for MU since that is the certified version
ZIS1	;
MI	;
LISTS	;any lists with measures?
SI	;
INTRO	;
COMM	;

External References

Name	Field # of Occurrence
C^%DTC	BY+3, BY+6
^%ZIS	ZIS+5
^%ZISC	DRIVER+5, NODEV1+3, XIT+1
^%ZTLOAD	TSKMN+5
KILL^AUPNPAT	XIT+5
EN^BGPMUDSI	SI+2
ENM^BGPMUDSI	MI+2
EN^BGPMUDSL	LISTS+9
PT^BGPMUDSL	SUM+10
RT^BGPMUDSL	LISTS+12
^BGPMUEPD	DRIVER+2, NODEV1+1
^BGPMUPP	DRIVER+4, NODEV1+2
^DIC	EP+2
^DIR	TP+3, TP+14, TP+29, BY+14, EP+6, BEN+4, LISTS+4, LISTS+5, EOP+5, F+6 , E+6
^XBDBQUE	NODEV+2
^XBFMK	XIT+13
$$C^XBFUNC	MUCHECK+10, MUCHECK+11, MUCHECK+15, MUCHECK+16
EN^XBVK	XIT+2
$$FMADD^XLFDT	TP+23
$$FMTE^XLFDT	TP+27, BY+24, BY+25, BY+26, SUM+4, SUM+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,$$CTR("IHS Meaningful Use Clinical Quality Measure Report",80) Line Location: BGPMUEP+5
Function Call: WRITE	Prompt: !,$$CTR("Report on all Patients regardless of Community of Residence",80),!! Line Location: BGPMUEP+6
Function Call: WRITE	Prompt: !,"This will produce a Clinical Quality Measure Report for one or more measures" Line Location: INTRO+2
Function Call: WRITE	Prompt: !,"for a period you specify. You will be asked to provide: 1) the length of the" Line Location: INTRO+3
Function Call: WRITE	Prompt: !,"reporting period , 2) the desired start date for your reporting period and," Line Location: INTRO+4
Function Call: WRITE	Prompt: !,"3) the baseline period to compare data to." Line Location: INTRO+5
Function Call: WRITE	Prompt: !!,"Enter the reporting period start date." Line Location: TP+10
Function Call: WRITE	Prompt: !,"Start date not entered.",! Line Location: TP+19
Function Call: WRITE	Prompt: !!,"Enter the Baseline Year to compare data to.",!,"Use a 4 digit year, e.g. 1999, 2000" Line Location: BY+11
Function Call: WRITE	Prompt: !!,"Please enter a year only!",! Line Location: BY+18
Function Call: WRITE	Prompt: !!,"The date ranges for this report are:" Line Location: BY+23
Function Call: WRITE	Prompt: !?5,"Report Period: ",?31,$$FMTE^XLFDT(BGPBD)," to ",?31,$$FMTE^XLFDT(BGPED) Line Location: BY+24
Function Call: WRITE	Prompt: !?5,"Previous Year Period: ",?31,$$FMTE^XLFDT(BGPPBD)," to ",?31,$$FMTE^XLFDT(BGPPED) Line Location: BY+25
Function Call: WRITE	Prompt: !?5,"Baseline Period: ",?31,$$FMTE^XLFDT(BGPBBD)," to ",?31,$$FMTE^XLFDT(BGPBED) Line Location: BY+26
Function Call: WRITE	Prompt: !! Line Location: EP+1
Function Call: WRITE	Prompt: !!,"provider is required, use an '^' to exit." Line Location: EP+4
Function Call: WRITE	Prompt: !!,"no measures selected" Line Location: GI+3
Function Call: WRITE	Prompt: !,$$CTR("SUMMARY OF MEANINGFUL USE CLINICAL QUALITY MEASURE REPORT TO BE GENERATED") Line Location: SUM+2
Function Call: WRITE	Prompt: !!,"The date ranges for this report are:" Line Location: SUM+3
Function Call: WRITE	Prompt: !?5,"Report Period: ",?31,$$FMTE^XLFDT(BGPBD)," to ",?31,$$FMTE^XLFDT(BGPED) Line Location: SUM+4
Function Call: WRITE	Prompt: !?5,"Baseline Period: ",?31,$$FMTE^XLFDT(BGPBBD)," to ",?31,$$FMTE^XLFDT(BGPBED) Line Location: SUM+5
Function Call: WRITE	Prompt: !!,"ALL Patients will be included." Line Location: SUM+6
Function Call: WRITE	Prompt: !,?10,$P(^BGPMUIND(BGPMUYF,X,0),U,3) Line Location: SUM+7
Function Call: WRITE	Prompt: !!,"Lists will be produced for these measures: " Line Location: SUM+8
Function Call: WRITE	Prompt: !,?10,$P(^BGPMUIND(BGPMUYF,X,0),U,3) Line Location: SUM+9
Function Call: WRITE	Prompt: !,"Report Aborted" Line Location: ZIS1+1
Function Call: WRITE	Prompt: !,"Report Aborted" Line Location: ZIS1+2
Function Call: WRITE	Prompt: !,"Report Aborted" Line Location: ZIS1+3
Function Call: WRITE	Prompt: !!,"PATIENT LISTS" Line Location: LISTS+2
Function Call: WRITE	Prompt: !!,"You do not have the security access to print patient lists.",!,"Please see your supervisor or program manager if you feel you should have",!,"the BGPZ PATIENT LISTS security key.",! Line Location: LISTS+3
Function Call: WRITE	Prompt: !!,"No lists selected.",! Line Location: LISTS+11
Function Call: WRITE	Prompt: !!,"Enter the reporting period start date." Line Location: F+2
Function Call: WRITE	Prompt: !!,"Enter the reporting period end date." Line Location: E+2
Routine Call	DIC Line Location: EP+2
Routine Call	DIR Line Location: TP+3 TP+14 TP+29 BY+14 EP+6 BEN+4 LISTS+4 LISTS+5 EOP+5 F+6 E+6
Routine Call	%ZIS Line Location: ZIS+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^BGPMUIND(	SUM+7, SUM+9, CI+1, AI+1
^DIC(4 - [#4]	LOC+1
^TMP($J	DRIVER+1!, DRIVER+6!
^VA(200 - [#200]	USR+1
^XPD(9.7 - [#9.7]	MUCHECK+9, MUCHECK+12, MUCHECK+13
^XUSEC("BGPZ PATIENT LISTS"	LISTS+3

Label References

Name	Line Occurrences
$$CTR	BGPMUEP+5, BGPMUEP+6, SUM+2
AI	GI+2
BY	TP+9, BY+18
CI	GI+1
COMM	BEN+5
E	GETBE+3
EP	EP+4
F	GETBE+1
GETBE	TP+8
LISTS	SUM+11, CI+2, AI+2, MI+4, SI+4, LISTS+12
MI	EP+9
MUCHECK	BGPMUEP+7
NODEV	ZIS+4
SETIND	EP+9, EP+10, GI+3
SI	EP+10
TP	TP+19, TP+26, BY+15, BY+16
TSKMN	ZIS1+4
XIT	INTRO+1, SETIND+1, TP+4, TP+8, EP+3, EP+7, ZIS+4, DRIVER+7, NODEV1+4, TSKMN+5

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+4!, ZIS+5*
A	XIT+7!
B	XIT+7!
BD	XIT+9!
>> BGP0RPTH	SETIND+4, TP+1
>> BGPANS	TP+5*, TP+8, TP+9, BY+8
>> BGPBBD	BY+21*, BY+26, SUM+5
>> BGPBD	TP+2, TP+8, TP+21, TP+22, TP+27, BY+2, BY+8, BY+21, BY+24, SUM+4 , GETBE+2, F+1, F+10*
>> BGPBED	BY+22*, BY+26, SUM+5
>> BGPBEN	BEN+1, BEN+6
>> BGPDELT	ZIS+4, ZIS+5
>> BGPDO	TP+26, TP+29, TP+30, TP+31*
>> BGPED	TP+2, TP+8, TP+23, TP+26, TP+27, BY+5, BY+8, BY+22, BY+24, SUM+4 , E+1, E+10
BGPIND	EP+9, EP+10, GI+3, MI+1!, MI+3, SI+1!, SI+3
BGPIND(	SUM+7, CI+1, AI+1
>> BGPINDT	SETIND+2, EP+8, EP+9, EP+10, GI+1, GI+2
>> BGPLEN	TP+6*, TP+23
BGPLIST	LISTS+1!, LISTS+8!, LISTS+11, LISTS+12
BGPLIST(	SUM+9
>> BGPMUT	SETIND+5*
>> BGPMUYF	SETIND+3*, SUM+7, SUM+9, CI+1, AI+1
>> BGPPBD	BY+4, BY+8, BY+25
>> BGPPED	BY+7, BY+8, BY+25
>> BGPPER	TP+7, TP+18, TP+19, TP+21, TP+23, BY+19, F+1, F+11
>> BGPPROV	EP+5*
>> BGPQUIT	BGPMUEP+7, LISTS+12, MUCHECK+7, MUCHECK+11, MUCHECK+17*
>> BGPROT	SUM+11, ZIS+4
>> BGPRTYPE	SETIND+4, TP+1
>> BGPTP	TP+2*
>> BGPVDT	TP+7, TP+17, TP+18, BY+10, BY+17, BY+19, F+1, F+9, F+11, E+1*
C	XIT+7!
D	XIT+7!
DA	TP+3!, TP+29!, EP+2!, EP+6!, BEN+4!, LISTS+5!
DFOUT	EOP+4!
DIADD	XIT+4!
DIC	EP+2*!
DIC("A"	EP+2*
DIC(0	EP+2*
DIR	TP+3!, TP+14!, TP+29!, BY+14!, EP+6!, BEN+4!, LISTS+4!, LISTS+5!, XIT+3!, EOP+3~ , EOP+4!, EOP+5!, F+6!, E+6!
DIR("?"	TP+13, F+5, E+5*
DIR("A"	TP+3, TP+12, TP+29, BY+13, EP+6, BEN+2, LISTS+4, LISTS+5, F+4, E+4
DIR("B"	TP+29, BEN+3, LISTS+5*
DIR(0	TP+3, TP+11, TP+29, BY+12, EP+5, BEN+2, LISTS+4, LISTS+5, EOP+5, F+3 , E+3*
DIRUT	TP+4, TP+15, TP+16, TP+30, BY+15, BY+16, EP+7, BEN+5, LISTS+6, XIT+3! , EOP+4!, F+7, F+8, E+7, E+8
DLAYGO	XIT+4!
DLOUT	EOP+4!
DOD	XIT+3!
DT	TP+26
DTOUT	EOP+4!
DUOUT	TP+16, BY+16, XIT+3!, EOP+4!, F+8, E+8
DUZ	LISTS+3, USR+1
DUZ(2	LOC+1
E	XIT+7!
ED	XIT+9!
F	XIT+7!
G	XIT+7!
H	XIT+7!
I	XIT+7!
IN	MUCHECK+6~, MUCHECK+8*, MUCHECK+9, MUCHECK+12
INSTDA	MUCHECK+6~, MUCHECK+8, MUCHECK+12, MUCHECK+13
IO	DRIVER+3, TSKMN+1
IO("DOC"	TSKMN+2
IO("Q"	ZIS1+4
IO("S"	EOP+2
IOCPU	TSKMN+5, XIT+10!
IOF	BGPMUEP+4, SUM+1
IOM	TSKMN+3, CTR+1
ION	TSKMN+1
IOP	ZIS+4!
IOSL	TSKMN+3
IOST	TSKMN+1, EOP+1
IOT	XIT+10!, EOP+2
J	XIT+7!
K	XIT+7!
L	XIT+7!
M	XIT+7!
N	XIT+7!, XIT+8!
N1	XIT+8!
N2	XIT+8!
N3	XIT+8!
N4	XIT+8!
N5	XIT+8!
N6	XIT+8!
O	XIT+7!
P	XIT+7!
Q	XIT+7!
R	XIT+7!
S	XIT+7!
STAT	MUCHECK+6~, MUCHECK+13*, MUCHECK+14
T	XIT+7!
U	SUM+7, SUM+9, MUCHECK+13, USR+1, LOC+1
V	XIT+7!
VALMBCK	XIT+12!
VALMCNT	XIT+12!
VALMHDR	XIT+12!
W	XIT+7!
X	BY+1~, BY+4, BY+7, BY+19, BY+20, BY+21, BY+22, EP+3, SUM+7, SUM+9 , CI+1, AI+1, XIT+6!, XIT+7!, CTR~, CTR+1
X1	BY+1~, BY+2, BY+5, XIT+6!
X2	BY+1~, BY+2, BY+5, XIT+6!
X3	XIT+6!
X4	XIT+6!
X5	XIT+6!
X6	XIT+6!
XBGL	XIT+11!
XBNS	NODEV+1*, XIT+11!
XBRC	NODEV+1*, XIT+11!
XBRP	NODEV+1*, XIT+11!
XBRX	NODEV+1*, XIT+11!
XWB	XIT+11!
Y	TP+5, TP+6, TP+17, TP+31, BY+17, BY+18, EP+4, EP+5, EP+8, BEN+6 , LISTS+6, LISTS+7, XIT+7!, CTR~, CTR+1, F+9, F+10, E+10
Z	XIT+7!
ZTCPT	XIT+10!
>> ZTCPU	TSKMN+5*
ZTDESC	TSKMN+5*, XIT+10!
ZTDTH	TSKMN+5*, XIT+10!
ZTIO	TSKMN+1, TSKMN+2, TSKMN+3*, XIT+10!
>> ZTQUEUED	XIT+2, EOP+2
ZTREQ	XIT+2*, XIT+10!
ZTRTN	TSKMN+5*, XIT+10!
ZTSAVE	TSKMN+4!
ZTSAVE("BGP*"	TSKMN+4*

Customize PDF page

Package: IHS GPRA Information System

Routine: BGPMUEP

Information

Source Information

Call Graph

Call Graph Total: 16

Caller Graph

Caller Graph Total: 2

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: