Routine: FHCTF3

Package	Total	Call Graph
Dietetics	12	(DTP,TR)^FH EN31^FHASE FILE^FHCTF2 CLN^FHCTF4 PID^FHDPA L1^FHNO7 CHECK^FHOMDPA PATNAME^FHOMUTL POST^FHORC D1^FHORC2 (C2,CUR)^FHORD7 DIS^FHORT2
VA Fileman	2	NOW^%DTC ^DIC
Order Entry Results Reporting	1	ST^ORX

Package	Total	Caller Graph
Dietetics	1	FHCTF2

Entry Points

External References

Name	Field # of Occurrence
NOW^%DTC	E0+1
^DIC	E0, C2
DTP^FH	DI+6
TR^FH	ASK+2, S1, C1, T1, DI+7, N1
EN31^FHASE	C11+3
FILE^FHCTF2	C2+3
CLN^FHCTF4	E0+1
PID^FHDPA	HDR
L1^FHNO7	SF+4
CHECK^FHOMDPA	E1
PATNAME^FHOMUTL	E1+1
POST^FHORC	C2+6
D1^FHORC2	CN+2
C2^FHORD7	DI+2
CUR^FHORD7	SF+2
DIS^FHORT2	TF+2
ST^ORX	C11

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: E0+0
Function Call: WRITE	Prompt: !!,"No Tickler File Entries" Line Location: OUT+0
Function Call: WRITE	Prompt: ! Line Location: OUT+1
Function Call: WRITE	Prompt: !,FHCNT,".",?4,$P(FHTF,U,3)," Date: ",Y Line Location: CL2+9
Function Call: READ	Timeout: DTIME Variable: FHNM Line Location: ASK+0
Function Call: WRITE	Prompt: *7,!!,"Enter an entry, or group of entries separated by a comma, or 'A' for all entries, or Return to bypass!" Line Location: ASK+7
Function Call: READ	Prompt: "Is Order OK? Y// " Formatting: !! Timeout: DTIME Variable: YN Line Location: S1+0
Function Call: WRITE	Prompt: *7," Answer YES or NO" Line Location: S1+0
Function Call: READ	Timeout: DTIME Line Location: C1+0
Function Call: WRITE	Prompt: *7,!,"Enter C, X or R or Press RETURN to bypass" Line Location: C1+0
Function Call: WRITE	Prompt: ! Line Location: C2+0
Function Call: READ	Prompt: "Is Order OK? Y// " Formatting: !! Timeout: DTIME Variable: YN Line Location: T1+0
Function Call: WRITE	Prompt: *7," Answer YES or NO" Line Location: T1+0
Function Call: WRITE	Prompt: !!,"No current order" Line Location: DI+3
Function Call: WRITE	Prompt: !,"Service: ",$S(TYS="T":"Tray",TYS="D":"Dining Room",1:"Cafeteria") Line Location: DI+5
Function Call: WRITE	Prompt: !,"Expires: ",DTP Line Location: DI+6
Function Call: READ	Prompt: "Is Order OK? Y// " Formatting: !! Timeout: DTIME Variable: YN Line Location: DI+7
Function Call: WRITE	Prompt: *7," Answer YES or NO" Line Location: DI+7
Function Call: WRITE	Prompt: !!,"Current Status: ",$P($G(^FH(115.4,+S,0)),"^",2) Line Location: NS+2
Function Call: READ	Prompt: "Is Status OK? Y// " Formatting: !! Timeout: DTIME Variable: YN Line Location: N1+0
Function Call: WRITE	Prompt: *7," Answer YES or NO" Line Location: N1+0
Function Call: WRITE	Prompt: !!,$P(FHTF,"^",3) Line Location: MO+1
Function Call: READ	Prompt: "Action Taken: " Formatting: !! Timeout: DTIME Variable: MOCOM Line Location: M1+0
Function Call: WRITE	Prompt: *7," ??" Line Location: M1+0
Function Call: WRITE	Prompt: *7,!,"Required entry: document action (up to 60 characters) or ^ to bypass." Line Location: M1+1
Function Call: WRITE	Prompt: " ... done" Line Location: DNE+0
Function Call: WRITE	Prompt: ?40,$S($P(Y0,"^",2)="F":"Female",1:"Male") Line Location: HDR+1
Function Call: WRITE	Prompt: " Age ",AGE Line Location: HDR+2
Function Call: WRITE	Prompt: ?(79-$L(X)),X Line Location: HDR+5
Function Call: WRITE	Prompt: !,LN Line Location: HDR+6
Routine Call	DIC Line Location: E0 C2

