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

Package: VA Fileman

Routine: DIG


Information

DIG ;SFISC/GFT-SUBTOTALS & SCATTERGRAM ;28SEP2004

Source Information

Source file <DIG.m>

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA Fileman 5 DD^%DT  H^%DTC  $$EXTERNAL^DILFD  CLOSE^DIO4  ^DIR  
Kernel 2 ^%ZIS  ^%ZTLOAD  

Caller Graph

Caller Graph Total: 1

Package Total Caller Graph
VA Fileman 1 DIXC  

Entry Points

Name Comments DBIA/ICR reference
TOP
EOP ;
DQ
PP
STATS(NA) ;
I3
I2
DYI
S(C)
SUBTOP
END
RUN(H,DIGTYPE)
E(VALUE,XY) ;2=Y,1=X
I
O
Q
P
ALL2
X
DIGC
NUMNUM
QUE ;
LOOP

External References

Name Field # of Occurrence
DD^%DT E+4
H^%DTC I2+1, I3, S
^%ZIS DIG+4
^%ZTLOAD QUE+3
$$EXTERNAL^DILFD E+5
CLOSE^DIO4 Q
^DIR EOP+3

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "NO SUB-SUB TOTALS WERE RUN"
  • Line Location: DIG+3
Function Call: WRITE
  • Prompt: !?5,"(TOTAL = "_B_")",!
  • Line Location: I2+0
Function Call: WRITE
  • Prompt: !?12,"."
  • Line Location: O+0
Function Call: WRITE
  • Prompt: !
  • Line Location: O+1
Function Call: WRITE
  • Prompt: ?12-$L(Y(Y)),Y(Y),"+"
  • Line Location: O+2
Function Call: WRITE
  • Prompt: ?12,"|"
  • Line Location: O+3
Function Call: WRITE
  • Prompt: ?X+13,$S(I>9:"*",I:I,1:"")
  • Line Location: O+4
Function Call: WRITE
  • Prompt: "+",Y(Y)
  • Line Location: O+5
Function Call: WRITE
  • Prompt: !
  • Line Location: O+7
Function Call: WRITE
  • Prompt: !?22,"X-AXIS: ",$P(DIGC(2),U,3)," Y-AXIS: ",$P(DIGC(1),U,3)
  • Line Location: O+7
Function Call: WRITE
  • Prompt: ?B-DXMIN\DXSC-($L(Y)\2)+13,Y
  • Line Location: X+0
Function Call: WRITE
  • Prompt: !!?4,$P(DIGC(1),U,3),!
  • Line Location: STATS+7
Function Call: WRITE
  • Prompt: $J(X,L)
  • Line Location: STATS+11
Function Call: WRITE
  • Prompt: !,"MARGIN WIDTH OF ",IOM," IS TOO SMALL FOR DISPLAY",!,"USE WIDTH OF AT LEAST ",Y
  • Line Location: RUN+9
Function Call: WRITE
  • Prompt: !!?4,$$E(Y,2),?I+6
  • Line Location: RUN+16
Function Call: WRITE
  • Prompt: $J(+%T,L)
  • Line Location: RUN+17
Function Call: WRITE
  • Prompt: !!?I+6
  • Line Location: RUN+20
Function Call: WRITE
  • Prompt: $E(X,1,L)
  • Line Location: RUN+20
Function Call: WRITE
  • Prompt: $E(X,1,IOM-$X)
  • Line Location: RUN+21
Function Call: WRITE
  • Prompt: !!," TOTALS",?I+6
  • Line Location: RUN+22
Function Call: WRITE
  • Prompt: $J(DX(X),L)
  • Line Location: RUN+22
Function Call: WRITE
  • Prompt: $J(%T,7)
  • Line Location: RUN+23
Function Call: WRITE
  • Prompt: !," ",$O(^DD(+X,0,"NM",0))," FILE: "
  • Line Location: TOP+3
Function Call: WRITE
  • Prompt: $S(DIGTYPE="N":"COUNTS",1:"SUMS")
  • Line Location: TOP+4
Function Call: WRITE
  • Prompt: " OF '",$P(X,U,3),"'"
  • Line Location: TOP+5
Function Call: WRITE
  • Prompt: ?IOM-$L(Y)-1,Y
  • Line Location: TOP+8
Function Call: WRITE
  • Prompt: !!?4,$P(DIGC(3),U,3),": ",$$E(DIG3,3),!
  • Line Location: SUBTOP+1
Function Call: WRITE
  • Prompt: !?4,$P(Y," ",X)
  • Line Location: SUBTOP+2
