Delphi Forum

Yok yok, ben kesinlikle iyi değilim

new.stokkodu yerine old.stokkodu yazmanız gerekiyor.
Insert içinde old, delete içinde new kullanılmaz çünkü.

Hocam; Insert, Update ve Delete için 3 tane trigger oluşturun. Insert için cümle: update s_karti set s_karti.miktar=s_karti.miktar+ (new.gmiktar-new.cmiktar) where new.stokkodu=s_karti.s_kodu; Update için cümle update s_karti set s_karti.miktar=s_karti.miktar+ (new.gmiktar-new.cmiktar) - (old.gmikta...

Trigger ile yapacak olursanız Insert, Edit ve Delete işlemleri için ayrı ayrı trigger yazacaksınız. Sorunun cevabını vermişim yani =) Edit için şunu kullanın: AS begin update s_karti set s_karti.miktar=s_karti.miktar+ (new.gmiktar-new.cmiktar) - (old.gmiktar - old.cmiktar) where new.stokkodu=s_kart...

Hocam tablolarınızdaki alanları tam olarak yazın, yapalım. Söz, aynı tabloları oluşturup, test edip sonra cevaplayacağım

Olmadı dediniz ama ne olmadı, nerde hata verdi, yanlış mı hesapladı, bi şey anlamadım ki...

Stok kartında miktar alanı olduğunu varsayarak cevap yazmıştım. Yani evet, miktar alanı olmalı.

Bu arada, burası delphi forumu, sorular sorulacak, cevaplar yazılacak tabi ki. Rahatsızlık ne demek...

Kolay gelsin...

trigger'ı s_kartı için değil hareket tablosu için yazın. Zaten hareket tablosuna kayıt eklendiğinde tetiklenecek, değil mi?

:shock: Dehşet bir hata yapmışım, özür diliyorum. update sorgusuna where eklememişim! Bu durumda tüm stokların miktarını değiştirecek. ikinci olarak, "update" ile "insert into"nun kullanımlarını da karıştırmışım. update s_karti set miktar = miktar + new.gmiktar - new.cmiktar wher...

Trigger ile yapacak olursanız Insert, Edit ve Delete işlemleri için ayrı ayrı trigger yazacaksınız. Tablonuzun yapısına göre yazacağınız trigger'lar değişecek. Örneğin stok hareket tablonuzda 'Miktar' ve 'İşlem türü' alanları varsa farklı, 'giriş miktarı', 'çıkış miktarı' alanları varsa farklı olur....

Sağ tıkladığınızda en altta Properties var, ordan değiştirilebiliyor.

naturelmania yazdı: walla dostum sağoll ya ellerinden öpüyoruz arkadaşlarla, çok daha iyi oldu, Allah razı olsun. bizi uzun düşüncelerden büyük dertlerden kurtardın

Hocam estağfirullah

Kolay gelsin...

div bölme işlemininin tam kısmını verir. örneğin, 11 div 2 = 5 dir gibi... En iyisi satır satır açıklayayım :wink: OrtalamaSayisi := ((10000 - 1) div GaripSayi) + 1; //Sonuçta kaç tane ortalama bulacağız? //Sanırım şu kod daha anlaşılır olacak: Ortlama sayisi := (10000 div GaripSayi); //Örneğin sayı...

aslangeri yazdı:@ulucoder
garipsayı için birde input yapsan tam süper olacak

Hocam hep böyleyim, misal prosedür yazar, tetiklemeyi unutur, sonra da "yahu neden çalışmıyor bu!!!" diyip kendimi yerim.

Neyse arkadaş düzeltir artık

Selam. Aklıma gelen ilk çözüm şu: var A: Array [1..10000] of Integer; AOrt: Array of Integer; AraToplam: Integer; i: Integer; GaripSayi: Integer; OrtalamaSayisi: Integer; begin OrtalamaSayisi := ((10000 - 1) div GaripSayi) + 1; //Bu kadar ortalama çıkacak SetLength(AOrt, OrtalamaSayisi); //Ortalamal...

Hocam linki bulamadım
Güncellemeniz mümkün mü?

Merhaba.

BDE için gerekli olan DLL'ler nelerdir acaba?

Her şey için de Firebird kullanılmaz ki...