Routine: APCDEFM

Package	Total	Call Graph
Patient Care Component	7	^APCDALV GETPAT^APCDEA EN^APCDEFL ^APCDEIN (,EN1,EN2)^APCDEKL EP^APCDKDE ^APCDVCHK
VA Fileman	5	^%DT ^%DTC ^DIC ^DIE ^DIR
IHS Patient	2	KILL^AUPNPAT MOD^AUPNVSIT
IHS VA Utilities	1	^XBFMK

Entry Points

Name	Line Occurrences
Function Call: WRITE	Prompt: !?80-$L(APCDX)\2,APCDX Line Location: HDR+4
Function Call: WRITE	Prompt: !! Line Location: HDR+6
Function Call: READ	Timeout: $S($D(DTIME):DTIME,1:300) Variable: X Line Location: GETDATE+2
Function Call: WRITE	Prompt: " <Future dates not allowed>",$C(7),$C(7) Line Location: GETDATE+5
Function Call: WRITE	Prompt: $C(7),!,"VISIT date not valid for current patient!",! Line Location: GETVISIT+2
Function Call: WRITE	Prompt: !!,"No visit selected." Line Location: GETVISIT+3
Function Call: WRITE	Prompt: !!,"Please enter the clinic this patient is attending.",! Line Location: CLN+2
Function Call: WRITE	Prompt: !,"Clinic is Required." Line Location: CLN+5
Routine Call	DIE Line Location: GETVISIT+7 CLN+8
Routine Call	DIC Line Location: GETLOC+2 CLN+4
Routine Call	DIR Line Location: GETTYPE+4 GETCAT+4

Name	Line Occurrences (* Changed, ! Killed)
^AUPNVSIT - [#9000010]	CLN+1
^DIC(4 - [#4]	GETLOC+1
^TMP("APCDEF"	EOJ+3!

Name	Field # of Occurrence
>> %DT	GETDATE+4*
>> APCDAFLG	GETVISIT+2
APCDANS	EOJ+2!
APCDC	EOJ+2!
>> APCDCAT	GETCAT+1, GETCAT+6
>> APCDCLN	CLN+3, CLN+7, CLN+8
APCDCRIT	EOJ+2!
APCDCUT	EOJ+2!
APCDDATE	GETDATE+1, GETDATE+6, GETVISIT+9, CLN+5!
>> APCDDEFL	GETLOC+1
>> APCDDEFS	GETCAT+3
>> APCDDEFT	GETTYPE+3
APCDDISP	EOJ+2!
APCDEXIT	HDR+5!
>> APCDFLG	HDR+8, GETVISIT+2*
APCDHIGH	EOJ+2!
APCDI	EOJ+2!
APCDJ	HDR+4*, HDR+5!
>> APCDLOC	GETLOC+1, GETLOC+4
>> APCDLVST	GETVISIT+6*
APCDNOXV	GETVISIT+1*!
>> APCDPAT	GETPAT+2, GETVISIT+7
APCDSEL	EOJ+2!
APCDTEXT	EOJ+2!
>> APCDTPLT	HDR+9*
>> APCDTPLT("NAME"	HDR+9*
>> APCDTYPE	GETTYPE+1, GETTYPE+6
APCDVSIT	GETVISIT+3, GETVISIT+6, GETVISIT+8, CLN+1, CLN+5!, CLN+8, LM+2, LM+3
APCDX	HDR+4*, HDR+5!
>> AUPNDAYS	GETVISIT+9*
>> AUPNDOB	GETVISIT+9
>> AUPNVSIT	GETVISIT+8*
DA	GETTYPE+2!, GETCAT+2!, GETVISIT+7, CLN+8!
DIC	GETLOC+2!, CLN+4!
DIC("A"	CLN+4*
DIC("B"	GETLOC+1*
DIC(0	GETLOC+2, CLN+4
DIE	GETVISIT+7, CLN+8!
DIR	GETTYPE+2!, GETTYPE+4!, GETCAT+2!, GETCAT+4!
DIR("A"	GETTYPE+4, GETCAT+4
DIR("B"	GETTYPE+3, GETCAT+3
DIR(0	GETTYPE+4, GETCAT+4
DIROUT	GETTYPE+2!, GETCAT+2!
DIRUT	GETTYPE+2!, GETTYPE+5, GETCAT+2!, GETCAT+5
DR	GETVISIT+7, CLN+8!
DT	GETDATE+5
DTIME	GETDATE+2
DTOUT	GETTYPE+2!, GETCAT+2!
DUOUT	GETTYPE+2!, GETCAT+2!
IOF	HDR+3
U	GETLOC+1, CLN+1
X	GETTYPE+6, GETCAT+6, GETDATE+2*, GETDATE+3, GETDATE+5!, GETVISIT+9, CLN+5
>> X1	GETVISIT+9*
>> X2	GETVISIT+9*
>> Y	GETLOC+3, GETLOC+4, GETDATE+4, GETDATE+5, GETDATE+6, CLN+6, CLN+7

Name	Field # of Occurrence
$T(TEXT+APCDJ	HDR+4