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

Package: Registration

Routine: DGVPP


Information

DGVPP ;ALB/MTC - DG PRE-PRE-INIT DRIVER ; 05 JUN 87

Source Information

Source file <DGVPP.m>

Call Graph

Call Graph

Call Graph Total: 4

Package Total Call Graph
Registration 2 H^DGUTL  EN^DGV53PP  
Kernel 1 ^%ZIS  
VA FileMan 1 YN^DICN  

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

Package Total Caller Graph
Registration 6 DGNOTE  DGYKPT  DGYXPT  DPTV53PT  DPTVPP  DPTVPT  
Scheduling 4 SDV53PP  SDVPP  SDVPR  SDVPT  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- main entry point
ENQ
Q
USER
VERS ;Set-up variables for Current, New and Required versions of PIMS
VERSQ
REQ() ; -- release required
REL() ; -- this release's final version
MSG ;Print message if this version of PIMS can not be installed
DPT ;Check if DPTINIT has been installed prior to installing DG
ALR ;Check if this version of PIMS has already been installed
PKG ;Check other packages required for this version of PIMS
ROU ;Check compiled routine size parameter
LINE ; -- write separator line

External References

Name Field # of Occurrence
^%ZIS EN+2
H^DGUTL EN+2
EN^DGV53PP EN+4
YN^DICN ALR+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,"'DG' INITIALIZATION ABORTED!!"
  • Line Location: EN+5
Function Call: WRITE
  • Prompt: !!?3,"The variable DUZ must be set to an active user code and the variable",!?3,"DUZ(0) must equal '@' to initialize.",!
  • Line Location: USER+0
Function Call: WRITE
  • Prompt: !!,"Current version (",DGVCUR,") is greater than this version (",DGVNEW,")."
  • Line Location: VERS+9
Function Call: WRITE
  • Prompt: !!,*7,"A search of your system indicates that the Version of the PIMS module which you",!,"are currently running on this system is Version ",DGVCUR,"."
  • Line Location: MSG+1
Function Call: WRITE
  • Prompt: !!,"This initialization requires that Version ",DGVREQ,", or higher, of the PIMS module be installed",!,"prior to installing this release."
  • Line Location: MSG+2
Function Call: WRITE
  • Prompt: !!,"If you do not have a copy of the necessary previous release(s) of MAS, which",!,"must be installed prior to this release of the module, please contact your",!,"local Information Systems Center for assistance."
  • Line Location: MSG+3
Function Call: WRITE
  • Prompt: !!,"'DPTINIT' must be run before initializing 'DG'!!"
  • Line Location: DPT+1
Function Call: WRITE
  • Prompt: !!,"YOU'VE ALREADY INSTALLED VERSION ",DGVNEW," ONCE.",!,"DO YOU REALLY WANT TO REINSTALL"
  • Line Location: ALR+2
Function Call: WRITE
  • Prompt: !!?3,"Enter 'YES' to reinstall, or 'NO' not to."
  • Line Location: ALR+3
Function Call: WRITE
  • Prompt: !,X
  • Line Location: LINE+2
Routine Call
  • %ZIS
  • Line Location:
    • EN+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^%ZOSF("TEST" PKG+6
^DD("ROU" ROU+1, ROU+3
^DG(43 - [#43] VERS+1, VERS+5
^DG(48 - [#48] DPT+1
^HL(770 - [#770] PKG+14
^ORD(100.99 - [#100.99] PKG+1
^VA(200 - [#200] USER

Label References

Name Line Occurrences
$$REL VERS+3
$$REQ VERS+2
ALR EN+3, ALR+3
DPT EN+3
MSG VERS+7
PKG EN+4
Q EN+5
ROU EN+3
USER EN+3
VERS EN+3
VERSQ VERS+7

Naked Globals

Name Field # of Occurrence
^("R" DPT+1
^("SCLR" VERS+5
^("VERSION" VERS+1

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> % ALR+1*, ALR+2*, ALR+3, ALR+4
CT Q+1!
CURPT Q+1!
DFN Q+1!
DGCFLBD Q+1!
DGCFLCN Q+1!
DGDATE Q!
DGDAY Q+1!
DGDIU Q!
DGDJ Q+1!
DGDOCFL Q+1!
DGDOMB Q+1!
DGENDT Q+1!
DGER Q!
DGI Q!
DGSTDT Q+1!
DGTIME Q!
DGTOTBD Q+1!
DGTOTCN Q+1!
DGVCUR EN+4, Q!, VERS+1*, VERS+7, VERS+9, MSG+1, ALR+2
DGVFLD EN+4*, Q!
DGVNEW Q!, VERS+4*, VERS+9, ALR+2
DGVNEWVR Q!, VERS+4*, ALR+2
DGVREL Q!, VERS+3*, DPT+1
DGVREQ Q!, VERS+2*, VERS+7, MSG+2
DIFQ EN+3, EN+4, EN+5, USER!, VERS+9!, MSG+3!, DPT+1!, ALR+4!, PKG+4!, PKG+12!
PKG+17!, ROU+1!
DMRG Q+1!
DPTIME Q+1!
DUZ USER
DUZ(0 USER
I2 Q+1!
>> IOP EN+2*
J Q!
ON Q!
SDVCUR Q!, VERS+5*
STIME Q+1!
X PKG+6~*, LINE+1~, LINE+2*
XCNP Q+1!
XMZ Q+1!
>> XQABT1 EN+1*
>> XQABT2 EN+6*

Marked Items

Name Field # of Occurrence
$T(DGVPP+1 VERS+4
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