Routine: FHASE2

Information

FHASE2 ; HISC/REL - Patient Encounter Inquiry ;4/27/93 10:08

Package	Total	Caller Graph
Dietetics	1	FHASE5

Name	Line Occurrences
Function Call: WRITE	Prompt: *7,!!?5," [ Patient has expired. ]" Line Location: FHASE2+3
Function Call: WRITE	Prompt: !!,"No Encounters on file for this patient." Line Location: FHASE2+4
Function Call: WRITE	Prompt: ! Line Location: FHASE2+5
Function Call: WRITE	Prompt: ! Line Location: FHASE2+6
Function Call: WRITE	Prompt: !!,"No Encounters recorded since ",STRT Line Location: Q1+4
Function Call: WRITE	Prompt: ! Line Location: QT+0
Function Call: WRITE	Prompt: !!,$E(DTP,1,9)," " Line Location: LST+1
Function Call: WRITE	Prompt: Y Line Location: LST+1
Function Call: WRITE	Prompt: Y Line Location: LST+1
Function Call: WRITE	Prompt: !,"Clinician: ",Y Line Location: LST+2
Function Call: WRITE	Prompt: ?40,"Location: ",Y Line Location: LST+3
Function Call: WRITE	Prompt: !?11,Y Line Location: LST+4
Function Call: WRITE	Prompt: !?11,$S(Y="G":"Group",1:"Individual") Line Location: LST+5
Function Call: WRITE	Prompt: ", ",Y," collateral" Line Location: LST+5
Function Call: WRITE	Prompt: "s" Condition for execution: Y>1 Line Location: LST+5
Function Call: READ	Prompt: "Press RETURN to continue " Formatting: !! Timeout: DTIME Variable: QT Line Location: HDR+2
Function Call: WRITE	Prompt: !,DTP,?13,"P A T I E N T D I E T E T I C E N C O U N T E R S",?73,"Page ",PG Line Location: H1+1
Function Call: WRITE	Prompt: !!,PID,?18,NAM Line Location: H1+2
Routine Call	%ZIS Line Location: FHASE2+6

Name	Line Occurrences (* Changed, ! Killed)
^DPT - [#2]	FHASE2+3, Q1+1
^FH(115.6 - [#115.6]	LST+1
^FHEN - [#115.7]	LST
^FHEN("AP"	FHASE2+4, Q1+3
^SC - [#44]	LST+3
^VA(200 - [#200]	LST+2, LST+7, LST+8

Name	Field # of Occurrence
>> %	Q1+1
%DT	FHASE2+5!*
%DT("A"	FHASE2+5*
%DT(0	FHASE2+5*
%ZIS	FHASE2+6*!, FHASE2+8!
%ZIS("B"	FHASE2+6*
>> ALL	FHASE2+2*
>> ASN	Q1+3*, LST
>> DFN	FHASE2+2, FHASE2+3, FHASE2+4, Q1+1, Q1+3, LST
DT	Q1+1*, H1
>> DTE	FHASE2+5, Q1+2, Q1+3
DTIME	HDR+2
>> DTOUT	FHASE2+5
>> DTP	Q1+2, LST+1, LST+7, LST+8, H1*, H1+1
>> FHLST	FHASE2+7*
>> FHPGM	FHASE2+7*
IO	FHASE2+8
IO("Q"	FHASE2+7
IOF	H1
IOP	FHASE2+6!, FHASE2+8!
IOSL	Q1+3
IOST	HDR+1, H1
>> N1	Q1+1, Q1+3, Q1+4
>> NAM	Q1+1*, H1+2
>> PG	Q1+1, HDR+2, H1, H1+1
>> PID	H1+2
>> POP	FHASE2+6
>> QT	Q1+1, Q1+3, HDR+1, HDR+2*
>> STRT	Q1+2*, Q1+4
>> X0	LST*, LST+1, LST+2, LST+3, LST+4, LST+5, LST+7, LST+8
>> X1	LST*, LST+5, LST+6
>> Y	FHASE2+5, Q1+1, LST+1, LST+2, LST+3, LST+4, LST+5, LST+6, LST+7, LST+8