Routine: FHSP1

Package	Total	Call Graph
Dietetics	5	(DTP,EN2,TR)^FH DPLL^FHLABEL PATNAME^FHOMUTL OPFILE^FHORX ^FHSP11
Kernel	3	^%ZIS ^%ZISC KILL^XUSCLEAN
VA Fileman	3	NOW^%DTC ^DIC ^DIR

Package	Total	Caller Graph
Dietetics	5	FHSP FHSP7 FHSP8 FHSPED FHSPTAB

Entry Points

Name	Comments	DBIA/ICR reference
Q1	; Print Standing Orders List or Labels
Q2
HDR	; Header for Consolidated List
EVNT
DP
CON
PR
PP
HDR1	; Header for Standing Order List
A1
LST
SOR
C2
C1
C0
E1	; Set Consolidated List flag
E3
E2	; Set Print Label flag
P0
CHK
ADD
KIL
ADDO	;process outpatient STANDING ORDER for consolidated, print labels and tabulated reports.
D5
D2
D3
D0

External References

Name	Field # of Occurrence
NOW^%DTC	Q1+1
^%ZIS	PR
^%ZISC	PR+2
^DIC	D0+1
^DIR	D5
DTP^FH	Q1+2, Q2+6, EVNT+1, EVNT+2
EN2^FH	PR+1
TR^FH	D0, D2, D3
DPLL^FHLABEL	Q1+7
PATNAME^FHOMUTL	A1
OPFILE^FHORX	EVNT+3
^FHSP11	Q2+5
KILL^XUSCLEAN	KIL

Interaction Calls

