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

Package: Dietetics

Routine: FHNO2


Information

FHNO2 ; HISC/REL/NCA - Supplemental Feeding Labels ;8/26/94 12:01

Source Information

Source file <FHNO2.m>

Call Graph

Call Graph Total: 10

Package Total Call Graph
Dietetics 4 (DTP,EN2,TR)^FH  DPLL^FHLABEL  ^FHNO21  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 FHNO2  

Entry Points

Name Comments DBIA/ICR reference
Q1 ; Process Printing Supplemental Feeding Labels
Q2
SUM
S0
SF0 ;outpatient SFs
PR
PRT
C2
C1
C0
S1
CHK
CLC1 ;
F0
F1
D5
KIL
D6
D4
CALC
D2
D3
D0
D1

External References

Name Field # of Occurrence
NOW^%DTC Q1+2
^%ZIS PR
^%ZISC PR+2
^DIC D1+1, D2+1
^DIR D3+2
DTP^FH PRT
EN2^FH PR+1
TR^FH D0, D3, D4, D5
DPLL^FHLABEL Q1+6
^FHNO21 Q2+4
PATNAME^FHOMUTL F1+7, SF0+19
KILL^XUSCLEAN KIL

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: "Select by S=SUPPLEMENTAL FEEDING SITE or W=WARD: "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: XX
  • Line Location: D0+0
Function Call: WRITE
  • Prompt: *7," Enter S or W"
  • Line Location: D0+1
Function Call: READ
  • Prompt: "Select WARD: "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: D1+0
Function Call: READ
  • Prompt: "Select SUPPLEMENTAL FEEDING SITE: "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: D2+0
Function Call: READ
  • Timeout: DTIME
  • Line Location: D3+0
Function Call: WRITE
  • Prompt: *7," Enter a time, 10,2,8, or ALL"
  • Line Location: D3+1
Function Call: WRITE
  • Prompt: !
  • Line Location: D3+2
Function Call: READ
  • Prompt: "Do you want Ingredient list only? N// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: D3
  • Line Location: D4+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: D4+0
Function Call: READ
  • Prompt: "Consolidated List only? Y// "
  • Formatting: !!
  • Timeout: DTIME
  • Variable: X
  • Line Location: D5+0
Function Call: WRITE
  • Prompt: *7," Answer YES or NO"
  • Line Location: D5+0
Function Call: WRITE
  • Prompt: !!,"No Supplemental Feeding Site associated with this location."
  • Line Location: D6+0
Function Call: WRITE
  • Prompt: !
  • Line Location: PR+0
Function Call: WRITE
  • Prompt: !
  • Line Location: Q1+7
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: !?5,"**** CONSOLIDATED ****"
  • Condition for execution: D3=2
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: !?3,"**** INGREDIENTS LIST ****",!
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: !
  • Condition for execution: D3=1
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: ?(33-$L(Y)\2),Y,!?9,DTE,!!
  • Line Location: PRT+2
Function Call: WRITE
  • Prompt: !,$E(A1,1,26),?28,$J(C(L),5,0)
  • Line Location: PRT+4
Function Call: WRITE
  • Prompt: !!?4,"**** PATIENTS = ",N1," ****",!
  • Line Location: PRT+5
Routine Call
  • DIC
  • Line Location:
    • D1+1
    • D2+1
Routine Call
  • DIR
  • Line Location:
    • D3+2
Routine Call
  • %ZIS
  • Line Location:
    • PR

