REP 14/184 ;C101 TRNE P4,BLKSIZ##-1 ;YES, PARTIAL BLOCK? WIT TRNN P4,BLKSIZ##-1 ;YES, PARTIAL BLOCK? TROA P4,BLKSIZ## ;NO, LAST BLOCK IS FULL SUM 77464