Directory of image this file is from
This file as a plain text file

100 ; CLRFSM / GL - 310
110 ;
120 ;		DATE: 07/01/77
130 ;
140 ;		NOTICE: THE PROCESS AND ALL THE ROUTINES CONTAINED
150 ;		HEREIN ARE THE PROPRIETARY PROPERTIES 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 $FSIDX/3, TGLIDX/4, $WORK1/5, $WORK2/6,
240 ;		AND $WORK3/7 AT INSTALLATION OF FINANCIAL STATEMENT MASTER
250 ;
260 ;		COMPILE: CLRFSM
270 ;		**INSTALLATION PROGRAM ONLY**
280 ;		DO NOT LEAVE ON USER'S DISKETTE
290 ;
300 PROC
310 	INIT (3,OUT,'$FSIDX',3)
320 	FINI (3)
330 	INIT (4,OUT,'TGLIDX',4)
340 	FINI (4)
350 	INIT (5,OUT,'$WORK1',5)
360 	FINI (5)
370 	INIT (6,OUT,'$WORK2',6)
380 	FINI (6)
390 	INIT (7,OUT,'$WORK3',7)
400 	FINI (7)
410 	STOP