FileMan Files Accessed Via FileMan Db Call

FileNo	Call Tags
^VA(200 - [#200]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	CL2+8
^DPT - [#2]	HDR, HDR+5
^FH(115.4 - [#115.4]	NS+2
^FH(119 - [#119]	E1, CL2+1, D1+3, D1+6, S+1!, D+1!, T+1!, N+1!, M+2!, C11+2! , C2+3!
^FH(119.6 - [#119.6]	C2+5, HDR+4
^FHPT - [#115]	CL2+4, S, D, T, N, M+1, D2+2, SF+4, CN+1, C11+2 , C2+2*, DI+4, DI+6, NS+1, HDR
^FHPT("ADRU"	C11+1!, C2+1!*
^TMP($J	E0!, E1+2*, CL0, CL1, KIL+1!
^VA(200 - [#200]	E0

Label References

Name	Line Occurrences
@(	D1+7
ASK	CL1, ASK+8
C1	C1
C2	C1+1
CL0	CL1+1
CL1	CL0
CL2	CL1
CN	D2+3
D1	ASK+10, ASK+12, DI+7
D2	D1+3
DI	D2+3
DNE	D1+8, C11+3, C2+7
E0	E0
HDR	CL2+5
KIL	E0, OUT, OUT+1
M1	M1, M1+1
MO	D2+3
N1	N1
NS	D2+3
OUT	CL0
S1	S1
SF	D2+3
T1	T1
TF	D2+3

Naked Globals

Name	Field # of Occurrence
^(	E1
^(1	DI+4

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	E0+1
A1	KIL+2!
ADM	CL2+2, CL2+4, D1+6, S, D, T, M+1, D2*, D2+2, SF+4 , CN+1, C11+1, C11+2, C2+1, C2+2, DI+4, DI+6, KIL+1!
AGE	HDR+2*, KIL+1!, KIL+3!
ALL	CN+1*, KIL+3!
BID	HDR, KIL+1!
CNT	E0+1, OUT, CL2+3, D2+1*, KIL+1!
COM	DI+4*, KIL+4!
>> CON	C2+6
D3	KIL+3!
DDH	KIL+2!
DFN	E1, CL2+2, CL2+4, D1+6, D2, D2+2, HDR*, HDR+5, KIL+1!
DIC	E0!, C2!, KIL+3!
DIC("A"	E0, C2
DIC("B"	E0*
DIC(0	E0, C2
DIR	KIL+2!, KIL+3!
DT	E0+1*, HDR+2
DTE	KIL+2!
DTIME	ASK, S1, C1, T1, DI+7, N1, M1
>> DTOUT	E0, C2
DTP	CL2+2, CL2+8, D1+6, D2, DI+6, KIL+2!
DUZ	E0, S, D, T, N, M+1, C11+2
F1	N, M+1, NS+1, KIL+3!
FHA	KIL+2!
FHAGE	KIL+1!
FHASK	ASK+3, ASK+7, ASK+8, KIL+2!
FHBID	KIL+1!
FHCHK	ASK+3!, KIL+3!
FHCHK(	ASK+5*, ASK+7
FHCLR	CL1!, KIL+1!
FHCLR(	CL2+7*, ASK+5, ASK+10, ASK+11, ASK+12, ASK+13
FHCNT	CL1, CL2+5, CL2+6, CL2+7, CL2+9, KIL+1!
FHDFN	E1, E1+2, CL1*, CL2+4, S, D, T, N, M+1, D2+2 , SF+4, CN+1, C11+1, C11+2, C2+1, C2+2, DI+4, DI+6, NS+1, HDR , KIL+1!
FHDOB	KIL+1!
FHDR	CN+1*, C11+1, C11+2, C2+1, C2+2, KIL+3!
FHDU	KIL+4!
FHDUZ	E0, E1, CL2+1, D1+3, D1+6, S+1, D+1, T+1, N+1, M+2 , C11+1, C11+2, C2+1, C2+3, KIL+1!
FHENT	ASK+6, ASK+13, KIL+2!
FHI	CL1, CL2, CL2+1, CL2+7, ASK+5, KIL+1!
FHI115	KIL+4!
FHIEN	ASK+11!, ASK+13!, KIL+2!
FHIEN(	ASK+11, ASK+13, D1+5
FHIEN(0	D1+1
FHII	ASK+11, ASK+13, KIL+2!
FHLD	KIL+2!
FHNM	ASK, ASK+1, ASK+2, ASK+4, ASK+6, ASK+10, ASK+12, ASK+13, KIL+1!
FHNUM	ASK+6*, ASK+7, KIL+2!
FHOR	KIL+3!
FHORD	D, DI+1*, DI+2, DI+3, DI+4, KIL+2!
FHPCZN	KIL+1!
FHPTNM	E1+2, E1+3, CL0, CL1, KIL+1!
FHQT	E0+1, CL0, OUT, ASK, KIL+1!
FHSEX	KIL+1!
FHSSN	KIL+1!
FHSV	C2+3*, KIL+3!
FHTDAT	KIL+4!
FHTF	E1, CL2+1, CL2+2, CL2+9, D1+3, D1+6, M+1, D2, SF+1, CN+1 , TF+1, DI+1, NS+1, MO+1, KIL+1!, KIL+2!
FHTICK	D1+1*, D1+2, D1+3, KIL+3!
FHTYP	ASK+4, ASK+5, ASK+9, ASK+10, ASK+11, ASK+12*, ASK+13, KIL+3!
FHTYPSV	ASK+9, ASK+10, ASK+11, ASK+12, ASK+13*, D1+7, KIL+3!
FHWRD	CL2+4, D2+2, C2+5, HDR+4, KIL+1!
FHZ115	E1*, KIL+1!
FILE	KIL+1!
FLAG	KIL+2!
I	KIL+4!
IEN	KIL+2!
IEN200	KIL+3!
K	KIL+2!
LLL	E1, E1+2, D1+5, D1+6, S+1, D+1, T+1, N+1, M+2, C11+2 , C2+3, KIL+2!
LN	E0+1*, HDR+6, KIL+2!
MOCOM	M+1, M1*, M1+1, KIL+3!
NO	S, SF+1*, SF+4, KIL+3!
NOW	E0+1*, S, D, T, N, M+1, C11+2, KIL+2!
>> ORIFN	C11
>> ORSTS	C11*
PID	KIL+2!
QT	E0+1, CL1, CL2, ASK+1, D1+4, S1, S1+1, C1, C2, T1* , T1+1, DI+7, DI+8, N1, N1+1, M1, KIL+2!
QUA	KIL+3!
QUAFI	KIL+2!
QUASE	KIL+3!
REASK	KIL+3!
REQ	C2+6*, KIL+4!
>> S	NS+1*, NS+2
STR	KIL+3!
T	KIL+3!
>> TF	T, TF+1*
TF2	KIL+3!
TFCOM	KIL+3!
TUN	KIL+3!
TYP	CL2+2, CL2+7, D1+6, D2, D2+3, C1, C1+1, C11, C11+2, C11+3 , HDR1, KIL+2!
TYS	DI+5*, KIL+3!
U	E1, CL0, OUT, CL1, CL2, CL2+9, ASK, ASK+1, D1+4, S1+1 , T1+1, DI+8, N1+1, HDR
W1	KIL+2!
WARD	C2+4, C2+5, HDR+3, HDR+4, HDR+5, KIL+2!
X	E0, CL2+2, ASK+2, D1+6, D2, S1, C1, T1, DI+5, DI+7 , N1, HDR+5, HDR1*, KIL+2!
X1	KIL+4!
>> XMKK	C2*, C2+1, C2+2, C2+3
Y	E0, CL2+8, CL2+9, SF+3, SF+4, CN+1, C2, DI+2, NS+1, KIL+2!
Y0	HDR*, HDR+1, HDR+2, KIL+3!
YN	S1, S1+1, T1, T1+1, DI+7, DI+8, N1, N1+1, KIL+2!
YO	KIL+2!

Customize PDF page

Package: Dietetics

Routine: FHCTF3

Information

Source Information

Call Graph

Call Graph Total: 15

Caller Graph

Caller Graph Total: 1

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend:

Name	Comments	DBIA/ICR reference
HDR
DI	; Diet
S1
M1
C11
CN	; Clear Consult
HDR1
TF	; Tubefeed
C2
C1
NS	; Status
E1
E0
CL2
OUT
DNE
C	;
D
M	;
N
ASK
S
T
N1
T1
CL0
MO	; Monitor
CL1
KIL	;clean variables
D2
SF	; Clear Supplemental Feeding
D1	;