Routine: ECXFELOC

Package	Total	Call Graph
Kernel	4	^%ZIS ^%ZISC ^%ZTLOAD $$HTFM^XLFDT
DSS Extracts	2	($$GETDIV,$$RADDIV)^ECXDEPT ($$EXPORT,EXPDISP)^ECXUTL1
VA FileMan	2	^DIC ^DIR
Outpatient Pharmacy	1	PSS^PSO59

Package	Total	Caller Graph
DSS Extracts	1	ECXFELOC

Entry Points

Name	Comments	DBIA/ICR reference
EN	;entry point from option
START	;queued entry point
LAB
ECS
IV
CLI
PRE
V6
RAD
NUR	;S EC=0 F S EC=$O(^NURSF(211.4,EC)) Q:'EC I $D(^(EC,0)) S EC1=$P(^(0),U),EC1=$P($G(^SC(+EC1,0)),U),^TMP($J,"NUR",EC,EC)=EC1 ;132
SUR	;174, Updated surgery section
UDP
DEN	;S EC=0 F S EC=$O(^DENT(225,EC)) Q:'EC I $D(^(EC,0)) S EC1=$P(^(0),U),^TMP($J,"DEN",EC1,EC)="Dental "_EC1
PRO	;Prosthetics Location Information. API added in patch 136
PRINT	;
OUT
HEAD	;
FEED1	;or location names
FEED2	;service location names

External References

