1			28 FORCE NEW RECORD
	00034	0 01303 0 01333	2		HTR	X−1,0,LOCREC CARD FOR DE
		01303	3		ORG	LOCREC
TD	01303	3 00000 0 00034	4		TXH	28 604 FT 92
	01304	0 07400 4 00740	5		TSX	PRINT,4
	01305	0 01252 0 01244	6		HTR	SOURCE,0,SOURCE+6
	01306	0 07400 4 00740	7		TSX	PRINT,4
	01307	0 01334 0 01311	8		HTR	PR,0,PR+19
	01310	0 02000 0 00272	9		TRA	SPEND
	01311	606060606060	10	PR	BCD	2␣␣␣␣␣␣␣␣␣␣␣␣
	01312	606060606060	11
	01313	633025512560	12		BCD	THERE␣HAVE␣BEEN␣OVER␣1,000␣REFERENCES␣TO␣SUBROUTINE␣ARGUMENT
	01314	302165256022	13
	01315	252545604665	14
	01316	255160017300	15
	01317	000060512526	16
	01320	255125452325	17
	01321	626063466062	18
	01322	642251466463	19
	01323	314525602151	20
	01324	276444254563	21
	01325	626031456063	22		BCD	7S␣IN␣THE␣PROGRAM.␣␣MODIFY␣SOURCE␣PROGRAM.␣
	01326	302560475146	23
	01327	275121443360	24
	01330	604446243126	25
	01331	706062466451	26
	01332	232560475146	27
	01333	275121443360	28
	01334	0 00000 0 00000	29	X