Subject RE: [IBO] Simple Question about delete clause
Author Gerhardus Geldenhuis
Hi
I tried all suggestion and combinations of those but it does not work, still
get the same error. I have the following solution. Call First procedure and
then refresh it works fine(quick and dirty) :-)
Here is the problem/experiment code

function TCosting.Delete_BOM_Items(Instruction: String):Integer;
begin
Result:=0;
with CostingDM do
begin
try
IBOSP:=TIBOStoredProc.Create(CostingDM);
IBOSP.DatabaseName:=IBOQBOM.DatabaseName;
IBOSP.IB_Transaction:=IBOQBOM.IB_Transaction;
IBOSP.StoredProcName:='DELETE_BOM_ITEMS';
IBOSP.Prepared:=True;
IBOSP.Params[0].AsInteger:=IBOQWorksOrder['WORKSORDERNO'];
IBOSP.Params[1].AsString:=Instruction;
IBOSP.ExecProc;
Result:=IBOSP.Parambyname('OUT_COUNT').AsInteger;
finally
IBOSP.Free;
end;//try finally
// IBOQBOM.InvalidateBookmark(IBOQBOM.Bookmark);
/// IBOQBOM.InternalDataset.CommitAction:=caInvalidateCursor;
/// IBOQBOM.InternalDataset.RefreshAction:=raOpen;
IBOQBOM.First;
IBOQBOM.Refresh;//error here.
end;//with do
end;

CommitAction and RefreshAction I tried with there various types.

Groete
Gerhardus