Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: FHPRO2

Package: Dietetics

Routine: FHPRO2


Information

FHPRO2 ; HISC/REL/NCA/RVD - Forecast/Census Calculations ;1/23/98 16:10

Source Information

Source file <FHPRO2.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Dietetics 6 DTP^FH  WRD^FHORD9  (,OUT)^FHPRO3  DATE^FHPRO4  AFP^FHPRO6  (AAR,P3)^FHPRO7  
VA Fileman 2 ^%DT  (,C,DOW,NOW)^%DTC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHPRO1  

Entry Points

Name Comments DBIA/ICR reference
F1
Q2
FOR ; Calculate for Forecast
CEN ; Calculate for Census
PRO
PER
P1
LIS ;print listing
COMB ;
D0 ;

External References

Name Field # of Occurrence
^%DT CEN+2
^%DTC FHPRO2+13
C^%DTC FHPRO2+5
DOW^%DTC FHPRO2+6, FHPRO2+7, FHPRO2+10, D0+5
NOW^%DTC FHPRO2+14
DTP^FH FHPRO2+8, LIS+15, LIS+21
WRD^FHORD9 CEN+9, CEN+10
^FHPRO3 Q2+3
OUT^FHPRO3 CEN+22
DATE^FHPRO4 FHPRO2+16
AFP^FHPRO6 FHPRO2+19
AAR^FHPRO7 FHPRO2+19
P3^FHPRO7 FHPRO2+19

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: E C A S T E D"
  • Timeout: "A
  • Variable: 1
  • Line Location: LIS+19
Function Call: WRITE
  • Prompt: !,DTP,?(L1-$L(Z)\2),Z,?(L1-7),"Page ",PG
  • Line Location: LIS+21
Function Call: WRITE
  • Prompt: !,FHRETYP
  • Line Location: LIS+22
Function Call: WRITE
  • Prompt: !?(L1-$L(Z)\2),Z,!!?(L1-$L(TIM)\2),TIM
  • Line Location: LIS+24
Function Call: WRITE
  • Prompt: !!?(L1-31\2),"P R O D U C T I O N D I E T S",!!?29
  • Line Location: LIS+25
Function Call: WRITE
  • Prompt: $P(S(X,K),"^",1)
  • Line Location: LIS+26
Function Call: WRITE
  • Prompt: " Total"
  • Line Location: LIS+27
Function Call: WRITE
  • Prompt: !,LN,!
  • Line Location: LIS+27
Function Call: WRITE
  • Prompt: !?3,"N P O",?31
  • Line Location: LIS+29
Function Call: WRITE
  • Prompt: !?3,"P A S S",?31
  • Line Location: LIS+30
Function Call: WRITE
  • Prompt: !?3,"TF Only",?31
  • Line Location: LIS+31
Function Call: WRITE
  • Prompt: !?3,"No Order",?31
  • Line Location: LIS+32
Function Call: WRITE
  • Prompt: !!,"TOTAL MEALS",?31
  • Line Location: LIS+33
Function Call: WRITE
  • Prompt: $J(Z,6)," "
  • Line Location: LIS+35
Function Call: WRITE
  • Prompt: $J(TOT,7)
  • Line Location: LIS+36
Function Call: WRITE
  • Prompt: !!!,"*** Includes other gratuitous/paid meals.",!
  • Line Location: LIS+37
Function Call: WRITE
  • Prompt: !,$P($G(^FH(116.2,K,0)),"^",1),?31
  • Line Location: PRO+0
Function Call: WRITE
  • Prompt: $J(Z,6)," "
  • Line Location: P1+2
