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

Package: Dietetics

Routine: FHORD93


Information

FHORD93 ; HISC/NCA/RVD - Diet Census Percentage (Cont.) ;1/23/98 16:09

Source Information

Source file <FHORD93.m>

Call Graph

Call Graph Total: 6

Package Total Call Graph
Dietetics 4 DTP^FH  GETGM^FHOMRBL1  GETSM^FHOMRBLD  (GUEST,SPEC,WRD)^FHORD9  
VA Fileman 2 ^%DT  (DOW,NOW)^%DTC  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
Dietetics 1 FHORD92  

Entry Points

Name Comments DBIA/ICR reference
Q1 ; Calculate Census
F1
Q2
FOR ;FORCAST
GET
CEN ;census
PRO
PER
LST
P1
REC
COMB ;
D0 ;
OUT ;process outpatient data

External References

Name Field # of Occurrence
^%DT CEN+1
DOW^%DTC Q1+1, LST+7
NOW^%DTC Q1+1
DTP^FH LST+4, LST+6, LST+8
GETGM^FHOMRBL1 REC+30, GET+28
GETSM^FHOMRBLD REC+28, GET+26
GUEST^FHORD9 REC+31, GET+29
SPEC^FHORD9 REC+29, GET+27
WRD^FHORD9 CEN+6, CEN+7, GET

Interaction Calls

Name Line Occurrences
Function Call: READ
  • Prompt: E C A S T E D"
  • Timeout: "A
  • Variable: 1
  • Line Location: LST+3
Function Call: WRITE
  • Prompt: !,DTP,?(L1-$L(Z)\2),Z,?(L1-7),"Page ",PG,!?(L1-21\2),"P E R C E N T A G E S"
  • Line Location: LST+4
Function Call: WRITE
  • Prompt: !,$G(FHSITENM)
  • Line Location: LST+5
Function Call: WRITE
  • Prompt: !!?(L1-$L(Z)\2),Z,!!?(L1-$L(X)\2),X
  • Line Location: LST+8
Function Call: WRITE
  • Prompt: !!?(L1-31\2),"P R O D U C T I O N D I E T S",!!?29
  • Line Location: LST+9
Function Call: WRITE
  • Prompt: $P(S(X,K),"^",1)_" %"
  • Line Location: LST+10
Function Call: WRITE
  • Prompt: !
  • Line Location: LST+11
Function Call: WRITE
  • Prompt: !?3,"N P O",?31
  • Line Location: LST+13
Function Call: WRITE
  • Prompt: !?3,"P A S S",?31
  • Line Location: LST+14
Function Call: WRITE
  • Prompt: !?3,"TF Only",?31
  • Line Location: LST+15
Function Call: WRITE
  • Prompt: !?3,"No Order",?31
  • Line Location: LST+16
Function Call: WRITE
  • Prompt: !
  • Line Location: LST+17
Function Call: WRITE
  • Prompt: !,$P($G(^FH(116.2,K,0)),"^",1),?31
  • Line Location: PRO+0
