Routine: FHOMPP

Package	Total	Call Graph
Dietetics	5	ALG^FHCLN CHECK^FHOMDPA (,PAD)^FHOMPP1 DISP^FHOMRR1 PATNAME^FHOMUTL
Kernel	3	^%ZIS ^%ZISC ^%ZTLOAD
VA Fileman	1	^DIR

Package

Total

Call Graph

Dietetics

ALG^FHCLN CHECK^FHOMDPA (,PAD)^FHOMPP1 DISP^FHOMRR1 PATNAME^FHOMUTL

Kernel

^%ZIS ^%ZISC ^%ZTLOAD

VA Fileman

^DIR

Package	Total	Caller Graph
Dietetics	3	FHOMPP1 FHORD6 FHWOR71

Package

Total

Caller Graph

Dietetics

FHOMPP1 FHORD6 FHWOR71

Name	Comments	DBIA/ICR reference
DISP	;
END	;
HDR	;
NEWL	;New line before next line of text in ^TMP global
DEV	;get device and set up queue
PG	;
CPRS	; Call from FHWOR71 to get outpatient profile for CPRS ; Data is returned in ^TMP($J,"FHPROF",DFN,FHX)

Name	Field # of Occurrence
^%ZIS	DEV+1
^%ZISC	DEV+2, DEV+6
^%ZTLOAD	DEV+5
^DIR	DISP+24, PG+1
ALG^FHCLN	DISP+2, CPRS+7
CHECK^FHOMDPA	CPRS+2
^FHOMPP1	CPRS+27
PAD^FHOMPP1	CPRS+6
DISP^FHOMRR1	DISP+23
PATNAME^FHOMUTL	HDR+2, CPRS+3

Interaction Calls

