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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All
Print Page as PDF
Routine: FHORD13

Package: Dietetics

Routine: FHORD13


Information

FHORD13 ; HISC/REL/NCA/RVD - Reprint Diet Label ;2/26/96 11:57

Source Information

Source file <FHORD13.m>

Call Graph

Call Graph Total: 13

Package Total Call Graph
Dietetics 7 (DTP,EN2,TR)^FH  ALG^FHCLN  ^FHDEV  PID^FHDPA  (DPLL,LAB)^FHLABEL  (,CHECK)^FHOMDPA  PATNAME^FHOMUTL  
Kernel 3 ^%ZIS  ^%ZISC  KILL^XUSCLEAN  
VA Fileman 3 NOW^%DTC  ^DIC  ^DIR  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHORD14  

Entry Points

Name Comments DBIA/ICR reference
F0
Q1 ; Reprint the Diet Labels
P0
P1 ;
L1
F1
KIL
LL
W0
Q3
OUTW ;set all outpt data for printing
LST ;
Q2
PPT
PROUT ;print outptlabels
D2
OUTP ;process outpatient dat

External References

Name Field # of Occurrence
NOW^%DTC Q1+1
^%ZIS P1+3
^%ZISC P1+5
^DIC W0, D2
^DIR P1+1
DTP^FH Q1+3
EN2^FH P1+4
TR^FH F0
ALG^FHCLN L1
^FHDEV Q1+3
PID^FHDPA LST+4
DPLL^FHLABEL Q1+10, Q2+4
LAB^FHLABEL LL
^FHOMDPA P0
CHECK^FHOMDPA Q1+6
PATNAME^FHOMUTL F1+4, Q2, OUTW+1
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!!?21,"R E P R I N T D I E T L A B E L S"
  • Line Location: FHORD13+2
Function Call: READ
  • Timeout: DTIME
  • Line Location: F0+0
Function Call: WRITE
  • Prompt: *7,!!," Answer with C, L, P or A"
  • Line Location: F0+1
Function Call: WRITE
  • Prompt: !
  • Line Location: W0+0
Function Call: WRITE
  • Prompt: !
  • Line Location: D2+0
Function Call: WRITE
  • Prompt: !
  • Line Location: P1+1
Function Call: WRITE
  • Prompt: !
  • Line Location: P1+3
Function Call: WRITE
  • Prompt: !
  • Line Location: Q1+11
Function Call: WRITE
  • Prompt: !
  • Line Location: Q3+0
Function Call: WRITE
  • Prompt: !,$E(N1,1,S2-5-$L(W1)),?(S2-3-$L(W1)),W1,!,BID
  • Line Location: L1+2
Function Call: WRITE
  • Prompt: @FHIO("EON")
  • Line Location: L1+2
Function Call: WRITE
  • Prompt: @FHIO("EON")
  • Line Location: L1+2
Function Call: WRITE
  • Prompt: @FHIO("EON")
  • Line Location: L1+2
Function Call: WRITE
  • Prompt: @FHIO("EON")
  • Line Location: L1+2
Function Call: WRITE
  • Prompt: @FHIO("EON")
  • Line Location: L1+2
Function Call: WRITE
  • Prompt: !
  • Condition for execution: LAB=2
  • Line Location: L1+2
Function Call: WRITE
  • Prompt: !,$S(ALG="":"",1:"*ALG"),!,Y,!!
  • Line Location: L1+2
Function Call: WRITE
  • Prompt: !!,$P(Y,",",1,L)
  • Line Location: L1+3
Function Call: WRITE
  • Prompt: !
  • Condition for execution: LAB=2
  • Line Location: L1+3
Function Call: WRITE
  • Prompt: !,$E($P(Y,",",L+1,5),2,99),!
  • Line Location: L1+3
Function Call: WRITE
  • Prompt: @FHIO("EOF")
  • Line Location: L1+4
Function Call: WRITE
  • Prompt: ?(S2-20),DTP,!!
  • Condition for execution: LAB=2
  • Line Location: L1+4
Routine Call
  • DIC
  • Line Location:
    • W0
    • D2
Routine Call
  • DIR
  • Line Location:
    • P1+1
