100  ; CLRWRK / 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 ESTABLISH WORK FILES
240  ;		(AVOIDS REPLACE MESSAGES LATER)
250  ;
260  ;		COMPILE: CLRWRK
270  ;		**INSTALLATION PROGRAM ONLY**
280  ;		DO NOT LEAVE ON USER'S DISKETTE
290  PROC	1
300  	INIT (4,OUT,'$WORK1',4)
310  	FINI (4)
320  	INIT (5,OUT,'$WORK2',5)
330  	FINI (5)
340  	INIT (6,OUT,'$WORK3',6)
350  	FINI (6)
360  	END