.TITLE NAME  -- GLOBAL COMMON AREA
	.SBTTL TITLE PAGE
	.IDENT /V00.0/
;+
;
;	AUTHOR: 1LT JOEL IRWIN (SAC/ADIPI)
;
;
;	DATE: 26 SEP 77
;
;
;	SYSTEM: OISS			SUBSYSTEM: INFORMATIONAL
;
;
;	FUNCTIONAL DESCRIPTION:
;
;	THIS IS THE GLOBAL COMMON AREA WHICH EQUATES USER IDENTIFICATION
;	CODES TO USER NAMES FOR IDENTIFICATION PURPOSES
;
;
;	RECORD OF MODIFICATIONS
;
;	VERSION		DATE		BY			DESCRIPTION
;	_______		____		__			___________
;
;	
;
;
;
;	GLOBAL EVENT FLAG USAGE:
;
;
;-
	.SBTTL MACROS,SYMBOLS,AND DATA
	.PAGE
;
;
;	LOCAL MACRO DEFINITIONS AND SYSTEM MACRO CALLS
;
;
;
;
;	GLOBAL SYMBOL DEFINITIONS AND DATA
;
;
	GPID==0			;REL DISP FOR GROUP ID
	USID==GPID+1		;REL DISP FOR USER ID
	USNAME==USID+1		;BEG OF RAD50 NAME
	ELSZ==8.		;# OF BYTES FOR NAME
	ENTRYSZ==USNAME+ELSZ	;SIZE OF WHOLE ENTRY
	ENTRYNO=256.		;NUMBER OF ENTRIES
	SIZE==ENTRYNO*ENTRYSZ	;SIZE OF GCA
	.SBTTL INPUTS,OUTPUTS AND EFFECTS
	.PAGE
;+
;
;	INPUTS:
;
;
;	OUTPUTS:
;
;
;	EFFECTS:
;
;
;-
	.PAGE
	.NLIST	BIN
	.PSECT	NAME
NAME:: .BLKB	SIZE
	.END