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 |  Marked Items |  All
Print Page as PDF
Routine: DIVR

Package: VA FileMan

Routine: DIVR


Information

DIVR ;O-OIFO/GFT - VERIFY FIELD DIFLD, DATA DICTIONARY A ;5DEC2016

Source Information

Source file <DIVR.m>

Call Graph

Call Graph

Call Graph Total: 11

Package Total Call Graph
VA FileMan 9 $$LABEL^DIALOGZ  S2^DIBT1  ($$OUTPUT,$$VALINT)^DIETLIBF  $$FROOTDA^DIKCU  WRAP^DIKCU2  ^DIR  ($$DATE,IJ)^DIUTL  (DEVSEL,INIT,Q)^DIV  
(LOADVER,VER)^DIVC  
Kernel 2 ^%ZISC  $$S^%ZTLOAD  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 3

Package Total Caller Graph
VA FileMan 3 DIU3  DIUTL  DIV  

Entry Points

Name Comments DBIA/ICR reference
INDEX ;Check new indexes
HDR ;Print header
DA
EN(A,DIFLD,DQI) ;Main Entry Point for VEN version
IER1 ;If top level, write record info and message
LF ;Issue a line feed or EOP read CALLED FROM DIV
BEGIN
0 ;
DANGL
IX
E
D
F
K ;
IER ;Print info about invalid indexes. (Modeled after DA subroutine above)
L
N ;
Q
P
S
R
V
X
UNIQ
OUTT
XEC
QX
DOTYPE
TYPE

External References

Name Field # of Occurrence
^%ZISC Q+2, Q+3
$$S^%ZTLOAD LF+8
$$LABEL^DIALOGZ TYPE+1, TYPE+2
S2^DIBT1 Q+7
$$OUTPUT^DIETLIBF TYPE+4
$$VALINT^DIETLIBF TYPE+4
$$FROOTDA^DIKCU OUTT+3
WRAP^DIKCU2 IER+4
^DIR LF+5
$$DATE^DIUTL D
IJ^DIUTL BEGIN+6
DEVSEL^DIV BEGIN+2
INIT^DIV BEGIN+3
Q^DIV BEGIN
LOADVER^DIVC OUTT+4
VER^DIVC INDEX+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: "--FIELD #",DIFLD," ",$$LABEL^DIALOGZ(A,DIFLD),"-- (",W,")"
  • Line Location: TYPE+1
Function Call: WRITE
  • Prompt: $C(7)_"(CANNOT CHECK"
  • Line Location: UNIQ+2
Function Call: WRITE
  • Prompt: "(CHECKING"
  • Line Location: UNIQ+3
Function Call: WRITE
  • Prompt: " CROSS-REFERENCE)"
  • Line Location: UNIQ+4
Function Call: WRITE
  • Prompt: !
  • Line Location: Q+7
Function Call: WRITE
  • Prompt: DA,?10,$S($D(^(DA,0)):$E($P(^(0),U),1,30),1:DA),?40,$E(M,1,IOM-40)
  • Line Location: DA+2
Function Call: WRITE
  • Prompt: DA(X),?10,$S($G(^(DA(X),0))]"":$P(^(0),U),1:"***NO ZERO NODE***")
  • Line Location: DA+4
Function Call: WRITE
  • Prompt: DA,?10,$S($D(^(DA,0)):$P(^(0),U),1:DA)
  • Line Location: IER1+2
Function Call: WRITE
  • Prompt: ?40,DIVTXT(DIVI)
  • Line Location: IER1+5
Function Call: WRITE
  • Prompt: DA(X),?10,$P(^(DA(X),0),U)
  • Line Location: IER1+10
Function Call: WRITE
  • Prompt: !
  • Line Location: LF+1
Function Call: WRITE
  • Prompt: !
  • Line Location: LF+5
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: LF+9
Function Call: WRITE
  • Prompt: "VERIFY FIELDS REPORT"
  • Line Location: HDR+3
Function Call: WRITE
  • Prompt: !,DIVFIL_$J("",DIVTAB)_DIVDAT_DIVPG
  • Line Location: HDR+6
Function Call: WRITE
  • Prompt: !,DIVFIL,!,$J("",IOM-1-$L(DIVDAT)-$L(DIVPG))_DIVDAT_DIVPG
  • Line Location: HDR+7
Function Call: WRITE
  • Prompt: !,$TR($J("",IOM-1)," ","-"),!
  • Line Location: HDR+8
Routine Call
  • DIR
  • Line Location:
    • LF+5

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZIS("C" Q+4
^DD( BEGIN+5, TYPE+3, OUTT, OUTT+5, UNIQ+1, E+1, V+2
^DD("IX" - [#.11] OUTT+2
^DD("KEY" - [#.31] OUTT+1
^DI( TYPE
^DIBT - [#.401] Q+8*, Q+9*
^UTILITY("DIVR" Q, Q+8, QX+1!, X, X+1*, IER+7, IER+10*
^UTILITY("DIVRIX" DANGL+3!, DANGL+9, QX+1!

Label References

Name Line Occurrences
0 E+2
@( DOTYPE, IX+1, INDEX+28
BEGIN EN+1
DA DA+4
E UNIQ+1
F P, V+4
HDR LF+9
IER INDEX+14, INDEX+25
IER1 IER1+11
L L+4
LF TYPE+3, UNIQ+4, DOTYPE+1, DA+1, DA+3, DA+4, IER1+2, IER1+4, IER1+6, IER1+9
Q UNIQ+4, Q+8
QX Q+5
X DANGL+7, DANGL+8, DANGL+9, R+1, P+1, S, S+1, F, IX, V
, V+2, V+3
XEC E+3

Naked Globals

Name Field # of Occurrence
^( OUTT+5, UNIQ+1, DANGL+10*, Q, DA+2, DA+4, IER1+2, IER1+10
^(0 TYPE, TYPE+3, OUTT+6, DA+2, DA+4, V+1, IER1+2, LF+2
^(1 OUTT+7, OUTT+8
^(12.1 E+1
^(2 OUTT, OUTT+7, OUTT+8

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % TYPE*, OUTT+5*, OUTT+8, L*, L+1, IX*
A BEGIN+5, BEGIN+6, TYPE+1, TYPE+2, TYPE+3, TYPE+4, OUTT, OUTT+1, OUTT+2, OUTT+3
, OUTT+4, OUTT+5, UNIQ+1, E+1, V+2, INDEX+6, EN~
C Q+6~
D Q+6~
D0 Q+6~
DA DANGL+1~, DANGL+6*, DANGL+7, DANGL+9, DANGL+10, X+1, DA+2, L*, L+2, INDEX+6
, IER+10, IER1+2
DA( X+1, DA+4, IER+10, IER1+10
DDA Q+6~
DDC BEGIN+4~, TYPE+3*, TYPE+4*, UNIQ*, E*, E+1*, Q+8*, Q+9, S, F+1
, F+3
DDC(1 E+1*
DE BEGIN+4~, E+3*, E+5*, E+6*, XEC, 0+1*, L*, L+1*, L+2*
DE( L*
DE(1 E+5*
DG BEGIN+4~, UNIQ+2, UNIQ+5
DG( OUTT+8*, IX
DIBT Q+5!
DIC XEC!
DIC("S" E+1
DICL Q+6~
DIDANGL BEGIN+4~, E+4*, DANGL+8
DIFLD BEGIN+5, TYPE+1, TYPE+3, TYPE+4, OUTT, OUTT+1, OUTT+2, OUTT+4, OUTT+5, UNIQ
, UNIQ+1, E+1, Q+6~, V+2, EN~
DIINDEX INDEX+5!
DINAKED LF+2~*, LF+10*
DIPA BEGIN+4~
DIR LF+4~
DIR(0 LF+5*
DIROUT QX+1!
DIRUT TYPE+3, UNIQ+4, XEC, DANGL, DANGL+4, Q+5, Q+8, QX+1!, R, DA+1
, DA+4, INDEX+9, INDEX+11, INDEX+12, INDEX+17, INDEX+19, INDEX+20, INDEX+21, IER1+2, IER1+3
, IER1+4, IER1+9, LF+7, LF+8*
DISV Q+5!
>> DIU UNIQ
DIU0 Q+6~
DIVDAT BEGIN~, HDR+5, HDR+6, HDR+7
DIVFIL BEGIN~, HDR+5, HDR+6, HDR+7
DIVFILE INDEX+18~, INDEX+19*, INDEX+20, INDEX+21, INDEX+22, INDEX+24
DIVI IER+1~, IER1+3*, IER1+4, IER1+5
DIVINDEX QX!, INDEX+6, INDEX+9!
DIVINDEX( INDEX+11, INDEX+12
DIVKEY QX!, INDEX+5!, INDEX+6, INDEX+17!
DIVKEY( INDEX+19, INDEX+20, INDEX+21, INDEX+22
DIVKNM INDEX+18~, INDEX+20*, INDEX+21, INDEX+22, INDEX+24
DIVMODE BEGIN~, BEGIN+1*
DIVNAME INDEX+10~, INDEX+11*, INDEX+12, INDEX+13
DIVNUM INDEX+10~, INDEX+12*, INDEX+13
DIVPG BEGIN~, HDR+2*, HDR+5, HDR+6, HDR+7
DIVPROB INDEX+18~, INDEX+22*, INDEX+23
DIVREQK BEGIN+4~, OUTT+1*, QX!, R+1, R+2
DIVRIX BEGIN+4~, DANGL*, DANGL+2, DANGL+4, DANGL+6
DIVRIX( OUTT+8*, DANGL
DIVROOT OUTT+3*, QX!, INDEX+6
DIVROUTT BEGIN+4~, TYPE+4*, OUTT*, F+2, F+3
DIVTAB HDR+1~, HDR+5*, HDR+6
DIVTMP BEGIN+4~, QX!
DIVTXT IER+1~, IER+4
DIVTXT( IER1+3, IER1+5
DIVTXT(0 IER+4*
DIVTYPE BEGIN+4~, OUTT+3*, UNIQ+6*, QX!, INDEX+28
DIVXRNM INDEX+18~, INDEX+21*, INDEX+22, INDEX+24
DIVZ BEGIN+4~, TYPE+3*, P, S+1
DK Q*, QX+1!
DQ QX+1!, F*, F+3, F+4
DQI UNIQ+4, DANGL+11, EN~
DR BEGIN+4~, TYPE+3*, TYPE+4, UNIQ, E+1, QX+1!, R+1, F+4
DT Q+9
DTOUT QX+1!
DUOUT QX+1!
E BEGIN+4~, UNIQ+6*, UNIQ+7*, Q*, Q+5, Q+8*, IX+1
I BEGIN+4~, Q+6~
I( DA+4, L+4, IER1+10
I(0 DANGL+2, DANGL+7, X+2, 0+1, IER+11
IOF LF+9
IOM DA+2, HDR+5, HDR+7, HDR+8
IOSL DOTYPE+1, LF+1
IOST LF+3
IX DANGL+1~, DANGL+2*, DANGL+4*, DANGL+5, DANGL+6, DANGL+8
J BEGIN+4~, Q+6~
J("" BEGIN+6
J(0 Q
L Q+6~
M BEGIN+4~, E+4*, E+5, E+6, XEC!, DANGL+7*, DANGL+8*, DANGL+9*, DANGL+12, Q*
, R+2*, R+3*, P+1*, S*, S+1*, F*, F+4*, DA+2, IX*, V*
, V+1*, V+2*, V+3*, INDEX+13*, INDEX+23*, INDEX+24*, IER+4
O Q+6~
P QX+1!
P4 BEGIN+4~, TYPE+3*, E+2
POP BEGIN~, BEGIN+2
Q Q+6~
S Q+6~
SN DANGL+1~, DANGL+2*, DANGL+4, DANGL+6, DANGL+8
SX DANGL+1~, DANGL+6*, DANGL+7, DANGL+8, DANGL+9
T BEGIN+4~, BEGIN+7*, BEGIN+8*, TYPE*, TYPE+3*, OUTT+3*, UNIQ+1, UNIQ+2, UNIQ+6, UNIQ+7*
, DOTYPE
TYP BEGIN+4~, BEGIN+5*, BEGIN+7, BEGIN+8, BEGIN+9, TYPE
U BEGIN+5, TYPE, TYPE+3, OUTT+6, Q+9, DA+2, DA+4, V+1, V+2, V+3
, IER1+2, IER1+10
V BEGIN+4~, BEGIN+6*, TYPE+2, OUTT+8, X+1, X+2, DA+3, DA+4, 0+1, L
, L+2, L+4, IER+10, IER+11, IER1+6, IER1+10
W BEGIN+4~, BEGIN+8*, TYPE*, TYPE+1, TYPE+2*, X, IER+7
X OUTT+6~*, OUTT+8, UNIQ, E*, E+2*, E+3*, E+4, DANGL+8, R+1, R+2
, P, P+1, S, S+1, D*, F, F+1, F+2, F+3*, X+1*
, X+2*, DA, DA+4*, 0+1*, L, L+2, L+4*, IX, V, V+1
, V+3, INDEX+13, INDEX+23, IER+1~, IER+10*, IER+11*, IER1+1, IER1+10*, LF+4~
Y E*, E+2*, E+3, E+4, XEC!, Q+8, Q+9, P*, S*, F+3~*
, 0+1*, L*, L+4*, LF+4~
>> ZTQUEUED Q+1, Q+5, LF+8
>> ZTREQ Q+1*
>> ZTSTOP LF+8*

Marked Items

Name Field # of Occurrence
$T(^%ZISC Q+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  Marked Items |  All