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

Package: Dietetics

Routine: FHMTK21


Information

FHMTK21 ; HISC/NCA - List Diet Patterns (cont.) ;5/1/95 11:46

Source Information

Source file <FHMTK21.m>

Entry Points

Name Comments DBIA/ICR reference
L1 ; List the Diet Pattern(s)
L2
L3 ; Get Diet pattern in print order
L4
L5 ; Get Standing Orders associated with Diet pattern
L6
PRT ; Print Diet Pattern
P1
P2
HDR
PAUSE ; Check to pause for reading

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"Production Diet: ",$P(P0,"~",2),!,"Diet Order: ",M0
  • Line Location: P2+1
Function Call: WRITE
  • Prompt: !,"Associated Supp. Fdgs. Menu: ",$E(SF,1,30),!
  • Line Location: P2+2
Function Call: WRITE
  • Prompt: !,DTP,?23,"D I E T P A T T E R N L I S T",?73,"Page ",PG
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"-------------------------------------------------------------------------------",!
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: ?$S(CT=1:8,CT=2:38,1:63),$S(CT=1:"BREAKFAST",CT=2:"NOON",1:"EVENING")
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !
  • Line Location: HDR+4
Function Call: READ
  • Formatting: !!
  • Prompt: "Press RETURN to continue or ""^"" to exit. "
  • Variable: RES
  • Timeout: DTIME
  • Line Location: PAUSE+1
Function Call: WRITE
  • Prompt: !,"Enter Return or ""^""."
  • Line Location: PAUSE+1
Info |  Source |  Entry Points |  Interaction Calls