Devart Forums

Hello!
Code in OraQuery(Oracle 10.2.0.5):
begin
dbms_lob.createtemporary(:in_out_clob, false, dbms_lob.call);
pack_transport_to_file.build_xml_for_file(
:day_start_rep,
:day_end_rep,
:agr_label,
:in_out_clob);-- in out parametr
end;

Code in Delphi 7:

//ccDM.orqry1.ParamByName('IN_OUT_CLOB').AsOraClob.CreateTemporary(lbClob);
ccDM.orqry1.ParamByName('AGR_LABEL').AsString:=AgrLabel;
ccDM.orqry1.Execute;
ccDM.orqry1.ParamByName('IN_OUT_CLOB').AsOraClob.ReadLob;
ccDM.orqry1.ParamByName('IN_OUT_CLOB').AsOraClob.SaveToStream(Stream);
ccDM.orqry1.ParamByName('IN_OUT_CLOB').AsOraClob.FreeTemporary;


Error in string "Execute":
'Asertion failure (D\Projects\Delphi\Dac\Oracle\Source\OraClasses.pas, line 5339)'

Flag Compiler->Assertions isn't help.

If uncomment string AsOraClob.CreateTemporary(lbClob) and comment string in OraQuery "CreateTemporary", then "Undeclared identifier lbClob"

Though in History:
7.20.0.7 15-Jun-11 "Bug with free temporary LOBs as out params at the server is fixed "

How check correction bug with "FreeTemporary???

thanks in advance

Hello,

Can parameters of the Lob type be in or out, but cannot be in/out. Please change the parameter type to out and try once more.
P.S. IbClob is defined in the OraClasses unit.

Thank you very much. So work...

Hello,


Glad to see that the problem was solved. If you have any other questions, feel free to contact us.