Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call
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>

Entry Points

Name Comments DBIA/ICR reference
Q1 ; List Analysis
LST
R1 ; Embedded Recipe List
GET ; Set Ingredient List
P1
PSE
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

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FH(112.2 - [#112.2] Classic Fileman Calls
^FH(114 - [#114] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call