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 |  Global Variables Directly Accessed |  Label References |  Local Variables |  All
Print Page as PDF
Routine: FHORT1

Package: Dietetics

Routine: FHORT1


Information

FHORT1 ; HISC/REL/NCA - Tubefeeding ;8/19/96 14:55 ;

Source Information

Source file <FHORT1.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Dietetics 6 TR^FH  ^FHDPA  ^FHORT10  ^FHORT11  (CAN,DIS)^FHORT2  (TF,TF1)^FHWOR5  
Kernel 1 MSG^XQOR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHORTF3  

Entry Points

Name Comments DBIA/ICR reference
AB
E31
KIL
E5
E4
E6
E0 ; Process tubefeeding
E3

External References

Name Field # of Occurrence
TR^FH E0+5, E31, E5, E6
^FHDPA FHORT1+2
^FHORT10 E3
^FHORT11 FHORT1+4
CAN^FHORT2 FHORT1+4
DIS^FHORT2 E0+3
TF^FHWOR5 FHORT1+5
TF1^FHWOR5 FHORT1+5
MSG^XQOR FHORT1+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"An ACTVE TUBEFEEDING ORDER exists!"
  • Line Location: E0+3
Function Call: READ
  • Prompt: "Do You Wish to Cancel the Existing Tubefeeding and Enter a New One? Y// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: ANS
  • Line Location: E0+4
Function Call: WRITE
  • Prompt: *7,!!,"No order entered!"
  • Line Location: E0+4
Function Call: WRITE
  • Prompt: !!,"Answer YES to Cancel Existing Order and Enter a New One.",!,"Answer NO to Edit the Existing Tubefeeding Order.",!,"Enter ""^"" to Exit Completely."
  • Line Location: E0+6
Function Call: WRITE
  • Prompt: *7,!!,"Edit the Existing Tubefeeding."
  • Line Location: E0+8
Function Call: WRITE
  • Prompt: !!,*7,"There are FIVE products already!",!,"You may edit them, or delete a product before adding any."
  • Line Location: E0+9
Function Call: WRITE
  • Prompt: !!,"No Tubefeeding Products selected."
  • Line Location: E3+1
Function Call: WRITE
  • Prompt: !
  • Line Location: E3+2
Function Call: WRITE
  • Prompt: !!,"Total Kcal: ",TK,?36,"Total Quantity: ",TC
  • Line Location: E3+11
Function Call: WRITE
  • Prompt: *7,!!,"WARNING: Total amount exceeds 5000ml: ",TC," ml",!,"Please Edit the Tubefeeding and Modify."
  • Line Location: E3+12
Function Call: READ
  • Prompt: "Is this Correct ? Y// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: E31+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: E31+0
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: E4+0
Function Call: WRITE
  • Prompt: *7," ??"
  • Line Location: E4+0
Function Call: WRITE
  • Prompt: *7,!,"Enter a comment of up to 160 characters"
  • Line Location: E4+1
Function Call: READ
  • Prompt: "Cancel all current or future tray orders? Y// "
  • Formatting: !
  • Timeout: DTIME
  • Variable: YN
  • Line Location: E5+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: E5+0
Function Call: READ
  • Prompt: "Ok to Enter Order? Y// "
  • Formatting: !
  • Timeout: DTIME
  • Variable: YN
  • Line Location: E6+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: E6+0
Function Call: WRITE
  • Prompt: *7,!!,"Tubefeeding Order TERMINATED - No order entered!"
  • Line Location: AB+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(118.2 - [#118.2] E3+7
^FHPT - [#115] FHORT1+4, E0+2

Label References

Name Line Occurrences
AB E3+1, E31, E31+2, E4, E5, E6, E6+1
E0 FHORT1+4, E0+6
E3 E0+2, E3+12, E31+1
E31 E31
E4 E4, E4+1
E5 E5
E6 E6
KIL FHORT1+2, FHORT1+4, FHORT1+7

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% KIL!
%H KIL!
%I KIL!
A KIL!
A1 KIL!
A2 KIL!
A3 KIL!
A4 KIL!
ADM FHORT1+4, E0+2, KIL!
ALL FHORT1+2*, KIL!
ANS E0+4*, E0+5*, E0+6, E0+7, E0+8, KIL!
BID KIL!
C KIL!
CAN E5+1*, KIL!
COM KIL!
CS KIL!
D1 KIL!
D2 KIL!
D3 KIL!
D4 KIL!
DFN FHORT1+2, FHORT1+4, E0+4*, E3, KIL!, AB*
DIC KIL!
DTIME E0+4, E31, E4, E5, E6
DTP KIL!
DX KIL!
E KIL!
FHD KIL!
FHDFN FHORT1+2, FHORT1+4, E0+2, E0+4*, E3, KIL!, AB*
FHDR KIL!
FHDU KIL!
FHLD KIL!
FHOR KIL!
FHORD KIL!
FHORN KIL+1!
FHPAR KIL!
FHPV KIL!
FHSAV KIL+1!
FHTF FHORT1+5*, KIL!
FHWF FHORT1+4, E6, KIL!
FLG KIL!
FLG1 KIL!
I KIL!
K E3+3*, E3+4, E3+5, E3+6, E3+9, KIL!
MNUM KIL+1!
MSG FHORT1+6!
NO E0+1*, E0+7*, E0+9, KIL!
NOW KIL!
NU KIL+1!
OLDT KIL+1!
P KIL!
P1 KIL!
P2 KIL!
PID KIL!
POP KIL!
PR KIL+1!
PRO E0+1*, E3+6*, E3+7, KIL+1!
QUA KIL+1!
S1 KIL+1!
S2 KIL+1!
S3 KIL+1!
ST1 KIL+1!
ST3 KIL+1!
STR E3+5*, E3+8, KIL+1!
T E0+8, KIL+1!
T1 E0+1*, KIL+1!
T2 E0+1*, KIL+1!
T3 E0+1*, KIL+1!
T4 E0+1*, KIL+1!
TC E3+2*, E3+4*, E3+11, E3+12, E31+2, KIL+1!
TF FHORT1+4*, E0+2*, KIL+1!
TF2 KIL+1!
TFCOM E0+1*, E0+7*, E0+8*, E4, E4+2*, KIL!
TK E3+2*, E3+5*, E3+11, KIL+1!
TP KIL+1!
TT KIL+1!
TU KIL+1!
TUN E0+1!, E0+7!, KIL+1!
TUN( FHORT1+5, E3+3, E3+4, E3+5, E3+6, E3+9
TUN(0 E3+1
TW KIL+1!
TYP KIL+1!
U E4
UNT KIL+1!
WARD KIL+1!
WRD KIL+1!
X E0+5*, E31*, E31+1, E4*, E4+1, E4+2, E5*, E6*, KIL+1!
X1 KIL+1!
X2 KIL+1!
XX FHORT1+5*, KIL+1!
Y KIL+1!
Y0 KIL+1!
Y2 KIL+1!
YN E5*, E5+1, E6*, E6+1, KIL+1!
YY KIL+1!
Z KIL+1!
Z1 KIL+1!
ZZ KIL+1!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables |  All