Routine Call
  • %ZIS
  • Line Location:
    • P1+3

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^FH(119.6 - [#119.6] Classic Fileman Calls
^FH(119.73 - [#119.73] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(115.02 LST+8
^DG(405.4 - [#405.4] OUTW+28
^DPT - [#2] P0+4, F1+6, F1+8, LST+3, LST+4
^DPT("CN" P0+5
^FH(111 - [#111] LST+9, OUTW+11, OUTW+12, OUTW+15, OUTW+18, OUTW+21, OUTW+24
^FH(119.4 - [#119.4] LST+10
^FH(119.6 - [#119.6] Q1+5, F1+8, F1+9, LST+3, OUTP+22, OUTP+39, OUTP+56, OUTW+3, OUTW+4, OUTW+6
, OUTW+7, OUTW+8
^FH(119.72 - [#119.72] OUTW+9, OUTW+10
^FH(119.9 - [#119.9] Q1+1
^FHPT - [#115] LST+1, LST+6, OUTP+9, OUTP+24, OUTP+32, OUTP+41, OUTP+48, OUTP+50, OUTP+58
^FHPT("AW" F1+3, F1+5
^FHPT("GM" OUTP+29, OUTP+30
^FHPT("RM" OUTP+6, OUTP+7, OUTP+8
^FHPT("SM" OUTP+45, OUTP+46
^TMP($J Q1+4!, Q1+6, F1+11*, OUTW+30*, PROUT+2, PROUT+3, PROUT+4, KIL!

Label References

Name Line Occurrences
D2 F0+2, D2
F0 F0+1
F1 Q1+5
KIL F0, W0, D2, PPT+1, P1+3, P1+4, P1+5, Q1+10, Q1+12, Q2+4
, Q3+1
L1 LST+7, LST+8, PROUT+11
LL L1+1
LST Q1+6, Q2
OUTP Q1+8, Q2+2
OUTW OUTP+26, OUTP+43, OUTP+60
P0 F0+2, PPT
P1 F0+2, W0, D2, P0
PPT P0+3
PROUT Q1+9, Q2+3
Q1 P1+5
Q2 Q1+3
W0 W0

Naked Globals

Name Field # of Occurrence
^( Q1+5, Q1+6
^(0 LST+1, LST+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % Q1+1, LST+8*
%ZIS P1+3!*, P1+5!
%ZIS("A" P1+3*
>> A1 LST+9*
>> ADM P0+2*, P0+5*, PPT, Q1+6*, F1+5*, F1+11, Q2*, LST+1, LST+6
>> ALG L1*, L1+2
>> ALL F0+2*
>> BID L1+2, PROUT+7*
>> COUNT Q1+2*
>> D3 LST+9*
>> DFN P0+3, P0+4, P0+5, Q1+6*, F1+4, F1+6, F1+8, F1+11, LST+3, LST+4
DIC W0!*, D2!*
DIC("A" W0*, D2*
DIC(0 W0*, D2*
DIR P1+1!
DIR("A" P1+1*
DIR("B" P1+1*
DIR(0 P1+1*
>> DIRUT P1+2
DT OUTP+4
DTIME F0
>> DTOUT W0, D2
>> DTP Q1+3*, L1+4
>> FHALL P0*
>> FHBID OUTW+30
>> FHD1 OUTP+4*, OUTP+6, OUTP+29, OUTP+45
>> FHD2 OUTP+4*, OUTP+6, OUTP+29, OUTP+45
>> FHDFN P0, P0+1, P0+3, PPT, Q1+6, F1+3*, F1+5, Q2*, LST+1, LST+6
, OUTP+7*, OUTP+8, OUTP+9, OUTP+18, OUTP+20, OUTP+24, OUTP+30*, OUTP+31, OUTP+32, OUTP+37
, OUTP+41, OUTP+46*, OUTP+47, OUTP+48, OUTP+50, OUTP+54, OUTP+58, OUTW+30, PROUT+3*, PROUT+4
>> FHDFN1 OUTP+24*, OUTP+41*, OUTP+50*, OUTP+58*
>> FHDFNSAV( Q2*, OUTP+18, OUTP+20, OUTP+31, OUTP+37, OUTP+47, OUTP+54
>> FHDIET OUTP+11*, OUTP+35*, OUTP+51*, OUTW+11*, OUTW+13*, OUTW+14*, OUTW+16*, OUTW+17*, OUTW+19*, OUTW+20*
, OUTW+22*, OUTW+23*, OUTW+25*, OUTW+26*, OUTW+30, PROUT+8*
FHDIET1 OUTP+13*, OUTP+28!, OUTW+12*, OUTW+13, OUTW+14
FHDIET2 OUTP+14*, OUTP+28!, OUTW+15*, OUTW+16, OUTW+17
FHDIET3 OUTP+15*, OUTP+28!, OUTW+18*, OUTW+19, OUTW+20
FHDIET4 OUTP+16*, OUTP+28!, OUTW+21*, OUTW+22, OUTW+23
FHDIET5 OUTP+17*, OUTP+28!, OUTW+24*, OUTW+25, OUTW+26
>> FHDU LST+8*
>> FHFHPSAV OUTP+1*, OUTP+3*, OUTP+23, OUTP+40, OUTP+57
>> FHIO("EOF" L1+2, L1+4
>> FHIO("EON" L1+2
>> FHK1 OUTP+6*, OUTP+7, OUTP+8
>> FHKD OUTP+8*, OUTP+9, OUTP+29*, OUTP+30, OUTP+32, OUTP+45*, OUTP+46, OUTP+48
>> FHKDAT OUTP+9*, OUTP+10, OUTP+11, OUTP+13, OUTP+14, OUTP+15, OUTP+16, OUTP+17, OUTP+25, OUTP+32*
, OUTP+33, OUTP+34, OUTP+35, OUTP+42, OUTP+48*, OUTP+49, OUTP+51, OUTP+59
>> FHLD LST+7*, LST+8
>> FHLOC OUTP+21*, OUTP+22*, OUTP+23, OUTP+38*, OUTP+39*, OUTP+40, OUTP+55*, OUTP+56*, OUTP+57
>> FHLST P1+4*
>> FHMEAL OUTP+11*, OUTP+35*, OUTP+51*
>> FHOR LST+7*, LST+9
>> FHORD LST+2*, LST+6
>> FHOU PROUT+4*, PROUT+5, PROUT+6, PROUT+7, PROUT+8, PROUT+9, PROUT+10
>> FHPGM P1+4*
>> FHPR F0+2*, F1, F1+1, OUTP+2, OUTP+3, OUTP+18, OUTP+31, OUTP+47
>> FHPTNM OUTW+30
>> FHRGS OUTP+21*
>> FHRM OUTW+27*, OUTW+28*, OUTW+29*, OUTW+30
>> FHRMB OUTP+25*, OUTP+42*, OUTP+59*, OUTW+28
>> FHSTAT OUTP+11*, OUTP+12, OUTP+51*, OUTP+52
>> FHTC OUTW+2*, OUTW+9*, OUTW+10*, OUTW+30
>> FHTC5 OUTW+7*, OUTW+9
>> FHTC6 OUTW+8*, OUTW+10
>> FHW1 OUTP+10*, OUTP+19, OUTP+22, OUTP+34*, OUTP+36, OUTP+39, OUTP+49*, OUTP+53, OUTP+56, OUTW+3
, OUTW+4, OUTW+6, OUTW+7, OUTW+8
>> FHW1N OUTW+6*, OUTW+30
>> FHW1SAV OUTP+1*, OUTP+2*, OUTP+19, OUTP+36, OUTP+53
>> FHX1 F0+2*, W0*, D2*, P0, PPT*, PPT+1, Q1+3, Q1+4, Q2, OUTP+2
, OUTP+3
>> FHX2 F0+2*, PPT*, Q2
>> FHZ115 Q1+6*
IO P1+5
IO("Q" P1+4
IOF FHORD13+2
IOP P1+3!, P1+5!
>> IOS Q1+1
>> IS LST+10*
>> K1 Q1+5*, F1+1, F1+3, F1+5, F1+8, F1+9
>> K7 Q1+11*, Q2*, Q3*
>> KK F1*, F1+1*
>> L L1+3*
>> LAB Q1+1*, Q1+10, Q1+11, Q2+4, Q3, L1+1, L1+2, L1+3, L1+4
LABSTART P1+1!, P1+2*
>> LINE Q1+2*
>> N1 LST+5*, L1+2, PROUT+5*
>> NOW Q1+1*, Q1+3
>> P0 F1+2*, F1+11, OUTW+4*, OUTW+5*, OUTW+30
>> POP P1+3
>> R0 F1+9*, F1+10*, F1+11
>> R1 LST+3*, L1+2, OUTP+1*, PROUT+10*
>> RE F1+8*, F1+9
>> RI F1+8*
>> RM Q1+6*, F1+6*, F1+7*, F1+11, PROUT+1*, PROUT+2*, PROUT+3, PROUT+4
>> S2 Q1+1*, L1+2, L1+3, L1+4
U OUTP+10, OUTP+11, OUTP+13, OUTP+14, OUTP+15, OUTP+16, OUTP+17, OUTP+22, OUTP+24, OUTP+25
, OUTP+33, OUTP+34, OUTP+35, OUTP+39, OUTP+41, OUTP+42, OUTP+49, OUTP+50, OUTP+51, OUTP+56
, OUTP+58, OUTP+59, OUTW+4, OUTW+6, OUTW+7, OUTW+8, OUTW+9, OUTW+10, OUTW+11, OUTW+12
, OUTW+15, OUTW+18, OUTW+21, OUTW+24, OUTW+28, PROUT+5, PROUT+6, PROUT+7, PROUT+8, PROUT+9
, PROUT+10
>> W1 LST+3*, LST+5*, L1+2, OUTP+10*, OUTP+34*, OUTP+49*, PROUT+6*
>> WARD P0+4*, P0+5
>> WRD Q1+4*, F1, F1+1
>> X F0*, F0+1, F0+2, W0, D2, Q1+5*, F1, F1+1, F1+2, LST+6*
, LST+7, LST+10
>> X0 LST+1*, LST+2, LST+3, LST+10
>> X1 LST+2*, LST+7*, LST+10*, L1+2, PROUT+1*, PROUT+9*
>> Y W0, D2, P1+2, LST+7*, LST+8*, LST+9*, L1+2, L1+3, PROUT+8*
>> Y0 LST+4*, LST+5
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All