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

Package: Dietetics

Routine: FHNO5


Information

FHNO5 ; HISC/REL - Enter/Edit Supplemental Fdgs. ;7/27/94 14:45

Source Information

Source file <FHNO5.m>

Call Graph

Call Graph Total: 8

Package Total Call Graph
Dietetics 5 (DTP,TR)^FH  (LIS,OIS,SF)^FHNO7  ^FHOMDPA  (,OPFILE)^FHORX  CHK^FHSPED  
VA Fileman 2 NOW^%DTC  ^DIC  
Kernel 1 KILL^XUSCLEAN  

Caller Graph

Caller Graph Total: 4

Package Total Caller Graph
Dietetics 4 FHNO1E  FHNO7  FHORD72  FHORT11  

Entry Points

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

External References

Name Field # of Occurrence
NOW^%DTC FHNO5+3
^DIC A0+4, SFA+7, G2+3
DTP^FH EVNT+1, EVNT+2, PR1+2
TR^FH A0, R1+4
LIS^FHNO7 S0, PR1+11
OIS^FHNO7 S1+6
SF^FHNO7 SFOUT+2
^FHOMDPA ASK
^FHORX ADD+9, CAN+5
OPFILE^FHORX EVNT+3, EVNT+4
CHK^FHSPED MS1+5
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • 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
  • Timeout: DTIME
  • Variable: X
  • Line Location: G2+0
Function Call: WRITE
  • Prompt: *7," .. DUPLICATE OF EXISTING ITEM!"
  • Line Location: G2+4
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • 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
  • Timeout: DTIME
  • Variable: Y
  • 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