Name	Field # of Occurrence
^%ZIS	EN+13
^%ZISC	EN+14, OUT+3
^%ZTLOAD	EN+14
^DIC	PRO+5
^DIR	EN+5, OUT, HEAD+2
$$GETDIV^ECXDEPT	IV, CLI+1, UDP
$$RADDIV^ECXDEPT	LAB, ECS, RAD, SUR+20, SUR+25, SUR+30, SUR+33, SUR+37, SUR+41, SUR+42 , PRO+7
$$EXPORT^ECXUTL1	EN+7
EXPDISP^ECXUTL1	EN+12
PSS^PSO59	PRE
$$HTFM^XLFDT	START+2

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: !!,"Print list of feeder locations.",! Line Location: EN+1
Function Call: WRITE	Prompt: !,"Select : 1. CLI",!,?9,"2. ECS",!,?9,"3. IVP",!,?9,"4. LAB",!,?9,"5. PRE",!,?9,"6. PRO",!,?9,"7. RAD",!,?9,"8. SUR",!,?9,"9. UDP",! Line Location: EN+5
Function Call: WRITE	Prompt: ! Line Location: OUT+1
Function Call: WRITE	Prompt: ! Line Location: HEAD+1
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y!($E(IOST)="C") Line Location: HEAD+3
Function Call: WRITE	Prompt: !,?15,"Feeder Location List For Feeder System ",EC,?70,"Page: ",PG,!!,"FEEDER LOCATION",?18,"DIVISION",?28,"DESCRIPTION",!,LN Line Location: HEAD+3
Routine Call	%ZIS Line Location: EN+13
Routine Call	DIC Line Location: PRO+5
Routine Call	DIR Line Location: EN+5 OUT HEAD+2

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DG(40.8 - [#40.8]	IV, UDP
^DIC(40.7 - [#40.7]	CLI
^DIC(59	PRE+2
^ECD - [#724]	ECS, ECS+1
^ECJ - [#720.3]	ECS
^ECK(	ECS+1
^ECX(727.811 - [#727.811]	SUR+9
^ECX(727.826 - [#727.826]	PRO+2
^LRO(68 - [#68]	LAB
^RA(79 - [#79]	RAD
^RA(79.2 - [#79.2]	RAD
^SC - [#44]	CLI, CLI+1
^TMP($J	EN+9!, EN+10, START+3!, LAB, ECS, ECS+1, IV, CLI+1, PRE+2, V6 , RAD, SUR+2!, SUR+4, SUR+5, SUR+20, SUR+25, SUR+30, SUR+33, SUR+37, SUR+41* , SUR+42, SUR+43!, UDP, PRO+7, PRINT+1, PRINT+2, OUT+2!

Label References

Name	Line Occurrences
CLI	START+4
ECS	START+4
HEAD	PRINT+1, PRINT+3
IV	START+4
LAB	START+4
OUT	EN+14
PRE	START+4
PRINT	START+5
PRO	START+4
RAD	START+4
START	EN+11
SUR	START+4
UDP	START+4
V6	PRE

Naked Globals

Name	Field # of Occurrence
^(	ECS, ECS+1, CLI, PRE+2, V6, RAD, PRINT+2, PRINT+3
^(0	ECS, ECS+1, IV, CLI, PRE+2, RAD, SUR+9, UDP

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	EN+13!*
ARRAY	PRE~*, V6, V6+1
CNT	EN+2~, EN+10, PRINT+2
DAT	CLI+1*, OUT+2!
>> DIC	PRO+5*
>> DIC(0	PRO+5*
DIR	EN+2~, EN+6!, OUT!, HEAD+2!
DIR("?"	EN+3*
DIR("A"	EN+4*
DIR("B"	EN+4*
DIR(0	EN+5, OUT, HEAD+2*
DIRUT	EN+2~, EN+5
DIV	SUR+1~, SUR+9, SUR+16, SUR+20, SUR+25, SUR+30, SUR+33, SUR+37, SUR+41, SUR+42 , PRO+1~, PRO+4, PRO+5, PRO+6, PRO+7
DT	START+2*, CLI+1
DTOUT	EN+2~
DUOUT	EN+2~
EC	START+1~, START+4, LAB, ECS, ECS+1, IV, CLI, CLI+1, PRE+2, V6 , RAD, SUR+1~, SUR+9, SUR+11, SUR+13, SUR+15, SUR+18, SUR+23, SUR+27, SUR+28 , SUR+32, SUR+35, SUR+36, SUR+40, UDP, PRINT+1, PRINT+2, OUT+2!, HEAD+3
EC1	LAB, ECS, ECS+1, IV, CLI, CLI+1, PRE+2, V6, RAD, UDP* , PRINT+1*, PRINT+2, PRINT+3, OUT+2!
EC2	ECS, ECS+1, PRINT+1*, PRINT+2, PRINT+3, OUT+2!
EC3	OUT+2!
EC31	SUR+1~, SUR+28*
ECD	CLI, CLI+1, RAD, OUT+2!
ECD1	RAD*, OUT+2!
ECF1	SUR+1~, SUR+11, SUR+12, SUR+13, SUR+14, SUR+15, SUR+16, SUR+20, SUR+25, SUR+30 , SUR+33, SUR+37, SUR+41, SUR+42
ECFL	SUR+1~, SUR+16*, SUR+19, SUR+24, SUR+29, SUR+33, SUR+35, SUR+37, SUR+39, SUR+41 , SUR+42
ECFLX	SUR+1~, SUR+19, SUR+20, SUR+24, SUR+25, SUR+29*, SUR+30
ECFX	SUR+1~, SUR+28*, SUR+29, SUR+30
ECLIST	START+1~, START+4*
>> ECQ	SUR+23, SUR+27, SUR+32, SUR+36, SUR+40*
ECS	CLI*, CLI+1, OUT+2!
ECSC	CLI*, CLI+1, OUT+2!
ECXPORT	EN+2~, EN+7*, EN+8, START+3, PRINT+1, PRINT+2, OUT, OUT+2, OUT+3
ECY	EN+2~, EN+6*, START+4
F1	SUR+1~, SUR+4*
F1NM	SUR+1~, SUR+4*, SUR+5
F1SUB	SUR+1~, SUR+4*, SUR+5
F2	SUR+1~, SUR+5*
F2NM	SUR+1~, SUR+5*
F2SUB	SUR+1~, SUR+5*
FL	SUR+1~
FL(	SUR+5*, SUR+30
FL("A"	SUR+25
FL("I"	SUR+20
ID	CLI+1*, OUT+2!
IEN	PRO+1~, PRO+2*
IO	START+5
IO("Q"	EN+14
IOF	OUT+3, HEAD+3
IOSL	PRINT+3
IOST	OUT, OUT+3, HEAD+1, HEAD+2, HEAD+3
J	SUR+1~, SUR+9*
JJ	OUT+1, OUT+2!, HEAD+1
LN	START+3*, OUT+2!, HEAD+3
LOC	PRO+1~, PRO+2, PRO+3, PRO+4, PRO+6, PRO+7
LOC(	PRO+2*, PRO+3
ORDER	PRO+1~, PRO+6*, PRO+7
PG	START+3, OUT+2!, HEAD+2, HEAD+3
POP	EN+13, OUT+2!
QFLG	EN+1, START+3, PRINT+1, PRINT+3, OUT, OUT+2!, HEAD+2*
RD	CLI+1*, OUT+2!
SIEN	EN+2~, LAB*
SS	OUT+1, OUT+2!, HEAD+1
U	LAB, ECS, ECS+1, IV, CLI, CLI+1, PRE+2, V6, RAD, SUR+4 , SUR+5, SUR+9, SUR+11, SUR+13, SUR+15, SUR+18, SUR+20, SUR+23, SUR+25, SUR+27 , SUR+28, SUR+30, SUR+32, SUR+33, SUR+35, SUR+36, SUR+37, SUR+40, SUR+41, SUR+42 , UDP, PRO+2, PRO+7, PRINT+2, PRINT+3
X	EN+2~, SUR+1~, SUR+4, SUR+5, PRO+1~, PRO+5*, OUT+2!
Y	EN+2~, EN+6, PRO+5, PRO+7, OUT+2!, HEAD+2
ZTDESC	EN+2~, EN+14*
>> ZTQUEUED	OUT+3
>> ZTREQ	OUT+3*
ZTRTN	EN+2~, EN+14*
ZTSAVE	EN+2~
ZTSAVE("ECY"	EN+14*

Marked Items

Name	Field # of Occurrence
$T(FEED1+F1	SUR+4
$T(FEED2+F2	SUR+5

Customize PDF page

Package: DSS Extracts

Routine: ECXFELOC

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Legends:

Package Component Superscript legend

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Marked Items