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

Package: Dietetics

Routine: FHPRC1


Information

FHPRC1 ; HISC/REL/NCA - Menu Cycle Utilities ;3/28/95 08:16

Source Information

Source file <FHPRC1.m>

Entry Points

Name Comments DBIA/ICR reference
EN1 ; Find current cycle & day
E1 ; Find based upon X1 date
EN2 ; Check validity of Production Code string in Menu
KIL
V1
V2
V3
ALL
SRT ; Sort and store Production Diet Code in print order
EN3 ; Help Prompt for Production String

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: *7,!?5,X2," not a valid Production Diet code"
  • Line Location: V1+1
Function Call: WRITE
  • Prompt: *7,!?5,X2," code used more than once"
  • Line Location: V1+2
Function Call: WRITE
  • Prompt: *7,!?5,"Extra specifications in ",X1
  • Line Location: V1+4
Function Call: WRITE
  • Prompt: *7,!?5,"Illegal Tray/Cafe specification in ",X1
  • Line Location: V2+0
Function Call: WRITE
  • Prompt: *7,!?5,X3," Tray/Cafe used more than once"
  • Line Location: V2+1
Function Call: WRITE
  • Prompt: *7,!?5,"Illegal percentage in ",X1
  • Line Location: V2+3
Function Call: WRITE
  • Prompt: !?5,"No + after ALL"
  • Line Location: V3+1
Function Call: WRITE
  • Prompt: !?5,"Invalid ALL statement"
  • Line Location: V3+3
Function Call: WRITE
  • Prompt: !!,"List Production Diet Codes separated by a single space"
  • Line Location: EN3+1
Function Call: WRITE
  • Prompt: !!,"Example: LS;C25;T30 RG ME;T20.1 CR;C50"
  • Line Location: EN3+2
Function Call: WRITE
  • Prompt: !," -- Production Diet Code"
  • Line Location: EN3+3
Function Call: WRITE
  • Prompt: !," - T = Tray or C = Cafeteria"
  • Line Location: EN3+4
Function Call: WRITE
  • Prompt: !," -- % of T or C census receiving recipe (max. 1 dec. place)"
  • Line Location: EN3+5
Function Call: WRITE
  • Prompt: !!,"Production Diets listed without a specification (e.g., RG)"
  • Line Location: EN3+6
Function Call: WRITE
  • Prompt: !,"are assumed to be 100% of census.",!
  • Line Location: EN3+7
Function Call: WRITE
  • Prompt: !,"ALL + will add all production diet codes.",!
  • Line Location: EN3+8
Info |  Source |  Entry Points |  Interaction Calls