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

Package: Kernel

Routine: XQ6


Information

XQ6 ;SEA/AMF,SLC/CJS- BULK KEY DISTRIBUTION ;2/14/95 12:47

Source Information

Source file <XQ6.m>

Call Graph

Call Graph

Call Graph Total: 7

Package Total Call Graph
VA FileMan 5 %XY^%RCR  ^DIC  YN^DICN  (ENALL,IX)^DIK  ^DIR  
Kernel 2 (HOLDER,KEYFIL,LSTKEY)^XQ6A  EN^XQH  

Caller Graph

Legends:

Legend of Colors

Package Component Superscript legend

protocol O screenman SM broker B event driver Ed print P extended action Ea limited protocol LP edit E server Se subscriber Su inquire I run routine RR action A

Caller Graph

Caller Graph Total: 11

Package Total Caller Graph
Kernel 11 XQ12  XQ6A  XQKEYALTODEL  XQKEYDEL  XQKEYRDEL  XQLISTKEY  XQSHOKEY  XUKEYALL  
XUKEYDEALL  XUS5  XUSERNEW  

Entry Points

Name Comments DBIA/ICR reference
PAUSE ;Hold the screen
SHOW ;Show the users of a particular key
MESS ;Correct problems with key cross-references from 7.0 %RCR above.
LIST ;List all the keys of a given user
INIT ;
EN1
EN2
EN3
EN4
KEY ;
OUT
HOLDER ;Continue in next routine
ATOD ;Convert all of a users allocated keys to delegated keys
MORE ;Handles subordinate or exploding keys

External References

