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

Package: Dietetics

Routine: FHORD2


Information

FHORD2 ; HISC/REL/NCA - Review Diet Orders ;11/7/92 09:57

Source Information

Source file <FHORD2.m>

Call Graph

Call Graph Total: 4

Package Total Call Graph
Dietetics 3 DTP^FH  ^FHDPA  CUR^FHORD7  
VA Fileman 1 ^%DT  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHORD2  

Entry Points

Name Comments DBIA/ICR reference
F0
F1
KIL
T1
LST
F01
LP
L1
ORD
TLN

External References

Name Field # of Occurrence
^%DT F01
DTP^FH F0+1, F01+3, F01+7, L1+1, LST+3, T1+2
^FHDPA F0
CUR^FHORD7 F01+1

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: F01+0
Function Call: WRITE
  • Prompt: !!,"List Orders from Date/Time: "_DTP_" // "
  • Line Location: F01+0
Function Call: WRITE
  • Prompt: !,"Comment: ",^(1)
  • Line Location: F01+2
Function Call: WRITE
  • Prompt: !,"Expires: ",DTP
  • Line Location: F01+3
Function Call: WRITE
  • Prompt: !!,"Tubefeed Ordered: ",DTP
  • Line Location: F01+7
Function Call: WRITE
  • Prompt: !,"Total Quantity: ",TQU," ml",?42,"Total KCAL: ",CAL
  • Line Location: F01+9
Function Call: WRITE
  • Prompt: !!,"No Diet Orders Entered",!
  • Line Location: F1+2
Function Call: WRITE
  • Prompt: !,"Product: ",$P($G(^FH(118.2,TUN,0)),"^",1),", ",$S(STR=4:"Full",STR=1:"1/4",STR=2:"1/2",1:"3/4")," Str., ",QUA
  • Line Location: LP+2
Function Call: WRITE
  • Prompt: !!,"Saved Additional Orders:",!
  • Line Location: L1+0
Function Call: WRITE
  • Prompt: !,DTP,?20,$P(X,"^",3)
  • Line Location: L1+1
Function Call: WRITE
  • Prompt: !!," Effective Expires Type Order",!
  • Line Location: LST+1
Function Call: WRITE
  • Prompt: !,DTP
  • Line Location: LST+3
Function Call: WRITE
  • Prompt: ?20,DTP
  • Line Location: LST+3
Function Call: WRITE
  • Prompt: ?40,TYP,?44
  • Line Location: LST+4
Function Call: WRITE
  • Prompt: Y
  • Line Location: LST+4
Function Call: WRITE
  • Prompt: !!?24,"----- Diet Orders Time Line -----",!," Effective Type Order",!
  • Line Location: TLN+0
Function Call: WRITE
  • Prompt: !,DTP,?20,TYP,?24
  • Line Location: T1+2
Function Call: WRITE
  • Prompt: Y
  • Line Location: T1+2
Function Call: WRITE
  • Prompt: $P(Y,", ",1,4),",",!?24,$P(Y,", ",5)
  • Line Location: T1+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(115.02 ORD
^DGPM - [#405] F0, F0+1
^FH(111 - [#111] ORD+1
^FH(118.2 - [#118.2] LP+2
^FHPT - [#115] F01+2, F01+3, F01+5, F01+8, F1, F1+1, LST, TLN+1, T1

Label References

Name Line Occurrences
F0 F0, F1+2, F1+3
F01 F01
F1 F01+4
KIL F0, F01
L1 F1
LP F01+8
LST F1+1
ORD LST+4, T1+2
T1 TLN+1
TLN F1+3

Naked Globals

Name Field # of Occurrence
^( F01+8, F1, F1+1, TLN+1
^(1 F01+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% KIL!, ORD*
%DT F01*, KIL!
A1 KIL!, ORD+1*
ADM F0, F0+1, F01+2, F01+3, F01+5, F01+8, F1, F1+1, KIL!, LST
, TLN+1, T1
ALL F0*, KIL!
C KIL!
CAL F01+6*, F01+9, KIL!
COM F01+6*, F01+10, KIL!, LST*, LST+6
CT F1*, KIL!, L1*
D1 KIL!, LST+2*, LST+3
D2 KIL!, LST+2*, LST+3
D3 KIL!, LST+2*, ORD+1*
D4 F01+1*, F1, KIL!, LST, T1
DA KIL!
DFN F0, KIL!
DTIME F01
DTP F0+1*, F01, F01+3*, F01+6*, F01+7, KIL!, L1+1*, LST+3*, T1+2*
FHDFN F0, F01+2, F01+3, F01+5, F01+8, F1, F1+1, KIL!, LST, TLN+1
, T1
FHDU KIL!, ORD*
FHLD KIL!, LST+2*, ORD, T1+1*
FHOR KIL!, LST+2*, ORD+1, T1+1*
FHORD F01+2, F1+1*, KIL!, LST, TLN+1*, T1
FHPV KIL!
FHWF KIL!
I KIL!
K F1*, KIL!
KK KIL!, TLN+1*, T1+2
N1 F1+1*, F1+2, KIL!, LST+1, LST+2*
NOW KIL!
POP KIL!
QUA KIL!, LP*, LP+1*, LP+2
>> QUAFI LP+1*
>> QUASE LP+1*
STR KIL!, LP*, LP+2
TF F01+4*, F01+5, F01+8, KIL!
TF2 F01+8*, KIL!
TQU F01+6*, F01+9, KIL!
TUN KIL!, LP*, LP+2
TYP KIL!, LST+2*, LST+4, T1+1*, T1+2
WARD KIL!
X F01*, F1*, F1+1*, KIL!, L1+1, LST, LST+2, T1*, T1+1
X1 F01+3*, F01+4, KIL!
X2 KIL!
XY F01+8*, KIL!, LP
Y F01*, F01+1, F01+2, F01+5*, F01+6, KIL!, LST+4, LST+5, ORD*, ORD+1*
, T1+2, T1+3
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All