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

4-: 155
236 PRINT Num,S1$,S2$,(FOR I=1 TO 4, N1(I))
240 Pack4: PACKFMT N1,SKIP 2,S1$,SKIP 1,Num,SKIP 1,S2$[3;5]
245 UNPACK USING Pack4; P2$
246 PRINT N1(1),N1(2),N1(3),N1(4),S1$,Num,S2$
250 END
UNTIL
The UNTIL statement is part of the REPEAT UNTIL construct. Refer to the
REPEAT statement for more information.
UPDATE
The UPDATE statement assigns a value to the current datum of a specified
BASIC DATA file, if the assignment is legal. The UPDATE statement cannot
change the type of the datum, and it cannot change the length of a string
datum.
Syntax
UPDATE #fnum ; expr
Parameters
fnum The file number that HP Business BASIC/XL uses to
identify the BASIC DATA file. It is a numeric
expression that evaluates to a positive short integer.
expr Its value is assigned to the current datum or the datum
indicated by the file's datum pointer if the assignment
is legal.
If the new value is not of the same type as the old
value, the UPDATE statement converts the new value to
the old type. If this is impossible, an error occurs.
If expr is a string, and it is shorter than the string
that it replaces, it is blank-filled on the right. If
expr is a string that is longer than the string that it
replaces, it is truncated on the right.
Examples
The following statements show the update statement.
10 UPDATE #1; 1234 !Updates #1
20 UPDATE #2; "CAT" !Updates #2
30 UPDATE #3; SIN(X+35) !Updates #3 with the results of a function
40 UPDATE #3; LWC$("JOHN " + "DOE") !Updates #4 with "john doe"
WAIT
The WAIT statement delays program execution.
Syntax
WAIT [ num_expr ]
Parameters
num_expr Number of seconds that the program is delayed (can be a
REAL value). If num_expr is not specified, the program
waits for a user interrupt, a CONTROL Y.
Examples
10 WAIT 120 !120 seconds (2 minutes)
15 WAIT 0.5 !0.5 seconds