+1,1
* 05/20/76 -- 13:00
+49,49
         DATA     X'052076'         DATE
+265                                *** 05/20/76 ***
         CW,AC1   L(#MAXKEY)        IS KEY BEYOND MAXIMUM ALLOWED
         BG       LNERR             YES
+1079                               *** 05/20/76 ***
         CW,AC2   L(#MAXKEY-#ZROKEY)  CHECK FOR MAXIMUM LINE NUMBER
         BG       MAXLN             MAX REACHED
+1087                               *** 05/20/76 ***
         B        RTNNLMSG
MAXLN    RES      0
         LI,AC1   79                SET UP 'MAX LINE NUM' MSG
         BAL,SRTN S29STD            GO PRINT MESSAGE
+END
