100 ; CLRGLA / GL - 310
110 ;
120 ;		DATE: 07/01/77
130 ;
140 ;		NOTICE: THE PROCESS AND ALL THE ROUTINES CONTAINED
150 ;		HEREIN ARE THE PROPRIETARY PROPERTY AND TRADE
160 ;		SECRETS OF MINI-COMPUTER BUSINESS APPLICATIONS, INC.
170 ;		EXCEPT AS PROVIDED FOR BY LICENSE AGREEMENT THIS CODE
180 ;		SHALL NOT BE DUPLICATED, USED OR DISCLOSED FOR ANY
190 ;		PURPOSE OR REASON, IN WHOLE OR IN PART, WITHOUT THE
200 ;		EXPRESS WRITTEN CONSENT OF MINI-COMPUTER BUSINESS
210 ;		APPLICATIONS, INC.
220 ;
230 ;		PGM TO CLEAR GLAMAS/1 TO ONE CONTROL RECORD
240 ;
250 ;		COMPILE: CLRGLA
260 ;		**INSTALLATION PROGRAM ONLY**
270 ;		DO NOT SAVE ON USER'S DISKETTE
280 ;
290 RECORD GLAMAS, C
300 		,A33
310 	RECCNT	,D4,	0001
320 	MAXCNT	,D4,	0327
330 	DELCNT	,D3,	000
340 		,A250
350 PROC	1
360 	INIT (1,OUT,'GLAMAS',1)
370 	XMIT (1,GLAMAS)
380 	FINI (1)
390 	END