stevesco_30
Member
I have installed the following software
Oracle 10g version 2 on the Server
Oracle 10g Release 2 Instant Client
Direct Oracle Access v4.0.7.1
The following code worked before upgrading to new version of Oracle 10g Release 2 and New Version of Direct Oracle Access.
lqInsBlob := TOracleQuery.Create(self);
with lqInsBlob do
begin
session := sysfdmodule.database;
sql.Clear;
sql.add('Insert into XMLBLOB');
sql.add('(Blb_blob, Blb_id, cat_code)');
sql.add('values
Blb_blob, :Blb_id, :cat_code)');
// sql.add('returning Blb_blob into :Blb_blob');
lvLob := TXMLType.Create(sysFDModule.database, lsXML);
DeclareVariable('Blb_id', otinteger);
DeclareVariable('cat_code', otstring);
DeclareVariable('blb_blob', otobject);
SetComplexVariable('Blb_blob', lvLob);
SetVariable('Blb_id', uvBlb_id);
SetVariable('cat_code', uvblb_catcode);
Execute;
On the Line
lvLob := TXMLType.Create(sysFDModule.database, lsXML);
It falls over, with a OCI-21500 internal error.
Can you help me solve this problem?
Oracle 10g version 2 on the Server
Oracle 10g Release 2 Instant Client
Direct Oracle Access v4.0.7.1
The following code worked before upgrading to new version of Oracle 10g Release 2 and New Version of Direct Oracle Access.
lqInsBlob := TOracleQuery.Create(self);
with lqInsBlob do
begin
session := sysfdmodule.database;
sql.Clear;
sql.add('Insert into XMLBLOB');
sql.add('(Blb_blob, Blb_id, cat_code)');
sql.add('values

// sql.add('returning Blb_blob into :Blb_blob');
lvLob := TXMLType.Create(sysFDModule.database, lsXML);
DeclareVariable('Blb_id', otinteger);
DeclareVariable('cat_code', otstring);
DeclareVariable('blb_blob', otobject);
SetComplexVariable('Blb_blob', lvLob);
SetVariable('Blb_id', uvBlb_id);
SetVariable('cat_code', uvblb_catcode);
Execute;
On the Line
lvLob := TXMLType.Create(sysFDModule.database, lsXML);
It falls over, with a OCI-21500 internal error.
Can you help me solve this problem?