Routine: APCLNJ23

Package	Total	Call Graph
IHS VA Utilities	1	$$EXTSET^XBFUNC
VA Fileman	1	^DIR

Package

Total

Call Graph

IHS VA Utilities

$$EXTSET^XBFUNC

VA Fileman

^DIR

Package	Total	Caller Graph
Patient Care Component Reports	1	APCLNJ22

Package

Total

Caller Graph

Patient Care Component Reports

APCLNJ22

Name	Comments	DBIA/ICR reference
LOC	;
CLN	;
VD
HEAD1	;
TOP	;ENTRY POINT
HEAD	;
ICD	;
SC	;
TYPE	;
AGE	;

Name	Field # of Occurrence
^DIR	ICD+2, HEAD+2
$$EXTSET^XBFUNC	TYPE+2, SC+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"1. Visits from ",APCLBDD," through ",APCLEDD Line Location: VD+0
Function Call: WRITE	Prompt: !!,"2. ",$S($D(APCLLOCT):"The following ",1:"All")," Locations of Encounter",$S($D(APCLLOCT):":",1:".") Line Location: LOC+1
Function Call: WRITE	Prompt: !?10,$P(^DIC(4,%,0),U) Line Location: LOC+2
Function Call: WRITE	Prompt: !!,"3. ",$S($D(APCLTYPT):"The following ",1:"All")," Visit Types",$S($D(APCLTYPT):":",1:".") Line Location: TYPE+1
Function Call: WRITE	Prompt: !?10,V Line Location: TYPE+2
Function Call: WRITE	Prompt: !!,"4. ",$S($D(APCLSCT):"The following ",1:"All")," Visit Service Categories",$S($D(APCLSCT):":",1:".") Line Location: SC+1
Function Call: WRITE	Prompt: !?10,V Line Location: SC+2
Function Call: WRITE	Prompt: !!,"5. ",$S($D(APCLCLNT):"The following ",1:"All")," Clinics",$S($D(APCLCLNT):":",1:".") Line Location: CLN+1
Function Call: WRITE	Prompt: !?10,$P(^DIC(40.7,%,0),U) Line Location: CLN+2
Function Call: WRITE	Prompt: !!,"6. ",$S($D(APCLAGET):"The following ",1:"All")," Ages",$S($D(APCLAGET):": "_APCLAGET,1:".") Line Location: AGE+1
Function Call: WRITE	Prompt: !!,"7. All vists with an ICD9 Diagnosis between 800 and 999 or ICD10 codes",!?5,"S00-T88 (injury codes)." Line Location: ICD+1
Function Call: WRITE	Prompt: !! Line Location: ICD+2
Function Call: WRITE	Prompt: ! Line Location: HEAD+2
Function Call: WRITE	Prompt: !!,$P(^VA(200,DUZ,0),"^",2),?(80-$L(X)/2),X,! Line Location: HEAD1+4
Function Call: WRITE	Prompt: !,"The Surveillance Injury Report is based on the following criteria:",! Line Location: HEAD1+5
Routine Call	DIR Line Location: ICD+2 HEAD+2

Name	Line Occurrences (* Changed, ! Killed)
^DIC(4 - [#4]	LOC+2, HEAD1+3
^DIC(40.7 - [#40.7]	CLN+2
^VA(200 - [#200]	HEAD1+4

Name	Line Occurrences
HEAD	TOP+2, LOC+2, TYPE+2, SC+2, CLN+2
HEAD1	HEAD+1

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%	LOC+2, LOC+3!, TYPE+2, TYPE+3!, SC+2, SC+3!, CLN+2, CLN+3!
>> APCLAGET	AGE+1
>> APCLBDD	VD
>> APCLCLNT	CLN+1
>> APCLCLNT(	CLN+2
>> APCLEDD	VD
>> APCLLOCT	LOC+1
>> APCLLOCT(	LOC+2
>> APCLPAGE	TOP+1, HEAD+1, HEAD1+1
>> APCLQUIT	LOC+2, TYPE+2, SC+2, CLN+2, ICD+2, HEAD+2
>> APCLSCT	SC+1
>> APCLSCT(	SC+2
>> APCLTYPT	TYPE+1
>> APCLTYPT(	TYPE+2
DIR	ICD+2!, HEAD+2!
DIR("A"	ICD+2*
DIR(0	ICD+2, HEAD+2
>> DTOUT	ICD+2, HEAD+2
DUZ	HEAD1+4
DUZ(2	HEAD1+3
IO	ICD+2, HEAD+2
IO(0	ICD+2, HEAD+2
IOF	HEAD1+2
IOSL	LOC+2, TYPE+2, SC+2, CLN+2
IOST	ICD+2, HEAD+2
U	LOC+2, CLN+2
V	TYPE+2, TYPE+3!, SC+2, SC+3!
>> X	HEAD1+3*, HEAD1+4
>> Y	ICD+2, HEAD+2

Customize PDF page

Package: Patient Care Component Reports

Routine: APCLNJ23

Information

Source Information

Call Graph

Call Graph Total: 2

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: