Routine: APCDCAF2

Call Graph

Call Graph Total: 19

Package	Total	Call Graph
IHS VA Utilities	4	$$VAL^XBDIQ1 (ARRAY,VIEWR)^XBLM EN^XBNEW EN^XBVK
Patient Care Component	4	PAUSE^APCDALV1 ($$ERRORCHK,BACK,EOP)^APCDCAF EN^APCDCAF6 (DSPLY,GETVISIT)^APCDDISP
Registration	3	EN^VALM TERM^VALM0 (CLEAR,FULL)^VALM1
VA Fileman	3	^DIC YN^DICN ^DIR
Kernel	2	$$FMTE^XLFDT DISP^XQORM1
IHS Patient	1	($$HRN,KILL)^AUPNPAT
Patient Care Component Reports	1	($$CLINIC,$$PRIMPROV)^APCLV
Text Integration Utility	1	BROWS1^TIURA2

Package	Total	Caller Graph
Patient Care Component	2	APCDCAF APCDCAF3

Package

Total

Caller Graph

Patient Care Component

APCDCAF APCDCAF3

Entry Points

Name	Comments	DBIA/ICR reference
DISP	;EP
NOTEX	;
HDR	;EP -- header code
HS	;
BH	;EP
BACK	;EP - go back to listman
BH1	;
EXPND	; -- expand code
EOP	;EP - End of page.
RECDISP	;
MNOTE	;
REC	;
HELP	;EP -- help code
BHX	;
PROC1	; call listmanager
INIT	;EP -- init variables and list array
LBLK(V,L)	;left blank fill
CASHXX	;
DISP1	;
HSX	;
DATE(D)	;
EN	; EP -- main entry point for CHART AUDIT LISTMANAGER DISPLAY
LASTCDR(V,F)	;EP - get last chart deficiency reason
BHSOAP	;look for SOAP note and display if it exists
HS1	;
RBLK(V,L)	;left blank fill
CP	;EP - change patient if in one patient
VAV	;EP - view any visit when in OP
CDE	;EP
ADDVISIT	;
BHM	;
CASHX	;EP
DISPX	;
NOTEDISP	;
GATHER	;
NOTE1	;
EXIT	; -- exit code
CDEX	;

External References

Name	Field # of Occurrence
PAUSE^APCDALV1	BH+3, CP+3, DISP1+3, DISP1+5
$$ERRORCHK^APCDCAF	REC+1
BACK^APCDCAF	CP+3, CP+7, PROC1+2
EOP^APCDCAF	CDE+4, CDE+5
EN^APCDCAF6	CDE+8
DSPLY^APCDDISP	DISP1+4
GETVISIT^APCDDISP	DISP1+2
$$CLINIC^APCLV	REC+12
$$PRIMPROV^APCLV	REC+13
$$HRN^AUPNPAT	REC+6
KILL^AUPNPAT	NOTEX+2, HSX+3, BHX+2, DISPX+2
^DIC	HS1+4, CP+6
YN^DICN	CP+8
^DIR	NOTEDISP+4, MNOTE+9, CASHX+4, CDE+3, HS+5, EOP+5, BH+5, BHM+9, BHSOAP+3
BROWS1^TIURA2	NOTEDISP+2, NOTE1+2, BH1+2
EN^VALM	EN+5
TERM^VALM0	EN+3, BACK+1
CLEAR^VALM1	EN+4, EN+6
FULL^VALM1	NOTEDISP+8, CASHX+1, HS+1, BH+9, CP+2, DISP+1
$$VAL^XBDIQ1	REC+10, LASTCDR+10, MNOTE+4, BHM+4, BHSOAP+6
ARRAY^XBLM	BHSOAP+6
VIEWR^XBLM	CASHX+8, HS1+8
EN^XBNEW	ADDVISIT+2, DISP+2
EN^XBVK	HSX+2
$$FMTE^XLFDT	DATE+4
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Function Call: WRITE	Prompt: !!,"TIU not installed" Line Location: NOTEDISP+2
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: NOTEDISP+5
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: NOTEDISP+6
Function Call: WRITE	Prompt: !!,"That visit does not have any notes to view" Line Location: NOTEDISP+9
Function Call: WRITE	Prompt: !!,"There are more than one note associated with this visit.",!,"Please choose which note to display.",! Line Location: MNOTE+1
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: CASHX+5
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: CASHX+6
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: CDE+4
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: CDE+5
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: HS+6
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: HS+7
Function Call: WRITE	Prompt: !!,"TIU not installed" Line Location: BH+2
Function Call: WRITE	Prompt: !!,"You do not have the security access to see Behavioral Health Notes.",!,"Please see your supervisor for access. The security key needed is AMHZ CODING REVIEW.",! Line Location: BH+3
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: BH+6
Function Call: WRITE	Prompt: !,"No VISIT selected." Line Location: BH+7
Function Call: WRITE	Prompt: !!,"There are more than one note associated with this visit.",!,"Please choose which note to display.",! Line Location: BHM+1
Function Call: WRITE	Prompt: !!,"This item is only allowed to be used when you are in the PEHR option." Line Location: CP+3
Function Call: WRITE	Prompt: ! Line Location: CP+5
Function Call: WRITE	Prompt: !!,"No visit selected." Line Location: DISP1+3
Routine Call	VALM Line Location: EN+5
Routine Call	DIC Line Location: HS1+4 CP+6
Routine Call	DIR Line Location: NOTEDISP+4 MNOTE+9 CASHX+4 CDE+3 HS+5 EOP+5 BH+5 BHM+9 BHSOAP+3

