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 |  Local Variables  | All
Print Page as PDF
Routine: ECUNIT

Package: Event Capture

Routine: ECUNIT


Information

ECUNIT ;BIR/MAM,JPW-Allocate DSS Units ;1 May 96

Source Information

Source file <ECUNIT.m>

Call Graph

Call Graph

Call Graph Total: 3

Package Total Call Graph
Event Capture 2 ^ECKILL  (,HELP)^ECUN1  
VA FileMan 1 ^DIC  

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

Package Total Caller Graph
Event Capture 1 ECDSUNIT  

Entry Points

Name Comments DBIA/ICR reference
BEG
UNIT ; select DSS Unit
CONT ;
USER ; select users
ENTER ; display DSS Units & Users
ASK
DELUN ; delete units
DISP ; display list
END
COUNT ; re-number units
CNT ; re-number users
CHECK ; check for valid DSS Unit
VAL ;check valid lists
MSG

External References

Name Field # of Occurrence
^DIC UNIT+1, USER+1
^ECKILL END
^ECUN1 ENTER+7
HELP^ECUN1 ENTER+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,"Allocating DSS Units for Event Capture",!!
  • Line Location: ECUNIT+3
Function Call: WRITE
  • Prompt: !!,"Enter the names of the DSS Units to be assigned: ",!!
  • Line Location: BEG+0
Function Call: WRITE
  • Prompt: @IOF,!,"Enter the names of the people who will have access to enter procedures",!,"for the DSS Units selected:",!!
  • Line Location: CONT+1
Function Call: WRITE
  • Prompt: @IOF,!,"Allocating DSS Units for Event Capture",!,?3,LIST_": ",!
  • Line Location: ENTER+1
Function Call: WRITE
  • Prompt: !,?3,CNT
  • Condition for execution: CNT#2
  • Line Location: ENTER+2
Function Call: WRITE
  • Prompt: ?45,CNT
  • Condition for execution: CNT#2=0
  • Line Location: ENTER+2
Function Call: WRITE
  • Prompt: ". "_$P(UNIT(CNT),"^",2)
  • Line Location: ENTER+2
Function Call: WRITE
  • Prompt: !,?3,CNT
  • Condition for execution: CNT#2
  • Line Location: ENTER+3
Function Call: WRITE
  • Prompt: ?45,CNT
  • Condition for execution: CNT#2=0
  • Line Location: ENTER+3
Function Call: WRITE
  • Prompt: ". "_$P(USER(CNT),"^",2)
  • Line Location: ENTER+3
Function Call: READ
  • Variable: ECYN
  • Timeout: DTIME
  • Line Location: ENTER+4
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,"Enter <RET> to add more "_LIST_", or ""D"" to delete a "_$S(LIST["DSS":"unit",1:"user"),!,"from the list."
  • Line Location: ASK+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ASK+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: ASK+3
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: DELUN+1
Function Call: WRITE
  • Prompt: !!,"Enter the number corresponding to the DSS Unit that you want to remove."
  • Line Location: DELUN+2
Function Call: WRITE
  • Prompt: !!,"Enter the number corresponding to the Event Capture User that you",!,"want to remove."
  • Line Location: DELUN+3
Function Call: READ
  • Variable: ECYN
  • Timeout: DTIME
  • Line Location: DISP+1
Function Call: WRITE
  • Prompt: !!,"Enter YES if you would like see the list of "_LIST_"."
  • Line Location: DISP+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+0
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: CHECK+1
Function Call: WRITE
  • Prompt: !!,"This DSS Unit is inactive.",!!,"Press <RET> to continue "
  • Line Location: CHECK+1
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: CHECK+1
Function Call: WRITE
  • Prompt: !!,"No action taken.",!!,"Press <RET> to continue "
  • Line Location: MSG+0
Routine Call
  • DIC
  • Line Location:
    • UNIT+1
    • USER+1

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^ECD - [#724] CHECK+1

Label References

Name Line Occurrences
ASK ASK+1
BEG ENTER+7
CHECK UNIT+4
CNT ASK+3
CONT UNIT+3
COUNT ASK+2
DELUN DELUN+2, DELUN+3
DISP DELUN+2, DELUN+3, DISP+2
END UNIT+1, USER+1, ENTER+4, ASK+2, ASK+3
ENTER USER+3, ENTER+5, ENTER+6, ASK, ASK+2, ASK+3, DELUN+1, DELUN+6, DISP+4
MSG VAL+1, VAL+2
UNIT UNIT+4, UNIT+5, ASK+2
USER USER+4, ASK+3
VAL ASK+2, ASK+3

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> CNT BEG*, UNIT+1, UNIT+2, UNIT+3, UNIT+5*, CONT+1*, USER+1, USER+2, USER+3, USER+4*
, ENTER+2*, ENTER+3*, ASK+2*, ASK+3*, DELUN+4*, DELUN+5*, COUNT+1*, CNT+1*
>> CNT1 ASK+2, ASK+3, DELUN+4*, DELUN+5*, COUNT+1*, CNT+1*
DA UNIT+1!, USER+1!
DIC UNIT+1!*, USER+1!*
DIC("A" UNIT+1*, USER+1*
DIC(0 UNIT+1*, USER+1*
DTIME ENTER+4, ASK, DELUN+1, DISP+1, CHECK+1, MSG
DUOUT UNIT+1!, USER+1!
ECMORE BEG!, UNIT+2, USER+2, ASK+2*, ASK+3*
>> ECNOPE UNIT+4*, CHECK+1*
>> ECOUT BEG*, ASK+2, ASK+3, DISP+1*, VAL+1*, VAL+2*
ECREDO ENTER+4, DISP+1*, DISP+3!, DISP+4!
>> ECYN ENTER+4*, ENTER+5*, ENTER+6, ENTER+7, DISP+1*, DISP+2*, DISP+3
>> I ENTER+2*, ENTER+3*, DELUN+4*, DELUN+5*, COUNT+1*, CNT+1*
IOF ECUNIT+3, CONT+1, ENTER+1, ASK+2, ASK+3, END, CHECK+1
>> LIST BEG*, ENTER+1, ENTER+2, ENTER+3, ENTER+6*, ENTER+7, ASK+1, ASK+2*, ASK+3*, DELUN+2
, DELUN+3, DELUN+4, DELUN+5, DISP+2, VAL+1, VAL+2
>> UNIT( UNIT+5*, ENTER+2, DELUN+2, DELUN+4!*, COUNT+1
>> UNIT(0 VAL+1
>> USER( USER+4*, ENTER+3, DELUN+3, DELUN+5!*, CNT+1
>> USER(0 VAL+2
>> X ASK*, ASK+1*, ASK+2, ASK+3, DELUN+1*, DELUN+2, DELUN+3, DELUN+4, DELUN+5, DISP+1
, CHECK+1*, MSG*
>> Y UNIT+1, UNIT+2, UNIT+3, UNIT+5, USER+1, USER+2, USER+3, USER+4, CHECK+1
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Local Variables  | All