Routine Call
  • DIC
  • Line Location:
    • A0+4
    • SFA+7
    • G2+3

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DPT - [#2] ASK+2
^DPT("CN" A0+3
^FH(118 - [#118] G1+5
^FH(118.1 - [#118.1] SFA, S1+1, ADDOUT+10
^FH(119.6 - [#119.6] PR1+6
^FHPT - [#115] A0+1, ADD+3, ADD+4*, ADD+5, ADD+6, ADD+7*, ADD+8*, UPD+1*, CAN+3, CAN+4*
, ASK0+4, PR1+1, PR1+2, PR1+3, PR1+6, PR1+12, CAD+2, CAD+3, ADDOUT+1, ADDOUT+2
, ADDOUT+3*, ADDOUT+4, ADDOUT+5, ADDOUT+9*, UPDOUT*, CANOUT+1, CANOUT+2*
^FHPT("RM" ASK0+3

Label References

Name Line Occurrences
A0 A0+4
ADD S1+6, S1+7, ADD+6, PR1+4
ADDOUT ADD+2, ADDOUT+5
ALL MS1+6
ASK ASK+3, A0+1, A0+2, A0+5, A0+7
ASK0 SFOUT+4
CAD PR1+10
CAN SFA+6, S1+6, S1+7, G5+1, G6+5, PR1+4, PR1+7
CANOUT CAN+2
EVNT MS1+4, MS1+7
G1 G2+1, G2+2, G4+1, G4+4, G4+5
G2 G2+3, G2+4
G3 G2+1
G4 G4+3
G5 G1, G1+1, G2, G4
G6 G6+3
KIL ASK+1, A0, SFA+2
MS1 R1+3, R1+5, R1+13
PR1 MS1+4, MS1+7, ALL+2
R1 R1+14, R1+15, MS1, MS1+3
S0 A0+3, A0+6
S1 SFA+5, PR1+9, PR1+14
SFA SFA+7, PR1+13
SFOUT ASK+3, A0+2
UPD S1+7, G6+5
UPDOUT UPD

Naked Globals

Name Field # of Occurrence
^(0 ADD+5*, CAN+3*, ADDOUT+4*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % FHNO5+3
ADM ASK*, ASK+4!, A0+3*, A0+4*, A0+5, ADD+3, ADD+4, ADD+5, ADD+6, ADD+7
, ADD+8, UPD+1, CAN+3, CAN+4, PR1*, PR1+1, PR1+2, PR1+3, PR1+6, PR1+12
, CAD+2, CAD+3, ADDOUT+1, ADDOUT+2, ADDOUT+3, ADDOUT+4, ADDOUT+5, ADDOUT+9, UPDOUT, CANOUT+1
, CANOUT+2
DFN ASK!, ASK+2, A0+3
DIC ASK!, A0+4*, SFA!*, SFA+7!, S1+8*
DIC("A" G1+4*, G1+5*, G2
DIC("S" S1+8*
DIC(0 A0+4*, SFA*, S1+8*
DT ASK0+3, MS1+4, ALL, ALL+1
DTIME A0, SFA+1, G2, G4, G6+1, R1
>> DTP EVNT+1*, EVNT+2*, PR1+2*
DUZ S1+1, UPD+1, CAN+4, UPDOUT, CANOUT+2
>> EVT ADD+9*, CAN+5*
>> FH1 R1*, R1+14*, R1+15*
>> FHACT EVNT+3*, EVNT+4*
>> FHADSFF R1*, EVNT+4, ADDOUT+11*
>> FHALL ASK*
>> FHALML R1+6*, R1+7*, EVNT+3, EVNT+4
>> FHCFLG CAD+1*, CAD+3*
FHCK ASK0+1!
FHCK( R1+8*, R1+9*, R1+10*
FHCK("B" R1+11*
FHCK("E" R1+11*
FHCK("N" R1+11*
>> FHCNSFF R1*, EVNT+3, CANOUT+3*
>> FHCT ALL*, ALL+1*
FHDFN ASK!, ASK+1, A0+1, ADD+3, ADD+4, ADD+5, ADD+6, ADD+7, ADD+8, UPD+1
, CAN+3, CAN+4, ASK0+3, ASK0+4, PR1+1, PR1+2, PR1+3, PR1+6, PR1+12, CAD+2
, CAD+3, ADDOUT+1, ADDOUT+2, ADDOUT+3, ADDOUT+4, ADDOUT+5, ADDOUT+9, UPDOUT, CANOUT+1, CANOUT+2
FHDM14 ASK0+1!, ASK0+17
FHDM14( ASK0+11*, ASK0+12, ASK0+14, ASK0+15, ASK0+16, MS1+7, ALL+1, ALL+2
>> FHDMDAT MS1+4*, MS1+7*, ALL+2*, PR1
FHDMIEN ASK0+1!
FHDMIEN( ASK0+14*, ASK0+15*, ASK0+16*, MS1+4
>> FHDT1 MS1+7, ALL*, ALL+1*, EVNT+1
>> FHDT2 MS1+7, ALL*, ALL+1*, EVNT+2
>> FHDTC R1*, PR1+2*
>> FHDTE PR1*
>> FHDTML R1*, R1+1, R1+2*, R1+3, R1+4*, R1+5, R1+7*, R1+8, R1+9, R1+10
, R1+11, R1+12, R1+14, R1+15, MS1+1*, MS1+3, MS1+4, MS1+5, MS1+6, MS1+7
>> FHDTP EVNT*, EVNT+1*, EVNT+2*, EVNT+3, EVNT+4, PR1+2*
>> FHDTSV ALL*, ALL+1*
FHFLG ASK0+1!, MS1+2*, MS1+6, MS1+7
>> FHI ASK0+3*, ASK0+11, ASK0+12*, ASK0+14, ASK0+15, ASK0+16, MS1+4*, MS1+7*, ALL+1*, ALL+2
>> FHIDFLG ASK*, PR1+4
FHIEN ASK0+1!
FHIEN( ASK0+14*, ASK0+15*, ASK0+16*
>> FHJ ASK0+3*, ASK0+4, ASK0+11, ASK0+13*, ASK0+14, ASK0+15, ASK0+16, ALL+2*
>> FHKK9 S1+5*, S1+6, PR1+4*
>> FHLIS MS1+2*, PR1+12, PR1+13*, PR1+14
FHLOC SFOUT+1!, PR1+6*
FHLOCN SFOUT+1!, R1*, EVNT+3, EVNT+4, PR1+5*, PR1+6*
>> FHMEAL ASK*, S1+3, S1+4, S1+5, G1+1, PR1+3*, PR1+4, ADDOUT+1*, ADDOUT+6, ADDOUT+7
, ADDOUT+8
>> FHML ASK0+6*, ASK0+8, ASK0+9, ASK0+10, ASK0+11
>> FHN ASK0+7*, ASK0+8*, ASK0+9*, ASK0+10*, ASK0+11, ASK0+13*, ASK0+14, ASK0+15, ASK0+16, MS1+7*
, ALL+1*, ALL+2
FHNMSAV SFA+3*, SFA+8*, SFOUT+1!, PR1+9, PR1+14, ADDOUT+10
>> FHNNSV SFA*
>> FHOPDAT ASK0+4*, ASK0+5, ASK0+6
>> FHPNNSV ASK*, S1+6, PR1+4
FHPTNM ASK!
>> FHQ R1*, R1+3*, R1+5*, R1+8*, R1+9*, R1+10*, R1+12*, R1+13, MS1
FHSFLG SFOUT+1!, SFOUT+3
>> FHSFMEN R1*, EVNT+4, PR1+5*, ADDOUT+1*, ADDOUT+10*
>> FHSFQT9 S1+6*, PR1+4*
>> FHTOTML( R1+14, R1+15, MS1+3, MS1+4, MS1+5
>> FHTOTML("A" ASK0+2*
>> FHTOTML("B" ASK0+2*, ASK0+14*
>> FHTOTML("E" ASK0+2*, ASK0+16*
>> FHTOTML("N" ASK0+2*, ASK0+15*
>> FHTXT EVNT+3*, EVNT+4*
>> FHX R1*, R1+4*, R1+6
FHXSAV SFA+4*, SFOUT+1!, PR1+7
>> K1 G2+3*, G2+4
>> KK S1+1*, S1+4*, G1, G1+1, G1+2, G1+3, G2+1*, G2+2*, G2+3, G2+4
, G4+1*, G4+4*, G4+5*, G5*
>> L G2+4*
>> NM SFA, SFA+1, SFA+3, SFA+5, SFA+7*, SFA+8, S1, S1+1, S1+6, S1+7
, PR1+14*
>> NO ADD+5*, ADD+6, ADD+7, ADD+8, ADD+9, UPD+1, CAN+3*, CAN+4, CAN+5, PR1+12
, CAD+2*, CAD+3, ADDOUT+4*, ADDOUT+5, ADDOUT+9, UPDOUT, CANOUT+1*, CANOUT+2
>> NOW FHNO5+3*, S1+1, UPD+1, CAN+4, UPDOUT, CANOUT+2
OLD SFA*, SFA+1, G1+5*, G2+1, G2+2, G2+5, G3*, G4, G4+1, SFOUT+1!
>> P1 G1+3*, G1+5, G2+2, G2+5, G3, G4+1, G4+4, G4+5, G5*, G6+1*
>> PNN S1+1*, S1+6*, S1+7, G1+5, G2+2*, G2+4, G2+5*, G3, G4+1*, G4+4*
, G4+5*, G5, G6+1, G6+4*, ADD+7, PR1+4*, ADDOUT+6*, ADDOUT+7*, ADDOUT+8*, ADDOUT+9
>> PNO S0*, S1+1, S1+7, G6+5, PR1+5*, PR1+11*, PR1+12*
>> T1 S1+3*, G1+2*, G1+4, G4, G5*
>> T2 G1+3*, G1+4, G4, G5*
U ASK0+5, ASK0+6, ASK0+11, PR1, PR1+2, PR1+3, PR1+6, ADDOUT+1, ADDOUT+6, ADDOUT+7
, ADDOUT+8, ADDOUT+10
>> WARD ASK+2*, ASK+3, A0+3, S1+2, S1+6, G1+1, G1+2, G6, ADD+1, ADD+2
, UPD, CAN+1, CAN+2, PR1+5*
X ASK!, A0*, A0+1, A0+2, A0+3, SFA+1*, SFA+2, SFA+4, SFA+5, SFA+6
, G2*, G2+1, G2+2, G4*, G4+1*, G4+2*, G4+3, G4+4, G4+5, G5*
, G5+1, G6+4*, G6+5, ADD+5*, SFOUT+1!, R1+4*, PR1+8, ADDOUT+4*
Y ASK!, A0+4, S0, SFA+7, G2+3*, G2+4, G2+5, G6+1*, G6+2*, G6+3
, G6+4, PR1+11
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 |  Naked Globals |  Local Variables |  All