Function Call: WRITE
  • Prompt: $J(TOT,7)
  • Line Location: P1+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(116.2 - [#116.2] LIS+28, PRO
^FH(119.6 - [#119.6] CEN+3
^FH(119.71 - [#119.71] LIS+23
^FH(119.72 - [#119.72] FOR+3, F1, F1+5, PER, PER+5, LIS+17, CEN+6, CEN+7, COMB+7, D0+2
, D0+4, D0+7
^FH(119.73 - [#119.73] LIS+3
^TMP($J FOR+1!, FOR+2*, FOR+3, FOR+4*, F1+6*, F1+7*, PER+1*, PER+8*, PER+9*, LIS+17
, LIS+28, LIS+35, P1+1, CEN+1!, CEN+16*, CEN+17*, COMB+8!*, COMB+9*, COMB+10*, D0+8*

Label References

Name Line Occurrences
CEN Q2+2
D0 COMB+7
F1 FOR+3
FOR Q2+2
LIS Q2+2
P1 LIS+29, LIS+30, LIS+31, LIS+32
PER FOR+2
PRO LIS+28
Q2 FHPRO2+18

Naked Globals

Name Field # of Occurrence
^( CEN+3, COMB+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % FHPRO2+14
>> %DT CEN+2*
D FOR+2!, FOR+5!, LIS+16!, LIS+37!, CEN+3!, COMB+1!, COMB+11!
D( FOR+4, F1+6*, PER+1*, PER+8*, COMB+1*, COMB+2*, COMB+4*, COMB+6*, COMB+8*, COMB+9
>> D1 FHPRO2+4, FHPRO2+7, FHPRO2+8, FHPRO2+13, CEN+2
>> DOW FHPRO2+7*, FHPRO2+9, FHPRO2+10*, FHPRO2+11, FHPRO2+12*, D0+5*, D0+7
>> DTP FHPRO2+8*, LIS+15*, LIS+21*
>> FHD1SAV FHPRO2+4*, FHPRO2+5
>> FHDDI F1+1*, F1+2, F1+3, PER+2*, PER+3, PER+4, PER+6
>> FHDDIDO F1+2*, F1+5, PER+3*, PER+5
>> FHDOD1 D0+5*, D0+6, D0+8
>> FHDODAY( FHPRO2+6*, F1+3, PER+4, D0+4, D0+5
>> FHDODT( FHPRO2+6*, F1+1, F1+2, PER+2, PER+3
>> FHDOII D0+4*, D0+5
>> FHDOWSV FHPRO2+7*, FHPRO2+12
>> FHDSTART FHPRO2+8*, LIS+7, LIS+8, LIS+10, LIS+11
>> FHDT2 FHPRO2+5, FHPRO2+8, FHPRO2+10, FHPRO2+13
>> FHDTI FHPRO2+5*, FHPRO2+6
>> FHDTOT CEN+11*, CEN+13*, CEN+20
>> FHDTSTOP FHPRO2+8*, LIS+7, LIS+8
>> FHI CEN+14*, CEN+15, CEN+16, CEN+17, CEN+19*, CEN+20
>> FHIJ CEN+12*, CEN+16, CEN+17
>> FHJ CEN+14*, CEN+16, CEN+17, CEN+19*, CEN+20
>> FHMEAL FHPRO2+18*
>> FHMEALAR( Q2+1, F1+4, LIS+1, CEN+12, D0+6
>> FHMEALHE LIS+14
>> FHMLSAV FHPRO2+15*
>> FHNUMDAY FHPRO2+13*
>> FHP LIS+23, CEN+6, CEN+7, COMB+7
>> FHP10 FHPRO2+19
>> FHP6 Q2+2, LIS+19, LIS+29, LIS+30, LIS+31, LIS+32
>> FHP8 FHPRO2+19
>> FHP9 FHPRO2+19
>> FHPX1 F1+3*, F1+4, F1+7, PER+4*, PER+9
>> FHRETYP LIS+2*, LIS+4*, LIS+5*, LIS+22
>> FHS1 PER+6*, PER+7
>> FHSER CEN+6*, CEN+7*
>> FHSERFLG CEN+5*, CEN+6*, CEN+7*, CEN+8
>> FHSITE LIS+3, LIS+4, LIS+5, CEN+4, CEN+9, CEN+10
>> FHSITENM LIS+2*, LIS+3*, LIS+4
>> FHSTARTD FHPRO2+9*, LIS+6, LIS+7, LIS+8, LIS+9, LIS+10, LIS+11
>> FHSTOPDT FHPRO2+11*, LIS+6, LIS+7, LIS+8, LIS+9
>> FHW1NM LIS+2*
IOF LIS+20
IOST LIS+20
>> K PER*, PER+1, PER+5, PER+8, PER+9, LIS+26*, LIS+28*, LIS+29*, LIS+30*, LIS+31*
, LIS+32*, PRO, P1+1
>> K1 LIS+34*, LIS+35, P1*, P1+1
>> K3 Q2*, F1+5, LIS+7, LIS+10, D0+7
>> L1 LIS+16*, LIS+17*, LIS+18*, LIS+21, LIS+24, LIS+25, LIS+27
>> LL FOR+4*, F1*, F1+5, F1+6, F1+7, COMB+3*, COMB+4*, COMB+5*, COMB+8*, COMB+10*
, D0+4*, D0+7, D0+8
LN LIS+27*!
>> LP COMB+1*, COMB+2*, COMB+6*
>> M2( FOR+2
>> MEAL FHPRO2+15, FHPRO2+18*, Q2, Q2+1, F1+4, LIS+1, CEN+2, CEN+12, D0+6
N LIS+16!, LIS+37!
>> N1 LIS+17*
>> N2 LIS+17*
>> N3 LIS+17*
>> NOW FHPRO2+14*, LIS+15, LIS+21
NP COMB+1!
NP( LIS+29!, LIS+30!, LIS+31!, LIS+32!, P1+1, COMB+1*, COMB+2*, COMB+3*, COMB+4*, COMB+6*
P LIS+37!, CEN+3!, COMB+11!
P( CEN+14, CEN+17, CEN+19, CEN+20*, COMB+1, COMB+2!, COMB+3!, COMB+4!, COMB+5!, COMB+8*
, COMB+10, D0+7*
>> P0 FOR+2*, FOR+3*, F1, F1+5, F1+6, F1+7, PER, PER+1, PER+5, PER+8
, PER+9, LIS+17*, COMB+5*, COMB+7*, COMB+8*, COMB+9*, D0+1, D0+2, D0+4, D0+7
, D0+8
>> P1 LIS+28*
>> PG FHPRO2+14*, LIS+20*, LIS+21
S LIS+16!, LIS+37!
S( LIS+17*, LIS+26, LIS+34, P1
>> S0 FOR+2, PER*, PER+8*
>> S1 FOR+2*, PER+6
>> SP( CEN+6*, CEN+7*, D0+1
T COMB+1!
T( COMB+5*, COMB+6
>> TIM LIS+7*, LIS+10*, LIS+24, CEN+2*
>> TIMAFP LIS+8*, LIS+11*, LIS+14*
>> TOT LIS+33*, LIS+35*, LIS+36, P1*, P1+2*, P1+3
U LIS+3, CEN+4, CEN+6, CEN+7, CEN+10
>> WRD CEN+3*
>> X FHPRO2+5, FHPRO2+6, FHPRO2+7*, FHPRO2+10*, FHPRO2+13, LIS+17*, LIS+26*, LIS+34*, P1*, CEN+2*
, CEN+3*, CEN+4, CEN+6, CEN+7, CEN+10, D0+5*
>> X1 FHPRO2+5*, FHPRO2+13*
>> X2 FHPRO2+5*, FHPRO2+13*
>> Y FHPRO2+6, FHPRO2+7, FHPRO2+10, F1+5*, F1+6, F1+7, CEN+2, D0+5, D0+7*, D0+8
>> Z PER+5*, PER+7*, PER+8, PER+9, LIS+19*, LIS+21, LIS+23*, LIS+24, LIS+35*, P1+1*
, P1+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All