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

4- 32
corresponding to the desired dataset number. Required
only if lock_mode is three or four.
str_expr A string expression that is required only if lock_mode
is five or six. Its value is a predicate lock string
that describes the locking condition. The PREDICATE
statement is used to set up the predicate lock string.
The format of the PREDICATE lock descriptors is
presented in the description of the DBLOCK library
procedure in the TurboIMAGE/XL Database Management
System .
status_array A 10-element short integer array to which TurboIMAGE
returns an error code. If an HP Business BASIC/XL
database statement specifies the STATUS option, an error
does not abort the program. Following execution of the
database statement the program can check status_array
and handle the error. The values returned by TurboIMAGE
to this array are detailed in the description of the
status parameter of the equivalent TurboIMAGE library
procedure.
Examples
The following examples show the use of the DBLOCK statement. In line 30,
a PREDICATE statement has been issued for use with lines 150 and 160.
30 PREDICATE Pred$ FROM Ds$ WITH Item$="skates"
100 DBLOCK Db$,STATUS=S(*)
110 DBLOCK Db$,MODE=1,STATUS=S(*)
120 DBLOCK Db$,MODE=2,STATUS=S(*)
130 DBLOCK Db$,MODE 3,DATASET Ds$,STATUS S(*)
140 DBLOCK Db$,MODE 4,DATASET Ds$,STATUS S(*)
150 DBLOCK Db$,MODE 5,DESCRIPTOR Pred$,STATUS S(*)
160 DBLOCK Db$,MODE 6,DESCRIPTOR Pred$,STATUS S(*)
DBMEMO
The DBMEMO statement sends a message to the transaction log file.
Syntax
DBMEMO dbname $, MSG[=] str_expr [, STATUS[=] status_array (*)]
Parameters
dbname $ A string variable whose value is a TurboIMAGE database
name. dbname must be the variable that was passed to a
successful DBOPEN.
str_expr A string of ASCII characters of up to 512 characters in
length to be written to the log file.
status_array A 10-element short integer array to which TurboIMAGE
returns an error code. If an HP Business BASIC/XL
database statement specifies the STATUS option, an error
does not abort the program. Following execution of the
database statement the program can check status_array
and handle the error. The values returned by TurboIMAGE
to this array are detailed in the description of the
status parameter of the equivalent TurboIMAGE library
procedure.
Examples
The following examples show the use of the DBMEMO statement.
110 DBMEMO Db$,MSG=Message$,STATUS=Stat(*)
120 DBMEMO Db$,MSG Message$,STATUS Stat(*)
DBOPEN
The DBOPEN statement initiates database access and sets TurboIMAGE's user