Kayit silme problemi

[mrtblt]

Merhaba

asagidaki kod ile kayit silme islemini yapmaya calisiyorum.

Kod: Tümünü seç

dm.q_invheader.delete;

Sonra tabloyu grid icerisinde asagidaki kod ile refresh ettigimde

Kod: Tümünü seç

    dm.q_invheader.SQL.Clear;
    dm.q_invheader.SQL.Add('select ih.*, ih2.* from inv_header ih ');
    dm.q_invheader.SQL.Add('left join ayar2 ayr on ayr.deger=ih.sinif');
    dm.q_invheader.SQL.Add('left join inv_header2 ih2 on ih2.id2=ih.id');
    dm.q_invheader.sql.Add('where ((USER1=:p1 and REF=''FATTYPE'') and ((ih2.cname like ''%'+edit1.Text+'%'') or (ih2.invtip like ''%'+edit1.Text+'%'') or (ih.ozel like ''%'+edit1.Text+'%'') or (ih.inv_no='''+edit1.Text+'''))) order by ih.inv_date DESC, ih.inv_no ASC');
    dm.q_invheader.ParamByName('p1').Value := dm.q_yonet.fieldbyname('ID').AsInteger;
    dm.q_invheader.open;

sildigimi zannettigim kayit yeniden ekrana geliyor.

IBDAC componentleri kullaniyorum ve bilesene autocommit yaptirmiyorum (Autocommit = False)

Silme isleminden sonra

Kod: Tümünü seç

dm.neyserv.DefaultTransaction.CommitRetaining;

yapmiyorum Bundanda kaynaklaniyor olabilirmi?

[mkysoft]

Joinli tablolarda silme sorunları olabiliyor. test etmek gerekir.

[Kuri_YJ]

Selamlar,

Join'li querylerden kayıt silmenizi tavsiye etmem. Eğer bir kayıt silinecekse bunu manuel olarak kendiniz yapın. Çünkü, bir kayıt sileyim derken Joinli tablellardaki bütün kayıtları beraber götürürsünüz (INNER JOIN için) o zaman da geri saramazsınız.

Kolay Gelsin
Adnan

[freeman35]

Delete query ni kontrol et bence, Select cümleleriniz sabitse sadece parametreleriniz değişiyorsa, Select yada diğer sql lerinizi değiştirmeyin, parametreler için parambyname i kullanın. DAC serisine bende yeni geçtim, üstelik lazarusda, bende halen öğrenme aşamasında olduğumdan iddialı olarak yazamıyorum, select sql i yazdığınızda diğer sql text leri siliyor olabilir. En basit olarak beforedelete event inde delete sql i kontrol edin
kolay gele