HP 3000 Manuals

HP Business BASIC/XL Reference Manual

OFF END 

The OFF END statement disables the ON END statement.

Syntax 

OFF END #fnum 

Parameters 

fnum             The file number that the OFF END affects.  This is the
                 same fnum specified in the ON END statement.

It disables the ON END statement that specifies the same fnum.

Examples 

     100 ASSIGN #1 TO "File1"
     110 ASSIGN #2 TO "File2a"
     120 ASSIGN #3 TO "File3"
     130 ON END #1 GOTO 999
     140 ON END #2 GOSUB 200  !ON END statement for file #2
     150 ON END #3 CALL End3
     160 READ #1; A1,B1,C1
     170 READ #2; A2,B2,C2
     180 READ #2; D,E,F
     190 READ #3; A3,B3,C3
     195 STOP
     197 !
     200 ASSIGN #2 TO "File2b"
     210 OFF END #2             !Disables the ON END statement in line 140
     220 RETURN
     225 !
     230 SUB End3
     240   PRINT "Reusing File3"
     250   POSITION #3;BEGIN
     260 SUBEND

MPE/iX 5.0 Documentation