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

Package: Dietetics

Routine: FHASE1A


Information

FHASE1A ; HISC/REL/NCA - Encounter Statistics (cont.) ;9/6/94 13:13

Source Information

Source file <FHASE1A.m>

Call Graph

Call Graph

Call Graph Total: 2

Package Total Call Graph
Dietetics 2 DTP^FH  PID^FHDPA  

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

Package Total Caller Graph
Dietetics 1 FHASE1  

Entry Points

Name Comments DBIA/ICR reference
Q1 ; Calculate the Encounters
R1
R2
R3
R4
CNT
C1
C2
UPD
P1
D0
P2
P3
P4
P5
P6
PP
PR
STOT
TOT
HEAD ;W:'($E(IOST,1,2)'="C-"&'PG) @IOF S PG=PG+1 W !?30,"D I E T E T I C E N C O U N T E R S T A T I S T I C S",?120,"Page ",PG

External References

Name Field # of Occurrence
DTP^FH R2+11, P1
PID^FHDPA P5+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !
  • Line Location: P1+2
Function Call: WRITE
  • Prompt: !
  • Line Location: P1+3
Function Call: WRITE
  • Prompt: !
  • Line Location: P1+3
Function Call: WRITE
  • Prompt: !
  • Line Location: D0+1
Function Call: WRITE
  • Prompt: !!,NX
  • Line Location: P2+0
Function Call: WRITE
  • Prompt: !
  • Line Location: P2+1
Function Call: WRITE
  • Prompt: !
  • Line Location: P2+2
Function Call: WRITE
  • Prompt: !?7,S1,?17,BID,?26,$P(Y,"^",1)
  • Line Location: P5+2
Function Call: WRITE
  • Prompt: !?7,S1,?17,$P(DFN,"^",2)
  • Line Location: P6+0
Function Call: WRITE
  • Prompt: !?5,X1,?47,$J($P(S1,"^",1),6,0)
  • Line Location: PP+0
Function Call: WRITE
  • Prompt: $S(K=3!(K=6):$S(Z:$J(Z,8,1),1:$J("",8)),1:$J($S(Z:Z,1:""),6))
  • Line Location: PP+1
Function Call: WRITE
  • Prompt: $J($P(S1,"^",2),8,1)
  • Line Location: PP+6
Function Call: WRITE
  • Prompt: !?3,X
  • Line Location: PR+1
Function Call: WRITE
  • Prompt: !?5,"Subtotal",?47,$J(J(1),6)
  • Line Location: STOT+0
Function Call: WRITE
  • Prompt: $S(K=3!(K=6):$S(J(K+2):$J(J(K+2),8,1),1:$J("",8)),1:$J($S(J(K+2):J(K+2),1:""),6))
  • Line Location: STOT+0
Function Call: WRITE
  • Prompt: ?97,$S(J(9):$J(J(9),6),1:$J("",6)),$S(J(10):$J(J(10),8,1),1:$J("",8))
  • Line Location: STOT+1
Function Call: WRITE
  • Prompt: ?113,$S(J(11):$J(J(11),6),1:$J("",6)),$S(J(2):$J(J(2),8,1),1:$J("",8))
  • Line Location: STOT+2
Function Call: WRITE
  • Prompt: !?3,X,?47,$J(I(1),6)
  • Line Location: TOT+0
Function Call: WRITE
  • Prompt: $S(K=3!(K=6):$S(I(K+2):$J(I(K+2),8,1),1:$J("",8)),1:$J($S(I(K+2):I(K+2),1:""),6))
  • Line Location: TOT+0
Function Call: WRITE
  • Prompt: ?97,$S(I(9):$J(I(9),6),1:$J("",6)),$S(I(10):$J(I(10),8,1),1:$J("",8))
  • Line Location: TOT+1
Function Call: WRITE
  • Prompt: ?113,$S(I(11):$J(I(11),6),1:$J("",6)),$S(I(2):$J(I(2),8,1),1:$J("",8))
  • Line Location: TOT+2
Function Call: WRITE
  • Prompt: !?30,"D I E T E T I C E N C O U N T E R S T A T I S T I C S",?120,"Page ",PG
  • Line Location: HEAD+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !?30,"D I E T E T I C E N C O U N T E R S T A T I S T I C S",?120,"Page ",PG
  • Line Location: HEAD+1
Function Call: WRITE
  • Prompt: !!?(114-$L(DTE)\2),DTE,!?47,"Number Inpatients Outpatients Others Total"
  • Line Location: HEAD+2
