Routine: FHMNINQ

Information

FHMNINQ ;Hines OIFO/JT,RTK - Dietetics Monitor Inquiry ;07/26/01 09:53

Package	Total	Caller Graph
Dietetics	1	FHMNINQ

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: DATE+0
Function Call: WRITE	Prompt: !,"NO ADMISSIONS FOR THIS PATIENT!" Line Location: DATE+1
Function Call: WRITE	Prompt: !,"This patient has the following admissions:",! Line Location: DATE+2
Function Call: WRITE	Prompt: !,FHINDX,?5,Y Line Location: DATE+5
Function Call: WRITE	Prompt: Y Line Location: EN+9
Function Call: WRITE	Prompt: Y Line Location: EN+11
Function Call: WRITE	Prompt: ! Line Location: EN+12
Function Call: WRITE	Prompt: ! Line Location: DEV+1
Function Call: WRITE	Prompt: ! Line Location: SELADM+1
Function Call: WRITE	Prompt: !!,"Response must be no less than 1 and no greater than ",FHINDX,"." Line Location: SELADM+5
Function Call: WRITE	Prompt: @IOF Condition for execution: $Y Line Location: HDR+1
Function Call: WRITE	Prompt: !,FHNDT,?60,"Page: " Line Location: HDR+1
Function Call: WRITE	Prompt: PG,!! Line Location: HDR+1
Function Call: WRITE	Prompt: $E($P(^DPT(DFN,0),U,1),1,28) Line Location: HDR+2
Function Call: WRITE	Prompt: ?30,$E(SSN,1,3)_"-"_$E(SSN,4,5)_"-"_$E(SSN,6,9) Line Location: HDR+3
Function Call: WRITE	Prompt: ?44,"Admission Date: " Line Location: HDR+4
Function Call: WRITE	Prompt: Y Line Location: HDR+4
Function Call: WRITE	Prompt: ! Line Location: HDR+5
Function Call: WRITE	Prompt: "=" Line Location: HDR+5
Routine Call	DIC Line Location: DATE
Routine Call	DIR Line Location: EN+12 SELADM+3 PG+1
Routine Call	%ZIS Line Location: DEV+1

FileNo	Call Tags
^DPT - [#2]	Classic Fileman Calls

Name	Line Occurrences (* Changed, ! Killed)
^DD("DD"	EN+9, EN+11, HDR+4
^DGPM("APTT1"	DATE+1, DATE+3, SELADM+6
^DPT - [#2]	HDR+2
^FHPT - [#115]	EN+3, EN+6, EN+8, EN+10

Name	Field # of Occurrence
^(0	EN+9, HDR+2

Name	Field # of Occurrence
%DT	EX!
%ZIS	DEV+1!*, DEV+8!
DFN	DATE*, DATE+1, DATE+3, EN+1, EX!, SELADM+6, HDR+2
DIC	DATE!*
DIC(0	DATE*
DIR	EN+12!, SELADM+1!, PG+1!
DIR("A"	SELADM+2*
DIR(0	EN+12, SELADM+1, PG+1*
>> DIRUT	SELADM+4
>> EX	EN+2, EN+6, EN+7, EN+12, PG+1
FHADM	DATE+7, EN+3, EN+6, EN+8, EN+10, EX!, SELADM+6*
FHDFN	EN+1, EN+3, EN+6, EN+8, EN+10, EX!
FHI	DATE+3, DATE+5, EX!, SELADM+6, HDR+4
FHINDX	DATE+3, DATE+4, DATE+5, EX!, SELADM+5
FHLST	EX!
FHLST(	DATE+5*, SELADM+6
FHNDT	EN+2*, EX!, HDR+1
>> FHZ115	EN+1*
FLG	EN+3, EN+4, EN+5, EX!
IO	DEV+2
IO("Q"	DEV+2
IOF	HDR+1
IOP	DEV+1!, DEV+8!
IOSL	EN+7
IOST	EN+12, PG+1
J	EN+6*, EN+8, EN+10, EX!
>> PG	EN+2, HDR+1
>> POP	DEV+1
SSN	EX!, HDR+2*, HDR+3
U	EN+6, EN+7, EN+8, EN+9, EN+10, EN+12, PG+1, HDR+2
X	EN+2, EX!
Y	DATE, DATE+5, EN+2, EN+9!, EN+10, EN+11, EX!, SELADM+5, SELADM+6, PG+1 , HDR+4*
>> Z	HDR+5*
>> ZTDESC	DEV+7*
>> ZTRTN	DEV+3*
>> ZTSAVE("DFN"	DEV+6*
>> ZTSAVE("FHADM"	DEV+5*
>> ZTSAVE("FHDFN"	DEV+6*
>> ZTSAVE("FHI"	DEV+4*
>> ZTSAVE("FHINDX"	DEV+4*
>> ZTSAVE("FHLST"	DEV+5*
>> ZTSAVE("FHNDT"	DEV+4*