Routine: APCDERAD

Package	Total	Call Graph
Patient Care Component	4	GETPAT^APCDEA ^APCDEA2 ^APCDEIN ^APCDEKL
VA Fileman	4	^%DT ^%DTC ^DIC ^DIR
IHS Patient	1	KILL^AUPNPAT

Package

Total

Call Graph

^%DT ^%DTC ^DIC ^DIR

KILL^AUPNPAT

Name	Comments	DBIA/ICR reference
HDR	;
RADLOG	;
GETLOC	; GET LOCATION OF ENCOUNTER
EOJ	; END OF JOB
GETMNEK	; KILL GETMNE SPECIFIC VARIABLES
GETTYPE	; GET TYPE OF ENCOUNTER
GETPAT	; GET PATIENT
PROCESS	; PROCESS MNEMONIC
GETCAT	; GET SERVICE CATEGORY
TEXT	;
RESTOFIT
GETDATE	; GET DATE

Name	Line Occurrences
Function Call: WRITE	Prompt: !?80-$L(APCDX)\2,APCDX Line Location: HDR+2
Function Call: WRITE	Prompt: !! Line Location: HDR+4
Function Call: WRITE	Prompt: ! Line Location: GETDATE+1
Function Call: WRITE	Prompt: !!,$C(7),$C(7),"RAD LOG TEMPLATE MISSING, NOTIFY YOUR SUPERVISOR" Line Location: RADLOG+2
Routine Call	DIC Line Location: GETLOC+2 RADLOG+1
Routine Call	DIR Line Location: GETTYPE+3 GETCAT+3

FileNo	Call Tags
^APCDTKW - [#9001001]	Classic Fileman Calls
^AUTTLOC - [#9999999.06]	Classic Fileman Calls

Name	Field # of Occurrence
%	EOJ+6!
%DT	GETDATE+1*, EOJ+6!
%DT("A"	GETDATE+1*, GETDATE+4!
AGE	EOJ+3!
APCDADD	RADLOG+4!
APCDALVR	RADLOG+4!
>> APCDCAT	HDR+8, GETCAT+1, GETCAT+5*
>> APCDDATE	RESTOFIT, GETDATE+1, GETDATE+3*, GETPAT+3
>> APCDFLG	HDR+6
APCDJ	HDR+2*, HDR+3!
>> APCDLOC	HDR+8, GETLOC+1, GETLOC+4*
>> APCDPAT	HDR+7, GETPAT+2, RADLOG+4
APCDRAD	HDR+7*, EOJ+5!
APCDRADT	EOJ+5!
>> APCDTPLT	RADLOG+3*
>> APCDTPLT("NAME"	RADLOG+3*
>> APCDTYPE	HDR+8, GETTYPE+1, GETTYPE+5*
APCDVSIT	GETMNEK+1!
APCDX	HDR+2*, HDR+3!
>> AUPNDAYS	GETPAT+3*
>> AUPNDOB	GETPAT+3
D	EOJ+4!
DA	GETLOC+2!, GETTYPE+2!, GETCAT+2!, GETCAT+6!
DFN	EOJ+3!
DI	EOJ+4!
DIC	GETLOC+2!, RADLOG+1
DIC("A"	RADLOG+1!
DIC("B"	RADLOG+1!
DIC("S"	RADLOG+1*!
DIC(0	GETLOC+2, RADLOG+1
DIG	EOJ+4!
DIH	EOJ+4!
DIR	GETTYPE+2!, GETTYPE+3!, GETTYPE+6!, GETCAT+2!, GETCAT+3!, GETCAT+6!
DIR("A"	GETTYPE+3, GETCAT+3
DIR(0	GETTYPE+3, GETCAT+3
DIROUT	GETTYPE+2!, GETTYPE+6!, GETCAT+2!, GETCAT+6!
DIRUT	GETTYPE+2!, GETTYPE+4, GETTYPE+6!, GETCAT+2!, GETCAT+4, GETCAT+6!
DIW	EOJ+4!
DK	EOJ+4!
DL	EOJ+4!
DLOUT	EOJ+4!
DQ	EOJ+4!
DTOUT	GETTYPE+2!, GETTYPE+6!, GETCAT+2!, GETCAT+6!
DUOUT	GETTYPE+2!, GETTYPE+6!, GETCAT+2!, GETCAT+6!
DX	EOJ+4!
IOF	HDR+1
POP	EOJ+4!
U	RADLOG+3
X	GETTYPE+4, GETCAT+4, GETCAT+6!, GETPAT+3, RADLOG+1*, EOJ+4!
>> X1	GETPAT+3*
>> X2	GETPAT+3*
Y	GETLOC+3, GETLOC+4, GETTYPE+5, GETCAT+5, GETCAT+6!, GETDATE+2, GETDATE+3, RADLOG+2, RADLOG+3, EOJ+4!

Information