Routine: FHORX1B

Package	Total	Call Graph
Dietetics	4	ALG^FHCLN PID^FHDPA (DPLL,LAB)^FHLABEL PATNAME^FHOMUTL
Kernel	1	KILL^XUSCLEAN

Package

Total

Call Graph

Dietetics

ALG^FHCLN PID^FHDPA (DPLL,LAB)^FHLABEL PATNAME^FHOMUTL

Kernel

KILL^XUSCLEAN

Package	Total	Caller Graph
Dietetics	1	FHORX1

Package

Total

Caller Graph

Dietetics

FHORX1

Name	Field # of Occurrence
ALG^FHCLN	WRT
PID^FHDPA	L2+3
DPLL^FHLABEL	FHORX1B+14
LAB^FHLABEL	LL+2
PATNAME^FHOMUTL	L2+1
KILL^XUSCLEAN	FHORX1B+16

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: FHORX1B+15
Function Call: WRITE	Prompt: !,$E(N1,1,S2-5-$L(W1)),?(S2-3-$L(W1)),W1,!,BID Line Location: WRT+2
Function Call: WRITE	Prompt: " *" Condition for execution: NP Line Location: WRT+2
Function Call: WRITE	Prompt: @FHIO("EON") Line Location: WRT+3
Function Call: WRITE	Prompt: ?(S2-3\2),TC Line Location: WRT+3
Function Call: WRITE	Prompt: ?(S2-3\2),TC Line Location: WRT+3
Function Call: WRITE	Prompt: ?(S2-3\2),TC Line Location: WRT+3
Function Call: WRITE	Prompt: ?(S2-3\2),TC Line Location: WRT+3
Function Call: WRITE	Prompt: ! Condition for execution: LAB=2 Line Location: WRT+3
Function Call: WRITE	Prompt: !,$S(ALG="":"",1:"*ALG"),!,Y,!! Line Location: WRT+3
Function Call: WRITE	Prompt: !!,$P(Y,",",1,L) Line Location: WRT+4
Function Call: WRITE	Prompt: ! Condition for execution: LAB=2 Line Location: WRT+4
Function Call: WRITE	Prompt: !,$E($P(Y,",",L+1,5),2,99),! Line Location: WRT+4
Function Call: WRITE	Prompt: @FHIO("EOF") Line Location: WRT+5
Function Call: WRITE	Prompt: ?(S2-20),$P(H1," - ",2),!! Condition for execution: LAB=2 Line Location: WRT+5
Function Call: WRITE	Prompt: ! Condition for execution: LAB=2 Line Location: LHD+0
Function Call: WRITE	Prompt: !?A1,"**************************",!?A1,"",?(A1+26),"",!?A1,"",?(A1+5),$P(H1," - ",2),?(A1+26),"*" Line Location: LHD+0
Function Call: WRITE	Prompt: !?A1,"",?(A1+26),"",!?A1,"***************************",! Line Location: LHD+1
Function Call: WRITE	Prompt: !! Condition for execution: LAB=2 Line Location: LHD+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD(115.02	CUR+1
^DPT - [#2]	L2+2
^FH(111 - [#111]	T2+10, T2+12, CUR+2
^FH(119.4 - [#119.4]	L2+6
^FH(119.73 - [#119.73]	FHORX1B+12, FHORX1B+13
^FHPT - [#115]	L2+4, L2+7
^TMP($J	FHORX1B+9, FHORX1B+16!, LST, LST1+1, T2+1, T2+2

Name	Line Occurrences
CUR	L2+7
L1	LST
L2	LST+2
LHD	FHORX1B+7
LL	WRT+1
LST	FHORX1B+9
LST1	FHORX1B+11
T2	LST1+1
WRT	LST+2, T2+16

Name	Field # of Occurrence
^(	LST
^(0	L2+4

Local Variables

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	CUR+1*
>> A1	LHD, LHD+1, CUR+2
>> ACT	L1+1*, L1+4, L1+5, L1+7, L1+8
>> ADM	L1+1*, L1+4, L1+5, L1+8, L2+4, L2+7
>> ALG	WRT*, WRT+3
>> BID	T2+5, WRT+2, LL+1
>> COUNT	FHORX1B+8*
>> D3	CUR+2*
>> DA	LST*
>> DFN	L2+1, L2+2
>> FH8	T2+1*, T2+2
>> FHACTI	T2+3*, T2+4
>> FHDES1	T2+8*, T2+9
>> FHDESC	T2+6*, T2+8
>> FHDFN	L2*, L2+4, L2+7
>> FHDIDA	T2+10*, T2+11, T2+12
>> FHDIET	T2+9, T2+10, T2+12, T2+14
>> FHDU	CUR+1*
>> FHII	FHORX1B+13*
>> FHIO("EOF"	WRT+3, WRT+5
>> FHIO("EON"	WRT+3
>> FHLD	CUR*, CUR+1
>> FHOR	CUR*, CUR+2
>> FHORD	LST+2, L1+1, L1+2, L1+4, L1+5, L1+8, L2+4*, L2+5, L2+7
>> FHP	FHORX1B+12, FHORX1B+13
>> FHTDAT	T2+2*, T2+3, T2+5, T2+6, T2+7
>> H1	WRT+5, LHD
>> IS	L2+4, L2+6
>> L	FHORX1B+15, WRT+4
>> LAB	FHORX1B+7, FHORX1B+14, FHORX1B+15, WRT+1, WRT+3, WRT+4, WRT+5, LHD, LHD+1
>> LINE	FHORX1B+8*
>> LOC	LST, LST+1, LST1+1, L1+7, T2+1
>> N1	L2+3, T2+15, WRT+2
>> NN	FHORX1B+9, L1+2
>> NOW	FHORX1B+12, FHORX1B+13
>> NP	LST, LST1+1, L1+8, T2+1, WRT+2, LL+1
>> P0	FHORX1B+9, LST, LST1+1, L2, T2+1, T2+2, T2+15
PP	LST!, LST+2, LST1+1!, T2+1!
PP(	L1+4!, L1+5!, L1+8
>> R1	L2, T2+15, WRT+3
>> S2	FHORX1B+7*, WRT+2, WRT+3, WRT+4, WRT+5, LHD
>> TC	L2+4, L2+6, T2+7*, WRT+3, LL+1
>> TXT	L1+1*, L1+5, L1+8
>> TYP	L1+1*, L1+2, L1+3, L1+4, L1+5, L1+6, L1+8
U	T2+12
>> W1	L2, T2+15, WRT+2
>> X	L2+7*, CUR
>> X1	LL+1*
>> Y	T2+14, WRT+3, WRT+4, CUR, CUR+1, CUR+2
>> Y0	L2+2*, L2+3
>> Z	LST*, L1+1

Customize PDF page

Package: Dietetics

Routine: FHORX1B

Information

Source Information

Call Graph

Call Graph Total: 5

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
LHD
CUR
LST1	;process outpatient
LL	;
T2	;get the last outpatient entry.
WRT
LST
L2
L1	; Process event for inpatient