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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All
Print Page as PDF
Routine: FHREC6

Package: Dietetics

Routine: FHREC6


Information

FHREC6 ; HISC/REL/NCA - Recipe Analysis Output ;7/30/93 15:05

Source Information

Source file <FHREC6.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  KILL^XUSCLEAN  
Dietetics 2 EN2^FH  ^FHNU6  
VA FileMan 1 ^DIC  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHREC12  

Entry Points

Name Comments DBIA/ICR reference
Q1 ; List Analysis
LST
R1 ; Embedded Recipe List
GET ; Set Ingredient List
P1
PSE
KIL

External References

Name Field # of Occurrence
^%ZIS FHREC6+6
^%ZISC FHREC6+8
^DIC FHREC6+2, FHREC6+5
EN2^FH FHREC6+7
^FHNU6 Q1+18, Q1+19
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: FHREC6+2
Function Call: WRITE
  • Prompt: !!,"This Recipe has not been analyzed."
  • Line Location: FHREC6+4
Function Call: WRITE
  • Prompt: !
  • Line Location: FHREC6+5
Function Call: WRITE
  • Prompt: !
  • Line Location: FHREC6+6
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST,1,2)="C-"
  • Line Location: Q1+11
Function Call: WRITE
  • Prompt: !?25,"--- Recipe Ingredient List ---",!!?(80-$L(TIT)\2),TIT
  • Line Location: Q1+11
Function Call: WRITE
  • Prompt: !!,"Number of Portions: ",$P($G(^FH(114,REC,0)),"^",2)
  • Line Location: Q1+12
Function Call: WRITE
  • Prompt: !!,"Ingredient",?34,"Amt In Lbs",?46,"Associated Nutrient",!
  • Line Location: Q1+13
Function Call: WRITE
  • Prompt: !!,"Embedded Recipe: ",R2,!!,"Ingredient",?34,"Amt In LBS",?46,"Associated Nutrient",!
  • Line Location: Q1+15
Function Call: WRITE
  • Prompt: @IOF,!?23,"--- Analysis of Recipe Portion ---",!!?(80-$L(TIT)\2),TIT,!!?34,"%",?39,"%",?76,"%",!
  • Line Location: Q1+16
Function Call: WRITE
  • Prompt: ?33,"DRI",?37,"Kcal",?75,"DRI",!
  • Line Location: Q1+17
Function Call: WRITE
  • Prompt: !!,"Grams/Portion: ",PW
  • Line Location: Q1+20
Function Call: WRITE
  • Prompt: !
  • Line Location: Q1+20
Function Call: WRITE
  • Prompt: ?T1,$P(Y,";",4)," (",B(Z1),")"
  • Line Location: LST+1
Function Call: WRITE
  • Prompt: ?(T1+21),$J(A(Z1),7,$P(Y,";",6))," ",$P(Y,";",5)
  • Line Location: LST+1
Function Call: WRITE
  • Prompt: ?(T1+33),$J(Z2*100,3,0)
  • Line Location: LST+2
Function Call: WRITE
  • Prompt: ?(T1+37),C(Z1)
  • Line Location: LST+3
Function Call: READ
  • Formatting: !!
  • Prompt: "Press RETURN to Continue "
  • Variable: X
  • Timeout: DTIME
  • Line Location: PSE+0
Function Call: WRITE
  • Prompt: !
  • Line Location: PSE+0
Function Call: WRITE
  • Prompt: !,"Enter a RETURN to Continue."
  • Line Location: PSE+0
Routine Call
  • %ZIS
  • Line Location:
    • FHREC6+6
