Форум: "Базы";
Текущий архив: 2009.09.06;
Скачать: [xml.tar.bz2];
ВнизЗапись BLOB из Delphi в Oracle 9.2 Найти похожие ветки
← →
миникодер (2008-11-18 16:35) [0]procedure TfrmReports.SaveReportToDB(Report: TFrxReport);
Var
Stream1: TStream;
LOB: TLOBLocator;
begin
oqUpdateTemplate.ClearVariables;
try
odsReports.Edit;
try
Stream1 := odsReports.CreateBlobStream(odsReports.FieldByName("template"), bmWrite);
Report.SaveToStream(Stream1);
Report.SaveToFile(ExtractFilePath(Application.ExeName)+"\tempreport.fr3");
LOB := TLOBLocator.CreateTemporary(DMMain.OracleSession, otBLOB, True);
Lob.LoadFromFile(ExtractFilePath(Application.ExeName)+"\tempreport.fr3");
oqUpdateTemplate.SetComplexVariable("template", LOB);
oqUpdateTemplate.SetVariable("id", odsReportsID.AsInteger);
oqUpdateTemplate.Execute;
DMMain.OracleSession.Commit;
except
DMMain.OracleSession.Rollback;
odsReports.Cancel;
Application.MessageBox("Ошибка записи отчета!", "Внимание", MB_ICONERROR);
raise;
end;
odsReports.Post;
finally
Stream1.Free;
LOB.Free;
end;
end;
при записи в базу выдает такую ошибку:
update reports set template = :template where id = :id
:ID = 1
Oracle error occurred: 600 (ORA-00600: internal error code, arguments:
[kokegPinLob1], [], [], [], [], [], [], [])
----------------------------------
Timestamp: 15:29:39.762
Successful rollback.
Подскажите, что я делаю нетак?
Заранее благодарен!
← →
Правильный$Вася (2008-11-18 16:55) [1]
> Oracle error occurred: 600 (ORA-00600: internal error code,
> arguments: [kokegPinLob1],
типичная ошибка ядра
лечится патчеванием как сервера, так и клиента
хотя патча можети не быть
читай металинк
← →
Val © (2008-11-18 22:51) [2]+ к первому посту: желательно обновиться до 9.2.0.6\9.2.0.8, если не патчили.
Страницы: 1 вся ветка
Форум: "Базы";
Текущий архив: 2009.09.06;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.006 c