Routine: APCDFHS

Package	Total	Call Graph
Registration	3	EN^VALM TERM^VALM0 (CLEAR,FULL)^VALM1
IHS Patient	1	$$CONC^AUPNSICD
IHS Standard Terminology	1	$$SUBLST^BSTSAPI
IHS VA Utilities	1	EN^XBNEW
Kernel	1	DISP^XQORM1
VA Fileman	1	^DIR

Package

Total

Call Graph

Registration

EN^VALM TERM^VALM0 (CLEAR,FULL)^VALM1

IHS Patient

$$CONC^AUPNSICD

IHS Standard Terminology

$$SUBLST^BSTSAPI

IHS VA Utilities

EN^XBNEW

Kernel

DISP^XQORM1

VA Fileman

^DIR

Package	Total	Caller Graph
Patient Care Component	1	APCDFH

Package

Total

Caller Graph

Patient Care Component

APCDFH

Entry Points

Name	Comments	DBIA/ICR reference
EN	;EP -- main entry point for
HDR	; -- header code
EOJ	;
GETNARR(APCDDEFV)	;EP - called to get a narrative
EXPND	; -- expand code
BACK	;go back to listman
DISPX	;
INIT	;EP --
EXIT	; -- exit code
GETNARR1	;EP
SELECT	;EP - add an item to the selected list - called from a protocol
HELP	; -- help code

Name	Field # of Occurrence
$$CONC^AUPNSICD	INIT+10, SELECT+9
$$SUBLST^BSTSAPI	INIT+4
^DIR	SELECT+3, GETNARR1+6
EN^VALM	EN+2
TERM^VALM0	BACK+1
CLEAR^VALM1	EN+3
FULL^VALM1	EN+4
EN^XBNEW	GETNARR+7
DISP^XQORM1	HELP+1

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !! Line Location: HELP+1
Function Call: WRITE	Prompt: ! Line Location: SELECT+1
Function Call: WRITE	Prompt: !,"No SNOMED selected." Line Location: SELECT+4
Function Call: WRITE	Prompt: !,"No SNOMED selected." Line Location: SELECT+5
Function Call: WRITE	Prompt: !!," ^ is Not Allowed. Response is required.",! Line Location: GETNARR1+7
Function Call: WRITE	Prompt: " ????" Line Location: GETNARR1+10
Function Call: WRITE	Prompt: !!,"You cannot enter a narrative that contains a '\|' (vertical bar).",! Line Location: GETNARR1+11
Routine Call	VALM Line Location: EN+2
Routine Call	DIR Line Location: SELECT+3 GETNARR1+6

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	EOJ+1!, INIT+2!, INIT+3, INIT+6, INIT+7, SELECT+10!

Name	Line Occurrences
BACK	DISPX+1
DISPX	SELECT+4, SELECT+5
EOJ	EN+6
GETNARR1	GETNARR1+10, GETNARR1+11
HDR	BACK+4
INIT	BACK+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> APCDCI	SELECT+6*, SELECT+9
>> APCDDATE	INIT+10, SELECT+9
APCDDEFV	GETNARR~, GETNARR+6*, GETNARR1+6
>> APCDDI	SELECT+7*
APCDFHSN	EN+1~, EOJ+1!, SELECT+10!
APCDFHSN(	INIT+13*
APCDFHSN("IDX"	INIT+14*, SELECT+6, SELECT+7
APCDHIGH	EN+1~, INIT+5, INIT+16, SELECT+2
>> APCDICD	SELECT+9*
APCDNQV	GETNARR+4~, GETNARR+5, GETNARR+8, GETNARR1+12
APCDTCI	EN+1~, INIT+9*, INIT+10, INIT+12, INIT+14
APCDTDI	EN+1~, INIT+9*, INIT+14
>> APCDTPT	INIT+9*, INIT+12
C	INIT+1~, INIT+5, INIT+8, INIT+12, INIT+13, INIT+14, INIT+16
DA	GETNARR1+4~, GETNARR1+6!
DIR	BACK+5!, SELECT+3!, GETNARR1+4~, GETNARR1+6!
DIR("A"	SELECT+2, GETNARR1+6
DIR("B"	GETNARR1+6*
DIR(0	SELECT+2, GETNARR1+6
>> DIRUT	SELECT+3*, SELECT+5, GETNARR1+8
DT	INIT+10, SELECT+9
>> DUOUT	SELECT+3
I	EN+1~, INIT+1~, INIT+10*, INIT+12, BACK+6!
IN	INIT+1~, INIT+3*, INIT+4
IOF	EN+5
J	INIT+1~, INIT+5, INIT+6, INIT+7, INIT+14
OUT	INIT+1~, INIT+3*, INIT+4
>> T	GETNARR1+5*
U	INIT+9, INIT+10, INIT+14, SELECT+6, SELECT+7, SELECT+9
>> VALMBCK	BACK+2*
>> VALMCNT	INIT+16*
>> VALMHDR(1	HDR+1*
X	INIT+1~, INIT+4, INIT+11, INIT+12, INIT+13, HELP+1, BACK+6!, GETNARR1+9, GETNARR1+10, GETNARR1+11! , GETNARR1+12
Y	INIT+1~, INIT+7*, INIT+9, BACK+6!, SELECT+4, SELECT+6, SELECT+7
Z	BACK+6!

Customize PDF page

Package: Patient Care Component

Routine: APCDFHS

Information

Source Information

Call Graph

Call Graph Total: 8

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: