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: FHNU1

Package: Dietetics

Routine: FHNU1


Information

FHNU1 ; HISC/REL - List Menu ;11/16/93 09:49

Source Information

Source file <FHNU1.m>

Call Graph

Call Graph Total: 5

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

Caller Graph

Caller Graph Total: 2

Package Total Caller Graph
Dietetics 2 FHNU1D  FHNU1P  

Entry Points

Name Comments DBIA/ICR reference
F0 ; List the Menu
F1
F2
F3
GET
S3 ; Print Meal
S2
S1
EN1 ; Display Meal
KIL
SEL
D1

External References

Name Field # of Occurrence
^%ZIS FHNU1+2, S2+1
^%ZISC FHNU1+4, S2+3
^DIC S1, S2, GET
EN2^FH FHNU1+3, S2+2
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: FHNU1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: F1+0
Function Call: WRITE
  • Prompt: !!,"Menu: ",MNAM,?60,"Day: ",DAY,!
  • Line Location: F3+1
Function Call: WRITE
  • Prompt: !!?18,"---------- Meal ",MEAL," ----------",!
  • Line Location: F3+2
Function Call: WRITE
  • Prompt: !,$P(Y(0),"^",1)," - ",$P(X,"^",2)," ",$S(TYP="C":$P(Y(0),"^",3),1:"gms")
  • Line Location: F3+4
Function Call: WRITE
  • Prompt: !
  • Line Location: S2+1
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST,1,2)="C-"
  • Line Location: S3+1
Function Call: WRITE
  • Prompt: !,"Menu: ",MNAM," Day: ",DAY," Meal: ",MEAL,!
  • Line Location: S3+1
Function Call: WRITE
  • Prompt: !,$P(Y(0),"^",1)," - ",$P(X,"^",2)," ",$S(TYP="C":$P(Y(0),"^",3),1:"gms")
  • Line Location: D1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: GET+0
Routine Call
  • DIC
  • Line Location:
    • S1
    • S2
    • GET
Routine Call
  • %ZIS
  • Line Location:
    • FHNU1+2
    • S2+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FHUM - [#112.6] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FHNU - [#112] F3+3, D1+1
^FHUM - [#112.6] F1, F2, F3, F3+3, SEL*, S1+1*, D1, D1+1

Label References

Name Line Occurrences
D1 D1+2
F0 FHNU1+4
F1 F2
F2 F3
F3 F3+4
GET FHNU1+2, EN1+1, GET
KIL FHNU1+2, FHNU1+3, FHNU1+4, F1, EN1+1, S1, S2, S2+1, S2+2, S2+3
S1 S1
S2 S2
S3 S2+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%ZIS FHNU1+2*!, FHNU1+4!, S2+1*!, S2+3!
%ZIS("B" FHNU1+2*, S2+1*
>> DA S1*
>> DA(1 S1*
>> DAY F0+1*, F1*, F2, F3, F3+1, F3+3, SEL*, S1*, S1+1, S3+1
, D1, D1+1
DIC SEL!, S1*, S2*!, GET!*
DIC("A" S1*, S2*
DIC("DR" S1*
DIC("S" GET*
DIC(0 S1*, GET*
DR S1+1!
>> DTOUT S1, S2, GET
>> FHLST FHNU1+3*, S2+2*
>> FHPGM FHNU1+3*, S2+2*
>> H1 F1*, F3+1*, S3+1*, D1, D1+1*
>> H2 F2*, F3+2*
IO FHNU1+4, S2+3
IO("Q" FHNU1+3, S2+2
IOF F0+1, S3+1
IOP FHNU1+2!, FHNU1+4!, S2+1!, S2+3!
IOST F0+1, S3+1
>> ITM F2*, F3*, F3+3, S3+1*, D1*, D1+1
>> MEAL F1*, F2*, F3, F3+2, F3+3, SEL*, S2*, S3+1, D1, D1+1
>> MENU FHNU1+2, F1, F2, F3, F3+3, EN1+1, SEL, S1, S1+1, D1
, D1+1, GET*
>> MNAM F3+1, S3+1, GET*
>> POP FHNU1+2, S2+1
>> TYP F3+4, D1+2, GET*
U GET
>> X F3+3*, F3+4, S1, S2, D1+1*, D1+2, GET
>> Y S1, S2, GET
>> Y(0 F3+3*, F3+4, D1+1*, D1+2, GET
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