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 |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All
Print Page as PDF
Routine: ENAR1

Package: Engineering

Routine: ENAR1


Information

ENAR1 ;(WIRMFO)/JED-ARCHIVE MODULE ;4.22.97

Source Information

Source file <ENAR1.m>

Call Graph

Call Graph

Call Graph Total: 8

Package Total Call Graph
Engineering 4 (C,ID)^ENAR2  G^ENARG  A^ENARGO  R^ENARGR  
VA FileMan 4 ^%DT  ^DIC  YN^DICN  EN^DIU2  

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

Package Total Caller Graph
Engineering 2 ENAR  ENARGR  

Entry Points

Name Comments DBIA/ICR reference
G ;GATHER RECORDS
G2
A ;ARCHIVE & VERIFY RECORDS
D ;DELETE ARCHIVE GLOBAL
D1
D11
D2
R ;RECALL ARCHIVE INFORMATION
R1
SID ;SELECT ARCHIVE ID
GS ;GLOBAL STATUS
AD ;ARCHIVE DATA INFO
AD1
AD2
AD3
UP ;UPDATE ARCHIVAL TRANSACTIONS
UP2
MSG
OUT
MSG1

External References

Name Field # of Occurrence
^%DT UP+2
^DIC SID+1
YN^DICN D11AD1AD2AD3
EN^DIU2 D2+1
C^ENAR2 A+2, D+3
ID^ENAR2 AD1+1
G^ENARG G2
A^ENARGO A+2
R^ENARGR R+4

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !!,*7,"Records gathering complete"
  • Line Location: G2+0
Function Call: WRITE
  • Prompt: !,"Bad news, Your archive global is not as expected"
  • Line Location: A+1
Function Call: WRITE
  • Prompt: !!,*7,"verify completed"
  • Line Location: A+3
Function Call: WRITE
  • Prompt: !!,"Your archive global has been deleted already"
  • Line Location: D+2
Function Call: WRITE
  • Prompt: !!,*7,"Archive global deleted"
  • Line Location: D11+2
Function Call: WRITE
  • Prompt: !,"There is data in your ",ENFN," file."
  • Line Location: R+3
Function Call: WRITE
  • Prompt: !!,"Recall completed"
  • Line Location: R+5
Function Call: WRITE
  • Prompt: !,"Before recalling more records, you must first delete existing data from",!,"your ",ENFN," file."
  • Line Location: R1+0
Function Call: WRITE
  • Prompt: !!,"There is existing data ready for transport or review"
  • Line Location: AD+1
Function Call: WRITE
  • Prompt: !,"Do you want to see the Archive ID information "
  • Line Location: AD1+0
Function Call: WRITE
  • Prompt: @IOF,!!,*7,"Process terminated: ",ENERR
  • Line Location: MSG+0
Function Call: READ
  • Variable: ENR
  • Timeout: DTIME
  • Line Location: MSG1+0
Function Call: WRITE
  • Prompt: !,"<cr> to continue"
  • Line Location: MSG1+0
Routine Call
  • DIC
  • Line Location:
    • SID+1

FileMan Files Accessed Via FileMan Db Call

FileNo Call Tags
^ENG(6919 - [#6919] Classic Fileman Calls

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ENAR( G+1, G2*, A+1!, D+1, D1D2D2+2!, D2+3*, R+1, R+3
GS+1
^ENG(6919 - [#6919] UP+3, UP+4, UP+5, UP2UP2+2*
^VA(200 - [#200] UP+2

Label References

Name Line Occurrences
@( G+2
AD R+2
AD1 AD1+1
AD2 R+3, AD2
D11 D11
D2 D11+1, AD2AD3
G2 G+2
GS G+2, A+1, D+2, R+2
MSG G+1, G+2, G2G2+1, A+1, A+2, D+1, D+3, D11D11+1
R+1, R+4
MSG1 A+1
OUT G2A+3, D+2, D11+2, R+5
R1 R+3
UP G+2, G2A+2, A+3, D11+1, R+2, R+5
UP2 UP2

Naked Globals

Name Field # of Occurrence
^(0 GS+1, UP+3*, UP+5

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% D11*, AD1*, AD1+1, AD2*, AD3*, OUT!
>> %DT UP+2*
DIC SID+1*!
DIC("S" SID+1*
DIC(0 SID+1*
DIU D2+1*!
DIU(0 D2+1*
DTIME MSG1
DUZ UP+2
ENA UP+5*, UP2+1, OUT!
ENDA G+2*, D1*, D11+1, R+2*, SID+1*, UP+2, OUT!
ENEMP UP+2*, UP2+2, OUT!
>> ENERR G+1*, G+2, G2G2+1*, A+1*, A+2, D+1*, D+3, D11*, D11+1
R+1*, R+2, R+4, SID+1*, AD1*, AD2*, AD3*, UP+1*, MSG, OUT*
ENFN D2+3*, R+3*, R1, OUT!
>> ENGBL G+1, G2A+1, D+1, D1D2D2+1, D2+2, D2+3, R+1
R+3, GS+1
ENGL OUT!
ENGS G+2, A+1, D+2, D+3, D1D2R+2, GS+1*, OUT!
ENID G+2, D1, D2*, R+2, OUT!
ENNXL UP+5*, UP2*, UP2+1, UP2+2, OUT!
ENNXT UP+5*, UP2+1*, OUT!
ENOUT UP2+1*, UP2+2, OUT!
>> ENR MSG1*
>> ENRT D2+3, R+3
ENTASK G+2*, G2*, A+2*, A+3*, D11+1*, R+2*, R+5*, UP+1, UP2+2, OUT!
ENTIME UP+2*, UP2+2, OUT!
IOF MSG
U UP+2, UP+5, UP2+1
X UP+2*, OUT!
Y SID+1!, UP+2, OUT!
>> Z UP+2*, UP+3, UP+4, UP+5, UP2UP2+2
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  FileMan Files Accessed Via FileMan Db Call |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All