HP Business BASIC/XL Reference Manual - HP 3000 MPE/iX Computer Systems - Edition 1 (32715-90001)

4-: 133
133 PRINT 2*T !Return to construct from 310
134 PRINT T
140 REM Clause 3
141 CASE > 0
142 GOSUB 400 !Jump out of construct
150 END SELECT !Return to construct from 410
160 STOP
300 REM Do anything !Arrive from Clause 2, line 132
310 RETURN !Return to Clause 2, line 133
400 REM Do anything !Arrive from Clause 3, line 142
410 RETURN !Return to Clause 3, line 122
500 SUB Sub1 !Called from Clause 1 line 121
510 REM In procedure
520 SUBEND !Return to clause 1 line 122
999 END
SEND OUTPUT TO
The SEND OUTPUT TO statement specifies the output device for the PRINT
statement, the PRINT USING statement, and the default target file for the
COPYFILE statement. If the dev_spec is a disk file that already exists,
additional information is appended to the file.
Syntax
[SEND] OUTPUT [TO] dev_spec
If a program does not contain a SEND OUTPUT TO statement, the output
device for the PRINT statement is the terminal if HP Business BASIC/XL is
running interactively or the standard list device if HP Business BASIC/XL
is running in a job stream. The default target file for the COPYFILE
statement is the standard list device.
The SEND OUTPUT TO statement overrides the COPY ALL OUTPUT TO statement;
if a program contains both statements, then the PRINT statement output is
displayed only on the device specified in the SEND OUTPUT TO statement.
A SEND OUTPUT TO statement generates an error if it executes between the
initiation of report writer output with the DETAIL LINE, TRIGGER BREAK,
TRIGGER PAGE BREAK, or END REPORT statement and termination of the report.
Examples
>list
10 SYSTEM "FILE LP;DEV=LP"
20 SYSTEM "FILE LASER3;DEV=PP,3;ENV=LP602.HPENV.SYS;CCTL"
30 SEND OUTPUT TO "*LP" !Output sent to LP
40 PRINT "Send a line to the printer."
50 SEND OUTPUT TO DISPLAY,MARGIN=40 !Output sent to DISPLAY
60 PRINT "Line to display on the terminal showing margin at 40."
70 SEND OUTPUT TO "*LASER3" !Output sent to LASER3
80 PRINT "Send a line to the laser printer."
>run
Line to display on the terminal showing
margin at 40.
>
SEND SYSTEM OUTPUT TO
The SEND SYSTEM OUTPUT TO statement specifies the output device to which
interpreter output is sent.
Syntax
[SEND] SYSTEM OUTPUT [TO] dev_spec
HP Business BASIC/XL interpreter output that is normally sent to the
system's standard list device, usually, the terminal, can be redirected
to other output devices specified by dev_spec . The interpreter