Name	Line Occurrences
Function Call: WRITE	Prompt: ! Line Location: DEV+1
Function Call: WRITE	Prompt: !!,"Allergies: ",ALG Line Location: DISP+2
Function Call: WRITE	Prompt: !!,"Food Preferences Currently on file: " Line Location: DISP+13
Function Call: WRITE	Prompt: !!?20,"Likes" Line Location: DISP+14
Function Call: WRITE	Prompt: !!,^TMP($J,"L",FHM,FHP) Line Location: DISP+16
Function Call: WRITE	Prompt: !!?20,"Dislikes" Line Location: DISP+17
Function Call: WRITE	Prompt: !!,^TMP($J,"D",FHM,FHP) Line Location: DISP+19
Function Call: WRITE	Prompt: !!,"Isolation/Precaution type is ",$P($G(^FH(119.4,FHIPX,0)),"^",1) Line Location: DISP+21
Function Call: WRITE	Prompt: !!,"Recurring Meals on File: " Line Location: DISP+22
Function Call: WRITE	Prompt: ! Line Location: DISP+23
Function Call: WRITE	Prompt: ! Line Location: DISP+24
Function Call: WRITE	Prompt: !!,"OUTPATIENT NAME: " Line Location: HDR+2
Function Call: WRITE	Prompt: FHPTNM," ",FHSSN Line Location: HDR+2
Function Call: WRITE	Prompt: ?65,FHSEX," Age ",FHAGE Line Location: HDR+3
Routine Call	DIR Line Location: DISP+24 PG+1
Routine Call	%ZIS Line Location: DEV+1

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^FH(115.2 - [#115.2]	DISP+9, DISP+10, CPRS+14, CPRS+15
^FH(119.4 - [#119.4]	DISP+21
^FHPT - [#115]	DISP+3, DISP+4, DISP+21, CPRS+8, CPRS+9
^TMP($J	DISP+3!, DISP+11, DISP+14, DISP+15, DISP+16, DISP+17, DISP+18, DISP+19, CPRS+3!, CPRS+5 , CPRS+6, CPRS+7, CPRS+16, CPRS+18, CPRS+19, CPRS+20, CPRS+21, CPRS+22, CPRS+23, CPRS+24 , CPRS+26, NEWL+1

Name	Line Occurrences
DEV	FHOMPP+2
DISP	DEV+2
END	DEV+2, DEV+7
HDR	DISP+1, PG+2
NEWL	CPRS+7, CPRS+18, CPRS+19, CPRS+21, CPRS+22, CPRS+24, CPRS+26
PG	DISP+16, DISP+19, DISP+21, DISP+22

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
%ZIS	DEV+1!*, DEV+6!
>> ALG	DISP+2, CPRS+7
>> DFN	CPRS+2, CPRS+5, CPRS+6, CPRS+7, CPRS+18, CPRS+19, CPRS+21, CPRS+22, CPRS+24, CPRS+26 , NEWL+1
DIR	DISP+24!, PG+1!
DIR(0	DISP+24, PG+1
DT	DISP+23, CPRS+27
>> EX	DISP+1, DISP+15, DISP+16, DISP+18, DISP+19, DISP+21, DISP+22, DISP+24, PG+1
>> FHAGE	HDR+3, CPRS+6
>> FHB	CPRS+4*
>> FHDFN	DISP+3, DISP+4, DISP+21, CPRS+2, CPRS+8, CPRS+9
>> FHFP	DISP+3, DISP+4, CPRS+8, CPRS+9
>> FHFPIEN	DISP+5, DISP+6, DISP+9, DISP+10, DISP+11, CPRS+10, CPRS+11, CPRS+14, CPRS+15, CPRS+16
>> FHFPLD	DISP+9, DISP+11, CPRS+14, CPRS+16
>> FHFPNM	DISP+10, DISP+11, CPRS+15, CPRS+16
>> FHFPZN	DISP+4, DISP+5, CPRS+9, CPRS+10
>> FHIPX	DISP+21*
>> FHJ	CPRS+6*
FHM	DISP+15, DISP+16, DISP+18, DISP+19, END+1!, CPRS+20, CPRS+21, CPRS+23, CPRS+24
>> FHMEAL	DISP+5, DISP+7, DISP+8, DISP+11, CPRS+10, CPRS+12, CPRS+13, CPRS+16
>> FHNORD	DISP+7, DISP+8, CPRS+12, CPRS+13
FHP	DISP+16, DISP+19, END+1!, CPRS+21, CPRS+24
FHPP	DISP+23*!
>> FHPTNM	HDR+2, CPRS+5
>> FHQTY	DISP+5, DISP+11, CPRS+10, CPRS+16
>> FHSEX	HDR+3, CPRS+6
>> FHSSN	HDR+2, CPRS+5
FHT	END+1!
>> FHX	CPRS+3, CPRS+5, CPRS+6, CPRS+7, CPRS+18, CPRS+19, CPRS+21, CPRS+22, CPRS+24, CPRS+26 , NEWL+1, NEWL+2*
>> FHZ115	CPRS+2*
>> I	CPRS+4*
IO	DEV+2
IO("Q"	DEV+2
IOF	HDR+1
IOP	DEV+1!, DEV+6!
IOSL	DISP+16, DISP+19, DISP+21, DISP+22
IOST	DISP+24, PG+1
>> N	CPRS+3, CPRS+7, CPRS+18, CPRS+19, CPRS+21, CPRS+22, CPRS+24, CPRS+26, NEWL+1
>> PAD	CPRS+6
>> POP	DEV+1
>> STDT	DISP+23, CPRS+27
U	DISP+5, DISP+9, DISP+10, DISP+15, DISP+16, DISP+18, DISP+19, DISP+21, DISP+22, DISP+24 , PG+1, CPRS+10, CPRS+14, CPRS+15
>> Y	PG+1
>> ZTDESC	DEV+5*
>> ZTRTN	DEV+3*
>> ZTSAVE("FHDFN"	DEV+4*

Customize PDF page

Package: Dietetics

Routine: FHOMPP

Information

Source Information

Call Graph

Call Graph Total: 9

Caller Graph

Caller Graph Total: 3

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Local Variables

Legend: