Routine: FHSEL2

Information

FHSEL2 ; HISC/REL/NCA/FAI - Tabulate Patient Preferences ;10/29/04 7:19

Call Graph

Call Graph Total: 9

Package	Total	Call Graph
Dietetics	3	(EN2,TR)^FH E1^FHPRC1 ^FHSEL3
Kernel	3	^%ZIS ^%ZISC KILL^XUSCLEAN
VA FileMan	3	^%DT NOW^%DTC ^DIC

Caller Graph

Legends:

Package Component Superscript legend

action

extended action

^Ea

event driver

^Ed

subscriber

^Su

protocol

limited protocol

^LP

run routine

^RR

broker

edit

server

^Se

screenman

^SM

inquire

Caller Graph Total: 1

Package	Total	Caller Graph
Dietetics	1	FHSEL5

Entry Points

Name	Comments	DBIA/ICR reference
D0
D1
F1
R1
R2
Q1	; Printing Tabulated Patient Preference
Q2
Q3
KIL
W2
W3
W4
W44
D2
U1
U2
U3

External References

Name	Field # of Occurrence
^%DT	FHSEL2+3, F1
NOW^%DTC	Q1+2
^%ZIS	R2+2
^%ZISC	R2+4
^DIC	D0+1
EN2^FH	R2+3
TR^FH	D0, D1+1, R1, R2
E1^FHPRC1	F1+2
^FHSEL3	Q3+40
KILL^XUSCLEAN	KIL

Interaction Calls

Name	Line Occurrences
Function Call: READ	Formatting: !! Prompt: "Select SERVICE POINT (or ALL): " Variable: X Timeout: DTIME Line Location: D0+0
Function Call: READ	Formatting: !! Prompt: "Tabulate By Menu Specific? N// " Variable: D3 Timeout: DTIME Line Location: D1+0
Function Call: WRITE	Prompt: *7," Answer YES or NO" Line Location: D1+1
Function Call: WRITE	Prompt: ! Line Location: F1+0
Function Call: WRITE	Prompt: *7," [ Must NOT be before TODAY ]" Line Location: F1+1
Function Call: WRITE	Prompt: *7,!!,"No MENU CYCLE Defined for that Date!" Line Location: F1+2
Function Call: WRITE	Prompt: *7,!!,"MENU CYCLE DAY Not Defined for that Date!" Line Location: F1+3
Function Call: READ	Timeout: DTIME Line Location: R1+0
Function Call: WRITE	Prompt: *7,!,"Select B for Breakfast, N for Noon, E for Evening or ALL for all meals" Line Location: R1+1
Function Call: READ	Formatting: !! Prompt: "Break Down By Production Diets? N// " Variable: SRT Timeout: DTIME Line Location: R2+0
Function Call: WRITE	Prompt: *7," Answer YES or NO" Line Location: R2+0
Function Call: WRITE	Prompt: ! Line Location: R2+2
Routine Call	DIC Line Location: D0+1
Routine Call	%ZIS Line Location: R2+2

FileNo	Call Tags
^FH(119.72 - [#119.72]	Classic Fileman Calls

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^FH(111 - [#111]	W44+5
^FH(116 - [#116]	F1+3, Q2+1
^FH(116.2 - [#116.2]	W4+2, W44+6
^FH(116.3 - [#116.3]	Q2+2
^FH(119.6 - [#119.6]	Q3+2, Q3+17, Q3+27, Q3+37, W44
^FH(119.72 - [#119.72]	FHSEL2+4, W44+4
^FHPT - [#115]	Q3+9, Q3+22, Q3+32, W3, W3+1, W3+3, W4, W4+3, W44+7, U1 , U1+1, U3, U3+1!, U3+2!
^FHPT("AW"	W2, W2+1
^FHPT("GM"	Q3+20, Q3+21
^FHPT("RM"	Q3+6, Q3+7, Q3+8
^FHPT("SM"	Q3+30, Q3+31
^TMP($J	Q2!, KIL!, W4+8, W44+12

Label References

Name	Line Occurrences
D0	D0+1
D1	FHSEL2+4, D1+1
D2	Q3+2
F1	F1, F1+1, F1+2, F1+3
KIL	D0, D1, F1, R1, R2, R2+2, R2+3, R2+4
Q1	R2+4
Q2	Q1+3, Q1+4
Q3	Q2
R1	D1+2, R1+1
R2	R2
U1	W3+1, W3+2, W3+3, U3
U2	U1+1
U3	U3+1, U3+2, U3+3
W2	Q3+2
W3	W2+1
W4	W3+1
W44	Q3+18, Q3+28, Q3+38

Naked Globals

Name	Field # of Occurrence
^(	Q3+2, W2+1, W4+3, W4+8, W44+7, W44+12, U3
^(0	Q2+2, W3, W4+2, W44+6

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	Q1+2
>> %DT	FHSEL2+3, F1
>> %DT("A"	F1*
%ZIS	R2+2!*, R2+4!
%ZIS("A"	R2+2*
>> A1	W3+1, U1, U1+1, U2, U3, U3+1, U3+2
>> ADM	W2+1*, W3, W3+1, W3+3, W4, U1, U1+1, U3, U3+1, U3+2
D	Q2!
D(	D2+1*
>> D1	D1+2, F1, F1+1, Q2+2, Q3*, Q3+1, Q3+5, Q3+6, Q3+20, Q3+30
>> D2	Q3+2, W4+1, D2, D2+1
>> D3	D1, D1+1, D1+2*, Q2
>> DFN	W2+1*, W3, W3+1, W3+3, W4, W4+3, U1, U1+1, U3, U3+1 , U3+2
DIC	D0+1!*
DIC(0	D0+1*
DT	FHSEL2+3*, F1+1
DTIME	D0, D1, R1, R2
>> DTOUT	F1
>> FHCY	D1+2*, F1+2, F1+3, Q2+1
>> FHD1	Q3+5*, Q3+6
>> FHDA	D1+2*, F1+3, Q2+1
>> FHDFN	Q3+7, Q3+8, Q3+9, Q3+21, Q3+22, Q3+31*, Q3+32, W44+7
>> FHDIET	Q3+11, Q3+12, Q3+13, Q3+14, Q3+24, Q3+34, W44+5
>> FHK1	Q3+6*, Q3+7, Q3+8
>> FHKD	Q3+8, Q3+9, Q3+20, Q3+21, Q3+22, Q3+30*, Q3+31, Q3+32
>> FHKDAT	Q3+9, Q3+10, Q3+11, Q3+12, Q3+13, Q3+14, Q3+22, Q3+23, Q3+24, Q3+25 , Q3+32*, Q3+33, Q3+34
>> FHLST	R2+3*
>> FHMEAL	Q3+11, Q3+15, Q3+24, Q3+26, Q3+34*, Q3+35
>> FHMLSAV	Q1+1*, Q3+15, Q3+26, Q3+35
>> FHMLZ2	W4+4, W4+5, W44+8, W44+9
>> FHORD	W3+1, W3+2, W3+3, W4, U1, U1+1*
>> FHP	FHSEL2+4, D0, D0+1*, W44+3, D2+1
>> FHPGM	R2+3*
>> FHSTAT	Q3+11, Q3+16, Q3+34, Q3+36
>> FHW1	Q3+10, Q3+17, Q3+23, Q3+27, Q3+33*, Q3+37, W44
>> FHX1	Q2+1, Q2+2, Q2+3*
IO	R2+4
IO("Q"	R2+3
IOP	R2+2!, R2+4!
>> K	W4+3, W44+7, U1*
>> K2	W3, W4+1, W4+3
>> L	D2+1*
>> LL	Q2+2*
>> MEAL	R1, R1+1, Q1+1, Q1+3, Q1+4, Q2+3, Q3+1, W4+5, W44+9
>> NOW	Q1+2*, Q3, W3+1
>> PD	W4+1, W4+2, W4+8, W44+1, W44+5, W44+6*, W44+12
>> PG	Q1+2*
>> POP	R2+2
>> QTY	W4+6, W4+8, W44+10, W44+12
S	D2!
S(	W4+1, D2+1*
>> SP	W4+1, W4+8, W44+4, W44+12
>> SRT	R2, R2+1
>> TC	W4+1, W44+1, W44+2, W44+3, W44+4
>> TIM	Q3+1*, W3+2, U1
U	Q3+10, Q3+11, Q3+12, Q3+13, Q3+14, Q3+23, Q3+24, Q3+25, Q3+33, Q3+34 , W4+4, W44+2, W44+4, W44+5, W44+8
>> W1	Q3+10, Q3+23, Q3+33*
>> WRD	Q3+2*, W2, W2+1
>> WRDN	Q3+2*
>> X	FHSEL2+3, D0, D1+1, F1, R1, R2, Q2+2, Q3+2, W4, W4+1 , W44*, W44+2, D2+1
>> X0	W3*, W3+1
>> X1	F1, W3+1, W3+2, U1+1, U2
>> X2	U3*, U3+1, U3+2
>> XX	D2+1*
>> Y	FHSEL2+3, D0+1, F1
>> Z	W4+3, W4+4, W4+6, W4+7, W4+8, W44+7, W44+8, W44+10, W44+11, W44+12

Customize PDF page

Package: Dietetics