an error when call storeprocedure by TOraStoreProc.help me,please
Posted: Sat 25 Aug 2007 09:44
hello,I got a error when I save a jpg file into a table by TOraStoreProc.
Delphi version is Delphi7
ODAC version is 5.10.0.5 for Delphi7
Oracle version is Oracle9.2.0.1
The Error code is "Ora-01403:NO DATA FOUND"
My program is
It get error when run the code "ParamByName('blbWzzj1').AsOraBlob.CreateTemporary(ltBlob);"
The program is ok ago,the error is found yesterday.I can't found reason.
please help me !
thank you
Delphi version is Delphi7
ODAC version is 5.10.0.5 for Delphi7
Oracle version is Oracle9.2.0.1
The Error code is "Ora-01403:NO DATA FOUND"
My program is
Code: Select all
with Ora_SPCJ do
try
bmpPic.Assign(Image1.Picture.Bitmap);
jpgPic.Assign(bmpPic);
jpgPic.SaveToStream(bin1);
if bin1.Size>0 then
begin
bin1.Position:=0;
ParambyName('blbWzzj1').AsOraBlob.OCISvcCtx:=OraSession1.OCISvcCtx;
ParamByName('blbWzzj1').AsOraBlob.CreateTemporary(ltBlob); //**** show the error!!!!*****
ParambyName('blbWzzj1').AsOraBlob.LoadFromStream(bin1);
ParamByName('blbWzzj1').AsOraBlob.WriteLob;
end
else
ParamByName('blbWzzj1').AsOraBlob.Clear;
finally
bin1.Free;
jpgPic.Free;
bmpPic.Free;
end;
The program is ok ago,the error is found yesterday.I can't found reason.
please help me !
thank you