Routine: XUSAP

Information

XUSAP ;ISF/RWF - PROXY User Tools ;08/16/2006

Source file <XUSAP.m>

Package	Total	Call Graph
VA Fileman	2	(,$$FIND1)^DIC (,UPDATE)^DIE
Kernel	1	$$VPID^XUPS

Name	Comments	DBIA/ICR reference
APCHK(IEN)	;Check if OK for AP user to run.
APFIND(NAME)	;Lookup Appliction user by name, return ien^vpid if OK ; -1,-2,-3 if not	ICR #4765 Status: Active Usage: Private
USERTYPE(IE,CLASS)	;See if IEN points to a APP user	ICR #4539 Status: Active Usage: Private
CONT	;Connector Proxy User	ICR #4765 Status: Active Usage: Private
CPCHK(IEN)	;Check if OK for Connector Proxy to run	ICR #4765 Status: Active Usage: Private
RPC(RPC)	;Check if OK for AP to run RPC	ICR #4765 Status: Active Usage: Private
CREATE(NAME,FMAC,OPT,NIL)	;Create an APPLICATION PROXY user	ICR #4677 Status: Active Usage: Controlled Subscription ICR #6081 Status: Active Usage: Private
ACTIVE(XUDA)	;Get if a user is active.	ICR #4539 Status: Active Usage: Private

Name	Line Occurrences
Function Call: WRITE	Prompt: !,"You MUST hold the XUMGR key" Line Location: CONT+2
Function Call: WRITE	Prompt: !,"Existing User is not a CONNECTOR PROXY" Line Location: CONT+8
Function Call: WRITE	Prompt: !,"Can't use an APPLICATION PROXY user." Line Location: CONT+10
Routine Call	DIE Line Location: CREATE+21
Routine Call	DIE Line Location: CONT+15
Routine Call	DIC Line Location: APFIND+3 USERTYPE+4 CREATE+5
Routine Call	DIC Line Location: CREATE+10 CONT+5

Name	Line Occurrences (* Changed, ! Killed)
^TMP("DIERR"	CREATE+4!, CREATE+22
^VA(200 - [#200]	CPCHK+2, ACTIVE+2, USERTYPE+6, CONT+12, CONT+16
^XUSEC("XUMGR"	CONT+2
^XWB(8994 - [#8994]	RPC+2, RPC+4

Name	Line Occurrences
$$ACTIVE	APCHK+2
$$USERTYPE	APFIND+4, APFIND+5, CPCHK+3, CPCHK+4, CONT+7, CONT+10

Name	Field # of Occurrence
%	ACTIVE+1~, ACTIVE+4*
CLASS	USERTYPE~, USERTYPE+3, USERTYPE+4
DA	CONT+1~, CONT+5*, CONT+6, CONT+7, CONT+10, CONT+12, CONT+16
DIC	CREATE+4~, CREATE+7, CONT+1~, CONT+3
DIC("A"	CONT+3*
DIC("DR"	CREATE+8, CONT+4
DIC(0	CREATE+7, CREATE+20, CONT+3*
DIE	CONT+1~, CONT+13*
DIRUT	CONT+1~
DLAYGO	CREATE+7, CONT+1~, CONT+3
DR	CONT+1~, CONT+14*
DR(2	CONT+14*
DT	ACTIVE+4
DTIME	CONT+12
DUZ	CONT+2
FDA	CREATE+4~
FDA(	CREATE+14, CREATE+17, CREATE+19*
FMAC	CREATE~, CREATE+8
IE	USERTYPE~, USERTYPE+6
IEN	APFIND+2~, APFIND+3, APFIND+4, APFIND+5, APFIND+6, APCHK~, APCHK+2, CPCHK~, CPCHK+2, CPCHK+3 , CPCHK+4, CREATE+4~, CREATE+5, CREATE+6, CREATE+10*, CREATE+11, CREATE+13, CREATE+23
IEN(1	CREATE+13*, CREATE+14, CREATE+17, CREATE+19
IENS	CREATE+4~
IX	USERTYPE+2~, USERTYPE+3, USERTYPE+4, USERTYPE+5, USERTYPE+6, CREATE+4~, CREATE+13, CREATE+14, CREATE+17*, CREATE+19
NAME	APFIND~, APFIND+3, CREATE~, CREATE+5, CREATE+7
NIL	CREATE~
O	CREATE+16~, CREATE+17
OPT	CREATE~, CREATE+14, CREATE+15
OPT(	CREATE+17
R	USERTYPE+2~, USERTYPE+6*, USERTYPE+7
RPC	RPC~, RPC+2*, RPC+3, RPC+4
U	ACTIVE+3, ACTIVE+4, CONT+7
X	APFIND+2~, APFIND+3, APFIND+4, APFIND+5, APFIND+6, APFIND+7, CREATE+7*, CONT+1~
X1	ACTIVE+1~, ACTIVE+2*, ACTIVE+3, ACTIVE+4
X2	ACTIVE+1~, ACTIVE+2, ACTIVE+3, ACTIVE+4*, ACTIVE+5
XUDA	ACTIVE~, ACTIVE+2
XUITNAME	CONT+1~, CONT+3*
>> XUNOTRIG	CREATE+9*
Y	CREATE+10, CONT+1~, CONT+5, CONT+7