iX Computer Systems - Edition 1 (32715-90001)

2-: 33

Consider the execution of the following program sequence with and with-

out the INFO option:

1000 !

1010 IF INFO$="DEBUG" THEN

1020 PRINT "Just before assignment to Sum"

1030 PRINT " Subtotal_1 = ";Subtotal_1

1040 PRINT " Subtotal_2 = ";Subtotal_2

1050 ENDIF

1060 !

1070 Sum=Subtotal_1+Subtotal_2

1080 PRINT "The total is: ";Sum

>RUN

The total is: 1169.04

>RUN;INFO="DEBUG"

Just before assignment to Sum

Subtotal_1 = 475.53

Subtotal_2 = 693.51

The total is: 1169.04

RUNONLY Statement

The RUNONLY statement protects an interpreted HP Business BASIC/XL

program from listing and modification, but allows its execution.

Run-only status cannot be reversed. Once a program is protected with the

RUNONLY statement, it can only be run with the GET statement.

Syntax

RUNONLY

fname

Parameters

fname

The file name of the file that will be protected. This

file must be a BASIC SAVE file.

When a run-only program is retrieved, it begins executing at its first

line unless another run-only program retrieved it and specified a

starting line.

Example

RUNONLY "File1" !Protects File1

RUNONLY "File2.lab" !Protects File2 in the group lab

SAVE Statement

The SAVE statement stores the current program in the interpreter's work

space in a new disk file. The SAVE statement can store a file in any

format.

Syntax

[LIST ]

SAVE [BDATA] [

fname

line_range_list

][; NOMSG]]