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

Package: Dietetics

Routine: FHORE21


Information

FHORE21 ; HISC/REL/NCA - List Early/Late Trays (cont) ;11/9/94 13:33

Source Information

Source file <FHORE21.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
Dietetics 6 DTP^FH  ALG^FHCLN  PID^FHDPA  (DPLL,LL3,LL4)^FHLABEL  ^FHOMELT  PATNAME^FHOMUTL  
VA Fileman 1 NOW^%DTC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHORE2  

Entry Points

Name Comments DBIA/ICR reference
P2
P3
F2
F3
F4
CUR
F7
LL ;
P0
P1
OPHDR ; Print Header (OUTPATIENT)
OUTP ;
DP
HDR ; Print Header (INPATIENT)

External References

Name Field # of Occurrence
NOW^%DTC P0
DTP^FH P0
ALG^FHCLN P2+9, P3+1, OUTP+7, LL+1
PID^FHDPA P2+3
DPLL^FHLABEL P1+18
LL3^FHLABEL LL+4, LL+16
LL4^FHLABEL LL+5, LL+21
^FHOMELT P1+3
PATNAME^FHOMUTL P1+10, P2+2, OUTP+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: P1+4
Function Call: WRITE
  • Prompt: !
  • Line Location: P1+19
Function Call: WRITE
  • Prompt: !!?56,$S(M1="B":"Breakfast ",M1="N":" Noon ",1:" Evening "),$J(TIM,6),!
  • Line Location: P2+6
Function Call: WRITE
  • Prompt: !!?56,$S(M1="B":"Breakfast ",M1="N":" Noon ",1:" Evening "),$J(TIM,6),!
  • Line Location: P2+7
Function Call: WRITE
  • Prompt: !,"Allergies: ",$S(ALG="":"None on file",1:ALG)
  • Line Location: P2+9
Function Call: WRITE
  • Prompt: !,$S(M1="B":"Breakfast",M1="N":" Noon ",1:" Evening"),?10,TIM,?(S1-12),L1
  • Line Location: P3+2
Function Call: WRITE
  • Prompt: !
  • Condition for execution: LAB=2
  • Line Location: P3+2
Function Call: WRITE
  • Prompt: !,$E(P1,1,S1-5-$L(WARD)),?(S1-3-$L(WARD)),WARD
  • Line Location: P3+3
Function Call: WRITE
  • Prompt: ?(S1-3-$L(RM)),RM
  • Line Location: P3+4
Function Call: WRITE
  • Prompt: !
  • Condition for execution: LAB=2
  • Line Location: P3+4
Function Call: WRITE
  • Prompt: !,O1,$S(ALG="":"",1:" *ALG"),!!
  • Line Location: P3+5
Function Call: WRITE
  • Prompt: !,$P(O1,",",1,L),!,$E($P(O1,",",L+1,5),2,99),$S(ALG="":"",1:"*ALG"),!
  • Line Location: P3+6
Function Call: WRITE
  • Prompt: !!?56,$S(N1="B":"Breakfast ",N1="N":" Noon ",1:" Evening "),$J($P(N2,"~",1),6),!
  • Line Location: OUTP+2
Function Call: WRITE
  • Prompt: !,FHLOCNM
  • Line Location: OUTP+3
Function Call: WRITE
  • Prompt: "/"_RM,?24,FHPTNM,?50,FHBID
  • Line Location: OUTP+4
Function Call: WRITE
  • Prompt: ?61,FHIPD,?67,$S(FHBAG="Y":"YES",1:"")
  • Line Location: OUTP+5
Function Call: WRITE
  • Prompt: ?73,FHDIET
  • Line Location: OUTP+6
Function Call: WRITE
  • Prompt: !,"Allergies: ",$S(ALG="":"None on file",1:ALG)
  • Line Location: OUTP+7
Function Call: READ
  • Prompt: "Press RETURN to continue or ""^"" to exit. "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: ANS
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !,"Enter Return or ""^""."
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !?32,"I N P A T I E N T E A R L Y / L A T E T R A Y S",?110,H1
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !!,"Ward/Room",?24,"Patient",?50,"ID#",?61,"Iso Bag Current-Diet",!
  • Line Location: HDR+5
Function Call: READ
  • Prompt: "Press RETURN to continue or ""^"" to exit. "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: ANS
  • Line Location: OPHDR+1
Function Call: WRITE
  • Prompt: !,"Enter Return or ""^""."
  • Line Location: OPHDR+1
Function Call: WRITE
  • Prompt: !?32,"O U T P A T I E N T E A R L Y / L A T E T R A Y S",?110,H1
  • Line Location: OPHDR+3
Function Call: WRITE
  • Prompt: !!,"Ward/Room",?24,"Patient",?50,"ID#",?61,"Iso Bag Current-Diet",!
  • Line Location: OPHDR+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(115.02 CUR+2
^DGPM - [#405] F4+1
^DPT - [#2] P2+3, P2+4
^FH(111 - [#111] CUR+3
^FH(119.4 - [#119.4] P1+13, P2+1
^FH(119.6 - [#119.6] F4+4, P1+11
^FH(119.73 - [#119.73] DP, HDR+4, OPHDR+4
^FH(119.9 - [#119.9] P0+1
^FHPT - [#115] F4+2, F4+3, P1+12, CUR, CUR+1
^FHPT("ADLT" F2, F3, F4, F7!
^TMP($J FHORE21+3!, F4+8*, P1+1, P1+7, P1+8, P1+9, P1+18!

Label References

Name Line Occurrences
CUR F4+7
F2 F3
F3 F4
F4 F4+5, F4+6, F4+7, F4+8, F7
F7 F4+1, F4+2
HDR P1, P2+6, HDR+1
LL P1+17, P2+4
OPHDR P1+5, OUTP+1, OPHDR+1
OUTP P1+15
P0 F2
P2 P1+1
P3 P1+16, P2+5

Naked Globals

Name Field # of Occurrence
^( P1+1
^(0 F4+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % P0, CUR+2*
>> A1 CUR*, CUR+1, CUR+3*
>> ADM F3*, F4*, F4+1, F4+2, F4+3, F4+8, F7, CUR, CUR+1
>> ALG P2+9, P3+5, P3+6, OUTP+7, LL+9
>> ANS FHORE21+3*, P1+1, P1+8, P2+6, OUTP+1, HDR+1*, OPHDR+1*
>> BAG P2*, P2+8
>> BID P1+14*, P2+8, P3+4, LL+9*, LL+10
>> BIDIS LL+10*, LL+15, LL+20
>> COUNT FHORE21+3*
>> D1 FHORE21+3*, F2*, F3, F4, F4+2, F4+8, F7, CUR
>> D3 CUR+3*
>> DFN P2+2, P2+3, P2+4
>> DTE FHORE21+3, F2, P0
DTIME HDR+1, OPHDR+1
>> DTP P0*
>> FHBAG P1+10*, OUTP+5
>> FHBID P1+14, OUTP+4
>> FHCOL LL+2*, LL+3
>> FHDATA P1+9*, P1+10
>> FHDFN F2*, F3*, F4, F4+2, F4+3, F4+8, P1+9*, P1+12, P2*, F7
, CUR, CUR+1
>> FHDIET P1+10*, OUTP+6
>> FHDU CUR+2*
>> FHIP P1+12*, P1+13
>> FHIPD P1+12*, P1+13*, OUTP+5
>> FHLABST LL+3*
>> FHLD F4+7, CUR*, CUR+1*, CUR+2
>> FHLOC P1+9*, P1+11
>> FHLOCNM P1+11*, OUTP+3
>> FHOR CUR*, CUR+1*, CUR+3
>> FHORD CUR+1*
>> FHP F4+5, HDR+4, OPHDR+4
>> FHPREV P1+5*, OUTP+2, OUTP+8*
>> FHPTNM P1+14, OUTP+4
>> H1 P0*, HDR+3, OPHDR+3
IOF HDR+2, OPHDR+2
>> IOS P0+1
IOSL P2+6, OUTP+1
IOST HDR+1, HDR+2, OPHDR+1, OPHDR+2
>> IS F4+3*, F4+8, P1+12*, P1+13*, P2*, P2+1*, P2+8, P3+4, LL+10
>> K P1+19*
>> KK CUR*, DP+1*
>> L P3+6*
>> L1 P0*, P3+2, HDR+4, OPHDR+4, LL+14, LL+19
>> LAB P0+1*, P0+2, P1, P1+4, P1+5, P1+15, P1+16, P1+17, P1+18, P1+19
, P2+4, P2+5, P3+2, P3+4, P3+7, LL+2, LL+4, LL+5, LL+7, LL+12
, LL+17
>> LABSTART LL+3*
>> LINE FHORE21+3*
>> M1 F4+6*, P1+14*, P2*, P2+6, P2+7, P3+2, LL+8
>> M2 P1*, P2+6*, P2+7*
>> MEAL F4+6
>> MEALTM LL+8*, LL+14, LL+19
N DP!
N( DP+1*
>> N1 P1+1*, P1+6*, P1+7, P1+8, P1+9, P1+14, OUTP+2, OUTP+8
>> N2 P1+1*, P1+8*, P1+9, P1+14, P2, OUTP+2, OUTP+8
>> NEW OUTP+2*
>> O1 F4+7*, F4+8, P1+10*, P2*, P2+8, P3+5, P3+6, LL+16, LL+21
>> OLW F4+3*, F4+8, P2*
>> P0 F4+5*, F4+8, P2*, DP
>> P1 P1+14*, P2+3*, P2+8, P3*, P3+3, LL+13*, LL+15, LL+18*, LL+20
>> PCL1 LL+4*, LL+5*, LL+14*, LL+19*
>> PCL2 LL+4*, LL+5*, LL+14*, LL+19*
>> PCL3 LL+4*, LL+5*, LL+15*, LL+19*
>> PCL4 LL+4*, LL+5*, LL+15*, LL+20*
>> PCL5 LL+4*, LL+5*, LL+16*, LL+20*
>> PCL6 LL+4*, LL+5*, LL+14*, LL+21*
>> PCL7 LL+5*, LL+19*
>> PCL8 LL+5*, LL+19*
>> PG P1*, HDR+1, HDR+2*, HDR+4, OPHDR+1, OPHDR+2*, OPHDR+4
>> RM P1+10*, P2+4*, P2+8, P3*, P3+4, OUTP+4, LL+11*, LL+15, LL+20
>> S1 P0+2*, P3+2, P3+3, P3+4, P3+5, P3+6
>> SL1 LL+7*
>> TIM P1+14*, P2*, P2+6, P2+7, P3+2, LL+8
U P1+9, P1+10, P1+11, P1+12, P1+13
>> W1 F4+4*
>> WARD F4+4*, F4+5, F4+8, P1+11*, P2*, P2+8, P3*, P3+3, LL+11*, LL+15
, LL+20
>> WLN LL+11*, LL+13, LL+18
>> X F4+3*, F4+4, P2+7*, CUR+1*, DP+1*
>> X2 F4+4*, F4+5
>> Y F4+7, P1+1*, P2, P2+3*, CUR*, CUR+2*, CUR+3*, DP*, DP+1
>> Y(0 F4+2*, F4+6, F4+8
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All