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

Package: Dietetics

Routine: FHDMP4


Information

FHDMP4 ; HISC/REL/NCA - Patient Data Log (cont) ;5/7/92 15:36

Source Information

Source file <FHDMP4.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Dietetics 2 (HDR,KIL)^FHDMP  ^FHDMP5  

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 FHDMP3  

Entry Points

Name Comments DBIA/ICR reference
TF
TF1
CD
EL
DTP ; Printable Date/Time

External References

Name Field # of Occurrence
HDR^FHDMP FHDMP4+2, FHDMP4+7, FHDMP4+8, FHDMP4+11, FHDMP4+12, TF+1
KIL^FHDMP FHDMP4+2, FHDMP4+4, FHDMP4+7, FHDMP4+8, FHDMP4+11, FHDMP4+12
^FHDMP5 FHDMP4+14

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,LN,!?28,"T U B E F E E D I N G S"
  • Line Location: FHDMP4+2
Function Call: WRITE
  • Prompt: !!,"No Tubefeedings ordered for this Admission"
  • Line Location: FHDMP4+5
Function Call: WRITE
  • Prompt: !
  • Line Location: FHDMP4+6
Function Call: WRITE
  • Prompt: !,LN,!?23,"D I E T E T I C C O N S U L T S"
  • Line Location: FHDMP4+7
Function Call: WRITE
  • Prompt: !!,"No Consultations ordered for this Admission"
  • Line Location: FHDMP4+9
Function Call: WRITE
  • Prompt: !
  • Line Location: FHDMP4+10
Function Call: WRITE
  • Prompt: !,LN,!?24,"E A R L Y / L A T E T R A Y S"
  • Line Location: FHDMP4+11
Function Call: WRITE
  • Prompt: !!,"No Early or Late Trays ordered for this Admission"
  • Line Location: FHDMP4+13
Function Call: WRITE
  • Prompt: !
  • Line Location: FHDMP4+14
Function Call: WRITE
  • Prompt: !!,"Order # ",TF
  • Line Location: TF+0
Function Call: WRITE
  • Prompt: !,"Daily ML's: ",$P(X,"^",3),?42,"Daily KCals: ",$P(X,"^",7)
  • Line Location: TF+2
Function Call: WRITE
  • Prompt: !,"Ordered: "
  • Line Location: TF+4
Function Call: WRITE
  • Prompt: ?42,"By: ",$P($G(^VA(200,+Y,0)),"^",1)
  • Line Location: TF+4
Function Call: WRITE
  • Prompt: !,"Cancelled: "
  • Line Location: TF+5
Function Call: WRITE
  • Prompt: ?42,"By: ",$P($G(^VA(200,+Y,0)),"^",1)
  • Line Location: TF+5
Function Call: WRITE
  • Prompt: !,"Product: ",$P($G(^FH(118.2,+Y,0)),"^",1),", "
  • Line Location: TF1+0
Function Call: WRITE
  • Prompt: $S(Y=4:"Full",Y=1:"1/4",Y=2:"1/2",1:"3/4")," Str., "
  • Line Location: TF1+1
Function Call: WRITE
  • Prompt: FHTUBML
  • Line Location: TF1+4
Function Call: WRITE
  • Prompt: !,"Product ML's: ",$P(X1,"^",4),?42,"Water ML's: ",$P(X1,"^",5)
  • Line Location: TF1+5
Function Call: WRITE
  • Prompt: !!,"Request: ",$P($G(^FH(119.5,+Y,0)),"^",1)
  • Line Location: CD+0
Function Call: WRITE
  • Prompt: ?62,"Status: ",$S(Y="A":"Active",Y="C":"Complete",Y="X":"Cancelled",1:"")
  • Line Location: CD+1
Function Call: WRITE
  • Prompt: !,"Comment: ",Y
  • Line Location: CD+2
Function Call: WRITE
  • Prompt: !,"Clinician: ",$P($G(^VA(200,+Y,0)),"^",1)
  • Line Location: CD+3
Function Call: WRITE
  • Prompt: ?62,"Type: ",$S(Y="I":"Initial",Y="F":"Follow-up",1:"")
  • Line Location: CD+4
Function Call: WRITE
  • Prompt: !,"Ordered: "
  • Line Location: CD+5
Function Call: WRITE
  • Prompt: ?45,"By: ",$P($G(^VA(200,+Y,0)),"^",1)
  • Line Location: CD+5
Function Call: WRITE
  • Prompt: !,"Cleared: "
  • Line Location: CD+6
Function Call: WRITE
  • Prompt: ?45,"By: ",$P($G(^VA(200,+Y,0)),"^",1)
  • Line Location: CD+6
Function Call: WRITE
  • Prompt: !!,"Order: "
  • Line Location: EL+0
Function Call: WRITE
  • Prompt: ?28,"Meal: ",$S(Y="B":"Breakfast",Y="N":"Noon",Y="E":"Evening",1:"")
  • Line Location: EL+0
Function Call: WRITE
  • Prompt: ?47,"Bagged: ",$S(Y="Y":"Yes",Y="N":"No",1:"")
  • Line Location: EL+1
Function Call: WRITE
  • Prompt: ?62,"Time: ",$P(X,"^",3)
  • Line Location: EL+1
Function Call: WRITE
  • Prompt: !,"Ordered: "
  • Line Location: EL+2
Function Call: WRITE
  • Prompt: ?28,"By: ",$P($G(^VA(200,+Y,0)),"^",1)
  • Line Location: EL+2
Function Call: WRITE
  • Prompt: $J(+$E(Y,6,7),2)_"-"_$P("Jan Feb Mar Apr May Jun Jul Aug Sep Oct Nov Dec"," ",+$E(Y,4,5))_"-"_$E(Y,2,3)
  • Line Location: DTP+1
Function Call: WRITE
  • Prompt: $J($S(%>12:%-12,1:%),3)_":"_$E(Y_"000",11,12)_$S(%<12:"am",%<24:"pm",1:"m")
  • Line Location: DTP+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(118.2 - [#118.2] TF1
^FH(119.5 - [#119.5] CD
^FHPT - [#115] FHDMP4+3, FHDMP4+4, FHDMP4+8, FHDMP4+12, TF+1
^VA(200 - [#200] TF+4, TF+5, CD+3, CD+5, CD+6, EL+2

Label References

Name Line Occurrences
CD FHDMP4+8
DTP TF+4, TF+5, CD+5, CD+6, ELEL+2
EL FHDMP4+12
TF FHDMP4+4
TF1 TF+1

Naked Globals

Name Field # of Occurrence
^( FHDMP4+3, FHDMP4+4, FHDMP4+8, FHDMP4+12, TF+1
^(0 FHDMP4+4, FHDMP4+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% DTP+2*, DTP+3!
>> ADM FHDMP4+3, FHDMP4+4, FHDMP4+8, FHDMP4+12, TF+1
>> CT FHDMP4+4*, FHDMP4+5, FHDMP4+8*, FHDMP4+9, FHDMP4+12*, FHDMP4+13, TF*
>> D1 FHDMP4+3*
>> FHDFN FHDMP4+3, FHDMP4+4, FHDMP4+8, FHDMP4+12, TF+1
>> FHTUBML TF1+2*, TF1+3*, TF1+4
>> K FHDMP4+3*, FHDMP4+8*, FHDMP4+12*
>> LN FHDMP4+2, FHDMP4+7, FHDMP4+11
>> LST FHDMP4+2*, FHDMP4+3*, FHDMP4+4
>> QT FHDMP4+2, FHDMP4+4, FHDMP4+7, FHDMP4+8, FHDMP4+11, FHDMP4+12, TF+1, TF+2
>> QUAFI TF1+3*
>> QUASE TF1+3*
>> S1 FHDMP4+2, FHDMP4+7, FHDMP4+8, FHDMP4+11, FHDMP4+12, TF+1
>> SDT FHDMP4+3, FHDMP4+8, FHDMP4+12
>> TF FHDMP4+4*, TFTF+1
>> TF2 TF+1*
>> X FHDMP4+4*, FHDMP4+8*, FHDMP4+12*, TF+2, TF+3, TF+4, TF+5, CDCD+1, CD+2
CD+3, CD+4, CD+5, CD+6, ELEL+1, EL+2
>> X1 TF+1*, TF1TF1+1, TF1+2, TF1+5
>> Y TF+3*, TF+4*, TF+5*, TF1*, TF1+1*, CD*, CD+1*, CD+2*, CD+3*, CD+4*
CD+5*, CD+6*, EL*, EL+1*, EL+2*, DTP+1, DTP+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All