Home   Package List   Routine Alphabetical List   Global Alphabetical List   FileMan Files List   FileMan Sub-Files List   Package Component Lists   Package-Namespace Mapping  
Info |  Source |  Entry Points |  Interaction Calls
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>

Entry Points

Name Comments DBIA/ICR reference
ENTRY ; Main Entry point to edit primary (if applicable) and secondary options
SEC ; Enter Secondary Menu Options from delegated options
EXIT ;
DEL ; delete delegated menu
MENUDEL ;
; delete menu from user's secondary menu's multiple
KEY ; get list of keys
KEYDEL ; delete keys
KEYADD ; add keys
; adjust list to ones that have been delegated to you
COMPARE ; compare keys used in the delegated menu against keys the user
; will need based on their primary and secondary menus
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,]

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
  • Variable: Z
  • Timeout: DTIME
  • 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
  • Variable: Z
  • Timeout: DTIME
  • 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
Info |  Source |  Entry Points |  Interaction Calls