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 ;1:06 PM 30 Mar 1999

Source Information

Source file <DINIT.m>

Call Graph

Call Graph Total: 12

Package Total Call Graph
VA Fileman 11 ^DIC  DT^DICRW  ^DIK  ^DINIT0  ^DINIT0F0  ^DINIT11B  ^DINIT21  OSDD^DINIT24  
(A,A1,X,XX)^DINIT3  KL^DINIT6  I^DITR  
Kernel 1 ^%ZTLOAD  

Caller Graph

Caller Graph Total: 10

Package Total Caller Graph
VA Fileman 4 DI REINITIALIZE  DI SET MUMPS OS  DI1018P  DINIT6  
Auto Replenishment Ward Stock 1 PSGWINIT  
Automated Information Collection System 1 IBDEINIT  
IHS VA Support Files 1 AVAPINIT  
Inpatient Medications 1 PSJVINIT  
Integrated Billing 1 IBINIT  
Problem List 1 GMPLINIT  

Entry Points

Name Comments DBIA/ICR reference
DO
N1(%)
NO
NA
B36(X)
N ;
Q
VERSION ;
V ;;22.0;VA FileMan;;Mar 30, 1999
GO
DATA
OS
OSETC ;BRING IN MUMPS OS, DIALOG & LANGUAGE DD AND DATA FOR FILEMAN

External References

Name Field # of Occurrence
^%ZTLOAD OS+5
^DIC OS+2
DT^DICRW N+1
^DIK OSETC+14
^DINIT0 NO+9
^DINIT0F0 GO+11
^DINIT11B NO+9
^DINIT21 OSETC+3
OSDD^DINIT24 OSETC+3
A^DINIT3 OSETC+4
A1^DINIT3 OSETC+19, OSETC+20
X^DINIT3 OSETC+11, OSETC+12
XX^DINIT3 OSETC+21
KL^DINIT6 V+2, 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 V21."
  • 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: !!,"Now loading MUMPS Operating System File"
  • Line Location: OSETC+2
Function Call: WRITE
  • Prompt: !!,"Now loading DIALOG and LANGUAGE Files"
  • Line Location: OSETC+17
Function Call: WRITE
  • Prompt: "."
  • Line Location: OSETC+18
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!
^DD("OS" - [#.7] N+4, OS, OS+1*, OS+2*, OSETC+11!
^DD("SITE" NA, NO, NO+2*
^DD("VERSION" N+2, N+3
^DD(0 NO+9!
^DI( OSETC+19*, OSETC+20*
^DIA(0 GO+3*
^DIBT(0 GO+1*
^DIC - [#1] GO+5!, GO+6!, GO+7!, GO+8!, GO+9!, GO+10!, OSETC+4*, OSETC+5*, OSETC+6*, OSETC+7*
, OSETC+8*, OSETC+9*, OSETC+10*, OSETC+19*, OSETC+20*
^DIE(0 GO+1*
^DIPT - [#.4] GO+2*
^DIPT(0 GO+1*
^UTILITY( OSETC+17!, DATA, DATA+1, DATA+2!
^UTILITY("DIK" OSETC+17!

Label References

Name Line Occurrences
$$B36 OSETC+18
$$N1 B36
@( OSETC+18
DATA OSETC+22, DATA+2
DO DO+1
GO NO+12
NA NA+2
NO NO+3
OS NO+11
OSETC NO+10
Q OS+2
V VERSION+1
VERSION N+1

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
^("^" GO+4!
^(0 OSETC+4*, DATA+1
^(1 NO, NO+1
^(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
D OSETC+1~, DATA*, DATA+1
D0 OSETC+1~, DATA+1*
DA OSETC+11!, OSETC+12!, OSETC+14~*
DA(1 OSETC+11*
DDF OSETC+1~, DATA+2!
DDF(1 DATA*, DATA+1, DATA+2
DDT OSETC+1~, DATA+2!
DDT(0 DATA*
DFN OSETC+1~, DATA+2!
DFR OSETC+1~, DATA+2!
DFR(1 DATA+1*
DIC OS*, OS+2!
DIC("A" OS*
DIC("B" OS*
DIC(0 OS*
DIFROM N+1~*
DIK OSETC+11!*, OSETC+12!*, OSETC+14~*
>> DIT GO*
DITZS OS*, OS+1*, OS+2*, Q!
>> DKP DATA+1*
DMRG OSETC+1~, DATA+1*
DN OSETC+1~, OSETC+18*
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~, OSETC+14~*, OSETC+21*
R OSETC+1~, OSETC+18*
U N+4, GO+1, OSETC+17, OSETC+19, OSETC+20, DATA, DATA+1, DATA+2
>> VERSION N+1, N+2, N+3, VERSION+1*
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 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