Routine: APCM14N

Information

APCM14N ;IHS/CMI/LAB - MU PATIENT LIST;

Call Graph

Call Graph Total: 18

Package	Total	Call Graph
Patient Care Component Table Maintiance	5	PROC^APCM14E1 ^APCM14EP (5,6)^APCM14H EN^APCM14SI (EN,PT,REPORT)^APCM14SL
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD $$FMTE^XLFDT
IHS VA Utilities	3	^XBDBQUE ^XBFMK EN^XBVK
VA Fileman	3	^DIC ^DIK ^DIR
IHS Patient	1	KILL^AUPNPAT
Patient Care Component Reports	1	DEMOCHK^APCLUTL
Registration	1	TERM^VALM0

Caller Graph

Caller Graph Total: 1

Package	Total	Caller Graph
iCare	1	APCM 14 M1 2014 HOSP PAT LISTS

Entry Points

Name	Comments	DBIA/ICR reference
DEMO	;
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
NODEV	;
RT	;
LOC()	;EP - Return location name from file 4 based on DUZ(2).
CTR(X,Y)	;EP - Center X in a field Y wide.
TP	;
PRV	;
FAC	;
METHOD	;
ATTEST	;get answers to attestation questions for each provider.
ZIS	;call to XBDBQUE
DRIVER	;
XIT	;
YEAR	;
SI1	;NOW SELECT ONE OR MORE W/IN THE TOPIC
LISTS	;any lists with measures?
SI
INTRO	;
NODEV1	;

External References

