SQL Programming Manual for Pascal

Error and Status Processing
HP NonStop SQL Programming Manual for Pascal—528614-001
6-16
Declaring the SQLDA and Names Buffer
Table 6-4 on page 6-17 lists and describes the SQLDA fields.
Figure 6-3. NonStop SQL Release 1 SQLDA Record Description and Names
Buffer
1: (data_len : INTEGER);
CONST
SQLDA_EYE_CATCHER [_R1 ] = 'DA';
TYPE
SQLVAR_TYPE [_R1 ] = RECORD
data_type : INTEGER;
( CASE INTEGER OF
{ fields for numbers }
2: (scale : BYTE;
nlen : BYTE);
);
null_info : INTEGER;
var_ptr : EXTADDR;
reserved : LONGINT;
END ;
VAR
sqlda_name : SQLDA_TYPE [ _R1 ] ;
names_buffer_name : ARRAY [1.. length ] OF CHAR;
SQLDA_TYPE [ _R1 ] = RECORD
eye_catcher : FSTRING(2);
num_entries : INTEGER;
sqlvar : ARRAY [1.. sqlvar_count] OF SQLVAR_TYPE
[_R1];
END ;
VST0603.vsd