Function Call: WRITE
  • Prompt: $J(Z,8,1)," "
  • Line Location: P1+0

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^FH(111 - [#111] REC+9, GET+9
^FH(116.2 - [#116.2] LST+12, PRO
^FH(119.6 - [#119.6] CEN+2, REC+7, REC+11, REC+12, GET, GET+8, GET+10, GET+11
^FH(119.71 - [#119.71] LST+6
^FH(119.72 - [#119.72] REC+13, REC+15, COMB+7, D0+2, D0+3, FOR+3, F1, PER, GET+12, GET+13
, LST+1
^FH(119.73 - [#119.73] GET+24
^FH(119.9 - [#119.9] REC+16, GET+14
^FHPT - [#115] REC+3, REC+21, REC+22, GET+5, GET+19, GET+20
^FHPT("RM" REC+1, REC+2, GET+3, GET+4
^TMP($J COMB+8!*, COMB+9*, COMB+10*, FOR+1!*, FOR+2*, FOR+3, FOR+4*, F1*, PER*, GET+35!*
, GET+37*, GET+38*, LST+1, LST+12, P1

Label References

Name Line Occurrences
CEN Q2
D0 COMB+7
F1 FOR+3
FOR Q2
GET Q1+2
LST Q2
P1 LST+13, LST+14, LST+15, LST+16
PER FOR+2
PRO LST+12
Q2 Q1+3, Q1+4

Naked Globals

Name Field # of Occurrence
^( CEN+2, COMB+7, D0+3, F1, PER, GET

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % Q1+1
>> %DT CEN+1*
D CEN+2!, COMB+1!, COMB+11!, FOR+2!, FOR+5!, GET+31!, GET+39!
D( COMB+1*, COMB+2*, COMB+4*, COMB+6*, COMB+8*, COMB+9, FOR+4, F1*, PER*, GET+31*
, GET+32*, GET+34*, GET+35*, GET+36*, GET+37
>> D1 Q1+1, CEN+1, REC, REC+27, GET, GET+2, GET+25, LST+6, LST+7, LST+8
>> DOW Q1+1*, D0+3, F1, PER, LST+7*
>> DTP LST+4*, LST+6*, LST+7, LST+8*
>> FHAN Q1+2, LST+7
>> FHDA Q2
>> FHDIET REC+16*, GET+14*
>> FHDT REC+27*, GET+25*
>> FHDT299 REC*, REC+1
>> FHIDFN REC+1*, REC+2, REC+3, REC+21, REC+22, GET+3*, GET+4, GET+5, GET+19, GET+20
>> FHIEN REC+2*, REC+3, REC+21, REC+22, GET+4*, GET+5, GET+19, GET+20
>> FHIR REC+1*, REC+2, GET+3*, GET+4
>> FHLOC REC+6*, REC+7, REC+10, REC+11, REC+12, GET+6*, GET+8, GET+10, GET+11
>> FHP REC+15, COMB+7, GET+13, LST+6
>> FHP1 Q2, LST+3, LST+13, LST+14, LST+15, LST+16
>> FHPDIET REC+9*, REC+17, REC+18, GET+9*, GET+15, GET+16
>> FHPLNM GET+24*
>> FHRDIET REC+8*, REC+9, GET+9*
>> FHREDAT REC+3*, REC+4, REC+5, REC+6, REC+8, GET+5*, GET+6, GET+7, GET+9
>> FHSER CEN+4*, CEN+5*, REC+11*, REC+12*, REC+13*, REC+14, REC+15, REC+17, REC+18, REC+19
, REC+23, REC+24, REC+25, GET+10*, GET+11*, GET+12*, GET+13, GET+15, GET+16, GET+17
, GET+21, GET+22, GET+23
>> FHSITE CEN+3, CEN+6, CEN+7, REC+7, REC+28, REC+30, GET, GET+8, GET+24, GET+26
, GET+28
>> FHSITENM LST+5
>> FHTIM REC*, REC+1, REC+28, REC+30, GET+2*, GET+3, GET+26, GET+28
>> FHX1 Q2*
IOF LST+2
IOST LST+2
>> K PER*, LST+10*, LST+12*, LST+13*, LST+14*, LST+15*, LST+16*, PRO, P1
>> K1 P1*
>> K3 Q2*, D0+3, F1, LST+7
>> L1 LST*, LST+1*, LST+2*, LST+4, LST+8, LST+9
>> LL COMB+3*, COMB+4*, COMB+5*, COMB+8*, COMB+10*, D0+3*, FOR+4*, F1*, GET+35*, GET+38*
>> LP COMB+1*, COMB+2*, COMB+6*, GET+31*, GET+32*, GET+33*, GET+34*, GET+36*
>> M2( FOR+1, FOR+2
>> MEAL Q1+3, Q1+4*, Q2, CEN+1, REC+4
>> N1 LST+1*
>> N2 LST+1*
>> N3 LST+1*
>> NOW Q1+1*, LST+4
NP COMB+1!, GET+31!
NP( COMB+1*, COMB+2*, COMB+3*, COMB+4*, COMB+6*, GET+31*, GET+32*, GET+33*, GET+34*, GET+36*
, LST+13!, LST+14!, LST+15!, LST+16!, P1
P CEN+2!, COMB+11!, GET+39!
P( REC+17*, REC+18*, REC+19*, REC+23*, REC+24*, REC+25*, COMB+1, COMB+2!, COMB+3!, COMB+4!
, COMB+5!, COMB+8*, COMB+10, D0+3*, GET+15*, GET+16*, GET+17*, GET+21*, GET+22*, GET+23*
, GET+31, GET+32!, GET+33!, GET+34!, GET+35!*, GET+38
>> P0 COMB+5*, COMB+7*, COMB+8*, COMB+9*, D0+1, D0+2, D0+3, FOR+1*, FOR+2*, FOR+3*
, F1, PER, GET+35*, GET+37*, LST+1*
>> P1 LST+12*
>> PG Q1+1*, LST+2*, LST+4
S LST!
S( LST+1*, LST+10, P1
>> S0 FOR+2, PER*
>> S1 FOR+2*, PER
>> SP( CEN+4*, CEN+5*, REC+11*, REC+12*, REC+13*, D0+1
T COMB+1!
T( COMB+5*, COMB+6
>> TIM CEN+1*, GET*
U CEN+3, CEN+4, CEN+5, CEN+7, REC+4, REC+5, REC+6, REC+7, REC+8, REC+9
, REC+11, REC+12, REC+15, REC+16, REC+22, GET, GET+6, GET+7, GET+8, GET+9
, GET+10, GET+11, GET+13, GET+14, GET+20, GET+24
>> WRD CEN+2*, GET*
>> X Q1+1*, CEN+1*, CEN+2*, CEN+3, CEN+4, CEN+5, CEN+7, GET*, LST+1*, LST+7*
, LST+8, LST+10*, P1*
>> Y Q1+1, CEN+1, D0+3*, F1*, LST+7
>> Z PER*, LST+3*, LST+4, LST+6*, LST+8, P1*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All