1			12 FORCE NEW RECORD
	00014	0 01303 0 01373	2		HTR	X−1,0,LOCREC CARD FOR DE
		01303	3		ORG	LOCREC
TD	01303	3 00000 0 00014	4		TXH	12 6234 FT 51
	01304	0 07400 4 00740	5		TSX	PRINT,4
	01305	0 01252 0 01244	6		HTR	SOURCE,0,SOURCE+6
	01306	0 50000 0 05244	7		CLA	2724 VCTR - OCTAL 5244
	01307	0 77100 0 00022	8		ARS	18
	01310	0 07400 4 00613	9		TSX	EXBETA,4
	01311	0 60200 0 01334	10		SLW	BETA
	01312	0 56000 0 01334	11		LDQ	BETA
	01313	−0 50000 0 00717	12		CAL	BLANKS
	01314	−0 76300 0 00036	13		LGL	30
	01315	0 60200 0 01334	14		SLW	BETA -
	01316	0 56000 0 01335	15		LDQ	BETA+1
	01317	−0 76300 0 00036	16		LGL	30
	01320	0 60200 0 01335	17		SLW	BETA+1
	01321	0 07400 4 00740	18		TSX	PRINT,4
	01322	0 01374 0 01324	19		HTR	PR,0,PR+40
	01323	0 02000 0 00272	20		TRA	SPEND
	01324	606060606060	21	PR	BCD	2␣␣␣␣␣␣␣␣␣␣␣␣
	01325	606060606060	22
	01326	634646604421	23		BCD	6TOO␣MANY␣DOS␣END␣AT␣STATEMENT␣NUMBER
	01327	457060244662	24
	01330	602545246021	25
	01331	636062632163	26
	01332	254425456360	27
	01333	456444222551	28
	01334	600102030405	29	BETA	BCD	1␣12345
	01335	336060633060	30		BCD	.␣␣TH␣IS␣CONDITION,␣IN␣CONJUNCTION␣WITH␣SUBSCRIPT␣CONFIGURAT
	01336	316260234645	31
	01337	243163314645	32
	01340	736031456023	33
	01341	464541644523	34
	01342	633146456066	35
	01343	316330606264	36
	01344	226223513147	37
	01345	636023464526	38
	01346	312764512163	39
	01347	314645627360	40		BCD	3IONS,␣␣␣␣␣␣␣␣␣␣␣␣␣
	01350	606060606060	41
	01351	606060606060	42
	01352	302162605125	43		BCD	HAS␣RESULTED␣IN␣TOO␣MANY␣INSTRUCTIONS.␣␣REWRITE␣PROGRAM␣AND␣
	01353	626443632524	44
	01354	603145606346	45
	01355	466044214570	46
	01356	603145626351	47
	01357	642363314645	48
	01360	623360605125	49
	01361	665131632560	50
	01362	475146275121	51
	01363	446021452460	52
	01364	622547215121	53		BCD	8SEPARATE␣DO␣ENDS␣BY␣USING␣CONTINUE␣STATEMENTS.␣␣
	01365	632560244660	54
	01366	254524626022	55
	01367	706064623145	56
	01370	276023464563	57
	01371	314564256062	58
	01372	632163254425	59
	01373	456362336060	60
	01374	0 00000 0 00000	61	X