Routine Call
  • DIC
  • Line Location:
    • FHREC6+2
    • FHREC6+5

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(112.2 - [#112.2] Q1+6
^FH(114 - [#114] FHREC6+3, Q1+6, Q1+9, Q1+10, Q1+12, R1+1, R1+2
^FHING - [#113] Q1+10, R1+2
^FHNU - [#112] Q1+1, Q1+2, Q1+3, Q1+4, Q1+5, GET+2, GET+3, GET+4, GET+5, GET+6

Label References

Name Line Occurrences
FHREC6 FHREC6+4, FHREC6+7, FHREC6+8
GET Q1+10, R1+2
KIL FHREC6+2, FHREC6+5, FHREC6+6
LST Q1+18, Q1+19
P1 Q1+14, Q1+15
PSE Q1+16, Q1+19, Q1+20, P1+3, PSE
Q1 FHREC6+8
R1 Q1+9

Naked Globals

Name Field # of Occurrence
^( Q1+9, Q1+10, R1+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS FHREC6+6!*, FHREC6+8!
%ZIS("A" FHREC6+6*
>> A( Q1+2*, Q1+3*, Q1+4*, Q1+5*, Q1+7, LST+1, LST+2
>> A(1 Q1+7
>> A(2 Q1+7
>> A(3 Q1+7
>> ANS Q1+6*, Q1+14, Q1+15, Q1+16, Q1+19, P1+1, PSE*
B Q1+8!
B( Q1+8*, LST+1, GET+3*, GET+4*, GET+5*, GET+6*
>> C( Q1+7*, LST+3
>> CTR Q1+14*, Q1+15*, P1+3*
DIC FHREC6+2!*, FHREC6+5!*
DIC("A" FHREC6+5*
DIC(0 FHREC6+2*, FHREC6+5*
DTIME PSE
>> DTOUT FHREC6+5
>> ER Q1+10*, Q1+14*, Q1+15*, R1+1*, GET+2, P1+1, P1+2
>> FHLST FHREC6+7*
>> FHPGM FHREC6+7*
IO FHREC6+8
IO("Q" FHREC6+7
IOF Q1+11, Q1+16
IOP FHREC6+6!, FHREC6+8!
IOST Q1+11, PSE
>> K Q1+2*, Q1+3*, Q1+4*, Q1+5*, Q1+18*, Q1+19*, LSTGET+3*, GET+4*, GET+5*
GET+6*
>> K1 GET+1*, GET+2, GET+3, GET+4, GET+5, GET+6
>> KK Q1+7*, Q1+8*, Q1+9*, Q1+10*, Q1+15*
>> L1 FHREC6+3*, FHREC6+4, Q1+1, Q1+2, Q1+3, Q1+4, Q1+5
>> LL R1+2*, P1+1*
M Q1+9!
M( Q1+15!, GET+2*, P1+1, P1+2
N Q1+9!
N( Q1+15, R1+1*
>> NAM Q1+10*, R1+2*, GET+2, P1*, P1+1*, P1+2
>> POP FHREC6+6
>> PW Q1+1*, Q1+2, Q1+3, Q1+4, Q1+5, Q1+20
>> R1 R1+1*, R1+2
>> R2 Q1+15*, R1+1*
>> RDA FHREC6+5*, Q1+6
>> REC FHREC6+2*, FHREC6+3, Q1+6, Q1+9, Q1+10, Q1+12
>> T1 LST*, LST+1, LST+2, LST+3
>> TIT Q1+6*, Q1+11, Q1+16
U LST+2
>> X FHREC6+5, PSE*
>> Y FHREC6+2, FHREC6+5, Q1+2*, Q1+3*, Q1+4*, Q1+5*, Q1+18*, Q1+19*, LST+1, LST+2
GET+3*, GET+4*, GET+5*, GET+6*
>> Y0 Q1+9*, Q1+10*, R1+1, R1+2*, GET+1, GET+2
>> Z1 Q1+2*, Q1+3*, Q1+4*, Q1+5*, Q1+7*, Q1+18*, Q1+19*, LSTLST+1, LST+2
LST+3, GET+3*, GET+4*, GET+5*, GET+6*
>> Z2 LST+2*
>> ZR Q1+6*, LST+2

Marked Items

Name Field # of Occurrence
$T(COM+K^FHNU6 Q1+18, Q1+19
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items  | All