HP 3000 Manuals HP 3000 Manuals
>ALTER VPLUS
Changes the generated code to include PASCAL arrays for the fields in a
VPLUS form.
Prompts
The following prompt is issued when the command-subcommand ALTER VPLUS is
entered:
GENERATE TABLES FOR VPLUS EXTRACTS (N/Y)>
GENERATE TABLES FOR Enter Y to generate PASCAL arrays for the
VPLUS EXTRACTS (N/Y)> fields in a VPLUS form in addition to the data
declarations generated for the form. DICTPDE
assumes that no arrays are generated unless Y
is entered in response to this prompt. Enter N
if no arrays are to be generated for the fields
in a VPLUS form. Pressing [[RETURN]] in
response to this prompt indicates that no
arrays are generated.
Discussion
ALTER VPLUS allows you to generate additional code for the data fields in
a VPLUS form. The additional code includes PASCAL arrays for the fields
in the form and a buffer for the FORM declaration.
The arrays generated for the data fields are as follows:
off the byte offsets for each field in the form.
len the byte lengths of each of the fields in the form.
num the numbers of the fields within the FORM
Example
>alter vplus
GENERATE TABLES FOR VPLUS EXTRACTS (N/Y)> y
>generate file
FILE(S)> forma Specifies a VPLUS form.
type
forma =
record
case integer of
0 :
(
f5 : packed array[1..6] of char;
f10 : packed array[1..10] of char;
f20 : packed array[1..20] of char;
f2 : packed array[1..2] of char;
under_score_to : packed array[1..14] of char;
);
1 :
(
forma_buf : packed array[1..53] of char
);
end;
forma_array = array[1..5] of integer;
const
forma_off = forma_array[1, 7, 17, 37, 39];
forma_len = forma_array[6, 10, 20, 2, 14];
forma_num = forma_array[1,2,3,4,5];