C
C
C	U S N P A R . C O M
C	-------------------
C
C
C  COMPONENT:	USERNAME AUTHORIZATION AND PRIVILEGE PARAMETERS
C
C  DATE:	08-NOV-79
C
C
C
	BYTE	  USRNAM(12)		! ASCII USERNAME
	INTEGER	  USRUSN(4)		! RAD50 USERNAME
	INTEGER	  USRUSR		!       USER
	INTEGER	  USRWON(2)		!	WORK ORDER
	INTEGER	  USRSUF		!	SUFFIX
C
	EQUIVALENCE (USRUSR,USRUSN(1))
	EQUIVALENCE (USRWON,USRUSN(2))
	EQUIVALENCE (USRSUF,USRUSN(4))
C
C
	INTEGER	  USRUIC		! USER-ID
	BYTE	  USRUFD(10)		! USER DIRECTORY (ASCII)
C
C
	PARAMETER NSUF = 4		! NUMBER OF USERNAME SUFFIX CODES
C
C
	INTEGER	  USNSUF(NSUF)		! USERNAME SUFFIX CODES
	INTEGER	  USNPRI(NSUF)		! USERNAME PRIVILEGE MASK
	INTEGER	  USNBPR(NSUF)		! USERNAME PRIVILEGE MASK (BATCH)
	INTEGER	  USNDPR(NSUF)		! USERNAME PRIVILEGE MASK (PRIME-TIME)
	INTEGER	  USNNPR(NSUF)		! USERNAME PRIVILEGE MASK (OFF-HOUR)
C
C
	COMMON /USNPAR/ USRNAM,USRUSN,USRUIC,USRUFD,
	2		USNSUF,USNPRI,USNBPR,USNDPR,USNNPR
C
C
C  NOTE:  THE USERNAME AUTHORIZATION PARAMETER FILE, "USNPAR.DAT",
C	  SHOULD BE INCLUDED WITHIN THE EXECUTABLE SEGMENT OF THE
C	  USER PROGRAM.
C
C