Routine: XQSMD21

Information

XQSMD21 ; SEA/MJM,JLI - Secure Menu delegation (Part IV) ;11/20/91 10:33 ;5/15/91 3:01 PM [ 04/02/2003 8:29 AM ]

Package	Total	Call Graph
Kernel	3	^%ZIS OK^XQ6A EN^XQH
VA Fileman	1	^DIC

Package	Total	Caller Graph
Kernel	1	XQSMD2

Name	Comments	DBIA/ICR reference
KEYS	;Allocate or remove keys needed for these options.
OUT
WAIT	;Skip to top of next page
SHOW	;Show a user's delegated options

Name	Line Occurrences
Function Call: READ	Timeout: DTIME Variable: XQ Line Location: KEYS+1
Function Call: WRITE	Prompt: *7,!,"Enter 'Y' or 'N'" Line Location: KEYS+2
Function Call: WRITE	Prompt: !!,"** DEVICE ERROR **",!,"IOM, IOSL, or IOF not set properly",!,"Delegation software exiting." Line Location: SHOW+1
Function Call: WRITE	Prompt: !!,Y(0,0)," has no delegated options." Line Location: SHOW+2
Function Call: WRITE	Prompt: @(IOF),!!,Y(0,0)," a delegate of: ",XQNM," on ",XQD," at level ",XQL Line Location: SHOW+5
Function Call: WRITE	Prompt: !!,"OPTION (INTERNAL #)",?25,"MENU TEXT",?65,"DELEGATED (DUZ)",! Line Location: SHOW+7
Function Call: WRITE	Prompt: !,$E(XQN,1,27)," (",$P(XQ0,U,2),")",?25,$P(XQ0,U,1),?65,XQD," (",$P(XQ0,U,3),")" Line Location: SHOW+9
Function Call: WRITE	Prompt: @IOF Line Location: WAIT+1
Routine Call	DIC Line Location: SHOW+2
Routine Call	%ZIS Line Location: SHOW+1

Name	Line Occurrences (* Changed, ! Killed)
^DIC(19 - [#19]	SHOW+6
^TMP($J	SHOW+6*, SHOW+9, OUT!
^VA(200 - [#200]	SHOW+2, SHOW+3, SHOW+4, SHOW+6

Name	Field # of Occurrence
%	SHOW+3!, SHOW+9, OUT!
C	OUT!
DA	OUT!
DIC	SHOW+2*!, OUT!
DIC(0	SHOW+2*
DIK	OUT!
DINUM	OUT!
DISYS	OUT!
DTIME	KEYS+1, WAIT+1
IOF	SHOW+1, SHOW+5, WAIT+1
IOM	SHOW+1
IOP	SHOW+1*, OUT+1!
IOSL	SHOW+1, SHOW+9
IOST	WAIT+1
POP	SHOW+1!, OUT!
U	KEYS+1, SHOW+1*, SHOW+3, SHOW+4, SHOW+6, SHOW+9, WAIT+1
X	OUT!
XQ	KEYS+1, KEYS+2, SHOW+2!, SHOW+3, SHOW+6, SHOW+8, SHOW+9, WAIT+1, OUT!
XQ0	SHOW+6, SHOW+9, OUT+1!
XQAL	KEYS+3*, OUT!
XQD	SHOW+3, SHOW+5, SHOW+9, OUT!
>> XQDA	KEYS+3*
XQDATE	OUT!
XQDEL	OUT!
>> XQDOP	KEYS+1, KEYS+3
XQDT	OUT!
XQDUZ	OUT!
XQEND	OUT!
XQH	KEYS+2*, OUT!
XQHOLD	OUT!
XQI	SHOW+6, SHOW+9, OUT!
XQJ	OUT!
XQK	OUT!
XQKEY	OUT!
XQL	SHOW+3*, SHOW+5, OUT!
XQLEV	OUT!
XQLK	OUT!
XQM	SHOW+3*, SHOW+4, OUT!
XQMG	OUT!
XQMGR	OUT!
XQN	SHOW+6, SHOW+8, SHOW+9*, OUT!
XQNAM	OUT!
XQNGO	OUT!
XQNM	SHOW+4*, SHOW+5, OUT!
XQON	OUT!
XQON0	OUT!
XQPRO	OUT!
XQSTART	OUT!
XQT	OUT!
XQUF	OUT!
XY	OUT!
Y	SHOW+2, OUT!
Y(0	SHOW+2, SHOW+5