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

Package: VA FileMan

Routine: DINIT


Information

DINIT ;SFISC/GFT,XAK-INITIALIZE VA FILEMAN ;08 Jul 2015 10:08 AM

Source Information

Source file <DINIT.m>

Call Graph

Call Graph

Call Graph Total: 14

Package Total Call Graph
VA FileMan 13 ^DIC  DT^DICRW  DDIXIN^DIFROMSX  DDKEYIN^DIFROMSY  ^DIK  ^DINIT0  ^DINIT0F0  ^DINIT11B  
(,DD)^DINIT21  OSDD^DINIT24  (A,A1,X,XX)^DINIT3  KL^DINIT6  I^DITR  
Kernel 1 ^%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: 8

Package Total Caller Graph
VA FileMan 5 DI REINITIALIZE  DI SET MUMPS OS  DI222PRE  DINIT220  DINIT6  
Engineering 3 ENARY11  ENARY21  ENARY31  

Entry Points

Name Comments DBIA/ICR reference
DO
NOASK ;API to re-initialize FileMan without terminal input. Does not "change the MUMPS OPERATING SYSTEM File"
N1(%)
NO
NA
EGP
B36(X)
N ;
Q
VERSION ;
V ;;22.2;VA FileMan;;Jan 05, 2016;Build 42
GO
OSDD
OS
OSETC ;BRING IN MUMPS OS, DIALOG & LANGUAGE DD AND DATA FOR FILEMAN
DATA

External References

Name Field # of Occurrence
^%ZTLOAD OS+5
^DIC OS+2
DT^DICRW N+1, NOASK+5
DDIXIN^DIFROMSX EGP+10
DDKEYIN^DIFROMSY EGP+13
^DIK OSDD+11
^DINIT0 NO+9, NOASK+5
^DINIT0F0 GO+11
^DINIT11B NO+9, NOASK+5
^DINIT21 OSETC+3
DD^DINIT21 NOASK+5
OSDD^DINIT24 OSDD
A^DINIT3 OSDD+1
A1^DINIT3 EGP+1, EGP+2
X^DINIT3 OSDD+8, OSDD+9
XX^DINIT3 EGP+3
KL^DINIT6 V+6, N+4, DO, NA+1, NO+1, NO+11
I^DITR DATA+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,X
  • Line Location: N+1
Function Call: WRITE
  • Prompt: $C(7),!!,"*** WARNING!! VA FileMan version "_^DD("VERSION")_" is currently loaded on this system.",!,"This Initialization will bring in VA FileMan version "_VERSION_", an earlier version!!",!!
  • Line Location: N+3
Function Call: WRITE
  • Prompt: $C(7),!!,"Your defined operating system entry "_$P($G(^DD("OS",Y,0)),U)_" does not support the",!,"1995 M Standards.",!!,"You may not initialize VA FileMan V"_VERSION
  • Line Location: N+4
Function Call: READ
  • Timeout: 60
  • Variable: Y
  • Line Location: DO+0
Function Call: WRITE
  • Prompt: !,"Answer YES to begin Initializing VA FileMan"
  • Line Location: DO+1
Function Call: WRITE
  • Prompt: !!,"SITE NAME: "
  • Line Location: NA+0
Function Call: WRITE
  • Prompt: ^("SITE"),"// "
  • Line Location: NA+0
Function Call: READ
  • Timeout: 60
  • Variable: X
  • Line Location: NA+1
Function Call: WRITE
  • Prompt: " ENTER THE NAME OF THIS INSTALLATION SITE",!!
  • Line Location: NA+2
Function Call: WRITE
  • Prompt: !!,"SITE NUMBER: "
  • Line Location: NO+0
Function Call: WRITE
  • Prompt: ^(1),"// "
  • Condition for execution: $D(^DD("SITE",1))
  • Line Location: NO+0
Function Call: READ
  • Timeout: 60
  • Variable: X
  • Line Location: NO+1
Function Call: WRITE
  • Prompt: " ENTER A NUMBER, CORRESPONDING TO YOUR INSTITUTION"
  • Line Location: NO+3
Function Call: WRITE
  • Prompt: !
  • Line Location: NO+11
Function Call: WRITE
  • Prompt: !!,"Now loading other FileMan files--please wait."
  • Line Location: NO+12
Function Call: WRITE
  • Prompt: !
  • Line Location: OS+0
Function Call: WRITE
  • Prompt: "FILEMAN HAS NEVER BEEN INITIALIZED.",!,"PLEASE RUN 'DINIT'"
  • Line Location: NOASK+1
Function Call: WRITE
  • Prompt: !!,"Now loading MUMPS Operating System File"
  • Line Location: OSETC+2
Function Call: WRITE
  • Prompt: !!,"Now loading DIALOG and LANGUAGE Files"
  • Line Location: OSDD+14
Function Call: WRITE
  • Prompt: "."
  • Line Location: OSDD+17
