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  | All
Print Page as PDF
Routine: ECLOC

Package: Event Capture

Routine: ECLOC


Information

ECLOC ;BIR/MAM,RHK,JPW-Flag Current Locations ;1 May 96

Source Information

Source file <ECLOC.m>

Call Graph

Call Graph

Call Graph Total: 5

Package Total Call Graph
Kernel 2 HOME^%ZIS  ^%ZTLOAD  
VA FileMan 2 ^DIC  ^DIE  
Event Capture 1 ^ECKILL  

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 ECLOC  

Entry Points

Name Comments DBIA/ICR reference
START
FLAG ; entry to flag current locations
UN ; unflag location
ASK
INAC
QUE ;que job to batch inactivate
END
DEQ ;queued batch job to inactivate all screens for location ECLOC

External References

Name Field # of Occurrence
HOME^%ZIS QUE+2
^%ZTLOAD QUE+2
^DIC FLAG+3
^DIE FLAG+5, ASK+2, DEQ+2
^ECKILL END+1

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: @IOF,!,"Create/Remove current locations for Event Capture use.",!
  • Line Location: START+1
Function Call: READ
  • Variable: ECACC
  • Timeout: DTIME
  • Line Location: START+2
Function Call: WRITE
  • Prompt: !!,"Enter <RET> to flag a location to be used in the Event Capture software, or",!,"REMOVE to delete access to a location."
  • Line Location: START+3
Function Call: READ
  • Variable: X
  • Timeout: DTIME
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !!,"Press <RET> to continue "
  • Line Location: START+4
Function Call: WRITE
  • Prompt: !!,ECLN_" has been flagged for use in the Event Capture software."
  • Line Location: FLAG+5
Function Call: WRITE
  • Prompt: !!,ECLN_" has not been flagged as a current location."
  • Line Location: UN+3
Function Call: READ
  • Variable: ECYN
  • Timeout: DTIME
  • Line Location: ASK+0
Function Call: WRITE
  • Prompt: !!,"If this location should no longer be used for the Event Capture software,",!,"enter YES. Enter <RET> to leave this location flagged for use."
  • Line Location: ASK+1
Function Call: READ
  • Variable: ECYN
  • Timeout: DTIME
  • Line Location: INAC+0
Function Call: WRITE
  • Prompt: !!,"Enter Y to inactivate all screens for this location",!," N or return to leave them active."
  • Line Location: INAC+1
Function Call: WRITE
  • Prompt: !,"Please wait a few moments"
  • Line Location: QUE+1
Function Call: WRITE
  • Prompt: !!,"Press <RET> to continue "
  • Line Location: END+0
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: END+1
Routine Call
  • %ZIS
  • Line Location:
    • QUE+2
Routine Call
  • DIC
  • Line Location:
    • FLAG+3
Routine Call
  • DIE
  • Line Location:
    • FLAG+5
    • ASK+2
    • DEQ+2

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(4 - [#4] UN+1, UN+2
^ECJ("AST" DEQ+2

Label References

Name Line Occurrences
ASK ASK+1
END START+2, FLAG+3, FLAG+6, UN+3, ASK, ASK+2, INAC
FLAG START+5
INAC INAC+1
START START+4
UN FLAG+4

Naked Globals

Name Field # of Occurrence
^("EC" UN+2

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
>> DA FLAG+5*, ASK+2*, DEQ+2*
DIC FLAG+2!*, FLAG+3!
DIC("S" FLAG+2*
DIC(0 FLAG+2*
DIE FLAG+5!*, ASK+2*!, DEQ+2*
DR FLAG+5!*, ASK+2*!, DEQ+2*
DT DEQ+2
DTIME START+2, START+4, ASK, INAC, END
>> ECACC START+2*, START+3*, START+4, START+5
>> ECL FLAG+3*, FLAG+5, UN+1, UN+2, ASK+2, DEQ+2
>> ECLN FLAG+3*, FLAG+5, UN+3
>> ECNO UN+1*, UN+2*, UN+3
>> ECOUT START*, START+2*, FLAG+2*, FLAG+3*, ASK*, END
>> ECUNM START*, START+6*, FLAG+1, FLAG+2, FLAG+4
>> ECX DEQ+2*
>> ECYN ASK*, ASK+1*, ASK+2, INAC*, INAC+1
IOF START+1, FLAG+1, END+1
>> X START+4*, END*
>> Y FLAG+3
>> Y(0 FLAG+3
>> ZTDESC QUE+2*
>> ZTDTH QUE+2*
>> ZTIO QUE+2*
>> ZTQUEUED END+1, DEQ+3
>> ZTREQ END+1*, DEQ+3*
>> ZTRTN QUE+2*
>> ZTSAVE("ECL" QUE+2*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables  | All