FileNo	Call Tags
^AUPNPAT - [#9000001]	Classic Fileman Calls
^APCHSCTL - [#9001015]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^AMHREC - [#9002011]	BHSOAP+1
^AMHREC("AVISIT"	BH+10, BH+15
^APCCCTRL - [#9001000]	HS1+1, PROC1+1
^APCHSCTL - [#9001015]	HS1+1, HS1+2
^AUPNVCA - [#9000010.45]	LASTCDR+5, LASTCDR+6, LASTCDR+10
^AUPNVCA("AD"	LASTCDR+2, LASTCDR+4
^AUPNVNOT - [#9000010.28]	NOTE1+1, BH1+1
^AUPNVNOT("AD"	NOTEDISP+9, NOTEDISP+10, NOTEDISP+11, MNOTE+3, BH+16, BH+17, BH+18, BHM+3
^AUPNVSIT - [#9000010]	GATHER+5, RECDISP+4, REC+4, REC+7, REC+11, REC+14, CDE+8, HS+9
^AUPNVSIT("AA"	GATHER+3, GATHER+4
^AUTTLOC - [#9999999.06]	REC+8
^DISV(	HS1+2
^DPT - [#2]	REC+5, HS1+7
^TMP("APCDCAF OP"	EN+7!, GATHER+1!, RECDISP+5, RECDISP+6, NOTEDISP+7, CASHX+7, CDE+6, HS+8
^TMP("APCDCAF"	BH+8
^TMP($J	EN+7!, EXIT+1!, GATHER+1!, GATHER+11*, RECDISP+1, RECDISP+2
^XUSEC("AMHZ CODING REVIEW"	BH+3

Label References

Name	Line Occurrences
$$DATE	REC+4
$$LBLK	REC+6
BACK	NOTEX+3, CASHXX+2, CDEX+3, HSX+4, ADDVISIT+4, BHX+3, DISPX+3
BH1	BH+18
BHSOAP	BH+16, BH+18, BHM+10, BHM+11
BHX	BH+3, BH+6, BH+7, BH+10
CASHXX	CASHX+5, CASHX+6
CDEX	CDE+4, CDE+5
EOP	NOTEDISP+2, NOTEDISP+5, NOTEDISP+6, NOTEDISP+9, CASHX+5, CASHX+6, CASHX+9, HS+6, HS+7, HS1+5 , BH+6, BH+7, BH+14
GATHER	INIT+2
HDR	BACK+4
HS1	HS+2
HSX	HS+6, HS+7, HS1+5
INIT	BACK+3
NOTE1	NOTEDISP+11
NOTEX	NOTEDISP+2, NOTEDISP+5, NOTEDISP+6, NOTEDISP+9, NOTEDISP+11, MNOTE+10, MNOTE+11
REC	RECDISP+4
RECDISP	INIT+3

Name	Field # of Occurrence
^("^APCHSCTL("	HS1+2
^(0	HS1+1, HS1+2

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	RBLK+1~, RBLK+2, LBLK+1~, LBLK+2, CP+8*
A	LASTCDR+3~
A(	LASTCDR+7*, LASTCDR+9
A(0	LASTCDR+8
>> APCDBD	PROC1+1*
APCDCAF	CDEX+1!, ADDVISIT+3!, DISPX+1!
APCDCAF("IN C	AF W/PATIENT" , ADDVISIT+1*
>> APCDCAFD	GATHER+2
>> APCDCAFP	PROC1+1*
APCDCAFV	CDE+8*, CDEX+1!, DISPX+1!
>> APCDDFN	GATHER+3, GATHER+4, HS+2, ADDVISIT+1
>> APCDED	PROC1+1*
>> APCDERR	REC+1*, REC+3, REC+16
APCDHDR	HS1+7*, HS1+8, HSX+1!
APCDN	MNOTE+2!, BHM+2!
APCDN(	MNOTE+5, MNOTE+12, BHM+5, BHM+12
>> APCDODAT	GATHER+2, GATHER+3, GATHER+4
>> APCDPARM	CP+8
APCDPAT	CDE+8, HS+2, HS+9, HSX+1!, DISP1+1
>> APCDPATF	CP+9*
>> APCDPEHR	CP+3, PROC1+1*
APCDPLPT	HSX+1!
APCDRCNT	INIT+4, EXIT+1!, GATHER+3, RECDISP+3, RECDISP+5, RECDISP+6, REC+3, NOTEDISP+3, CASHX+3, CDE+2 , HS+4, BH+4
>> APCDSTOP	GATHER+2*, GATHER+3
APCDSV	RECDISP+1*, RECDISP+2, RECDISP+7!
APCDTIU	NOTE1+1, NOTE1+2, NOTEX+1!, BH1+1, BH1+2, BHX+1!
APCDV	RECDISP+2*, RECDISP+4, RECDISP+6, RECDISP+7!, REC+1, REC+4, REC+7, REC+10, REC+11, REC+12 , REC+13, REC+14
>> APCDV0	GATHER+5*, GATHER+6, GATHER+7, GATHER+8, GATHER+9
>> APCDVBH	BH+15*, BHSOAP+1, BHSOAP+6
>> APCDVIEN	GATHER+3, GATHER+4, GATHER+5, GATHER+11
>> APCDVLOC	GATHER+9*, GATHER+10
APCDVNOT	NOTEDISP+11, MNOTE+12, NOTE1+1, NOTEX+1!, BH+18, BHM+12, BH1+1, BHX+1!
APCDVSIT	NOTEDISP+7, NOTEDISP+9, NOTEDISP+10, NOTEDISP+11, MNOTE+3, NOTEX+1!, CASHX+7, CASHXX+1!, CDE+6, CDE+8 , CDEX+1!, HS+8, HS+9, HSX+1!, BH+8*, BH+10, BH+15, BH+16, BH+17, BH+18 , BHM+3, BHX+1!, DISPX+1!, DISP1+3
APCDX	RECDISP+4, RECDISP+5, RECDISP+7!, REC+2, REC+3, REC+4, REC+5, REC+6, REC+9, REC+10 , REC+11, REC+12, REC+13, REC+15, REC+16*
>> APCHSPAT	HS+2, HS+9, HS1+6*, HS1+7
>> APCHSTYP	HS1+6*
AUPNDAYS	HSX+1!
AUPNVSIT	HSX+1!
>> C	NOTEDISP+10, NOTEDISP+11, MNOTE+3, MNOTE+4, MNOTE+5, MNOTE+8, BH+17, BH+18, BHM+3, BHM+4 , BHM+5, BHM+8
D	DATE~, DATE+2, DATE+3, DATE+4, LASTCDR+3~, LASTCDR+6*, LASTCDR+7
D0	HS1+4!
D1	HS1+4!
DA	HS1+4!, BHSOAP+3!
DD	HS1+4!
DFN	RECDISP+4, REC+5, REC+6, HS+2, HS+9, HS1+6, HSX+1!, CP+9, PROC1+1, DISP1+1
DFOUT	EOP+4!
DIC	HS1+4!, CP+6!
DIC("B"	HS1+4*
DIC(0	HS1+4, CP+6
DIR	BACK+5!, NOTEDISP+1!, NOTEDISP+4!, MNOTE+7!, MNOTE+9!, NOTEX+1!, CASHX+2!, CASHX+4!, CASHXX+1!, CDE+1! , CDE+3!, CDEX+1!, HS+3!, HS+5!, EOP+3~, BH+1!, BH+5!, BHM+7!, BHM+9!, BHSOAP+3! , BHX+1!, DISPX+1!
DIR("A"	NOTEDISP+3, MNOTE+8, CASHX+3, CDE+2, HS+4, EOP+5, BH+4, BHM+8, BHSOAP+3*
DIR("B"	BHSOAP+3*
DIR(0	NOTEDISP+3, MNOTE+8, CASHX+3, CDE+2, HS+4, EOP+5, BH+4, BHM+8, BHSOAP+3*
DIRUT	NOTEDISP+4, NOTEDISP+6, MNOTE+9, MNOTE+11, NOTEX+1!, CASHX+4, CASHX+6, CASHXX+1!, CDE+3, CDE+5 , CDEX+1!, HS+5, HS+7, EOP+4!, BH+5, BH+7, BHM+9*, BHM+11, BHSOAP+4, BHX+1! , DISPX+1!
DLOUT	EOP+4!
DQ	HS1+4!
DR	HS1+4!
DT	PROC1+1
DTOUT	EOP+4!
DUOUT	NOTEDISP+4, MNOTE+9, NOTEX+1!, CASHX+4, CASHXX+1!, CDE+3, CDEX+1!, HS+5, EOP+4!, BH+5 , BHM+9, BHX+1!, DISPX+1!
DUZ	HS1+2, BH+3
DUZ(2	REC+6, HS1+1, PROC1+1
F	LASTCDR~, LASTCDR+1*, LASTCDR+10
I	RBLK+1~, RBLK+2, LBLK+1~, LBLK+2, BACK+6!
IOST	EOP+1
L	REC+7, REC+8, REC+9, REC+14, REC+15, RBLK~, RBLK+2, LBLK~, LBLK+2, LASTCDR+3~ , LASTCDR+8, LASTCDR+9
U	GATHER+7, GATHER+8, GATHER+9, RECDISP+4, REC+4, REC+5, REC+7, REC+8, REC+11, REC+14 , LASTCDR+6, LASTCDR+10, NOTE1+1, CDE+8, HS+9, HS1+1, HS1+2, HS1+7, BH1+1, CP+8 , PROC1+1
V	RBLK~, RBLK+2, RBLK+3, LBLK~, LBLK+2, LBLK+3, LASTCDR~, LASTCDR+2, LASTCDR+4
VALMBCK	BACK+2*, CDE+7!
>> VALMCC	EN+1*
VALMCNT	EN+2~, INIT+4*
>> VALMHDR(1	HDR+3*
>> VALMHDR(2	HDR+2*
>> VALMSG	INIT+1*
X	HDR+1, HDR+2, HELP+1, DATE+1~, DATE+2, DATE+3, DATE+5, LASTCDR+3~, LASTCDR+4, LASTCDR+5 , LASTCDR+6, LASTCDR+7, LASTCDR+9, LASTCDR+10, BACK+6!, NOTEDISP+10, MNOTE+3, MNOTE+4, MNOTE+5, NOTEX+1! , HS1+1, HS1+2, HS1+3, HS1+4, HSX+1!, BH+17, BHM+3*, BHM+4, BHM+5, BHX+1!
Y	DATE+1~, DATE+4, DATE+5, BACK+6!, NOTEDISP+5, NOTEDISP+7, MNOTE+10, MNOTE+12, NOTEX+1!, CASHX+5 , CASHX+7, CASHXX+1!, CDE+4, CDE+6, CDEX+1!, HS+2, HS+6, HS+8, HS+9, HS1+2 , HS1+5, HS1+6, HSX+1!, BH+6, BH+8, BHM+10, BHM+12, BHSOAP+5, BHX+1!, CP+7 , CP+9, DISPX+1!
Z	RBLK+2, LBLK+2, BACK+6!

Customize PDF page

Package: Patient Care Component

Routine: APCDCAF2

Information

Source Information

Call Graph

Call Graph Total: 19

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:

Marked Items