Routine: XQSMD5

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

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

Customize PDF page

Package: Kernel

Routine: XQSMD5

Information

Source Information

Call Graph

Call Graph Total: 6

Entry Points

External References

Interaction Calls

Global Variables Directly Accessed

Label References

Naked Globals

Local Variables

Legend: