Routine: APCDCAFK

Package	Total	Call Graph
IHS VA Utilities	5	^XBDBQUE $$VAL^XBDIQ1 ^XBFMK $$EXTSET^XBFUNC EN^XBVK
VA Fileman	4	^DIC $$GET1^DIQ ^DIR ^DIWP
Kernel	2	HOME^%ZIS ($$FMDIFF,$$FMTE,$$NOW)^XLFDT
IHS Patient	1	($$HRN,KILL)^AUPNPAT
PCC Medical Query	1	PEP^AMQQGTX0
Patient Care Component	1	(OCLN,OLOC,SCLN,SLOC)^APCDCAFD
Patient Care Component Reports	1	$$VD^APCLV
Registration	1	TERM^VALM0

Name	Comments	DBIA/ICR reference
DATES	;K APCDED,APCDBD
RTYPE	;how to sort list of visits
USR()	;EP
EOP	;EP - End of page.
DONE	;
D(D)	;
PRINT	;EP - called from xbdbque
OHL	;
LOC()	;EP
HOSPLOC	;
BROWSE	;
CTR(X,Y)	;EP
COVPAGE	;
SCLN	;taxonomy of clinics
INFORM	;
SLOC	;
FAC	;
OSC	;
OPRV	;one clinic
DATE(D)	;EP
PRINT1	;
HEAD	;EP;HEADER
OLOC	;one location
VD	;
ZIS	;call xbdbque
SUMPAGE	;
DRIVER	;EP entry point for taskman
START	;
CLINIC	;
XIT	;
OCLN	;one clinic
SHL	;
HEAD2
HEAD1	;
PROCESS	;
PROV	;
XIT1	; Clean up and exit
SH	;
SPRV	;
SC	;
PAGE	;
SSC	;

Name	Field # of Occurrence
HOME^%ZIS	START+2
PEP^AMQQGTX0	SPRV+2, SSC+2
OCLN^APCDCAFD	OCLN+1
OLOC^APCDCAFD	OLOC+1
SCLN^APCDCAFD	SCLN+1
SLOC^APCDCAFD	SLOC+1
$$VD^APCLV	DRIVER+10, DRIVER+11, DRIVER+25, DRIVER+29, PRINT1+23
$$HRN^AUPNPAT	PRINT1+14, PRINT1+15
KILL^AUPNPAT	XIT+4
^DIC	OHL+1, SHL+1, OPRV+1, SPRV+1, SSC+1
$$GET1^DIQ	SH+1, PRINT1+22, PRINT1+24
^DIR	START+8, VD+2, DATES+2, DATES+4, FAC+6, HOSPLOC+6, CLINIC+6, SC+6, PROV+5, RTYPE+2 , PAGE+2, ZIS+1, EOP+5, OSC+1, DONE+2, HEAD2
^DIWP	PRINT1+29, SUMPAGE+13
TERM^VALM0	START+3
^XBDBQUE	ZIS+5, BROWSE+2
$$VAL^XBDIQ1	PRINT1+11
^XBFMK	XIT+3
$$EXTSET^XBFUNC	PROCESS+14, COVPAGE+20
EN^XBVK	XIT+2, XIT+5, XIT1+2
$$FMDIFF^XLFDT	DRIVER+25, PRINT1+23
$$FMTE^XLFDT	HEAD1+2, COVPAGE+1
$$NOW^XLFDT	HEAD1+2, COVPAGE+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @(IOF),!! Line Location: START+4
Function Call: WRITE	Prompt: !!,"The EHR/PCC Coding Audit Start Date has not been set",!,"in the PCC Master Control file." Line Location: START+6
Function Call: WRITE	Prompt: ! Line Location: DATES+1
Function Call: WRITE	Prompt: !!,$C(7),"Sorry, Ending Date MUST not be earlier than Beginning Date." Line Location: DATES+7
Function Call: WRITE	Prompt: !!,$G(IORVON)_"Please enter which FACILITY visits will be included in the list."_$G(IORVOFF),! Line Location: FAC+2
Function Call: WRITE	Prompt: !!,$G(IORVON)_"Please enter which HOSPITAL LOCATIONS will be included in the list."_$G(IORVOFF),! Line Location: HOSPLOC+2
Function Call: WRITE	Prompt: !!,$G(IORVON)_"Please enter which CLINIC (IHS clinic codes) visits will be included",!,"in the list."_$G(IORVOFF),! Line Location: CLINIC+2
Function Call: WRITE	Prompt: !!,$G(IORVON)_"Please enter which SERVICE CATEGORIES will be included",!,"in the list."_$G(IORVOFF),! Line Location: SC+2
Function Call: WRITE	Prompt: @IOF Condition for execution: $D(IOF) Line Location: PROCESS+1
Function Call: WRITE	Prompt: !! Line Location: PROCESS+1
Function Call: WRITE	Prompt: !!,"I will display provider deficiencies that meet the following criteria:" Line Location: PROCESS+2
Function Call: WRITE	Prompt: !!,"LOCATION OF ENCOUNTER: " Line Location: PROCESS+3
Function Call: WRITE	Prompt: "All" Line Location: PROCESS+4
Function Call: WRITE	Prompt: ";" Condition for execution: C>1 Line Location: PROCESS+5
Function Call: WRITE	Prompt: ?24,$E($P(^DIC(4,Y,0),U),1,15) Line Location: PROCESS+5
Function Call: WRITE	Prompt: !!,"HOSPITAL LOCATIONS: " Line Location: PROCESS+6
Function Call: WRITE	Prompt: "All" Line Location: PROCESS+7
Function Call: WRITE	Prompt: ";" Condition for execution: C>1 Line Location: PROCESS+8
Function Call: WRITE	Prompt: ?24,$E($P(^SC(Y,0),U),1,15) Line Location: PROCESS+8
Function Call: WRITE	Prompt: !!,"CLINICS: " Line Location: PROCESS+9
Function Call: WRITE	Prompt: "All" Line Location: PROCESS+10
Function Call: WRITE	Prompt: ";" Condition for execution: C>1 Line Location: PROCESS+11
Function Call: WRITE	Prompt: ?24,$E($P(^DIC(40.7,Y,0),U),1,15) Line Location: PROCESS+11
Function Call: WRITE	Prompt: !!,"SERVICE CATEGORIES: " Line Location: PROCESS+12
Function Call: WRITE	Prompt: "All" Line Location: PROCESS+13
Function Call: WRITE	Prompt: ";" Condition for execution: C>1 Line Location: PROCESS+14
Function Call: WRITE	Prompt: ?24,$$EXTSET^XBFUNC(9000010,.07,Y) Line Location: PROCESS+14
Function Call: WRITE	Prompt: !!,"PROVIDERS: " Line Location: PROCESS+15
Function Call: WRITE	Prompt: "All" Line Location: PROCESS+16
Function Call: WRITE	Prompt: ";" Condition for execution: C>1 Line Location: PROCESS+17
Function Call: WRITE	Prompt: ?24,$E($P(^VA(200,Y,0),U),1,15) Line Location: PROCESS+17
Function Call: WRITE	Prompt: !,$$CTR($$LOC) Line Location: INFORM+1
Function Call: WRITE	Prompt: !!,$$CTR("PCC/EHR CODING AUDIT") Line Location: INFORM+2
Function Call: WRITE	Prompt: !!,"This report will list all PENDING deficiencies for a selected" Line Location: INFORM+3
Function Call: WRITE	Prompt: !,"set of providers." Line Location: INFORM+4
Function Call: WRITE	Prompt: "OOPS - QMAN NOT CURRENT - QUITTING" Line Location: SPRV+1
Function Call: WRITE	Prompt: !!,"** all PROVIDERS will be included **",! Line Location: SPRV+4
Function Call: WRITE	Prompt: "OOPS - QMAN NOT CURRENT - QUITTING" Line Location: SSC+1
Function Call: WRITE	Prompt: !!,"** all Services Categories will be included **",! Line Location: SSC+4
Function Call: WRITE	Prompt: !!?10,"Incomplete Charts for ",$$GET1^DIQ(200,APCDS,.01) Line Location: SH+1
Function Call: WRITE	Prompt: !!,"There are no pending deficiencies that meet the report criteria." Line Location: PRINT1+4
Function Call: WRITE	Prompt: ! Line Location: PRINT1+21
Function Call: WRITE	Prompt: ?43,$$GET1^DIQ(9000095.12,APCDIENS,.02) Line Location: PRINT1+22
Function Call: WRITE	Prompt: !?2,"Comment: ",$$GET1^DIQ(9000095.12,APCDIENS,.1) Line Location: PRINT1+24
Function Call: WRITE	Prompt: ! Line Location: HEAD2+0
Function Call: WRITE	Prompt: !,$$FMTE^XLFDT($$NOW^XLFDT),?40,$P(^VA(200,DUZ,0),U,2),?70,"Page: ",APCDPG Line Location: HEAD1+2
Function Call: WRITE	Prompt: !,$$CTR("Confidential Patient Data Covered by Privacy Act",80) Line Location: HEAD1+3
Function Call: WRITE	Prompt: !,$$CTR("Incomplete Charts by Provider and Deficiency",80) Line Location: HEAD1+4
Function Call: WRITE	Prompt: !,$$CTR("SUMMARY PAGE",80) Line Location: HEAD1+5
Function Call: WRITE	Prompt: !,$TR($J(" ",80)," ","-") Line Location: HEAD1+6
Function Call: WRITE	Prompt: !!,"Patient",?22,"HRCN",?29,"Visit Date",?40,"SC",?43,"Deficiencies",?76,"Days" Line Location: HEAD1+7
Function Call: WRITE	Prompt: !!,"PROVIDER",?26,"INCOMP",?33,"DELINQ",?40,"DEFICIENCIES" Line Location: HEAD1+8
Function Call: WRITE	Prompt: !?26,"CHARTS",?33,"CHARTS" Line Location: HEAD1+9
Function Call: WRITE	Prompt: !,APCD80S Line Location: HEAD1+10
Function Call: WRITE	Prompt: !,$$FMTE^XLFDT($$NOW^XLFDT()),?40,$P(^VA(200,DUZ,0),U,2)," Confidential Patient Data Covered by Privacy Act" Line Location: COVPAGE+1
Function Call: WRITE	Prompt: !,$$CTR("***********************************",80) Line Location: COVPAGE+2
Function Call: WRITE	Prompt: !,$$CTR("* PROVIDER CHART DEFICIENCIES *",80) Line Location: COVPAGE+3
Function Call: WRITE	Prompt: !,$$CTR("***********************************",80) Line Location: COVPAGE+4
Function Call: WRITE	Prompt: !!,"PROVIDERS: " Line Location: COVPAGE+5
Function Call: WRITE	Prompt: "All" Line Location: COVPAGE+6
Function Call: WRITE	Prompt: ";" Condition for execution: C>1 Line Location: COVPAGE+7
Function Call: WRITE	Prompt: ?24,$E($P(^VA(200,Y,0),U),1,15) Line Location: COVPAGE+7
Function Call: WRITE	Prompt: !!,$$CTR("VISIT DEFICIENCY CRITERIA",80) Line Location: COVPAGE+8
Function Call: WRITE	Prompt: !!,"LOCATION OF ENCOUNTER: " Line Location: COVPAGE+9
Function Call: WRITE	Prompt: "All" Line Location: COVPAGE+10
Function Call: WRITE	Prompt: ";" Condition for execution: C>1 Line Location: COVPAGE+11
Function Call: WRITE	Prompt: ?24,$E($P(^DIC(4,Y,0),U),1,15) Line Location: COVPAGE+11
Function Call: WRITE	Prompt: !!,"HOSPITAL LOCATIONS: " Line Location: COVPAGE+12
Function Call: WRITE	Prompt: "All" Line Location: COVPAGE+13
Function Call: WRITE	Prompt: ";" Condition for execution: C>1 Line Location: COVPAGE+14
Function Call: WRITE	Prompt: ?24,$E($P(^SC(Y,0),U),1,15) Line Location: COVPAGE+14
Function Call: WRITE	Prompt: !!,"CLINICS: " Line Location: COVPAGE+15
Function Call: WRITE	Prompt: "All" Line Location: COVPAGE+16
Function Call: WRITE	Prompt: ";" Condition for execution: C>1 Line Location: COVPAGE+17
Function Call: WRITE	Prompt: ?24,$E($P(^DIC(40.7,Y,0),U),1,15) Line Location: COVPAGE+17
Function Call: WRITE	Prompt: !!,"SERVICE CATEGORIES: " Line Location: COVPAGE+18
Function Call: WRITE	Prompt: "All" Line Location: COVPAGE+19
Function Call: WRITE	Prompt: ";" Condition for execution: C>1 Line Location: COVPAGE+20
Function Call: WRITE	Prompt: ?24,$$EXTSET^XBFUNC(9000010,.07,Y) Line Location: COVPAGE+20
Function Call: WRITE	Prompt: !!,"There are no pending deficiencies that meet the report criteria." Line Location: SUMPAGE+3
Function Call: WRITE	Prompt: !?40,^UTILITY($J,"W",0,X,0) Line Location: SUMPAGE+16
Routine Call	%ZIS Line Location: START+2
Routine Call	DIC Line Location: OHL+1 SHL+1 OPRV+1 SPRV+1 SSC+1
Routine Call	DIR Line Location: START+8 VD+2 DATES+2 DATES+4 FAC+6 HOSPLOC+6 CLINIC+6 SC+6 PROV+5 RTYPE+2 PAGE+2 ZIS+1 EOP+5 OSC+1 DONE+2 HEAD2

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls, GET1^DIQ
^SC - [#44]	Classic Fileman Calls
9000095.12	GET1^DIQ
^AMQQ(5 - [#9009075]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^APCCCTRL - [#9001000]	START+6
^APCDSITE - [#9001001.2]	DRIVER+26
^AUPNCANT - [#9000095]	DRIVER+31, PRINT1+25, PRINT1+29
^AUPNCANT("APEND"	DRIVER+4, DRIVER+6, DRIVER+28
^AUPNVSIT - [#9000010]	DRIVER+7, PRINT1+12
^AUTTCDR - [#99999.05]	SUMPAGE+12
^DIC(4 - [#4]	PROCESS+5, LOC+1, COVPAGE+11
^DIC(40.7 - [#40.7]	PROCESS+11, COVPAGE+17
^SC - [#44]	PROCESS+8, COVPAGE+14
^UTILITY($J	PRINT1+28!, PRINT1+30, PRINT1+32, PRINT1+34!, SUMPAGE+13!, SUMPAGE+14, SUMPAGE+15, SUMPAGE+16, SUMPAGE+18!
^VA(200 - [#200]	PROCESS+17, USR+1, HEAD1+2, COVPAGE+1, COVPAGE+7, SUMPAGE+7
^XTMP("APCDCAFK"	DRIVER+2!, DRIVER+24, DRIVER+26, DRIVER+29, DRIVER+32, XIT1+1!, PRINT1+4, PRINT1+5, PRINT1+8, PRINT1+9 , PRINT1+18, SUMPAGE+3, SUMPAGE+4, SUMPAGE+6, SUMPAGE+10, SUMPAGE+12

Name	Line Occurrences
$$CTR	INFORM+1, INFORM+2, HEAD1+3, HEAD1+4, HEAD1+5, COVPAGE+2, COVPAGE+3, COVPAGE+4, COVPAGE+8
$$DATE	PRINT1+17
$$LOC	INFORM+1
@(	FAC+10, HOSPLOC+10, CLINIC+10, SC+10, PROV+9
BROWSE	ZIS+3
CLINIC	HOSPLOC+9, CLINIC+11, SC+7
COVPAGE	PRINT+4
DATES	DATES+6
FAC	VD+4, FAC+11, HOSPLOC+7, SSC+1
HEAD	PRINT1+3, PRINT1+6, PRINT1+10, PRINT1+20, PRINT1+26, PRINT1+31, SUMPAGE+2, SUMPAGE+5
HEAD1	HEAD+1
HOSPLOC	FAC+9, HOSPLOC+11, CLINIC+7
INFORM	START+5
PRINT1	PRINT+5
PROCESS	PROV+8
PROV	SC+9, PROV+10, RTYPE+3
RTYPE	PAGE+3, ZIS+2
SC	CLINIC+9, SC+11, PROV+6
SH	PRINT1+7, PRINT1+10, PRINT1+20, PRINT1+26, PRINT1+31
SHL	SHL+5
SUMPAGE	PRINT1+2, PRINT1+37
VD	DATES+2, DATES+4
XIT	START+1, START+6, VD+3, FAC+7, ZIS+3, ZIS+6, SPRV+1
XIT1	DONE+1
ZIS	RTYPE+5

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

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> APCD80S	PRINT+1*, HEAD1+10
>> APCDBD	VD+1, DATES+2, DATES+6, DRIVER+10
>> APCDBT	DRIVER+1*, DRIVER+2, DRIVER+24, DRIVER+26, DRIVER+29, DRIVER+32, XIT1+1, PRINT1+4, PRINT1+5, PRINT1+8 , PRINT1+9, PRINT1+18, SUMPAGE+3, SUMPAGE+4, SUMPAGE+6, SUMPAGE+10, SUMPAGE+12
>> APCDC	PRINT1+18, PRINT1+19, PRINT1+21
APCDCLNS	CLINIC+4!, PROCESS+10, DRIVER+19, DRIVER+20, COVPAGE+16
APCDCLNS(	PROCESS+11, DRIVER+20, COVPAGE+17
>> APCDCLNT	CLINIC+3, CLINIC+8, CLINIC+9, CLINIC+10
>> APCDDATE	PRINT1+8*, PRINT1+9, PRINT1+17, PRINT1+18
>> APCDDEF	SUMPAGE+9, SUMPAGE+11, SUMPAGE+12*, SUMPAGE+13
>> APCDED	VD+1, DATES+4, DATES+6, DRIVER+11
>> APCDET	DRIVER+33*
APCDHLS	HOSPLOC+4!, PROCESS+7, DRIVER+22, DRIVER+23, COVPAGE+13
APCDHLS(	PROCESS+8, DRIVER+23, OHL+3, SHL+4, COVPAGE+14
>> APCDHLT	HOSPLOC+3, HOSPLOC+8, HOSPLOC+9, HOSPLOC+10
>> APCDHRN	PRINT1+14, PRINT1+15, PRINT1+16
>> APCDI	DRIVER+28, DRIVER+29, DRIVER+31, PRINT1+18, PRINT1+22, SUMPAGE+10*, SUMPAGE+12
>> APCDIENS	PRINT1+22*, PRINT1+24
>> APCDJOB	DRIVER+1*, DRIVER+2, DRIVER+24, DRIVER+26, DRIVER+29, DRIVER+32, XIT1+1, PRINT1+4, PRINT1+5, PRINT1+8 , PRINT1+9, PRINT1+18, SUMPAGE+3, SUMPAGE+4, SUMPAGE+6, SUMPAGE+10, SUMPAGE+12
APCDLOCS	FAC+4!, PROCESS+4, DRIVER+14, COVPAGE+10
APCDLOCS(	PROCESS+5, DRIVER+14, COVPAGE+11
>> APCDLOCT	FAC+3, FAC+8, FAC+9, FAC+10
>> APCDPG	PRINT+2, HEAD+1, HEAD1+1, HEAD1+2
>> APCDPROV	DRIVER+3, DRIVER+4, DRIVER+5, DRIVER+6, DRIVER+24, DRIVER+26, DRIVER+28, DRIVER+29, DRIVER+32
>> APCDPRV	COVPAGE+6
APCDPRVS	PROV+3!, PROCESS+16, DRIVER+5, SPRV+3, SPRV+4!
APCDPRVS(	PROCESS+17, DRIVER+5, OPRV+3*, COVPAGE+7
APCDPRVS("*"	SPRV+4
>> APCDPRVT	PROV+2, PROV+7, PROV+8, PROV+9, SPRV+4*
APCDQ	FAC+1!, FAC+11, HOSPLOC+1!, HOSPLOC+11, CLINIC+1!, CLINIC+11, SC+1!, SC+11, PROV+1!, PROV+10 , OHL+2, SHL+3, OPRV+2, SPRV+3, SSC+3, OSC+2
APCDQUIT	PRINT+3!, DONE+1, PRINT1+1!, PRINT1+5, PRINT1+6, PRINT1+8, PRINT1+9, PRINT1+10, PRINT1+18, PRINT1+20 , PRINT1+26, PRINT1+31, PRINT1+36, HEAD2*, SUMPAGE+5
>> APCDRTYP	RTYPE+1, RTYPE+4, RTYPE+5, PRINT1+2, PRINT1+35
>> APCDS	SH+1, PRINT1+5, PRINT1+8, PRINT1+9, PRINT1+18, SUMPAGE+4, SUMPAGE+6, SUMPAGE+7, SUMPAGE+10, SUMPAGE+12
APCDSCS	SC+4!, PROCESS+13, DRIVER+17, SSC+3, SSC+4!, COVPAGE+19
APCDSCS(	PROCESS+14, DRIVER+17, OSC+3*, COVPAGE+20
APCDSCS("*"	SSC+4
>> APCDSCT	SC+3, SC+8, SC+9, SC+10, SSC+4*
>> APCDSPAG	PAGE+1, PAGE+4, PRINT1+3, PRINT1+6
>> APCDSUM	HEAD1+5, HEAD1+7, HEAD1+8, HEAD1+9, SUMPAGE+1*
>> APCDV	DRIVER+6, DRIVER+7, DRIVER+10, DRIVER+11, DRIVER+25, DRIVER+28, DRIVER+29, DRIVER+31, PRINT1+9, PRINT1+11 , PRINT1+12, PRINT1+18, PRINT1+22, PRINT1+23, PRINT1+25, PRINT1+29
>> APCDV0	DRIVER+7*, DRIVER+8, DRIVER+9, DRIVER+12, DRIVER+15, DRIVER+18, DRIVER+21
>> APCDVCLN	DRIVER+18*, DRIVER+19, DRIVER+20
>> APCDVHL	DRIVER+21*, DRIVER+22, DRIVER+23
>> APCDVLOC	DRIVER+12*, DRIVER+13, DRIVER+14
>> APCDVR	PRINT1+12*, PRINT1+13, PRINT1+14, PRINT1+17
>> C	PROCESS+5, PROCESS+8, PROCESS+11, PROCESS+14, PROCESS+17, COVPAGE+7, COVPAGE+11, COVPAGE+14, COVPAGE+17, COVPAGE+20
D	DRIVER+25*, DRIVER+26, D~, D+1, D+2, DATE~, DATE+1, DATE+2
DA	START+8!, VD+2!, FAC+6!, HOSPLOC+6!, CLINIC+6!, SC+6!, PROV+5!, RTYPE+2!, PAGE+2!, ZIS+1! , SPRV+1!, SSC+1!, OSC+1!
>> DFN	PRINT1+13*, PRINT1+14, PRINT1+15
DFOUT	EOP+4!
DIC	OHL+1!, SHL+1!, OPRV+1!, SPRV+1!, SSC+1*!
DIC("A"	OHL+1, SHL+1, OPRV+1*
DIC("S"	SPRV+1, SSC+1
DIC(0	OHL+1, SHL+1, OPRV+1, SPRV+1, SSC+1*
DIR	START+8!, VD+2!, DATES+1!, DATES+3!, FAC+6!, HOSPLOC+6!, CLINIC+5!, CLINIC+6!, SC+5!, SC+6! , PROV+5!, RTYPE+2!, PAGE+2!, ZIS+1!, XIT+1!, EOP+3~, OSC+1!, DONE+2!, HEAD2!
DIR("A"	START+8, VD+2, DATES+1, DATES+3, FAC+5, FAC+6, HOSPLOC+5, HOSPLOC+6, CLINIC+5, CLINIC+6 , SC+5, SC+6, PROV+4, PROV+5, RTYPE+2, PAGE+2, ZIS+1, EOP+5, OSC+1*
DIR("B"	VD+2, FAC+5, FAC+6, HOSPLOC+5, HOSPLOC+6, CLINIC+5, CLINIC+6, SC+5, SC+6, PROV+4 , PROV+5, RTYPE+2, PAGE+2, ZIS+1
DIR(0	START+8, VD+2, DATES+1, DATES+3, FAC+5, HOSPLOC+5, CLINIC+5, SC+5, PROV+4, RTYPE+2 , PAGE+2, ZIS+1, EOP+5, OSC+1, DONE+2, HEAD2
DIRUT	VD+3, FAC+7, HOSPLOC+7, CLINIC+7, SC+7, PROV+6, RTYPE+3, PAGE+3, ZIS+2, EOP+4! , OSC+2
DIWF	PRINT1+33!
DIWL	PRINT1+29, PRINT1+30, PRINT1+32, PRINT1+33!, SUMPAGE+13
DIWR	PRINT1+29, PRINT1+33!, SUMPAGE+13
DLOUT	EOP+4!
DT	DRIVER+25, PRINT1+23
DTOUT	EOP+4!, HEAD2
DUOUT	EOP+4!
DUZ	USR+1, HEAD1+2, COVPAGE+1
DUZ(2	START+6, DRIVER+26, LOC+1, PRINT1+15
>> E	DRIVER+26*
IO	DONE+2, HEAD2
IO("S"	EOP+2
IO(0	DONE+2, HEAD2
IOF	START+2, START+4, PROCESS+1, DONE+3, HEAD1+1
IOM	CTR+1
>> IORVOFF	FAC+2, HOSPLOC+2, CLINIC+2, SC+2
>> IORVON	FAC+2, HOSPLOC+2, CLINIC+2, SC+2
IOSL	PRINT1+10, PRINT1+20, PRINT1+26, PRINT1+31, SUMPAGE+5
IOST	EOP+1, DONE+2, HEAD2
>> IOT	EOP+2
>> S	SUMPAGE+6*, SUMPAGE+7
U	START+6, PROCESS+5, PROCESS+8, PROCESS+11, PROCESS+17, DRIVER+8, DRIVER+9, DRIVER+12, DRIVER+15, DRIVER+18 , DRIVER+21, DRIVER+24, DRIVER+26, DRIVER+31, USR+1, LOC+1, PRINT1+12, PRINT1+13, PRINT1+14, PRINT1+17 , HEAD1+2, COVPAGE+1, COVPAGE+7, COVPAGE+11, COVPAGE+14, COVPAGE+17, SUMPAGE+7, SUMPAGE+12
X	DRIVER+15, DRIVER+16, DRIVER+17, DRIVER+31, DRIVER+32, CTR~, CTR+1, SHL+2, SPRV+1, SSC+1 , PRINT1+29, SUMPAGE+13, SUMPAGE+16*
>> XBIOP	BROWSE+2*
>> XBNS	ZIS+4, BROWSE+2
>> XBRC	ZIS+4, BROWSE+2
>> XBRP	ZIS+4, BROWSE+1
>> XBRX	ZIS+4, BROWSE+2
Y	VD+4, DATES+2, DATES+4, FAC+8, HOSPLOC+8, CLINIC+8, SC+8, PROV+7, PROCESS+5, PROCESS+8 , PROCESS+11, PROCESS+14, PROCESS+17, RTYPE+4, PAGE+4, ZIS+3, CTR~, CTR+1, OHL+2, OHL+3 , SHL+3, SHL+4, OPRV+2, OPRV+3, SPRV+1, SPRV+2, SSC+1, SSC+2, OSC+3, PRINT1+29 , HEAD2, COVPAGE+7, COVPAGE+11, COVPAGE+14, COVPAGE+17, COVPAGE+20*
Z	PRINT1+30*, PRINT1+32, PRINT1+33!
>> ZTQUEUED	EOP+2

Customize PDF page

Package: Patient Care Component

Routine: APCDCAFK

Information

Source Information

Call Graph

Call Graph Total: 16

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: