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

Package: Dietetics

Routine: FHMTK1C


Information

FHMTK1C ; HISC/NCA/RVD - Print Tray Tickets ;6/21/2017 13:45

Source Information

Source file <FHMTK1C.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
Dietetics 1 $$NOTE^FHMTK1D  

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

Package Total Caller Graph
Dietetics 6 FHDCR1A  FHDCR1D  FHMTK11  FHMTK1A  FHOMTK1  FHOMTK2  

Entry Points

Name Comments DBIA/ICR reference
PRT ; Print 3 person per page
START
NXT ; Print Next Page
N1
CHKH ; Check whether name header should be on bottom
HEAD
FOOT
LIST ; Print Tabulated Recipe List for Service Points
L1
PRO
SUM
PR1
HDR ; Consolidated Recipe List Heading

External References

Name Field # of Occurrence
$$NOTE^FHMTK1D HEAD+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!
  • Line Location: START+2
Function Call: WRITE
  • Prompt: ?$S(N1=1:2,N1=2:45,1:88),MEALDT
  • Line Location: START+8
Function Call: WRITE
  • Prompt: !
  • Line Location: START+10
Function Call: WRITE
  • Prompt: ?$S(NBR=1:2,NBR=2:45,1:88),PP(N1,NBR)
  • Line Location: START+10
Function Call: WRITE
  • Prompt: !
  • Line Location: START+11
Function Call: WRITE
  • Prompt: !!
  • Line Location: START+12
Function Call: WRITE
  • Prompt: ?$S(NBR=1:2,NBR=2:45,1:88),MM(N1,NBR)
  • Line Location: START+12
Function Call: WRITE
  • Prompt: !
  • Line Location: START+13
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: START+14
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: START+16
Function Call: WRITE
  • Prompt: !!
  • Line Location: NXT+1
Function Call: WRITE
  • Prompt: ?$S(NM=1:12,NM=2:57,1:100),"(More Items Next Pg)"
  • Line Location: NXT+1
Function Call: WRITE
  • Prompt: !
  • Line Location: NXT+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: NXT+3
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: N1+0
Function Call: WRITE
  • Prompt: !!
  • Line Location: N1+1
Function Call: WRITE
  • Prompt: ?$S(XX=1:2,XX=2:45,1:88),MEALDT," (Cont.)"
  • Line Location: N1+7
Function Call: WRITE
  • Prompt: !
  • Line Location: CHKH+1
Function Call: WRITE
  • Prompt: !
  • Line Location: CHKH+1
Function Call: WRITE
  • Prompt: ?S1,X
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: ?S1,$$NOTE^FHMTK1D(MM(0,NBR),NBR,MFLG,MEAL)
  • Line Location: HEAD+3
Function Call: WRITE
  • Prompt: !
  • Line Location: FOOT+0
Function Call: WRITE
  • Prompt: ?S1,HD
  • Condition for execution: $D(MM(0,NBR))
  • Line Location: FOOT+0
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: $E(IOST,1,2)="C-"
  • Line Location: L1+1
Function Call: WRITE
  • Prompt: !,HD,!!!?(LS(MEAL)-42\2),"T A B U L A T E D R E C I P E L I S T",?(LS(MEAL)-8),"Page ",PG
  • Line Location: L1+1
Function Call: WRITE
  • Prompt: !!?(LS(MEAL)-$L(MEALDT)\2),MEALDT,!!,$S(ALL:"ALL",FHP:$P($G(^FH(119.73,FHP,0)),"^",1),1:$P($G(^FH(119.6,+W1,0)),"^",1)),!
  • Line Location: L1+2
Function Call: WRITE
  • Prompt: !!,"R E C I P E S",?29
  • Line Location: L1+3
Function Call: WRITE
  • Prompt: $P(DP(MEAL,X,K),"^",1)
  • Line Location: L1+4
Function Call: WRITE
  • Prompt: " Total",!
  • Line Location: L1+5
Function Call: WRITE
  • Prompt: !!,$P(X8,"~",3),?31
  • Line Location: L1+6
Function Call: WRITE
  • Prompt: !!!,"TOTAL RECIPES",?31
  • Line Location: L1+7
Function Call: WRITE
  • Prompt: $J("",8)_" "
  • Line Location: L1+10
Function Call: WRITE
  • Prompt: $S(TOT#1>0:$J(TOT,9,2),1:$J(TOT,9))
  • Line Location: L1+13
Function Call: WRITE
  • Prompt: @IOF
  • Condition for execution: MFLG
  • Line Location: L1+13
Function Call: WRITE
  • Prompt: $J("",8)_" "
  • Line Location: PRO+3
Function Call: WRITE
  • Prompt: $S(FTOT#1>0:$J(FTOT,9,2),1:$J(FTOT,9)_" ")
  • Line Location: PRO+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: SUM+2
Function Call: WRITE
  • Prompt: !!!,"TOTAL RECIPES",?31
  • Line Location: SUM+4
Function Call: WRITE
  • Prompt: $J("",8)_" "
  • Line Location: SUM+7
Function Call: WRITE
  • Prompt: $S(TOT#1>0:$J(TOT,9,2),1:$J(TOT,9))
  • Line Location: SUM+10
Function Call: WRITE
  • Prompt: $J("",8)_" "
  • Line Location: PR1+3
Function Call: WRITE
  • Prompt: $S(FTOT#1>0:$J(FTOT,9,2),1:$J(FTOT,9)_" ")
  • Line Location: PR1+7
Function Call: WRITE
  • Prompt: !,HD,!!!?(SL-48\2),"C O N S O L I D A T E D R E C I P E L I S T",?(SL-8),"Page ",PG
  • Line Location: HDR+1
Function Call: WRITE
  • Prompt: !!?(SL-$L(MEALDT)\2),MEALDT,!!,$S(ALL:"ALL",FHP:$P($G(^FH(119.73,FHP,0)),"^",1),1:$P($G(^FH(119.6,+W1,0)),"^",1)),!
  • Line Location: HDR+2
Function Call: WRITE
  • Prompt: !!,"R E C I P E S",?29
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: $P(TP(X,K),"^",1)
  • Line Location: HDR+4
Function Call: WRITE
  • Prompt: " Total",!
  • Line Location: HDR+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(119.6 - [#119.6] L1+2, HDR+2
^FH(119.73 - [#119.73] L1+2, HDR+2
^TMP($J L1+6, PRO+2, SUM+1, PR1+2

Label References

Name Line Occurrences
CHKH START+1, N1
FOOT START+15, NXT+4, CHKH+1
HDR SUM, SUM+2
HEAD START+14, NXT+3, CHKH+2
L1 LIST+1, LIST+2
N1 NXT+3
NXT START+12
PR1 SUM+3
PRO L1+6
SUM LIST+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> ALL L1+2, HDR+2
>> DP( L1+4, L1+7, L1+8, PRO, PRO+1
>> FHBOT START+12, START+13, START+14, NXT+2, NXT+3, CHKH+1
>> FHP L1+2, HDR+2
>> FTOT PRO*, PRO+2*, PRO+7, PR1*, PR1+2*, PR1+7
>> HD FOOT, L1+1, HDR+1
IOF START+14, START+16, NXT+3, N1, L1+1, L1+13, SUM+2
IOST L1+1
>> K L1+4*, L1+8*, L1+9, PRO+1*, PRO+2, SUM+5*, SUM+6, PR1+1*, PR1+2, HDR+4*
>> L1 START+13*, NXT+2*
>> LN START+12, START+13, NXT+2, SUM+2
>> LS( L1*, L1+1, L1+2
>> MDT START+3, START+4, START+6, N1+2, N1+3, N1+5, L1, SUM
>> MEAL START+3, N1+2, HEAD+3, LIST+2*, L1, L1+1, L1+2, L1+4, L1+6, L1+7
, L1+8, L1+9, PRO, PRO+1, PRO+2
>> MEALDT START+3*, START+4*, START+6*, START+7*, START+8, N1+2*, N1+3*, N1+5*, N1+6*, N1+7
, L1*, L1+2, SUM*, HDR+2
>> MFLG START+3, N1+2, HEAD+3, LIST+1, L1+13
>> MM( START+12
>> MM(0 START+5, START+6, START+8, NXT+1, N1+4, N1+5, N1+7, HEAD, HEAD+3, FOOT
>> MMMDT START+6*, N1+5*
>> N1 START+2*, START+4, START+5, START+6, START+8, START+10*, START+12*
>> NBR START+10*, START+12*, HEAD*, HEAD+1, HEAD+3, FOOT*
>> NM NXT+1*, HEAD*, HEAD+1, HEAD+3
>> P( L1+9, PRO+2*
>> PG LIST+1*, L1*, L1+1, SUM*, HDR+1*
>> PP( START+10
>> S1 HEAD+1*, HEAD+3, HEAD+4, FOOT*
>> SL SUM*, HDR+1, HDR+2
>> SUM LIST+3
>> T1( SUM+6, PR1+2*
>> TABREC START
>> TL START+1*, START+2*, START+10*, START+11*, START+12*, START+13, NXT+1*, NXT+2, N1*, N1+1*
, N1+8*, CHKH+1*, HEAD*, FOOT*
>> TOT L1+7*, L1+9*, L1+13, SUM+4*, SUM+6*, SUM+10
>> TP( SUM+4, SUM+5, PR1, PR1+1, HDR+4
U START+6, N1+5
>> W1 L1+2, HDR+2
>> X HEAD*, HEAD+1, HEAD+4, L1+4*, L1+7*, L1+8, L1+9, PRO*, PRO+1, PRO+2
, SUM+4*, SUM+5, SUM+6, PR1*, PR1+1, PR1+2, HDR+4*
>> X8 L1+6*, PRO+2, SUM+1*, SUM+3, PR1+2
>> XX N1+1*, N1+3, N1+4, N1+5, N1+7
>> Z L1+9*, L1+10, L1+11, PRO+2*, PRO+3, PRO+5, SUM+6*, SUM+7, SUM+8, PR1+2*
, PR1+3, PR1+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All