Name	Line Occurrences
Function Call: READ	Prompt: "Select SERVICE POINT (or ALL): " Formatting: !! Timeout: DTIME Variable: X Line Location: D0+0
Function Call: READ	Timeout: DTIME Line Location: D2+0
Function Call: WRITE	Prompt: *7,!,"Enter B for Breakfast, N for Noon, E for Evening or ALL for all meals" Line Location: D2+1
Function Call: READ	Prompt: "Consolidated List Only? Y//" Formatting: !! Timeout: DTIME Variable: X Line Location: D3+0
Function Call: WRITE	Prompt: *7," Answer YES or NO" Line Location: D3+0
Function Call: WRITE	Prompt: ! Line Location: D5+0
Function Call: WRITE	Prompt: ! Line Location: PR+0
Function Call: WRITE	Prompt: ! Line Location: Q1+8
Function Call: WRITE	Prompt: !?(80-30\2),$J(Z,6)," ",$P(^FH(118.3,KK,0),"^",1) Line Location: LST+0
Function Call: WRITE	Prompt: !!,"# OF PATIENTS",?31 Line Location: CON+4
Function Call: WRITE	Prompt: $S(Z:$J(Z,6),1:$J("",6))," " Line Location: CON+5
Function Call: WRITE	Prompt: $S(N1:$J(N1,6),1:$J("",6)) Line Location: CON+6
Function Call: WRITE	Prompt: !,$P($G(^FH(118.3,KK,0)),"^",1),?31 Line Location: SOR+1
Function Call: WRITE	Prompt: $S(Z:$J(Z,6),1:$J("",6))," " Line Location: SOR+2
Function Call: WRITE	Prompt: $S(Z1:$J(Z1,6),1:$J("",6)) Line Location: SOR+3
Function Call: WRITE	Prompt: !!?(80-21\2),"** PATIENTS = ",N1," **",! Line Location: PP+0
Function Call: WRITE	Prompt: !,DTR,?(L1-11),"Page ",PG,!!?(L1-55\2),"C O N S O L I D A T E D S T A N D I N G O R D E R S",!!?(L1-$L(DTE)\2),DTE,!!?29 Line Location: HDR+2
Function Call: WRITE	Prompt: S(X,K) Line Location: HDR+3
Function Call: WRITE	Prompt: " TOTAL",! Line Location: HDR+4
Function Call: WRITE	Prompt: !,DTR,?69,"Page ",PG,!!?20,"S T A N D I N G O R D E R S L I S T" Line Location: HDR1+1
Function Call: WRITE	Prompt: !?(80-$L(N2)\2),N2,!?(80-$L(DTE)\2),DTE,! Line Location: HDR1+2
Routine Call	DIC Line Location: D0+1
Routine Call	DIR Line Location: D5
Routine Call	%ZIS Line Location: PR

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name	Line Occurrences (* Changed, ! Killed)
^DG(405.4 - [#405.4]	ADDO+7
^DPT - [#2]	A1+1
^FH(118.3 - [#118.3]	LST, CON+3, SOR+1, EVNT+3
^FH(119.4 - [#119.4]	CHK+1
^FH(119.6 - [#119.6]	Q2+1, DP+1, P0, ADDO+13
^FH(119.72 - [#119.72]	E3, Q2+8, CON+1
^FH(119.9 - [#119.9]	Q1+3
^FHPT - [#115]	ADD+1, CHK, C0, C0+1, C2, C2+1!, ADDO+3, ADDO+10
^FHPT("ASP"	ADD+1
^FHPT("ASPO"	ADDO+2, ADDO+9
^FHPT("AW"	Q2+1
^TMP($J	Q1+1!, A1+1, ADDO+24, KIL!

Label References

Name	Line Occurrences
A1	ADD+1
ADD	Q2+1
ADDO	Q2+3
C0	C2+1
C1	CHK, C0+1, C2+1
C2	CHK+2, C0, C2+1
CHK	ADD+1
CON	Q2+7
D0	D0+1
D2	E3, D2+1
D3	D3
D5	D2+2
DP	Q2+1
E3	E1+1
HDR	CON+2, SOR
HDR1	LST
KIL	D0, D2, D3, PR, PR+1, PR+2
LST	Q2+9
P0	Q2+1
PP	LST+2
Q1	PR+2
Q2	Q1+5, Q1+6
SOR	CON+3

Local Variables

Legend:

>>	Not killed explicitly
*	Changed
!	Killed
~	Newed

Name	Field # of Occurrence
>> %	Q1+1
%ZIS	PR*!, PR+2!
%ZIS("A"	PR*
A1	Q2+9, C1!, C2, C2+1
>> ADM	Q2+1, ADD, ADD+1, CHK, C0, C0+1, C2, C2+1, ADDO+22
C	Q1+1!, Q2+10!, CON+7!
C(	A1+3, LST+1, CON+5, ADDO+26
>> CHK	Q1+1*
>> COUNT	Q1+2*
D	Q1+1!, Q2+10!, CON+7!
D(	Q2+8, DP+1*, CON+1
>> D3	D2+2, D3+1, D5+2, PR, Q1+8, Q2+7
>> DFN	A1, A1+1
DIC	D0+1!*
DIC(0	D0+1*
DIR	D5!
DIR("A"	D5*
DIR("B"	D5*
DIR(0	D5*
>> DIRUT	D5+1
>> DP	Q2+1, C0+2, DP, DP+1
DT	Q1+1*, Q2+6, ADDO+6
>> DTE	Q2+6*, HDR+2, HDR1+2
DTIME	D0, D2, D3
>> DTP	Q1+2, Q2+6, EVNT+1, EVNT+2
>> DTR	Q1+2*, HDR+2, HDR1+1
>> FHACT	EVNT+3*
>> FHALML	EVNT+3
>> FHCNSOF	EVNT
>> FHDATE	ADDO+4*, ADDO+6
>> FHDFN	Q2+1, ADD+1, A1+1, A1+3, CHK, C0, C0+1, C2, C2+1, ADDO+22 , ADDO+24, ADDO+26
>> FHDT1	EVNT+1
>> FHDT2	EVNT+2
>> FHDTP	EVNT, EVNT+1, EVNT+2*, EVNT+3
>> FHI	ADDO+2*, ADDO+3, ADDO+9, ADDO+10, ADDO+22
>> FHJ	ADDO+2*, ADDO+3, ADDO+9, ADDO+10, ADDO+22
>> FHLOC	ADDO+8*, ADDO+13
>> FHLOCN	EVNT+3
>> FHLODAT	ADDO+12, ADDO+13, ADDO+14
>> FHLST	PR+1*
>> FHMLOUT	ADDO+20*, ADDO+21
>> FHMLSAV	Q1+4*
>> FHOPDAT	ADDO+3*, ADDO+4, ADDO+5, ADDO+7, ADDO+8, ADDO+20
>> FHOPT	E1+1, E2+1, D2+2, Q1+3, Q2+5, A1+1, ADDO+24, ADDO+26, ADDO+27
FHORD	A1+2, A1+3, CHK, C0, C0+1, C1!, C2+1, ADDO+25, ADDO+26, ADDO+27
>> FHP	E3, D0, D0+1*, DP+1, ADDO+17, ADDO+18, ADDO+19
>> FHPGM	PR+1*
>> FHSER1	ADDO+12, ADDO+14, ADDO+15, ADDO+17
>> FHSER2	ADDO+12, ADDO+14, ADDO+16, ADDO+18
>> FHSERV	ADDO+12*
>> FHSRFLG	ADDO+12, ADDO+17, ADDO+18*, ADDO+19
>> FHTXT	EVNT+3*
IO	PR+2
IO("Q"	PR+1
IOF	HDR+1, HDR1+1
IOP	PR!, PR+2!
>> IOS	Q1+3
IOSL	LST, SOR
IOST	HDR+1, HDR1+1
>> IS	A1+1, CHK, CHK+1, ADDO+1*, ADDO+24
K	Q2+8, Q2+9, C1!, C2, LST, LST+1, CON+1, CON+5, SOR+2, HDR+3*
>> K2	ADD+1, A1+1, CHK, C0+2, ADDO+9, ADDO+10, ADDO+24
>> KK	LST, CON+3, SOR+1, SOR+2
>> L	Q1+8, DP+1
>> L1	CON, CON+1, CON+2*, HDR+2
>> LAB	Q1+3*, Q1+7
LABSTART	D5!, D5+1*
>> LINE	Q1+2*
>> M1	A1+2, A1+3, ADDO+25, ADDO+26, ADDO+27
>> MEAL	D2, D2+1, Q1+4, Q1+5, Q2, Q2+6, A1+3, LST+1, CON+5, ADDO+21 , ADDO+26, ADDO+27
N	Q1+1!, Q2+10!, CON+7!
N(	A1+3, LST, CON+3, SOR+2, ADDO+26, ADDO+27*
>> N1	Q1+1, LST+1, LST+2, CON+5, CON+6, CON+7*, PP
>> N2	Q2+8, Q2+9, CON+1*, HDR1+2
>> N3	Q2+8, CON+1
>> NOW	Q1+1*, Q1+2, Q2
>> NUM	EVNT+3
>> NX	LST, CON+3
>> P0	A1+1, P0, ADDO+12, ADDO+14*, ADDO+24
>> PG	Q1+1, HDR+1, HDR+2, HDR1+1*
>> POP	PR
>> Q	A1+3, ADDO+26, ADDO+27*
>> RM	A1+1, ADDO+7, ADDO+24
>> RMIEN	ADDO+7*
S	Q2+8!, DP!, CON!
S(	Q2+8, Q2+9, C0+2, DP+1, CON+1*, CON+5, SOR+2, HDR+3
>> SP	A1+1, A1+3, C0+2, ADDO+10, ADDO+15, ADDO+16, ADDO+24, ADDO+26, EVNT+3
>> T0	Q2*, CHK+2, C2
>> TT	Q2, A1+3, ADDO+26*
U	D2, ADDO+4, ADDO+5, ADDO+7, ADDO+8, ADDO+11, ADDO+14, ADDO+20, EVNT+3
>> W1	Q2+1*, DP+1, P0
>> WRD	A1+1, ADDO+10, ADDO+24*
>> WRDN	A1+1, P0, ADDO+12, ADDO+14*, ADDO+24
>> X	D0, D2, D3, D3+1, Q2+8, DP+1, P0, CON+1, CON+5, SOR+2 , HDR+3*
X1	CHK, CHK+2, C0+1, C0+2*, C1!
>> Y	D0+1, D5+1, ADD+1, A1+1, A1+2, A1+3, ADDO+10, ADDO+11, ADDO+23, ADDO+24* , ADDO+25, ADDO+26, ADDO+27
>> Z	LST, CON+5, SOR+2*
>> Z1	SOR+2*, SOR+3

Customize PDF page

Package: Dietetics

Routine: FHSP1

Information

Source Information

Call Graph

Call Graph Total: 11

Caller Graph

Caller Graph Total: 5

Entry Points

External References

Interaction Calls

FileMan Files Accessed Via FileMan Db Call

Global Variables Directly Accessed

Label References

Local Variables

Legend: