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

Package: Dietetics

Routine: FHASP2


Information

FHASP2 ; HISC/REL - Nutrition Profile (cont.) ;10/4/93 11:44

Source Information

Source file <FHASP2.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Dietetics 2 DTP^FH  CUR^FHORD7  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

action A extended action Ea event driver Ed subscriber Su protocol O limited protocol LP run routine RR broker B edit E server Se print P screenman SM inquire I

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHASP  

Entry Points

Name Comments DBIA/ICR reference
F1
F2
F3
LP

External References

Name Field # of Occurrence
DTP^FH F1+3, F1+7, F2+2
CUR^FHORD7 F1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"Adm. Dx: ",$E(X,1,27)
  • Line Location: FHASP2+2
Function Call: WRITE
  • Prompt: !,"Service: ",$S(TYP="T":"Tray",TYP="D":"Dining Room",1:"Cafeteria")
  • Line Location: F1+2
Function Call: WRITE
  • Prompt: !,"Expires: ",DTP
  • Line Location: F1+3
Function Call: WRITE
  • Prompt: !!,"Tubefeed Ordered: ",DTP
  • Line Location: F1+7
Function Call: WRITE
  • Prompt: !,"Total Quantity: ",TQU," ml",?42,"Total KCAL: ",CAL
  • Line Location: F1+9
Function Call: WRITE
  • Prompt: !!,"Supplemental Feeding: ",$S('L:"No Order",1:$P(^FH(118.1,L,0),"^",1)) G:'NO
  • Line Location: F2+1
Function Call: WRITE
  • Prompt: ?50,"Reviewed: ",DTP
  • Line Location: F2+2
Function Call: WRITE
  • Prompt: !?5,$P("10am; 2pm; 8pm",";",K1),":",?13,N(K1)
  • Line Location: F2+4
Function Call: WRITE
  • Prompt: !?3,$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+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DGPM - [#405] FHASP2+2
^FH(118 - [#118] F2+3
^FH(118.1 - [#118.1] F2+1
^FH(118.2 - [#118.2] LP+1
^FHPT - [#115] FHASP2+3, F1+1, F1+5, F1+8, F2

Label References

Name Line Occurrences
F2 F1+4
F3 F2+1
LP F1+8

Naked Globals

Name Field # of Occurrence
^( F1+8
^(1 F1+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ADM FHASP2+2, FHASP2+3, F1+1, F1+5, F1+8, F2
CAL F1+6*, F1+9, F3!
>> COM F1+1*, F1+6*, F1+10
>> DTP F1+3*, F1+6*, F1+7, F2+2*
>> FHDFN FHASP2+3, F1+1, F1+5, F1+8, F2
>> FHORD F1+1
>> K F2+3*
>> K1 F2+3*, F2+4*
>> K2 F2+3*
>> L F2+1*, F2+3*
>> N( F2+3*, F2+4
>> NO F2*, F2+1
>> Q F2+3*
>> QUA LP*, LP+1
>> STR LP*, LP+1
>> TF F1+4*, F1+5, F1+8
TF2 F1+8*, F3!
TQU F1+6*, F1+9, F3!
>> TUN LP*, LP+1
>> TYP F1+2*
U F2+3
>> X FHASP2+2*, F1+2
>> X(0 FHASP2+3*, F1+3, F1+4, F2, F3!
XY F1+8*, F3!, LP
>> Y F1, F1+1, F1+5*, F1+6, F2*, F2+1, F2+2, F2+3
>> Z F2+3*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All