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 |  All
Print Page as PDF
Routine: FHPRC13

Package: Dietetics

Routine: FHPRC13


Information

FHPRC13 ; HISC/NCA - Enter/Edit Recipe Menu ;3/13/95 11:16

Source Information

Source file <FHPRC13.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 4 ^%DT  ^DIC  ^DIE  ^DIK  
Dietetics 2 TR^FH  (L1,LIS,OLD,PD,SRCH)^FHPRC14  
Kernel 1 KILL^XUSCLEAN  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHPRC14  

Entry Points

Name Comments DBIA/ICR reference
E6
R1 ; Edit Recipe and Portion
R2
GET
S3
S2
S1
STOR
S4
A1
A2
DEL ; Delete Meal
E8
KIL
E5
E7
SEL

External References

Name Field # of Occurrence
^%DT GET+2
^DIC GET, S1+3, S2+3, S3+4, S4+5, R1+4
^DIE GET+1
^DIK E8
TR^FH STOR
L1^FHPRC14 STOR
LIS^FHPRC14 R1+3
OLD^FHPRC14 S2+4
PD^FHPRC14 GET+1
SRCH^FHPRC14 S4+9
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: GET+0
Function Call: READ
  • Prompt: "Select Day #: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: S1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: S1+2
Function Call: READ
  • Prompt: "Select Meal #: "
  • Formatting: !
  • Timeout: DTIME
  • Variable: X
  • Line Location: S2+1
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: S3+1
Function Call: WRITE
  • Prompt: !
  • Line Location: S3+3
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: S4+1
Function Call: WRITE
  • Prompt: !,"Select Production Diet: "
  • Line Location: S4+1
