Routine: APCDEF

Package	Total	Call Graph
IHS VA Utilities	3	^XBDBQUE ($$VAL,$$VALI)^XBDIQ1 EN^XBVK
Patient Care Component	2	(EOJ,GETPAT,GETVISIT)^APCDDISP ^APCDVD
Kernel	1	$$FMTE^XLFDT
VA Fileman	1	^DIR

Package	Total	Caller Graph
Patient Care Component	1	APCDEGPP

Name	Comments	DBIA/ICR reference
VFL	;EP -- let's loop through the v files and get the info
VST	;EP -- get the visit information
ZIS	;-- device call
EN(APCDVIEN)	;-- this is the entry point from external packages
XIT	;-- kill the variables and quit
ASK	;-- ask the visit and either call this routine or visit display

Name	Field # of Occurrence
EOJ^APCDDISP	ASK+13
GETPAT^APCDDISP	ASK+2
GETVISIT^APCDDISP	ASK+4
^APCDVD	ASK+13
^DIR	ASK+9
^XBDBQUE	ZIS+2
$$VAL^XBDIQ1	VST+2, VST+4, VST+5, VST+6, VST+7, VST+8, VST+9, VST+10, VST+11
$$VALI^XBDIQ1	VST+3
EN^XBVK	XIT+1
$$FMTE^XLFDT	VST+3

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"No Patient Selected!" Line Location: ASK+3
Function Call: WRITE	Prompt: !,"No Visit Selected!" Line Location: ASK+5
Function Call: WRITE	Prompt: !,"No Visit Selected for PCC Encounter Form Print" Line Location: EN+1
Routine Call	DIR Line Location: ASK+9

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVMSR - [#9000010.01]	VFL+19
^AUPNVSIT - [#9000010]	VST+1
^DIC - [#1]	VFL+5, VFL+12, VFL+13

Name	Field # of Occurrence
>> APCDCNT	VFL+4, VFL+21, VFL+22, VFL+23, VFL+25, VFL+26, VFL+28, VFL+29, VFL+31, VFL+32* , VFL+33, VFL+34*
>> APCDCTR	VFL+6, VFL+7, VFL+8, VFL+9, VFL+10, VFL+11
>> APCDFD	ASK+11*, ASK+13
>> APCDH	VFL+2*
>> APCDJ	VFL+2*
>> APCDPAT	ASK+3, VST+2*
>> APCDTMP	VFL+3*, VFL+21, VFL+22, VFL+25, VFL+28, VFL+31, VFL+33
>> APCDVCC	VST+10*
>> APCDVCLN	VST+4*
>> APCDVDFN	VFL+17, VFL+18, VFL+19, VFL+22, VFL+25, VFL+28, VFL+31, VFL+33
>> APCDVDG	VFL+13*, VFL+14, VFL+16
>> APCDVDGA	VFL+14*, VFL+15, VFL+22, VFL+33
>> APCDVDP	VST+9*
>> APCDVDT	VST+3*
>> APCDVEM	VST+6*
>> APCDVFA	VFL+15*
>> APCDVFLE	VFL+5*, VFL+7, VFL+8, VFL+9, VFL+10, VFL+11, VFL+12, VFL+13, VFL+19, VFL+20 , VFL+24, VFL+27, VFL+30
>> APCDVFLG	VST+11*
>> APCDVHL	VST+8*
>> APCDVI	VFL+18*
APCDVIEN	EN~, EN+1, VST+1, VST+2, VST+3, VST+4, VST+5, VST+6, VST+7, VST+8 , VST+9, VST+10, VST+11
>> APCDVIGR	VFL+16*, VFL+18
>> APCDVLOC	VST+5*
>> APCDVNM	VFL+12*
>> APCDVREC	VST+1*, VST+4
>> APCDVSC	VST+7*
>> APCDVSIT	ASK+5, ASK+14
D0	VFL+1~
DA	VFL+1~
DI	VFL+1~
DIC	VFL+1~
DIQ	VFL+1~
DIR	ASK+12!
DIR("A"	ASK+7*
DIR("B"	ASK+8*
DIR(0	ASK+6*
>> DIRUT	ASK+10
DR	VFL+1~
U	VST+4, VFL+12, VFL+19
>> XBNS	ZIS+1*
>> XBRC	ZIS+1*
>> XBRP	ZIS+1*
>> XBRX	ZIS+1*
Y	ASK+11, ASK+12!

Information