Function Call: WRITE
  • Prompt: !?56,"Pat Col Units Pat Col Units",?98,"Persn Units Persn Units",!
  • Line Location: HEAD+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DD(115.6 Q1+2
^DPT - [#2] P5+1
^FH(115.6 - [#115.6] R2+4
^FHEN - [#115.7] R2+1, R2+12, R2+13, CNT+1
^FHEN("AT" R1, R2
^SC - [#44] C1
^TMP($J Q1+1!, R2+8*, R2+9*, R2+10*, R2+11*, R3, R3+1*, P1+2, D0, P2+1
, P4, P5
^VA(200 - [#200] R2+9

Label References

Name Line Occurrences
C1 CNT+1
C2 C1
CNT R2+3
D0 P1
HEAD P1, P1+3, P2, PP, PR+1
P1 R1
P2 D0
P3 P2+1
P4 P5
P5 P5+1, P5+2, P6
P6 P5
PP P1+2, P2+1
PR P1+2, P2+1
R1 R2
R2 R2+2, R2+4, R2+6, R2+9, R2+10, R2+14, R4
R3 R2+13, R4
R4 R2+12
STOT P1+2, P1+3, P2+1, P2+2
TOT P1+3, P2+2
UPD R2+8, R2+10

Naked Globals

Name Field # of Occurrence
^( R2+11*, CNT+1, P2+1, P4, P5
^(0 R3*

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> BID P5+2
>> C( UPD+1
>> C(1 CNT*, CNT+2, CNT+3, C1+1*
>> C(2 CNT*, CNT+2, C1+1*
>> C(3 CNT*, CNT+3*, C1+1*
>> C(4 CNT*, CNT+2, CNT+3, C2*
>> C(5 CNT*, CNT+2, C2*
>> C(6 CNT*, CNT+3*, C2*
>> C(7 CNT*, CNT+2*, CNT+3
>> C(8 CNT*, CNT+2
>> CT P1+1*, P1+2*, P2*, P2+1*
>> D1 R2+2*, R2+9, R2+10, R2+11, R3, R3+1, D0*, P2+1, P4, P5
>> D2 R2+2*, R2+4*, R2+5*, R2+7*, R2+8, R2+10, R2+11, R3, R3+1, P2+1*
, P4, P5
>> D3 R2+3*, CNT+3, C1+1, C2, UPD
>> D5 R2+3*, R4
>> D6 R2+3*, R2+7
>> D8 R2+6*, R2+8, R2+10, R2+11, R3, R3+1, P1+1*, P1+2*, P2*, P2+1*
, P4, P5, PR
>> D9 R2+3*, CNT+3, C1+1, C2
>> DFN R2+13*, R3+1, R4*, CNT+1*, P5*, P5+1, P6
>> DTE P1*, HEAD+2
>> DTP R2+11*, P1*, P3*, P4*, P5
>> E1 R1+1*, R2*, R2+1, R2+12, R2+13, CNT+1
>> EDT Q1+1, P1
>> FHX1 R2+2, R2+9, P1, P1+3
>> FHX2 R2+10, P2+1
>> I( P1+1*, P2*, PP+1*, TOT
>> I(1 PP*, TOT
>> I(10 PP+3*, TOT+1
>> I(11 PP+5*, TOT+2
>> I(2 PP+6*, TOT+2
>> I(9 PP+2*, TOT+1
IOF HEAD+1
IOSL P2, PP, PR+1
>> J( P1+1*, P2*, PP+1*, STOT, STOT+3*
>> J(1 PP*, STOT
>> J(10 PP+3*, STOT+1
>> J(11 PP+5*, STOT+2
>> J(2 PP+6*, STOT+2
>> J(9 PP+2*, STOT+1
>> K UPD+1*, P1+1*, P1+2*, D0*, P2*, PP+1*, STOT*, STOT+3*, TOT*
>> KK P1+2*
>> L R3*, R3+1, P2+1*
>> L1 P2+1*
>> NAM R2+9*
>> NX P1+2*, D0*, P2
>> PG P1*, HEAD+1*
>> S1 R2+8*, R2+10*, UPD*, UPD+1*, P1+2*, P2+1*, P4*, P5+2, P6, PP
, PP+1, PP+2, PP+3, PP+5, PP+6
>> SDT Q1+1, P1
>> TIT Q1+2*, R2+6, PR
>> TM CNT+3*
>> W1 R2+11*, R3, R3+1, P4*, P5*
>> X CNT+1*, C1, C1+1, C2, P1+3*, P2+2*, PR*, PR+1, TOT
>> X1 Q1+1*, R1*, R2, P1+2*, P2+1*, PP
>> X2 Q1+1*, R1
>> Y R2+1*, R2+2, R2+3, R2+11, CNT, P5+1*, P5+2
>> Z C1*, PP+1*, PP+2*, PP+3*, PP+4, PP+5*
>> Z1 R2+5*, R2+6
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All