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 |  FileMan Files Accessed Via FileMan Db Call
Print Page as PDF
Routine: FHNO5

Package: Dietetics

Routine: FHNO5


Information

FHNO5 ; HISC/REL - Enter/Edit Supplemental Fdgs. ; 3/10/16 3:11pm

Source Information

Source file <FHNO5.m>

Entry Points

Name Comments DBIA/ICR reference
ASK
A0
S0
SFA
S1
G1
G2
G3
G4
G5
G6
ADD ; Add SF
UPD
CAN ; Cancel SF
SFOUT ;outpt SF
ASK0 ;ask Rec Meal
R1
MS1
ALL
EVNT
PR1
CAD ;
ADDOUT ; Add outpt SF
UPDOUT
CANOUT ; Cancel outpt SF
KIL

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: A0+0
Function Call: WRITE
  • Prompt: !!,"Return for OUTPATIENT or 'C' for CURRENT Admission: "
  • Line Location: A0+0
Function Call: WRITE
  • Prompt: !!,"Supplemental Feeding Menu: "
  • Line Location: SFA+1
Function Call: WRITE
  • Prompt: OLD," // "
  • Condition for execution: NM
  • Line Location: SFA+1
Function Call: WRITE
  • Prompt: " .. cancelled"
  • Line Location: SFA+6
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: G2+0
Function Call: WRITE
  • Prompt: *7," .. DUPLICATE OF EXISTING ITEM!"
  • Line Location: G2+4
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: G4+0
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: G4+2
Function Call: WRITE
  • Prompt: !?5,"Enter a whole number between 1 and 20"
  • Line Location: G4+3
Function Call: READ
  • Variable: Y
  • Timeout: DTIME
  • Line Location: G6+1
Function Call: WRITE
  • Prompt: *7,!?5," Answer D for Dietary use or T for Therapeutic use"
  • Line Location: G6+3
Function Call: WRITE
  • Prompt: !,"NO OUTPATIENT DATA ON FILE for today's date and the future!!"
  • Line Location: SFOUT+3
Function Call: WRITE
  • Prompt: !!,"There is no outpatient data for this Meal!!"
  • Line Location: R1+14
Function Call: WRITE
  • Prompt: !!,"There is no outpatient data for this Meal!!"
  • Line Location: R1+15
Function Call: WRITE
  • Prompt: *7,!,"Select B for Breakfast, N for Noon, E for Evening or ALL for all meals",!,"Answer may be multiple meals, e.g., BN or NE"
  • Line Location: MS1+0
Function Call: WRITE
  • Prompt: !!,"There is no outpatient data for this Meal!!"
  • Line Location: MS1+3
Function Call: WRITE
  • Prompt: !," .. cancelled"
  • Line Location: PR1+7

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FHPT - [#115] Classic Fileman Calls
^FH(118 - [#118] Classic Fileman Calls
^FH(118.1 - [#118.1] Classic Fileman Calls
Info |  Source |  Entry Points |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call