+348     R.L.R.   S32099   3-13-80 F04                                  COBOL42E
         CI,7     X'80'             CHECK LAST ENTRY                    COBOL42E
         BANZ     BBDS04+3          THEN SKIP OUT                       COBOL42E
+END                                                                    COBOL42E