Routine Call
  • DIC
  • Line Location:
    • OS+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("MGR" OS+4
^%ZOSF("OS" OS+3
^%ZTSK - [#14.4] OS+3
^DD( GO+4!, GO+6!, GO+8!, GO+9!, GO+10!, OSDD+16!
^DD("OS" - [#.7] N+4, OS, OS+1*, OS+2*, NOASK+1, OSDD+8!
^DD("SITE" NA, NO, NO+2*
^DD("VERSION" N+2, N+3
^DD(0 NO+9!
^DI( EGP+1*, EGP+2*
^DIA(0 GO+3*
^DIBT(0 GO+1*
^DIC - [#1] GO+5!, GO+6!, GO+7!, GO+8!, GO+9!, GO+10!, OSDD+1*, OSDD+2*, OSDD+3*, OSDD+4*
, OSDD+5*, OSDD+6*, OSDD+7*, OSDD+16!, EGP+1*, EGP+2*
^DIE(0 GO+1*
^DIPT - [#.4] GO+2*
^DIPT(0 GO+1*
^TMP("DIFROMS2" EGP+8!, EGP+11!
^UTILITY( OSDD+14!, DATA, DATA+1, DATA+2!
^UTILITY("DIK" OSDD+14!
^UTILITY("KX" OSDD+14!, EGP+5

Label References

Name Line Occurrences
$$B36 OSDD+17
$$N1 B36
@( OSDD+17, EGP
DATA EGP+16, DATA+2
DO DO+1
GO NO+12
NA NA+2
NO NO+3
OS NO+11
OSDD NOASK+5
OSETC NO+10
Q OS+2
V VERSION+1
VERSION N+1, NOASK+5

Naked Globals

Name Field # of Occurrence
^( GO+1*, GO+4!, GO+5!, GO+6!, GO+8!, GO+9!, DATA+1
^("F" GO+1*, GO+2*
^("MGR" OS+3
^("OS" OS
^("SITE" NA, NA+1, NOASK+1
^("^" GO+4!
^(0 OSDD+1*, DATA+1
^(1 NO, NO+1, GO+4!
^(1.2 GO+4!, GO+5!

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% N1~
>> %X NA+3*, NO+2
A NOASK+2~
B NOASK+2~
D OSETC+1~, DATA*, DATA+1
D0 NOASK+2~, OSETC+1~, DATA+1*
D1 NOASK+2~, DATA+1!
DA OSDD+8!, OSDD+9!, OSDD+11~*
DA(1 OSDD+8*
DDF NOASK+2~, OSETC+1~, DATA+2!
DDF(1 DATA*, DATA+1, DATA+2
DDT NOASK+2~, OSETC+1~, DATA+2!
DDT(0 DATA*
DFL NOASK+2~
DFN OSETC+1~, DATA+2!
DFR OSETC+1~, DATA+2!
DFR(1 DATA+1*
DI NOASK+2~
DIC OS*, OS+2!
DIC("A" OS*
DIC("B" OS*
DIC(0 OS*
DIFRD EGP+9~*, EGP+10*, EGP+12*, EGP+13*
DIFRFILE EGP+6~*, EGP+7*, EGP+10, EGP+13
DIFROM N+1~*
DIFRSA EGP+5~*, EGP+7, EGP+10, EGP+13, EGP+14
DIIX NOASK+2~
DIK OSDD+8!*, OSDD+9!*, OSDD+11~*
>> DIT GO*
DITZS OS*, OS+1*, OS+2*, Q!
DIU NOASK+2~
DKP NOASK+2~, DATA+1*
DMRG NOASK+2~, OSETC+1~, DATA+1*
DN NOASK+2~, OSETC+1~, OSDD+17*, EGP
DQ NOASK+2~
DTL NOASK+2~
DTN OSETC+1~, DATA+2!
DTO OSETC+1~, DATA+1*, DATA+2!
DTO(0 DATA+1*
I GO*, GO+2, GO+7*, GO+9*, GO+10*, OSETC+1~, OSDD+11~*, EGP+3*
R NOASK+2~, OSETC+1~, OSDD+17*, EGP*
U N+4, GO+1, OSDD+14, EGP+1, EGP+2, DATA, DATA+1, DATA+2
V NOASK+2~
>> VERSION N+1, N+2, N+3, N+4, VERSION+1*
W NOASK+2~
X N+1, NA+1*, NA+2, NA+3, NO+1*, NO+2, NO+3, VERSION+1*, B36~
>> Y N+4*, DO*, DO+1, NO+11*, OS+2
Z NOASK+2~, OSETC+1~, DATA+1*
>> ZTDESC OS+5*
>> ZTDTH OS+4*
>> ZTIO OS+4*
>> ZTRTN OS+4*
>> ZTSAVE("DITZS" OS+4*
ZTSK Q!
>> ZTUCI OS+4*

Marked Items

Name Field # of Occurrence
$T(V VERSION+1
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