perm filename FOO[IMS,AIL] blob sn#062416 filedate 1973-09-20 generic text, type T, neo UTF8
00100	BEGIN
00200	DEFINE JRST="'003000000000";
00300	START!CODE
00400		JRST 99;
00500		JRST 99;
00600	END;
00700	END;