Exception when inserting a new row in Oracle table

Discussion of open issues, suggestions and bugs regarding UniDAC (Universal Data Access Components) for Delphi, C++Builder, Lazarus (and FPC)
Post Reply
SESTEC
Posts: 4
Joined: Thu 08 Dec 2005 19:11

Exception when inserting a new row in Oracle table

Post by SESTEC » Mon 06 Oct 2008 14:13

UNIDAC Version: 1.20.0.11 for Delphi 2009

When inserting a new record in an Oracle table and TUniConnection is not connected in front an exception raises. In the designer (your Data Editor) I can see the exisiting records, but I can't add records.

This exception don't raise when TUniConnection.connected is true before opening the table or when I use a MySQL table instead of the Oracle table.

In former versions (MyDAC/ODAC) I never had to set Connected to true. Is this an error or are there differences between different databases?


Here the exception (error reading from adress 00000054):

[0B0234F4]{oraprovider120.bpl} Oraclassesuni.TOCIConnection.CheckOCI80 + $0
[0B0279C9]{oraprovider120.bpl} Oraclassesuni.TOCIConnection.GetSvcCtx + $5
[0B039F05]{oraprovider120.bpl} Oraclassesuni.TOCIRecordSet.CreateComplexFields + $1A1
[0775E7A0]{dac120.bpl } Memdata.TData.InitRecord + $3C
[07778215]{dac120.bpl } Memds.TMemDataSet.InternalInitRecord + $4D
[50496664]{dbrtl120.bpl} DB.TDataSet.InitRecord (Line 11787, "DB.pas" + 1) + $6
[077782B6]{dac120.bpl } Memds.TMemDataSet.InitRecord + $A
[50496CF3]{dbrtl120.bpl} DB.TDataSet.Insert (Line 12033, "DB.pas" + 5) + $6
[508804B5]{vcldb120.bpl} DBCtrls.TDBNavigator.BtnClick (Line 4075, "dbctrls.pas" + 12) + $2
[50880322]{vcldb120.bpl} DBCtrls.TDBNavigator.ClickHandler (Line 4039, "dbctrls.pas" + 1) + $B
[501D1163]{vcl120.bpl } Controls.TControl.Click (Line 6756, "Controls.pas" + 9) + $8
[5014C004]{vcl120.bpl } Buttons.TSpeedButton.Click (Line 1360, "Buttons.pas" + 0) + $0
[5014BFED]{vcl120.bpl } Buttons.TSpeedButton.MouseUp (Line 1353, "Buttons.pas" + 25) + $C
[50880A4C]{vcldb120.bpl} DBCtrls.TNavButton.MouseUp (Line 4253, "dbctrls.pas" + 1) + $E
[501D1564]{vcl120.bpl } Controls.TControl.DoMouseUp (Line 6884, "Controls.pas" + 2) + $1D
[501D15E1]{vcl120.bpl } Controls.TControl.WMLButtonUp (Line 6897, "Controls.pas" + 9) + $6
[501D0BFA]{vcl120.bpl } Controls.TControl.WndProc (Line 6640, "Controls.pas" + 91) + $6
[501D0820]{vcl120.bpl } Controls.TControl.Perform (Line 6418, "Controls.pas" + 10) + $8
[501D4C17]{vcl120.bpl } Controls.TWinControl.IsControlMouseMsg (Line 9133, "Controls.pas" + 15) + $15
[501D5132]{vcl120.bpl } Controls.TWinControl.WndProc (Line 9289, "Controls.pas" + 91) + $6
[501D49A0]{vcl120.bpl } Controls.TWinControl.MainWndProc (Line 9063, "Controls.pas" + 3) + $6
[50057E04]{rtl120.bpl } Classes.StdWndProc (Line 12723, "Classes.pas" + 8) + $0
[500618CE]{rtl120.bpl } Contnrs.TComponentList.GetItems (Line 380, "Contnrs.pas" + 1) + $4
[501F9EAB]{vcl120.bpl } Forms.TApplication.ProcessMessage (Line 9613, "Forms.pas" + 23) + $1
[501F9EEE]{vcl120.bpl } Forms.TApplication.HandleMessage (Line 9643, "Forms.pas" + 1) + $4
[501F5827]{vcl120.bpl } Forms.TCustomForm.ShowModal (Line 6558, "Forms.pas" + 29) + $5
[0781AEA6]{dcldac120.bpl} Crdataeditor.TCRDataEditorForm.SetComponent + $E
[07822A0A]{dcldac120.bpl} Crdesign.ShowEditor + $8A
[0782E62D]{dcldac120.bpl} Dadesign.TDADataSetEditor.ShowDataEditor + $31
[07822FF1]{dcldac120.bpl} Crdesign.TCRComponentEditor.ExecuteVerb + $D
[514A931E]{vcldesigner120.bpl} VCLSurface.TVclDesignSurface.ComponentVerb (Line 2477, "VCLSurface.pas" + 3) + $B
[501C3CDB]{vcl120.bpl } Menus.TMenuItem.Click (Line 2515, "Menus.pas" + 19) + $8
[501C532F]{vcl120.bpl } Menus.TMenu.DispatchCommand (Line 3378, "Menus.pas" + 5) + $2
[501C6586]{vcl120.bpl } Menus.TPopupList.WndProc (Line 4484, "Menus.pas" + 4) + $E
[501C64D5]{vcl120.bpl } Menus.TPopupList.MainWndProc (Line 4459, "Menus.pas" + 2) + $5
[50057E04]{rtl120.bpl } Classes.StdWndProc (Line 12723, "Classes.pas" + 8) + $0
[501F9EAB]{vcl120.bpl } Forms.TApplication.ProcessMessage (Line 9613, "Forms.pas" + 23) + $1
[501F9EEE]{vcl120.bpl } Forms.TApplication.HandleMessage (Line 9643, "Forms.pas" + 1) + $4
[501FA219]{vcl120.bpl } Forms.TApplication.Run (Line 9780, "Forms.pas" + 26) + $3
[004259D2]{bds.exe } bds.bds (Line 196, "" + 7) + $7

Plash
Devart Team
Posts: 2844
Joined: Wed 10 May 2006 07:09

Post by Plash » Thu 09 Oct 2008 09:24

We could not reproduce the problem. Please send to unidac*devart*com a sample project that demonstrates the problem.

Post Reply