FileMan Files Accessed Via FileMan Db Call

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

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DG(405.4 - [#405.4] SF0+17
^DPT - [#2] F1+10, F1+13
^FH(118 - [#118] PRT+3
^FH(119.4 - [#119.4] F1+2, SF0+13
^FH(119.6 - [#119.6] D0+3, D1+2, Q2+1, Q2+2, F0, F1+10, F1+11, SUM+1, SUM+2, S0
, SF0+4, SF0+5, SF0+22, SF0+23
^FH(119.74 - [#119.74] D0+2, Q1+3, F1+9, PRT+1, SF0+21
^FH(119.9 - [#119.9] Q1+3
^FHPT - [#115] F1+1, F1+4, C0, C0+1, C2, C2+1!, S1+1, S1+2, SF0+2, SF0+13
, SF0+14
^FHPT("AW" F1, S1
^FHPT("RM" SF0+1
^TMP($J KIL!, Q2!, F1+14*, SUM!, PRT+3*, PRT+4, SF0+26*

Label References

Name Line Occurrences
C0 C2+1
C1 CHK, C2+1
C2 CHK+1, C0, C2+1
CALC F1+5, S1+2
CHK F1+3
CLC1 SF0+15
D0 D0+1
D1 D1+1
D2 D0+4, D2+1
D3 D0+2, D0+3, D1+2, D3+1
D4 D4
D5 D5
D6 D4+1
F0 Q2+1, Q2+2
F1 F1, F1+1, F1+3, F1+5, F1+15
KIL D0, D1, D2, D3, D4, D5, D6, PR, PR+1, PR+2
, Q1+6
PRT Q2+4, SUM+4
Q1 PR+2
Q2 Q1+4, Q1+5
S0 SUM+1, SUM+2
S1 S1, S1+1, S1+2, S1+3
SF0 Q2+3, SUM+3
SUM Q1+2

Naked Globals

Name Field # of Occurrence
^( Q2+2, SUM+2
^(0 F1+1, S1+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % Q1+2
%ZIS PR*!, PR+2!
%ZIS("A" PR*
A1 C1!, C2*, C2+1, PRT+4*
>> ADM F1*, F1+1, F1+4, C0, C0+1, C2, C2+1, S1*, S1+1, S1+2
, SF0+1*, SF0+2, SF0+14
C Q2!, SUM!
C( PRT+3, PRT+4, CALC+1*, CLC1+1*
>> COUNT Q1+4*
>> D1 D0+2*, D1+2*, D2+1*, D6, Q1+3, Q2+2, SUM+2, PRT+1, SF0+8
>> D2 Q2+2*, F1+9, SUM+2*, SF0+8*, SF0+21
>> D3 D4*, D4+1*, D5+1*, D6, D6+1, PR, Q1+2, Q1+3, Q1+7, Q2+4
, F1+2, F1+5, F1+6, PRT+2, SF0+13, SF0+15, SF0+18
>> DFN F1+7, F1+10, F1+13
DIC D1+1!*, D2+1!*
DIC(0 D1+1*, D2+1*
DIR D3+2!
DIR("A" D3+2*
DIR("B" D3+2*
DIR(0 D3+2*
>> DIRUT D3+3
DT Q1+2*, Q2, PRT, SF0+1
>> DTE PRT*, PRT+2
DTIME D0, D1, D2, D3, D4, D5
>> DTP PRT*
>> FHDFN F0*, F1*, F1+1, F1+4, F1+13, C0, C0+1, C2, C2+1, S0*
, S1*, S1+1, S1+2, SF0+1*, SF0+2, SF0+13, SF0+14, SF0+25
>> FHLST PR+1*
>> FHMEAL SF0+3*, SF0+9, SF0+10, SF0+11, SF0+12
>> FHNO SF0+2*, SF0+14
>> FHODAT SF0+2*, SF0+3, SF0+17
FHORD CHK*, C0, C0+1, C1!, C2+1*
>> FHOWARD SF0+3*, SF0+4, SF0+5, SF0+6
>> FHPAR Q1+3*
>> FHPGM PR+1*
IO PR+2
IO("Q" PR+1
IOF PRT+2
IOP PR!, PR+2!
>> IOS Q1+3
>> IS F1+2*, F1+8, SF0+13*, SF0+20
K C1!, C2*
>> L Q1+7*, PRT+3*, PRT+4*, CALC+1*, CLC1+1*
>> LAB Q1+3*, Q1+6
LABSTART D3+2!, D3+3*
>> LINE Q1+4*
>> LNOD F1+9*, F1+14, SF0+21*, SF0+26
>> N1 Q2*, SUM*, PRT+5, CALC*, SF0+16*
>> NO F1+1*, F1+3, F1+4, C0+1*, S1+1*, S1+2
>> NOW Q1+2*
>> P0 Q2+1*, Q2+2*, F1+9, F1+13, SUM*, S1+2, SF0+8*, SF0+21, SF0+25
>> P1 Q2*, F1+5, SF0+9*, SF0+15
>> P3 Q2*, SUM*, S1+2, CALC+1, CLC1+1
>> PNOD F1+13*, F1+14, SF0+25*, SF0+26
>> POP PR
>> Q CALC+1*, CLC1+1*
>> R0 F1+11*, F1+12*, F1+13, SF0+23*, SF0+24*, SF0+25
>> RE F1+10*, F1+11, SF0+22*, SF0+23
>> RI F1+10*, SF0+22*
>> RM F1+13*, SF0+17*, SF0+25
>> RMIEN SF0+17*
>> T0 Q2*, CHK+1, C2
>> TIM D3*, D3+1, Q1+1, Q1+4*, Q2, SUM, PRT, SF0+10, SF0+11, SF0+12
>> TIMSAV Q1+1*
U D3, SF0+2, SF0+3, SF0+7, SF0+17
>> W1 D1+1*, D1+2, D2+1*, Q2+1, Q2+2*, F0, F1, F1+10, F1+11, SUM+1
, SUM+2*, S0, S1, SF0+6, SF0+22, SF0+23
>> WRD D0+3*, F1+13*, F1+14, SF0+25*, SF0+26
>> WRDN F0*, F1+9, F1+13, S0*, PRT+1, SF0+7*, SF0+21, SF0+25
>> X D0*, D1*, D2*, D3*, D4*, D5*, D5+1*, Q2+2*, SUM+1*, SUM+2*
X1 F1+1*, F1+2, CHK*, CHK+1, C0+1*, C1!, S1+1*, SF0+4*, SF0+7, SF0+8
>> XX D0*, D0+1, D0+2, D0+3, D0+4, D6, Q2+1, Q2+2, F1+9, SUM+1
, SUM+2, PRT+1, SF0+6, SF0+8, SF0+21
>> Y D1+1, D2+1, D3+3, F1+4*, F1+5*, F1+8*, F1+14, S1+2*, PRT+1*, PRT+2
, CALC+1, SF0+14*, SF0+15*, SF0+20*, SF0+26, CLC1+1
>> Z CALC+1*, CLC1+1*
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