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

4-: 37
in the corresponding position in the ordered set of
values contained in str_var . Any search or sort items
defined for the entry must be included in item_list .
Fields of unreferenced items are filled with binary
zeros.
If the item_list is a string variable, the list of data
item names must be left justified in the string.
Individual data item names are separated by commas and
the last is followed by a semicolon or blank. Embedded
blanks are not allowed and names cannot appear more than
once.
The data item_list can contain special symbols such as @
that specifies all data items in the data set. Consult
the Special List Parameter Constructs table in the
explanation of the DBPUT library procedure in the
TurboIMAGE/XL Database Management System for additional
special symbols and their usage.
If referencing data items by number, the first word in
the short integer array must be the total number of
elements in the array. This number is followed by the
unique data item number.
The item_list specified is returned internally by
TurboIMAGE as the current list . Consult the
TurboIMAGE/XL Database Management System for details
about the benefits of using TurboIMAGE's current list .
If the items option is not specified, HP Business
BASIC/XL sets the item_list to "@;".
Examples
The following examples show the use of the DBUPDATE statement.
110 DBUPDATE Db$ FROM S$,DATASET=Ds$,STATUS=S(*)
130 DBUPDATE Db$ FROM S$,DATASET=Ds$,STATUS=S(*)
150 DBUPDATE Db$ FROM S$,DATASET Ds$,STATUS S(*),ITEMS I$
170 DBUPDATE Db$ FROM S$,DATASET Ds$,ITEMS I$,STATUS S(*)
220 DBUPDATE Db$ USING 400; DATASET Ds$
230 DBUPDATE Db$ USING Pack1; DATASET Ds$,STATUS=S(*)
400 IN DATASET Ds$ USE A,B, SKIP 10,D$
410 Pack1: PACKFMT A,B, SKIP 10,D$
The following statements:
100 DBGET Dbase$ USING 200 FROM D$; DATASET = "parts"
200 PACKFMT A,Price,Company$
are equivalent to:
100 PACK USING 200;D$
110 DBUPDATE Dbase$ FROM D$;DATASET="parts"
200 PACKFMT A,Price,Company$
DECIMAL
This statement defines a variable as a type DECIMAL. If the SHORT option
is used with it, the variable is type SHORT DECIMAL.
Syntax
{ num_var } [ { num_var }]
[SHORT] DEC[IMAL] { arrayd } [,{ arrayd }]...
Parameters
num_var Name of scalar numeric variable to be declared.
arrayd Numeric array description. The syntax for the array is
described under the DIM statement.
Examples