Trial version 7.20.0.8 Assertion Failled

[kir]

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

[AlexP]

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.

[kir]

Thank you very much. So work...

[AlexP]

Hello,


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