Function Call: WRITE
  • Prompt: ?(IOM-I-$L(Y)\2+I+4),Y,!!
  • Line Location: SUBTOP+3
Function Call: WRITE
  • Prompt: ?I+6
  • Line Location: SUBTOP+4
Function Call: WRITE
  • Prompt: $J($$E(X,1),L)
  • Line Location: SUBTOP+4
Function Call: WRITE
  • Prompt: " TOTAL"
  • Line Location: SUBTOP+5
Function Call: WRITE
  • Prompt: !
  • Line Location: SUBTOP+6
Function Call: WRITE
  • Prompt: "-"
  • Line Location: SUBTOP+6
Function Call: WRITE
  • Prompt: "+"
  • Line Location: PP+0
Function Call: WRITE
  • Prompt: "-"
  • Line Location: PP+1
Routine Call
  • DIR
  • Line Location:
    • EOP+3
Routine Call
  • %ZIS
  • Line Location:
    • DIG+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZTSK - [#14.4] DIG+4
^DD( TOP+3, DIGC+3
^DD("DD" TOP+6
^DOSV(0 DIG+3, DQ+1, END+1!
^UTILITY($J LOOP!, I3+1, O+4

Label References

Name Line Occurrences
$$E O, X, STATS+5, STATS+11, RUN+2, RUN+3, RUN+16, SUBTOP+1, SUBTOP+4
ALL2 STATS+13, STATS+14
DIGC NUMNUM+1, STATS+2
DYI DYI
END LOOP+1, STATS+3, STATS+13, STATS+14, QUE+3
EOP O+8, STATS+10, STATS+12, RUN+15
I I
I2 I3
I3 I3+2
LOOP LOOP+3
O I2
P O, O+7
PP PP+2
Q STATS+3, RUN+13
QUE DIG+5
RUN ALL2
S NUMNUM+3, DYI+2
STATS DQ+4
SUBTOP RUN+11, RUN+14
TOP LOOP+2, STATS+7, STATS+10, RUN+11, RUN+14
X O, O+7

Naked Globals

Name Field # of Occurrence
^( DQ+2, DQ+3, I3+1*, O+4, STATS+4, STATS+5, STATS+9, RUN+3, DIGC+2
^("" DQ+3
^("N" I3+1
^(0 DIGC+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
%D NUMNUM~, RUN~
%DT E+1~
%H NUMNUM~, I2+1, I3, S, RUN~
%T NUMNUM~, STATS+1~, STATS+8*, STATS+11*, STATS+12, RUN+17*, RUN+22*, RUN+23
%Y NUMNUM~, RUN~
>> %ZIS DIG+4*
B NUMNUM~, NUMNUM+4, DYI, DYI+3, LOOP+3*, I2, I3+1*, O*, X*, S*
, S+1*, S+2, S+3*, I, I+1
C I3*, I3+1*, S~, S+1*, S+2*, RUN~, RUN+1*, RUN+3*, RUN+7, RUN+8
, RUN+10, DIGC~, DIGC+1*, DIGC+2*, DIGC+3
DIG3 STATS+1~, STATS+14*, SUBTOP+1
DIGB STATS+1~, STATS+13*, STATS+14*, RUN+2, RUN+3, RUN+13, RUN+17
DIGC NUMNUM~, STATS+1~
DIGC( S, DIGC+2*, DIGC+3*, E+2, E+3, E+4, E+5
DIGC(1 I3, O+7, STATS+7, SUBTOP+3
DIGC(2 I2+1, O+7, SUBTOP+2
DIGC(3 SUBTOP+1
DIGPG NUMNUM~, STATS+1~, STATS+2*, TOP+7*
DIGTYPE NUMNUM~, LOOP+1*, STATS+1~, STATS+4*, STATS+5, STATS+9, STATS+11, ALL2*, RUN~, RUN+3
, RUN+17, TOP+4
DIR EOP+2~
DIR(0 EOP+3*
DT TOP+6
DUOUT STATS+1~, STATS+3, STATS+4, STATS+9, STATS+10, STATS+14, RUN+13, RUN+14
DX NUMNUM~, LOOP+3*, I2*, I3, RUN~, RUN+3*
DX( RUN+17*, RUN+22
DXI DQ~, DYI+3*, O+7, X
DXMAX DQ~, DQ+2*, DQ+3*, DQ+4, DYI+1, DYI+3*, X
DXMIN DQ~, DQ+2*, DQ+4, DYI+1, DYI+3*, I2+2, X
DXS NUMNUM~, DYI+1*, DYI+3, O+5, RUN~, PP+2
DXSC NUMNUM~, DYI+3*, I2+2, X, RUN~
DY DQ+3*, NUMNUM~, LOOP+3*, I3*, I3+1, RUN~, RUN+2*
DYI DQ~, NUMNUM+4*, DYI*, O
DYMAX DQ~, DQ+2*, DQ+3*, DQ+4, NUMNUM+2, NUMNUM+4*, O
DYMIN DQ~, DQ+2*, DQ+3*, DQ+4, NUMNUM+2, NUMNUM+4*, I3+1, O
DYS NUMNUM~, NUMNUM+2*, DYI, O, O+1, RUN~
DYSC NUMNUM~, NUMNUM+4*, I3+1, RUN~
H NUMNUM~, NUMNUM+2*, DYI+1*, DYI+4*, LOOP+1*, I3+1, S+1, S+4, STATS+1~, STATS+4*
, STATS+5, STATS+9, STATS+11, RUN~, RUN+3, RUN+17, TOP+2
I NUMNUM~, NUMNUM+4, DYI+3, O+4*, S+2*, S+3*, S+4*, I*, I+1*, STATS+1~
, STATS+5*, STATS+6, STATS+11, STATS+12, RUN+1*, RUN+2*, RUN+8, RUN+10*, RUN+16, RUN+20
, RUN+22, SUBTOP+3, SUBTOP+4
IO TOP+1
IO("Q" DIG+5
IO(0 DIG+3, DQ+1, END+1, RUN+9
IOF END, TOP+1
IOM DYI+1, RUN+9, RUN+10, RUN+21, TOP+8, SUBTOP+3, SUBTOP+6, QUE+2
ION QUE+2
IOP DIG+4~
IOSL NUMNUM+2, STATS+10, RUN+14, QUE+2
IOST END, EOP+1, QUE+2
L NUMNUM~, NUMNUM+2*, DYI+1*, O*, S+1, S+3, STATS+1~, STATS+5*, STATS+6, STATS+11
, STATS+12, RUN+1*, RUN+3*, RUN+8, RUN+10*, RUN+17, RUN+20, RUN+22, SUBTOP+4, P*
, PP*
N DQ~, NUMNUM+2*, DYI+1*, I, I+1, RUN+17*, RUN+20*, RUN+22*
NA DQ~, DQ+1*, DQ+2, DQ+3, DQ+4, LOOP+1, I2, I3, STATS~, STATS+3
, STATS+4, STATS+5, STATS+9, STATS+11, STATS+13, STATS+14, ALL2, TOP+2, DIGC+1
POP DIG+4~
RUN STATS+1~, ALL2*
T NUMNUM~, NUMNUM+4, DYI, DYI+3*, S+4*, I, I+1, RUN~, RUN+16~, RUN+17*
, RUN+18, PP
U LOOP+3, O+7, STATS+4, STATS+7, ALL2, TOP+5, SUBTOP+1, SUBTOP+2, SUBTOP+3, DIGC+3
, E+2, E+5
VALUE E~, E+2*, E+3, E+4, E+5, E+6
X DQ+2*, DQ+3*, NUMNUM~, NUMNUM+4, DYI+3, LOOP+3, I2*, I2+1*, I2+2*, I3*
, I3+1, O*, O+4*, O+7*, X, S*, S+1*, S+2*, S+3, S+4
, I*, I+1*, STATS+11*, RUN~, RUN+2*, RUN+3*, RUN+15~, RUN+16*, RUN+17*, RUN+19*
, RUN+20, RUN+21, RUN+22*, EOP+2~, TOP~, TOP+2*, TOP+3, TOP+5, SUBTOP+2*, SUBTOP+4*
, DIGC~, DIGC+1*, DIGC+2, P*, PP, PP+2*
X( RUN+3*, RUN+17, RUN+22, SUBTOP+4
XY E~, E+2, E+3, E+4, E+5
Y DQ+3*, NUMNUM~, I3*, I3+1*, O!, O+1*, O+2, O+4, O+5, X*
, STATS+5*, STATS+8*, STATS+9*, STATS+11, RUN~, RUN+1*, RUN+2*, RUN+3, RUN+8*, RUN+9
, RUN+12*, RUN+13*, RUN+16, RUN+17, EOP+2~, TOP~, TOP+6*, TOP+7*, TOP+8, SUBTOP~
, SUBTOP+2*, SUBTOP+3*, SUBTOP+6*, E+1~, E+4*, E+5*
Y( O*, O+2, O+5
>> ZTIO QUE+2*
>> ZTRTN QUE+2*
>> ZTSAVE("^DOSV(0,$I," QUE+1*
ZTSK DIG+4~, END+1, QUE+3!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All