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 |  Local Variables |  All
Print Page as PDF
Routine: FHMTK2

Package: Dietetics

Routine: FHMTK2


Information

FHMTK2 ; HISC/NCA - List Diet Patterns ;4/25/95 09:54

Source Information

Source file <FHMTK2.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Kernel 3 ^%ZIS  ^%ZISC  KILL^XUSCLEAN  
Dietetics 2 (EN2,TR)^FH  L1^FHMTK21  
VA Fileman 1 ^DIC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHMTKT  

Entry Points

Name Comments DBIA/ICR reference
F0
F1
F5
F9
KIL
LIS ; List Diet Patterns
ASK

External References

Name Field # of Occurrence
^%ZIS LIS+1
^%ZISC LIS+3
^DIC F1
EN2^FH LIS+2
TR^FH ASK, F9
L1^FHMTK21 LIS+3
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "Print ALL Diet Patterns? Y// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: ANS
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: *7,!," Answer YES to print all Diet Patterns; NO to select ONE Diet Pattern to print"
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: !
  • Line Location: F1+0
Function Call: WRITE
  • Prompt: *7,!!,"This conflicts with ",$P(DI(PREC),"^",2),!
  • Line Location: F1+1
Function Call: WRITE
  • Prompt: *7,!!,"You have now selected the maximum of 5 Diet Modifications!"
  • Line Location: F1+2
Function Call: WRITE
  • Prompt: !!,"You can not select REGULAR with another Diet."
  • Line Location: F5+1
Function Call: WRITE
  • Prompt: !!,"You have selected the following Diet:",!
  • Line Location: F5+4
Function Call: WRITE
  • Prompt: !?5,$P(DI(D0),U,2)
  • Line Location: F5+5
Function Call: READ
  • Prompt: "Is this Correct? Y// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: Y
  • Line Location: F9+0
Function Call: WRITE
  • Prompt: *7,!," Answer YES to accept diet list; NO to select diets again"
  • Line Location: F9+1
Function Call: WRITE
  • Prompt: !!,"Select new diets ..."
  • Line Location: F9+2
Function Call: WRITE
  • Prompt: !,"No Diet Pattern for this Diet Order"
  • Line Location: F9+5
Function Call: WRITE
  • Prompt: !
  • Line Location: LIS+1
Routine Call
  • DIC
  • Line Location:
    • F1
Routine Call
  • %ZIS
  • Line Location:
    • LIS+1

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(111 - [#111] F9+4
^FH(111.1 - [#111.1] F9+5
^TMP($J KIL!

Label References

Name Line Occurrences
ASK ASK+1
F0 F5+1, F9+2
F1 F1, F1+1, F1+2
F5 F1, F1+2
F9 F9+1
KIL ASK, F1, F5, F9, F9+5, LIS+1, LIS+2, LIS+3
LIS ASK+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS LIS+1!*, LIS+3!
%ZIS("A" LIS+1*
A1 F9+4*, F9+6!
>> ANS ASK*, ASK+1, ASK+2
CHK F5+1, F5+2*, F9+6!
D0 F5+2*, F5+5*, F9+3*, F9+6!
D3 F9+4*, F9+6!
DI F0!, F9+6!
DI( F1+1, F1+2*, F5+2, F5+5, F9+3
DIC F1!*
DIC(0 F1*
DTIME ASK, F9
>> DTOUT F1
>> FHDA ASK+2*, F9+5*
>> FHLST LIS+2*
FHOR F9+3*, F9+4, F9+5, F9+6!
>> FHPGM LIS+2*
IO LIS+3
IO("Q" LIS+2
IOP LIS+1!, LIS+3!
N1 F0*, F1+2*, F5, F5+1, F9+3*, F9+6!
>> POP LIS+1
PREC F1+1*, F1+2, F9+6!
U F1, F1+1, F5+5, F9+3
>> X ASK*, F1, F9*
Y F1, F1+2, F9*, F9+1, F9+2, F9+4*, F9+6!
Y(0 F1+1, F1+2
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 |  Local Variables |  All