All forms are using custom class inherited from TOraStoredProc witch overrides some procs and also assigns custom procedure to property OnUpdateRecord. CachedUpdates is true also.
Problem is that OnUpdateRecord does not even get executed as
Code: Select all
procedure TOraStoredProc.DoBeforeEdit;
begin
inherited;
if not (LocalUpdate or
(SQLUpdate.Count > 0) or
(Assigned(UpdateObject) and ((UpdateObject.ModifySQL.Count > 0) or (UpdateObject.ModifyObject nil))))
then
Abort;
end;In old odac this code was executed instead and worked:
Code: Select all
procedure TCustomOraQuery.DoBeforeEdit;
begin
inherited;
if not (IsKey or (FSQLUpdate.Count > 0) or LocalUpdate or
(CachedUpdates and (UpdateStatus = usInserted) and
(FSQLInsert.Count > 0)) or
CachedUpdates and Assigned(OnUpdateRecord) or
Assigned(UpdateObject))
then
Abort;
end;Obviously there is different behavior but cannot figure out what code should i change to minimize rewriting and need some ideas.