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

Package: Kernel

Routine: XQSMD5


Information

XQSMD5 ;SEA/JLI,MJM - SECURE MENU DELEGATE EDIT USER OPTIONS ;10/15/98 12:22

Source Information

Source file <XQSMD5.m>

Call Graph

Call Graph

Call Graph Total: 6

Package Total Call Graph
VA FileMan 4 ^DIC  FILE^DICN  ^DIE  ^DIR  
Kernel 2 KEYS^XQSMD6  $$LOOKUP^XUSER  

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

Package Total Caller Graph
Kernel 1 XQSMD EDIT OPTIONS  

Entry Points

Name Comments DBIA/ICR reference
COMPARE ; compare keys used in the delegated menu against keys the user
; will need based on their primary and secondary menus
KEYDEL ; delete keys
EXIT ;
MENUDEL ;
; delete menu from user's secondary menu's multiple
INFORM ; inform the user of the keys situation
ADJUST ; adjust the list of keys to ones that the user (DUZ) has
; been delegated [node ^VA(200,DUZ,52,]
DEL ; delete delegated menu
KEY ; get list of keys
SEC ; Enter Secondary Menu Options from delegated options
KEYADD ; add keys
; adjust list to ones that have been delegated to you
ENTRY ; Main Entry point to edit primary (if applicable) and secondary options

External References

Name Field # of Occurrence
^DIC ENTRY+15, SEC+2, SEC+4
FILE^DICN KEYADD+13
^DIE ENTRY+18, MENUDEL+2, KEYDEL+7
^DIR INFORM+6
KEYS^XQSMD6 ENTRY+23, ENTRY+37, DEL+15, DEL+19, KEY+3
$$LOOKUP^XUSER ENTRY+6

Interaction Calls

Name Line Occurrences
Function Call: WRITE
  • Prompt: !,$C(7),"No Delegated Options Available to Give Out",!
  • Line Location: ENTRY+3
Function Call: WRITE
  • Prompt: !,$C(7),"Want to Delete ",XQXNAME," as a Secondary Option? Y// "
  • Line Location: DEL+1
Function Call: READ
  • Timeout: DTIME
  • Variable: Z
  • Line Location: DEL+2
Function Call: WRITE
  • Prompt: !!,$C(7),"No action taken, menu delegation still active!"
  • Line Location: DEL+28
Function Call: WRITE
  • Prompt: !!,$C(7),"Delegated Menu: "_XQXNAME_" has been removed!"
  • Line Location: MENUDEL+4
Function Call: WRITE
  • Prompt: !!,$C(7),"Delegated Menu: "_XQXNAME_" has been added!"
  • Line Location: KEY+6
Function Call: WRITE
  • Prompt: !!,$C(7),"The following Keys LOCK options within this menu structure",!
  • Line Location: KEYADD+3
Function Call: WRITE
  • Prompt: !!,$C(7),"Do you want to ALLOCATE these Keys to this User? N// "
  • Line Location: KEYADD+5
Function Call: READ
  • Timeout: DTIME
  • Variable: Z
  • Line Location: KEYADD+6
Function Call: WRITE
  • Prompt: !,$C(7),"Key: "_XQKEY(I)_" has been added!"
  • Line Location: KEYADD+13
Function Call: WRITE
  • Prompt: !!,$C(7),"The following Keys LOCK options within this menu structure.",!
  • Line Location: INFORM+1
Function Call: WRITE
  • Prompt: !,"Selecting 'U' will remove all keys EXCEPT those noted below.",!
  • Condition for execution: XQ3(0)
  • Line Location: INFORM+4
Function Call: WRITE
  • Prompt: !,?5,XQ3(I)
  • Line Location: INFORM+4
Routine Call
  • DIE
  • Line Location:
    • ENTRY+18
    • MENUDEL+2
    • KEYDEL+7
Routine Call
  • DIC
  • Line Location:
    • ENTRY+15
    • SEC+2
    • SEC+4
Routine Call
  • DIR
  • Line Location:
    • INFORM+6

Global Variables Directly Accessed

Name Line Occurrences  (* Changed,  ! Killed)
^DIC(19 - [#19] ENTRY+15, ENTRY+18, SEC+4
^DIC(19.1 - [#19.1] KEYDEL+6, KEYADD+12, COMPARE+5, ADJUST+5
^DIC(200 SEC+6!
^VA(200 - [#200] ENTRY+3, ENTRY+11, ENTRY+35, SEC+4, DEL+5, DEL+9, KEYADD+13, COMPARE+6, ADJUST+6

Label References

Name Line Occurrences
ADJUST ENTRY+25, KEYADD+2
COMPARE DEL+24
DEL SEC+6
ENTRY SEC+2
EXIT ENTRY+6
INFORM DEL+25
KEY SEC+6
KEYADD ENTRY+38, KEY+5
KEYDEL ENTRY+29, DEL+31
MENUDEL DEL+5
SEC ENTRY+11, ENTRY+15, ENTRY+35, SEC+7

Naked Globals

Name Field # of Occurrence
^(0 SEC+4*
^(201 ENTRY+11

Local Variables

Legend:

>> Not killed explicitly
* Changed
! Killed
~ Newed

Name Field # of Occurrence
ABORT ENTRY+23, ENTRY+37, DEL+15, DEL+19, KEY+1~, KEY+3, KEY+4
D0 EXIT+1!
DA ENTRY+6*, ENTRY+11, ENTRY+18*, EXIT+1!, MENUDEL+2*, KEYDEL+7*
DA(1 ENTRY+15*, SEC+2*, SEC+4*, MENUDEL+2*, KEYDEL+7*, KEYADD+9*
DI EXIT+1!
DIC ENTRY+14!, ENTRY+15*, SEC+1!, SEC+2*, SEC+4*, EXIT+1!, KEYADD+8!, KEYADD+9*
DIC("A" ENTRY+15*, SEC+2*
DIC("B" ENTRY+15*
DIC("P" KEYADD+9*
DIC(0 ENTRY+15*, SEC+2*, SEC+4*, KEYADD+9*
DIE ENTRY+18*, EXIT+1!, MENUDEL+2*, KEYDEL+7*
>> DINUM KEYADD+12*
>> DIR(0 INFORM+5*
>> DLAYGO SEC+4*
DQ EXIT+1!
DR ENTRY+18*, EXIT+1!, MENUDEL+2*, KEYDEL+7*
DTIME DEL+2, KEYADD+6
>> DTOUT DEL+28
>> DUOUT DEL+28
DUZ ENTRY+3, ENTRY+11, ENTRY+15, ENTRY+35, SEC+2, DEL+5, COMPARE+6, ADJUST+6
I EXIT+1!, KEYDEL+1*, KEYDEL+2, KEYDEL+6, KEYDEL+8, KEYADD+4*, KEYADD+10*, KEYADD+11, KEYADD+12, KEYADD+13
, COMPARE+4*, COMPARE+5, COMPARE+6, COMPARE+9, COMPARE+10, INFORM+2*, INFORM+4*, ADJUST+2~, ADJUST+4*, ADJUST+5
, ADJUST+7
J EXIT+1!, KEYDEL+4*, COMPARE+8*, COMPARE+9
KEYIEN COMPARE+2~, COMPARE+5*, COMPARE+6, ADJUST+2~, ADJUST+5*, ADJUST+6
MENU1 DEL+15!
MENU1( DEL+11*
MENU1(0 DEL+8*, DEL+11*
MENU1(1 DEL+8*
MENU2 DEL+19!
MENU2(0 DEL+18*
MENU2(1 DEL+18*
MENULIST KEY+1~, KEY+3
MENULIST(0 KEY+2*
MENULIST(1 KEY+2*
MENUOLD ENTRY+23!
MENUOLD(0 ENTRY+22*
MENUOLD(1 ENTRY+22*
MENUPRI ENTRY+37!
MENUPRI(0 ENTRY+36*
MENUPRI(1 ENTRY+36*
ONEGOOD ENTRY+26, EXIT+1!, DEL+23*, DEL+25, KEYADD+2, COMPARE+7*, ADJUST+3*, ADJUST+6*
P EXIT+1!
U ENTRY+15, ENTRY+18, SEC+3, SEC+4, SEC+6, DEL+2, KEYADD+6
X ENTRY+18*, SEC+4*, EXIT+1!, KEYADD+12*, KEYADD+13
XQ1 EXIT+1!, DEL+15
XQ1( COMPARE+9
XQ1(0 COMPARE+8
XQ2 ENTRY+27*, ENTRY+31!, EXIT+1!, DEL+19
XQ2( KEYDEL+2, KEYDEL+6, KEYDEL+8, COMPARE+5, COMPARE+6*, COMPARE+9, COMPARE+10, INFORM+2
XQ2(0 DEL+24, KEYDEL+1, COMPARE+4, INFORM+2
XQ2(1 KEYDEL+4
XQ3 EXIT+1!, COMPARE+3*
XQ3( KEYDEL+4, COMPARE+10*, INFORM+4
XQ3(0 KEYDEL+4, COMPARE+3*, COMPARE+10*, INFORM+3, INFORM+4, INFORM+5
XQADD SEC+6*, EXIT+1!
XQANS ENTRY+22*, EXIT+1!, DEL+23*, DEL+31, KEYDEL+4, INFORM+6*
XQCOMMON EXIT+1!, KEYDEL+3*, KEYDEL+4*, KEYDEL+5
XQDA ENTRY+6*, ENTRY+18, SEC+4, SEC+6, EXIT+1!, DEL+9, MENUDEL+2, KEYDEL+7, KEYADD+9, KEYADD+13
XQJ EXIT+1!, DEL+8*, DEL+9*, DEL+10, DEL+11
XQKEY ENTRY+23, ENTRY+27, ENTRY+31!, ENTRY+37, ENTRY+39!, EXIT+1!, KEY+1~, KEY+3
XQKEY( KEYADD+4, KEYADD+11, KEYADD+12, KEYADD+13, ADJUST+5, ADJUST+7*
XQKEY(0 ENTRY+24, ENTRY+38, KEY+5, KEYADD+4, KEYADD+10, ADJUST+4
XQKEYIEN EXIT+1!, KEYDEL+3*, KEYDEL+6*, KEYDEL+7
XQOLD ENTRY+15*, ENTRY+21, ENTRY+22, EXIT+1!
XQPRI ENTRY+11*, ENTRY+15, ENTRY+18*, ENTRY+36, EXIT+1!, DEL+8
XQSEC SEC+6*, EXIT+1!, MENUDEL+2
XQX SEC+3*, EXIT+1!, DEL+10, DEL+18, KEY+2
XQXNAME SEC+4*, EXIT+1!, DEL+1, MENUDEL+4, KEY+6
Y ENTRY+6*, ENTRY+15, ENTRY+18, SEC+2, SEC+3, SEC+4, SEC+6, EXIT+1!, INFORM+6
Z EXIT+1!, DEL+2*, KEYADD+6*
Info |  Source |  Call Graph |  Caller Graph |  Entry Points |  External References |  Interaction Calls |  Global Variables Directly Accessed |  Label References |  Naked Globals |  Local Variables |  All