Routine: XUSRA

Package	Total	Call Graph
Kernel	6	($$CHECKAV,$$UVALID,SET1)^XUS LOG^XUS1 INTRO^XUS1A $$BRCVC^XUS2 $$TXT^XUS3 ($$INHIBIT,$$VCVALID,NOW)^XUSRB

Package

Total

Call Graph

($$CHECKAV,$$UVALID,SET1)^XUS LOG^XUS1 INTRO^XUS1A $$BRCVC^XUS2 $$TXT^XUS3 ($$INHIBIT,$$VCVALID,NOW)^XUSRB

Package	Total	Caller Graph
MailMan	1	XMRPOP

Package

Total

Caller Graph

Name	Comments	DBIA/ICR reference
INTRO(RESULT)	;Return INTRO TEXT.
VCVALID()	;Check if the Verify code needs changing.
VALIDAV(RESULT,AVCODE)	;Check a users access
USERSET(AV)	;sr. If a valid A/V setup DUZ for user.
USX
CVC(RESULT,XU1)	;change VC

Name	Line Occurrences (* Changed, ! Killed)
^TMP($J	VALIDAV+4!
^UTILITY($J	VALIDAV+4!
^VA(200 - [#200]	VCVALID+2
^XTV(8989.3 - [#8989.3]	VCVALID+2
^XUTL("XQ"	VALIDAV+4!

Name	Line Occurrences
$$VCVALID	VALIDAV+6
USX	USERSET+7, USERSET+8

Name	Field # of Occurrence
%1	USERSET+4~
AV	USERSET~, USERSET+8
AVCODE	VALIDAV~, VALIDAV+6
DUZ	VALIDAV+5, VALIDAV+6, VALIDAV+7, VALIDAV+8, VCVALID+1, VCVALID+2, CVC+1, USERSET+4!, USERSET+5, USERSET+8 , USX*
DUZ(0	USERSET+5*
NZ	USERSET+4~
RESULT	VALIDAV~, VALIDAV+8, INTRO~, CVC~, CVC+1
U	VALIDAV+8, CVC+1, USERSET+5
VCOK	USERSET+4~, USERSET+5, USERSET+9
X	VALIDAV+3~, USERSET+4~
>> XQXFLG("ZEBRA"	USX+1*
XRA1	VALIDAV+3~, VALIDAV+5, VALIDAV+6, VALIDAV+7
XRA2	VALIDAV+3~, VALIDAV+5, VALIDAV+6, VALIDAV+8
XU1	CVC~, CVC+1*, CVC+2
XU2	CVC+1~*, CVC+2
XUDEV	USERSET+4~
XUF	VALIDAV+3~, VALIDAV+5, USERSET+4~, USERSET+5
XUM	USERSET+4~, USERSET+5, USERSET+7, USERSET+8*, USX, USX+1, USX+2
XUMSG	VALIDAV+3~, VALIDAV+5, VALIDAV+7, VALIDAV+8, USERSET+4~, USERSET+5, USX, USX+2
XUNOW	USERSET+4~
XUSER	VALIDAV+3~, USERSET+4~

Information