Routine: APCDEA3

Package	Total	Caller Graph
Patient Care Component	15	APCDEA2 APCDEAP APCDEAPC APCDEATC APCDEDTC APCDEFL APCDEGP1 APCDEH1 APCDEHI2 APCDEHTC APCDEL1 APCDEM APCDENV APCDEPO APCDPE2
IHS Changes To ADT	2	ADGCALLS BDGPCCEL
Emergency Room	1	AMER31

Entry Points

Name	Comments	DBIA/ICR reference
EN	;PEP - CALLED TO PROCESS 1 MNEMONIC
DIE	; ADD/MODIFY FIELDS IN ENTRY
GETNARR1	;EP
DIC	; CREATE/LOOKUP ENTRY
GETNARR(APCDT,APCDDEFV)	;PEP - called to get a narrative
DELETE	; DELETE ENTRY IF ^DIE FAILED IN ADD MODE

Name	Line Occurrences
Function Call: WRITE	Prompt: APCDBEEP,!,"An error has occurred, I think!",! Line Location: DIE+8
Function Call: WRITE	Prompt: !!," ^ is Not Allowed. Response is required.",! Line Location: GETNARR1+7
Function Call: WRITE	Prompt: " ????" Line Location: GETNARR1+9
Function Call: WRITE	Prompt: " ????" Line Location: GETNARR1+11
Function Call: WRITE	Prompt: !!,"You cannot enter a narrative that contains a '\|' (vertical bar).",! Line Location: GETNARR1+12
Routine Call	DIE Line Location: DIE+6
Routine Call	DIC Line Location: DIC+9
Routine Call	DIR Line Location: GETNARR1+6

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

Name	Line Occurrences (* Changed, ! Killed)
^APCDTKW - [#9001001]	DIC+1, DIC+4, DIC+7, DIE+1, DIE+3
^DIC - [#1]	DIC+4

Name	Line Occurrences
DIE	DIC+5, DIC+6
GETNARR1	GETNARR1+7, GETNARR1+9, GETNARR1+11, GETNARR1+12

Name	Field # of Occurrence
>> APCDBEEP	DIE+8
APCDCLN	DIE+6!
APCDDEFV	GETNARR~, GETNARR+6*, GETNARR1+6
APCDLOOK	DIE+6!, DELETE+5!
>> APCDMNE	DIC+1, DIC+4, DIC+7, DIE+1, DIE+3
>> APCDMNE("NAME"	DIE+3
>> APCDMODE	DIC+2, DIC+3, DIC+6, DIE+4
APCDNQV	GETNARR+4~, GETNARR+5, GETNARR+9, GETNARR1+13
>> APCDPAT	DIC+5, DELETE+1
APCDREGU	DELETE+1!
APCDT	GETNARR~, GETNARR+7*, GETNARR1+9, GETNARR1+10
APCDTMOD	DIC+1, DIC+2, DIC+7, DIE+3, DELETE+5!
>> APCDVSIT	DIC+6, DIE+7
APCDX	DIE+1*, DIE+2!, DELETE+5!
AUPNVSIT	DIE+7*!
>> D0	DIE+3*
DA	DIE+3*, GETNARR1+4~, GETNARR1+6!
>> DFN	DELETE+1*
DIC	DIC+3, DIC+4, DIC+5, DIC+6, DIC+9!, DIE+3, DIE+6!
DIC("DR"	DIC+8*
DIC(0	DIC+7*
DIE	DIE+3*, DIE+6!
DIE("NO^"	DIE+4, DIE+5, DIE+6!
DIK	DIE+6!
DIR	GETNARR1+4~, GETNARR1+6!
DIR("A"	GETNARR1+6*
DIR("B"	GETNARR1+6*
DIR(0	GETNARR1+6*
>> DIRUT	GETNARR1+7, GETNARR1+8
DIU	DIE+2!, DIE+6!
DIV	DIE+2!, DIE+6!
>> DLAYGO	DIC+7*
>> DR	DIE+3*, DIE+5
>> T	GETNARR1+5*
U	DIC+1, DIC+4, DIC+7, DIE+1, DIE+3
X	GETNARR1+7, GETNARR1+9, GETNARR1+10*, GETNARR1+11, GETNARR1+12!, GETNARR1+13
>> Y	DIC+5, DIC+6, DIC+10, DIE+3, DIE+8