Source position: ibase40.pp line 1548
type TSQLVAR = record
sqltype: Short;
sqllen: Short;
sqldata: PChar;
sqlind: PShort;
sqlname_length: Short;
sqlname: array [0..29] of Char;
end;