Name	Field # of Occurrence
^%ZIS	ZIS+5
^%ZISC	DRIVER+4, NODEV1+3, XIT+2
^%ZTLOAD	TSKMN+5
DEMOCHK^APCLUTL	DEMO+1
PROC^APCM14E1	DRIVER+1, NODEV1+1
^APCM14EP	DRIVER+3, NODEV1+2
5^APCM14H	YEAR+28, YEAR+39
6^APCM14H	YEAR+29, YEAR+40
EN^APCM14SI	INTRO+17
EN^APCM14SL	LISTS+9
PT^APCM14SL	SUM+6
REPORT^APCM14SL	ZIS+1
KILL^AUPNPAT	XIT+7, XIT+12
^DIC	FAC+2
^DIK	ZIS+6
^DIR	INTRO+8, INTRO+12, SI1+16, YEAR+6, YEAR+21, YEAR+35, METHOD+2, ATTEST+10, ATTEST+20, ATTEST+21 , ATTEST+22, EOP+5, LISTS+4, LISTS+5
TERM^VALM0	SI1+2
^XBDBQUE	NODEV+2
^XBFMK	XIT+13
EN^XBVK	XIT+3
$$FMTE^XLFDT	SUM+4

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!! Line Location: INTRO+3
Function Call: WRITE	Prompt: ^APCMMUCN(APCMRPTC,15,X,0),! Line Location: INTRO+4
Function Call: WRITE	Prompt: !,"This report will enable a Hospital/CAH to review Meaningful Use " Line Location: INTRO+5
Function Call: WRITE	Prompt: !,"performance by presenting patient-specific data lists. You will be" Line Location: INTRO+6
Function Call: WRITE	Prompt: !,"asked to select one or more Performance Measures on which to report.",! Line Location: INTRO+7
Function Call: WRITE	Prompt: !!,"No measures selected" Line Location: INTRO+17
Function Call: WRITE	Prompt: !?5,APCMC,")",?9,$P(^APCMM14L(X,0),U,3) Line Location: SI1+14
Function Call: WRITE	Prompt: !,"No REPORTS selected for this objective." Line Location: SI1+17
Function Call: WRITE	Prompt: !,"No REPORTs selected for this objective." Line Location: SI1+18
Function Call: WRITE	Prompt: ^APCMMUCN(APCMRPTC,18,X,0),! Line Location: TP+2
Function Call: WRITE	Prompt: !!,"Enter the Fiscal Year for which report is to be run. Use a 4 digit",!,"year, e.g. 2014." Line Location: YEAR+2
Function Call: WRITE	Prompt: !!,"Please enter a year only!",! Line Location: YEAR+10
Function Call: WRITE	Prompt: !!,"Several Stage 1 Meaningful Use Performance Measures require an attestation of " Line Location: ATTEST+8
Function Call: WRITE	Prompt: !,"Yes or No for the hospital/CAH for which the report is being run.",! Line Location: ATTEST+9
Function Call: WRITE	Prompt: !,^APCM14OB(APCMY,19,X,0) Line Location: ATTEST+18
Function Call: WRITE	Prompt: !,$$CTR("SUMMARY OF STAGE 1 2014 and/or 2015 MEANINGFUL USE 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(APCMBD)," to ",?31,$$FMTE^XLFDT(APCMED) Line Location: SUM+4
Function Call: WRITE	Prompt: !!,"Hospital: ",$P(^DIC(4,APCMFAC,0),U,1) Line Location: SUM+5
Function Call: WRITE	Prompt: !,"Report Aborted" Line Location: ZIS+6
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 APCMZ PATIENT LISTS security key.",! Line Location: LISTS+3
Function Call: WRITE	Prompt: !!,"No lists selected.",! Line Location: LISTS+10
Routine Call	DIC Line Location: FAC+2
Routine Call	DIR Line Location: INTRO+8 INTRO+12 SI1+16 YEAR+6 YEAR+21 YEAR+35 METHOD+2 ATTEST+10 ATTEST+20 ATTEST+21 ATTEST+22 EOP+5 LISTS+4 LISTS+5
Routine Call	%ZIS Line Location: ZIS+5

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^APCMM14C - [#9001302.03]	Classic Fileman Calls
^AUTTLOC - [#9999999.06]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^APCM14OB - [#9001302.02]	INTRO+15, INTRO+20, SI1+5, SI1+13, ATTEST+18, ATTEST+20, ATTEST+21, ATTEST+22
^APCM14OB("B"	INTRO+20, ATTEST+3, ATTEST+17
^APCMM14C - [#9001302.03]	XIT+1
^APCMM14L - [#9001302.06]	SI1+9, SI1+10, SI1+14
^APCMMUCN - [#9001300.01]	INTRO+4, TP+2
^APCMMUCN("B"	INTRO+2
^DIC(4 - [#4]	FAC+2, ATTEST+20, ATTEST+21, ATTEST+22, SUM+5, LOC+1
^VA(200 - [#200]	USR+1
^XUSEC("APCMZ PATIENT LISTS"	LISTS+3

Label References

Name	Line Occurrences
$$CTR	SUM+2
DEMO	ATTEST+25, SUM+7
FAC	DEMO+2, ATTEST+11, ATTEST+12
INTRO	INTRO+17, YEAR+7, YEAR+8
LISTS	SI
NODEV	ZIS+4
SI	INTRO+16, SI1+21
SUM	ATTEST+7
TP	YEAR+41, YEAR+42, METHOD+3, FAC+3
TSKMN	ZIS+7
XIT	APCM14N+6, INTRO+9, INTRO+10, INTRO+13, ZIS+2, ZIS+3, ZIS+4, ZIS+6, DRIVER+5, NODEV1+4 , TSKMN+5
YEAR	YEAR+10, YEAR+13, YEAR+30

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+9!
>> APCMANS	SI1+19*
APCMATTE	ATTEST+1!, ATTEST+7
APCMATTE(	ATTEST+6, ATTEST+14, ATTEST+24
>> APCMBD	YEAR+1, YEAR+24, YEAR+25, YEAR+26, YEAR+27, YEAR+38, YEAR+41, SUM+4
>> APCMC	SI1+9, SI1+11, SI1+14, SI1+15, SI1+19
>> APCMCR	SI1+8*, SI1+9, SI1+10
>> APCMDELT	ZIS+4, ZIS+5
>> APCMDEMO	DEMO+1, DEMO+2
>> APCMED	YEAR+1, YEAR+24, YEAR+25, YEAR+26, YEAR+27, YEAR+38, YEAR+42, SUM+4
>> APCMFAC	FAC+1, FAC+4, ATTEST+6, ATTEST+20, ATTEST+21, ATTEST+22, ATTEST+24, SUM+5
>> APCMI	SI1+19*
>> APCMIND	INTRO+17, SI1+5, SI1+7, SI1+9, SI1+10, SI1+13, SI1+19
>> APCMIND(	INTRO+15, INTRO+18, INTRO+20, ATTEST+5
APCMINDL	SI1+1!
APCMINDL(	SI1+19*
APCMINDO	SI1+4!
APCMINDO(	SI1+5*, SI1+6, SI1+7
>> APCMINDZ	INTRO+14*, INTRO+15, INTRO+16, INTRO+17
APCMLIST	LISTS+1!, LISTS+8!, LISTS+10, LISTS+11*
APCMLIST(	SI1+5
>> APCMMETH	METHOD+1, METHOD+4
>> APCMO	SI1+9, SI1+10, SI1+11, SI1+14
>> APCMORD	SI1+6*, SI1+7
>> APCMPER	YEAR+1, YEAR+11, YEAR+13, YEAR+24, YEAR+25, YEAR+26, YEAR+27, YEAR+30, YEAR+38
>> APCMQ	SI1+1, SI1+6, YEAR+12, YEAR+13, YEAR+22, YEAR+30, YEAR+36, ATTEST+13, ATTEST+14, ATTEST+23 , ATTEST+25
APCMQUIT	SI1+22!, PRV+1*, ZIS+2, LISTS+1!
>> APCMROT	SUM+7, ZIS+4
>> APCMRPT	ZIS+3, ZIS+6
>> APCMRPTC	INTRO+2*, INTRO+4, TP+2
>> APCMRPTP	TP+1, YEAR+23, YEAR+24, YEAR+25, YEAR+26, YEAR+27, YEAR+28, YEAR+29, YEAR+37*, YEAR+38 , YEAR+39, YEAR+40
>> APCMRPTT	INTRO+1*
>> APCMSUM	RT+1*
>> APCMVDT	YEAR+1, YEAR+9, YEAR+11
APCMX	SI1+1!, SI1+9!, ATTEST+14*, ATTEST+17, ATTEST+20, ATTEST+21, ATTEST+24
APCMX(	SI1+11*, SI1+14
APCMY	SI1+1!, SI1+14!, ATTEST+17*, ATTEST+18, ATTEST+20, ATTEST+21, ATTEST+22
APCMY(	SI1+14*, SI1+19
B	XIT+9!
BD	XIT+11!
C	XIT+9!
D	XIT+9!
DA	INTRO+8!, INTRO+12!, YEAR+21!, YEAR+35!, METHOD+2!, FAC+2!, ATTEST+10!, ATTEST+20!, ATTEST+21!, ATTEST+22! , ZIS+6*, LISTS+5!
DFOUT	EOP+4!
DIADD	XIT+6!
DIC	FAC+2*!
DIC("A"	FAC+2*
DIC("B"	FAC+2*
DIC(0	FAC+2*
DIK	ZIS+6*!
DIR	INTRO+8!, INTRO+12!, SI1+16!, YEAR+6!, YEAR+21!, YEAR+35!, METHOD+2!, ATTEST+10!, ATTEST+20!, ATTEST+21! , ATTEST+22!, XIT+5!, EOP+3~, EOP+4!, EOP+5!, LISTS+4!, LISTS+5!
DIR("?"	YEAR+5*
DIR("A"	INTRO+8, INTRO+12, SI1+15, YEAR+4, YEAR+21, YEAR+35, METHOD+2, ATTEST+10, ATTEST+20, ATTEST+21 , ATTEST+22, LISTS+4, LISTS+5*
DIR("B"	INTRO+8, INTRO+12, METHOD+2, ATTEST+10, ATTEST+20, ATTEST+21, ATTEST+22, LISTS+5
DIR(0	INTRO+8, INTRO+12, SI1+15, YEAR+3, YEAR+21, YEAR+35, METHOD+2, ATTEST+10, ATTEST+20, ATTEST+21 , ATTEST+22, EOP+5, LISTS+4, LISTS+5
DIRUT	INTRO+9, INTRO+13, SI1+6, SI1+9, SI1+14, SI1+16, SI1+18, SI1+21, YEAR+7, YEAR+8 , YEAR+22, YEAR+36, METHOD+3, ATTEST+11, ATTEST+23, XIT+5!, EOP+4!, LISTS+6
DLAYGO	XIT+6!
DLOUT	EOP+4!
DOD	XIT+5!
DTOUT	EOP+4!
DUOUT	SI1+16, YEAR+8, XIT+5!, EOP+4!
DUZ	USR+1, LISTS+3
DUZ(2	FAC+2, LOC+1
E	XIT+9!
ED	XIT+11!
F	XIT+9!
G	XIT+9!
H	XIT+9!
I	XIT+9!
IO	DRIVER+2, TSKMN+1
IO("DOC"	TSKMN+2
IO("Q"	ZIS+7
IO("S"	EOP+2
>> IOCPU	TSKMN+5
IOF	APCM14N+5, SUM+1
IOM	TSKMN+3, CTR+1
ION	TSKMN+1
IOP	ZIS+4!, ZIS+5!
>> IORVOFF	SI1+13
>> IORVON	SI1+13
IOSL	TSKMN+3
IOST	TSKMN+1, EOP+1
J	XIT+9!
K	XIT+9!
L	XIT+9!
M	XIT+9!
N	XIT+9!, XIT+10!
N1	XIT+10!
N2	XIT+10!
N3	XIT+10!
N4	XIT+10!
N5	XIT+10!
N6	XIT+10!
O	INTRO+20*, XIT+9!
P	XIT+9!
>> POP	ZIS+6
Q	XIT+9!
R	XIT+9!
S	XIT+9!
T	XIT+9!
U	INTRO+15, INTRO+20, SI1+5, SI1+13, SI1+14, FAC+2, ATTEST+20, ATTEST+21, ATTEST+22, SUM+5 , USR+1, LOC+1
V	XIT+9!
W	XIT+9!
X	INTRO+4, INTRO+15, INTRO+18, INTRO+20, SI1+9, SI1+10, SI1+11, SI1+14, TP+2, ATTEST+2 , ATTEST+3, ATTEST+6, ATTEST+18*, XIT+8!, XIT+9!, CTR~, CTR+1
X1	XIT+8!
X2	XIT+8!
X3	XIT+8!
X4	XIT+8!
X5	XIT+8!
X6	XIT+8!
>> XBNS	NODEV+1*
>> XBRC	NODEV+1*
>> XBRP	NODEV+1*
>> XBRX	NODEV+1*
Y	INTRO+10, INTRO+14, INTRO+20, SI1+17, SI1+19, YEAR+9, YEAR+10, YEAR+23, YEAR+37, METHOD+4 , FAC+3, FAC+4, ATTEST+6, ATTEST+12, ATTEST+24, XIT+9!, CTR~, CTR+1, LISTS+6, LISTS+7
Z	ATTEST+3*, ATTEST+4, ATTEST+5, XIT+9!
>> ZTCPU	TSKMN+5*
>> ZTDESC	TSKMN+5*
>> ZTDTH	TSKMN+5*
>> ZTIO	TSKMN+1, TSKMN+2, TSKMN+3*
>> ZTQUEUED	XIT+4, EOP+2
>> ZTREQ	XIT+4*
>> ZTRTN	TSKMN+5*
ZTSAVE	TSKMN+4!
ZTSAVE("APCM*"	TSKMN+4*

Customize PDF page

Package: Patient Care Component Table Maintiance

Routine: APCM14N

Information

Source Information

Call Graph

Call Graph Total: 18

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: