Routine: APCDCAFP

Package	Total	Call Graph
IHS VA Utilities	3	^XBFMK $$EXTSET^XBFUNC EN^XBVK
VA Fileman	3	^DIC YN^DICN ^DIR
IHS Patient	1	KILL^AUPNPAT
Kernel	1	HOME^%ZIS
Patient Care Component	1	EN^APCDCAF

Entry Points

Name	Comments	DBIA/ICR reference
SORT	;how to sort list of visits
LOC()	;EP - Return location name from file 4 based on DUZ(2).
INFORM	;inform user what this report is all about
PROC1	; call listmanager
GETPAT	;
START	;
USR()	;EP - Return name of current user from ^VA(200.
EOP	;EP - End of page.
XIT	;
D(D)	;
CTR(X,Y)	;EP - Center X in a field Y wide.
PROC	;EP - called from xbdbque

External References

Name	Field # of Occurrence
HOME^%ZIS	START+2
EN^APCDCAF	PROC1+2
KILL^AUPNPAT	XIT+4
^DIC	GETPAT+3
YN^DICN	GETPAT+5
^DIR	START+7, SORT+3, EOP+5
^XBFMK	XIT+3
$$EXTSET^XBFUNC	INFORM+14
EN^XBVK	XIT+2, XIT+5

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: @(IOF),!! Line Location: START+3
Function Call: WRITE	Prompt: !!,"The EHR/PCC Coding Audit Start Date has not been set",!,"in the PCC Master Control file." Line Location: START+5
Function Call: WRITE	Prompt: ! Line Location: GETPAT+1
Function Call: WRITE	Prompt: !! Line Location: SORT+1
Function Call: WRITE	Prompt: !,$$CTR($$LOC) Line Location: INFORM+1
Function Call: WRITE	Prompt: !!,$$CTR("PCC/EHR CODING AUDIT FOR ONE PATIENT") Line Location: INFORM+2
Function Call: WRITE	Prompt: !!,"This option is used to review visits created by EHR users for one patient." Line Location: INFORM+3
Function Call: WRITE	Prompt: !,"The visits displayed in the list are those with an INCOMPLETE or blank" Line Location: INFORM+4
Function Call: WRITE	Prompt: !,"chart audit status. This list can be sorted by date, primary provider" Line Location: INFORM+5
Function Call: WRITE	Prompt: !,"clinic code, hospital location (scheduling clinic), and facility." Line Location: INFORM+6
Function Call: WRITE	Prompt: !,"Once the visit has been reviewed, the review status can be set as reviewed/" Line Location: INFORM+7
Function Call: WRITE	Prompt: !,"complete or incomplete. All visits set as reviewed/complete will be passed" Line Location: INFORM+8
Function Call: WRITE	Prompt: !,"to the IHS/RPMS billing package." Line Location: INFORM+9
Function Call: WRITE	Prompt: !,"Contract Health visits are excluded." Line Location: INFORM+10
Function Call: WRITE	Prompt: !,"Visits that do not have a primary provider are ",$S($P(^APCDSITE(DUZ(2),0),U,28):"included in ",1:"excluded from "),"the list." Line Location: INFORM+11
Function Call: WRITE	Prompt: !,"Visits with the following service categories are NOT included in the list:" Line Location: INFORM+12
Function Call: WRITE	Prompt: !?10,"- Event (Historical)" Line Location: INFORM+13
Function Call: WRITE	Prompt: !?10,"- ",$$EXTSET^XBFUNC(9000010,.07,X) Line Location: INFORM+14
Function Call: WRITE	Prompt: !!,"PLEASE NOTE: A visit will NOT pass to Billing until it is marked" Line Location: INFORM+15
Function Call: WRITE	Prompt: !,"as reviewed/completed." Line Location: INFORM+16
Function Call: WRITE	Prompt: ! Line Location: INFORM+17
Routine Call	%ZIS Line Location: START+2
Routine Call	DIC Line Location: GETPAT+3
Routine Call	DIR Line Location: START+7 SORT+3 EOP+5

Name	Line Occurrences (* Changed, ! Killed)
^APCCCTRL - [#9001000]	START+5, PROC1+1
^APCDSITE - [#9001001.2]	INFORM+11, INFORM+14
^DIC(4 - [#4]	LOC+1
^VA(200 - [#200]	USR+1

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	GETPAT+5*
>> APCDBD	PROC1+1*
>> APCDCAFP	PROC1+1*
>> APCDED	PROC1+1*
>> APCDPARM	GETPAT+5
>> APCDPATF	GETPAT+2, GETPAT+6
>> APCDPEHR	PROC1+1*
>> APCDSORT	SORT+1, SORT+5
D	D~, D+1, D+2
DA	START+7!, SORT+3!
>> DFN	GETPAT+6*, PROC1+1
DFOUT	EOP+4!
DIC	GETPAT+3*!
DIC(0	GETPAT+3*
DIR	START+7!, SORT+2!, SORT+3!, XIT+1!, EOP+3~
DIR("A"	START+7, SORT+3, EOP+5*
DIR("B"	SORT+3*
DIR(0	START+7, SORT+2, EOP+5*
DIRUT	SORT+4, EOP+4!
DLOUT	EOP+4!
DT	PROC1+1
DTOUT	EOP+4!
DUOUT	EOP+4!
DUZ	USR+1
DUZ(2	START+5, PROC1+1, LOC+1, INFORM+11, INFORM+14
IO("S"	EOP+2
IOF	START+2, START+3
IOM	CTR+1
IOST	EOP+1
>> IOT	EOP+2
U	START+5, GETPAT+5, PROC1+1, USR+1, LOC+1, INFORM+11
X	CTR~, CTR+1, INFORM+14*
Y	GETPAT+4, GETPAT+6, SORT+5, CTR~, CTR+1
>> ZTQUEUED	EOP+2

Customize PDF page

Package: Patient Care Component

Routine: APCDCAFP

Information

Source Information

Call Graph

Call Graph Total: 9

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Line Occurrences
$$CTR	INFORM+1, INFORM+2
$$LOC	INFORM+1
INFORM	START+4
XIT	START+1, START+5, GETPAT+4, SORT+4, PROC1+3