Function Call: WRITE
  • Prompt: $S($G(^FH(116.2,+PD,0))'="":$P(^FH(116.2,+PD,0),"^",1)_" // ",1:"") R X:DTIME G:'$T!(X["^")
  • Condition for execution: PD
  • Line Location: S4+1
Function Call: WRITE
  • Prompt: *7,?27,"No Production Diet to Delete!"
  • Line Location: S4+3
Function Call: READ
  • Prompt: "Select Recipe: "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: R1+2
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: R2+0
Function Call: WRITE
  • Prompt: *7,!,"Enter amount of serving portion. Enter 0 to omit recipe;",!,"otherwise enter a number greater than 0 but less than 9999."
  • Line Location: R2+1
Function Call: READ
  • Prompt: "Okay to Save the Menu? YES// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: YN
  • Line Location: STOR+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: STOR+0
Function Call: WRITE
  • Prompt: !
  • Line Location: STOR+1
Function Call: WRITE
  • Prompt: !,"...Storing Recipes and Food Nutrient"
  • Line Location: E5+0
Function Call: WRITE
  • Prompt: !,"...Done"
  • Line Location: E5+2
Function Call: WRITE
  • Prompt: *7,?17,"No Meal to Delete!"
  • Line Location: DEL+1
Function Call: WRITE
  • Prompt: !,"No Meal-Meal Deleted"
  • Line Location: E6+0
Function Call: WRITE
  • Prompt: !,"No Meals Remains-Day Deleted"
  • Line Location: E7+1
Function Call: WRITE
  • Prompt: !
  • Line Location: E7+3
Function Call: WRITE
  • Prompt: !,"...Menu Deleted"
  • Line Location: E8+0
Function Call: WRITE
  • Prompt: !
  • Line Location: E8+1
Routine Call
  • DIE
  • Line Location:
    • GET+1
Routine Call
  • DIC
  • Line Location:
    • GET
    • S1+3
    • S2+3
    • S3+4
    • S4+5
    • R1+4

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FHUM - [#112.6] Classic Fileman Calls
^FH(114 - [#114] Classic Fileman Calls
^FH(116.1 - [#116.1] Classic Fileman Calls
^FH(116.2 - [#116.2] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(114 - [#114] R1+4
^FH(116.1 - [#116.1] S3+1, S3+3
^FH(116.2 - [#116.2] S4+1, S4+4
^FHUM - [#112.6] GET+1, GET+2*, SEL*, S1+4*, A1*, A1+1!, A1+2, A1+3, A2+1*, A2+2*
, A2+3*, A2+4*, E6!*, E7, E7+1!, E7+2*, E7+3
^TMP($J FHPRC13+2!, S4+7, R1+4*, R2, R2+2*, E5+1, DEL+1, DEL+2!, A1, A2
, KIL!

Label References

Name Line Occurrences
A1 E5+1
A2 A2, A2+5
DEL S3+2
E5 STOR+1
E6 S3+3, DEL+3
E7 S2+2
E8 S1+2
GET GET
KIL GET, GET+1, S1+1, S2+1, S3+1, S4+1, R1+2, R2, STOR, E5+3
R1 S4+7, R1+3, R1+4, R2, R2+3
R2 R2+1
S1 S1+3, S2+2
S2 S2+3, R1+2, DEL+1, E7
S3 S3+4
S4 S4+2, S4+3, S4+5
SEL GET+1, STOR+2, E7+3
STOR S1+2, STOR

Naked Globals

Name Field # of Occurrence
^( A2
^(0 A1+2*, A1+3*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> %DT GET+2*
>> CODE S2+4*, S4+6*, S4+8
DA GET+1*, S1+3*, E8!*
DA(1 S1*
>> DAY SEL*, S1+3*, S1+4, S2+2, S2+4, S4+7, S4+8, R1+4, R2, R2+2
, E5+1*, DEL+1, DEL+2, A1, A1+1, A1+2, A1+3, A2, A2+1, A2+2
, A2+3, A2+4, E6, E7, E7+1, E7+2
DIC GET!*, GET+1!, SEL!, S1*, S1+3!, S2*, S2+3!, S3!*, S3+4!, S4!*
, S4+5!, R1+1!*, R1+4!, E8!
DIC("DR" GET*, S1*
DIC("S" GET*
DIC(0 GET*, S1*, S2*, S3*, S4*, R1+1*
DIDEL GET+1*!
DIE GET+1*, E8!
DIK E8!*
DLAYGO GET*!, S1*, S1+3!, S2*, S2+3!
DR GET+1*, S1+4!
DTIME S1+1, S2+1, S3+1, S4+1, R1+2, R2, STOR
>> DTOUT GET
DUZ GET+2
>> K A1+4*, A2*
>> L1 A2*, A2+1, A2+2
>> M( S2+2, S2+4, S4+8*, E6*, E7+2!
>> M(0 S1+2
>> M1 S2+4*, S3+1, S3+3, S3+4*, S4+6, S4+8
>> MEAL SEL*, S2+3*, S2+4, S4+7, S4+8, R1+4, R2, R2+2, E5+1*, DEL+1
, DEL+2, A1, A1+1, A1+2, A1+3, A2, A2+1, A2+2, A2+3, A2+4
, E6
>> MENU GET*, GET+1, GET+2, SEL, S1, S1+4, A1, A1+1, A1+2, A1+3
, A2+1, A2+2, A2+3, A2+4, E6, E7, E7+1, E7+2, E7+3, E8
>> NEW GET*, GET+1, S2+4, A1+1
>> NP A2*, A2+3, A2+4
>> OLD S2+4*, S4+7
>> P S2+4*
>> PD S2+4*, S4+1, S4+2*, S4+3, S4+4, S4+6*, S4+8
>> QTY A2*, A2+2, A2+4
>> REC R1+4*, R2, R2+2
>> S1 S4+8*
U GET, GET+2, A2+1, A2+3, E6, E7+2
>> X GET, GET+2*, S1+1*, S1+2, S2+1*, S2+2, S3+1*, S3+2, S3+3*, S4+1*
, S4+2, S4+3, S4+4*, R1+2*, R1+3, R2*, R2+1, R2+2, STOR*
>> Y GET, GET+1, GET+2, S1+3, S2+3, S3+4, S4+5, S4+6, R1+4, A2*
>> Y(0 S4+6
>> YN STOR*, STOR+1
>> ZZ S4+6*, S4+7, A1*
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 |  All