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 |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: A1B2PRE

Package: ODS

Routine: A1B2PRE


Information

A1B2PRE ;ALB/MJK - ODS PRE-INIT Version 1.5; 14 JAN 1991

Source Information

Source file <A1B2PRE.m>

Call Graph

Call Graph

Call Graph Total: 1

Package Total Call Graph
VA FileMan 1 EN^DIU2  

Entry Points

Name Comments DBIA/ICR reference
EN ; -- pre-init entry point
REL ; -- check if version 1 was loaded
RELQ
MES ; -- error message
DD ; -- del 11500.2

External References

Name Field # of Occurrence
EN^DIU2 DD+2

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,"You must load version 1 of 'OPERATION DESERT SHIELD' package first."
  • Line Location: MES+1
Function Call: WRITE
  • Prompt: !!,"Initialization aborted."
  • Line Location: MES+2
Function Call: WRITE
  • Prompt: !,">>> Deleting ODS ADMISSIONS file data dictionary..."
  • Line Location: DD+1
Function Call: WRITE
  • Prompt: !," Data dictionary will be restored by inits."
  • Line Location: DD+3

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(9.4 - [#9.4] REL+2, REL+3, REL+4

Label References

Name Line Occurrences
DD EN+1
MES REL+3, REL+4
REL EN+1
RELQ REL+3, REL+4

Naked Globals

Name Field # of Occurrence
^("VERSION" REL+4
^(0 REL+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
A1B2PKG REL+2*, REL+3, REL+4, RELQ!
DIFQ EN+1, MES+2!
DIU DD+2*!
DIU(0 DD+2*
U REL+2
Info |  Source |  Call Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All