Name Field # of Occurrence
%XY^%RCR ATOD+5
^DIC KEY+7, SHOW+1, LIST+1, ATOD+1
YN^DICN MORE+1
ENALL^DIK ATOD+7
IX^DIK MESS+4
^DIR ATOD+4
HOLDER^XQ6A HOLDER+1
KEYFIL^XQ6A KEY+5
LSTKEY^XQ6A KEY+5
EN^XQH KEY+5

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,"You've nothing to allocate. See your package coordinator or site manager."
  • Line Location: KEY+2
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: KEY+3
Function Call: WRITE
  • Prompt: !!,$S($O(XQKEY(0))>0:"Another",XQAL&XQDA:"Delegate",XQAL:"Allocate",'XQAL&XQDA:"Remove delegated",1:"De-allocate")," key: " R X:DTIME S:'$T
  • Line Location: KEY+3
Function Call: WRITE
  • Prompt: " ??",*7
  • Line Location: KEY+7
Function Call: WRITE
  • Prompt: $S($D(XQKEY(+Y)):" Deleted from current list",1:$C(7)_" ?? Key not on list")
  • Line Location: KEY+8
Function Call: WRITE
  • Prompt: !!,"There are subordinate keys, do you wish to add them"
  • Line Location: MORE+1
Function Call: WRITE
  • Prompt: !!,"If you answer 'YES', the subordinate keys will be listed and added."
  • Line Location: MORE+2
Function Call: WRITE
  • Prompt: !,$P(^DIC(19.1,XQJ,0),"^")," ",$P(^(0),U,2)
  • Line Location: MORE+3
Function Call: WRITE
  • Prompt: !!,"There are no holders of this key."
  • Line Location: SHOW+2
Function Call: WRITE
  • Prompt: @IOF,?15,"Current holders of the key ",XQKEY,!!
  • Line Location: SHOW+3
Function Call: READ
  • Timeout: DTIME
  • Variable: X
  • Line Location: PAUSE+1
Function Call: WRITE
  • Prompt: @IOF,?15,"Current holders of the key ",XQKEY,!!
  • Line Location: PAUSE+2
Function Call: WRITE
  • Prompt: @IOF
  • Line Location: LIST+5
Function Call: WRITE
  • Prompt: !!,XQUSER," does not currently hold any keys."
  • Line Location: LIST+5
Function Call: WRITE
  • Prompt: ?(XQI#XQK*16),%
  • Line Location: LIST+6
Function Call: WRITE
  • Prompt: ?(XQI#XQK*16),%
  • Line Location: LIST+8
Function Call: WRITE
  • Prompt: !!,XQUSER," does not hold any keys to transfer."
  • Line Location: ATOD+3
Function Call: WRITE
  • Prompt: !!,XQUSER," already has some delegated keys."
  • Line Location: ATOD+4
Routine Call
  • DIC
  • Line Location:
    • KEY+7
    • SHOW+1
    • LIST+1
    • ATOD+1
Routine Call
  • DIR
  • Line Location:
    • ATOD+4

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(19.1 - [#19.1] KEY+9, MORE+3, LIST+4, LIST+7
^TMP($J SHOW+1!, SHOW+4*, SHOW+5, SHOW+6!, LIST+1!, LIST+4*, LIST+6, LIST+7!*, LIST+8, LIST+9!
^VA(200 - [#200] KEY+2, SHOW+4, LIST+3, LIST+4, LIST+7, ATOD+3, ATOD+4, ATOD+6*, MESS+2!, MESS+4
^XUSEC( SHOW+2, SHOW+4
^XUSEC("XUMGR" KEY+1

Label References

Name Line Occurrences
ATOD ATOD+3, ATOD+4
HOLDER KEY+4
INIT EN1, EN2, EN3
KEY KEY+5, KEY+7, KEY+8, KEY+10
MESS LIST+3
MORE KEY+9, MORE+2
OUT KEY+2, KEY+3, KEY+4
PAUSE SHOW+5

Naked Globals

Name Field # of Occurrence
^( MORE+3
^(0 KEY+9, MORE+3, LIST+3*, ATOD+4

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
% MORE+1*, MORE+2, OUT!, SHOW+4*, SHOW+5*, SHOW+6!, LIST+2*, LIST+4*, LIST+6*, LIST+7*
, LIST+8*, LIST+9!, ATOD+2*, ATOD+3*, ATOD+8!
%X ATOD+5*, ATOD+8!
%Y ATOD+5*, ATOD+8!
DA OUT!, ATOD+7*, ATOD+8!, MESS+3*, MESS+4*, MESS+6!
DA(1 ATOD+7*, MESS+1*, MESS+2, MESS+3, MESS+4
DIC KEY+7*!, OUT!, SHOW+1*!, SHOW+2!, SHOW+6!, LIST+1*!, LIST+9!, ATOD+1*!, ATOD+8!, MESS+6!
DIC("A" SHOW+1*, LIST+1*, ATOD+1*
DIC("S" KEY+7*
DIC(0 KEY+7*, SHOW+1*, LIST+1*, ATOD+1*
DIE OUT!
DIK ATOD+7*, ATOD+8!, MESS+3*, MESS+6!
DIK(1 ATOD+7*
DIR ATOD+4!, ATOD+8!
DIR("A" ATOD+4*
DIR("B" ATOD+4*
DIR(0 ATOD+4*
DIRUT ATOD+4!
DR OUT!
DTIME KEY+3, PAUSE+1
DUZ KEY+1, KEY+2
DUZ(0 KEY+1
IOF SHOW+3, PAUSE+2, LIST+5
U KEY+3, KEY+9, MORE+3, SHOW+2, SHOW+4, SHOW+5, PAUSE+1, PAUSE+2, LIST+2, LIST+3
, LIST+4, LIST+7, ATOD+2, ATOD+3, ATOD+4, ATOD+6
X KEY+3*, KEY+4, KEY+5, KEY+6*, OUT!, SHOW+5, PAUSE+1*, PAUSE+2, ATOD+8!
XMDUZ OUT!
XQAL EN1*, EN2*, EN3*, EN4*, KEY+3, OUT!
XQBOSS INIT+1*, KEY+1*, KEY+2, KEY+7, OUT!
XQDA EN1*, EN2*, EN3*, EN4*, KEY+1*, KEY+3, OUT!
XQDUZ MESS+6!
XQFIL MESS+1*, MESS+2, MESS+3, MESS+4, MESS+6!
XQH KEY+5*, OUT!
XQHOLD INIT+1!, OUT!
XQHOLD(0 INIT+1*
XQI MORE+3*, OUT!, SHOW+4*, SHOW+5*, SHOW+6!, LIST+4*, LIST+5, LIST+6*, LIST+7*, LIST+8*
, LIST+9!
XQJ MORE+3*, OUT!
XQK OUT!, LIST+5*, LIST+6, LIST+8, LIST+9!
XQKEY INIT+1!, OUT!, SHOW+2*!, SHOW+3, SHOW+4, SHOW+6!, PAUSE+2
XQKEY( KEY+8!, KEY+9*, MORE+3*
XQKEY(0 INIT+1*, KEY+3, KEY+4
XQL SHOW+1*!, SHOW+6!, PAUSE+2, LIST+1*, LIST+9!
XQM KEY+6*, KEY+8, OUT!
XQNM OUT!
XQSBNFDT OUT!
XQU LIST+2*, LIST+3, LIST+4, LIST+7, LIST+9!, ATOD+2*, ATOD+3!, ATOD+4!, ATOD+5, ATOD+6
, ATOD+7, ATOD+8!, MESS+1
XQUSER LIST+2*, LIST+5, LIST+6, LIST+8, LIST+9!, ATOD+2*, ATOD+3!, ATOD+4!, ATOD+8!
Y KEY+7, KEY+8, KEY+9, MORE+3, OUT!, SHOW+1, SHOW+2, LIST+1, LIST+2, ATOD+1
, ATOD+2, ATOD+3!, ATOD+4!, ATOD+8!
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All