Post İptal olayı?

[ömer faruk]

S.A arkadaşlar
dataset in before post olayını koşul koydum eger gerçekleşitse post olayını yani kayıt olayını iptal ettirmek istiyorum neyapmam gerekiyor...

[mussimsek]

Abort

komutunu vermen yeterli.

Kolay gelsin.

[ömer faruk]

S.A
Adminim bu ne hız yavs....abortu denemdim bende problem var sanırım aynı form üzerinde durdugum için uyarı verdirip yeni kayıtta işleme devam etmesini istiyom ama dbnavigator dbgrid kitleniyor formdan çıkıp tekrar girmeye çalışıyom olmuyor...

[rsimsek]

BeforePost procedure nun içinde;

Kod: Tümünü seç

if Şart then 
  Abort;

yazarsan post etmez.
Yanlız başka unit lerin içinde de Abort procedurunun olabileceği (özellikle BDE uniti uses ta varsa) düşünülerek. Unit i ile

Kod: Tümünü seç

 SysUtils.Abort; 

şeklinde yazılmalı.

[ömer faruk]

S.A
sağolasın üstad ilgin için
peki ben olayı nasıl yaptıracan firebird kullanıyorumm ...styok kontrolunü yaptırıyom problem yok şimdilik ama çıkan miktar olandan daha büyük olursabir şekilde girilen kayıtları iptal ettirip tekrardan kayıt girmesini sağlamam lazım düşünüyom düşünüyom çözümünü bulamadım.....

[mussimsek]

hocam kayıt iptal ettirme sordun, sanırım cevap yeterli. Eğer yöntem soruyorsan bence ne yapmak istediğini lafla ifade et. Önerilerimizi yazalım. Böyle kör döğüşü oluyor

Kolay gelsin.

[ömer faruk]

Ne yapmak istedigimi yazdım ama tam anlatamadım herhalde .....stok cıkıs tablom var orada stok cıkıs bilgileri var başka bir formda da stok giris olayını yaptırıyorum..stok cıkıs ta storud proc ile stok girisleri toplattırıp stok cıkısla karşılaşıtrıyorum su ana kada storud procedurle ilgli problem yok istedigim degerleri veriyor ancan stok cıkıs ta ben bunları kontrol ettiroyum kullanıcının girdigi degerlere göre eger var olan miktardan daha fazla cıkıs yapıyorsa bir sekilde oanki stok cıkıs ekranında kaydı iptal ettirmem lazım stok_cıkıs_dataset in before postuna yazdım ..dediginiz gibi before postunda olay olmuyor başka hangi şekilde bu problemimi cözebilirim..dbgirid üzerinde yapmaya çalıştım olmadı...
sağolun varolun...kolay gelsin...

[husonet]

Arkadaşım ben bunu FireBird'de Triger olayından yararlanarak hallediyorum Trigerda yazmazsan seni çok kasar ve çok kod yazman gerekir.

Kolay Gelsin...

[ömer faruk]

S.A
teşekkürler triggerlada deneyecem bu şekilde olmayacak anlaşılan...trigger konusunda çok tecrubem yok bakalım becere bilecekmiyim..Kolay gelsin

[fahrettin]

database tarafında insert ve update triggerlarinda yapmak isin en garantili yontemidir.... Bakınız Seminer 8 kayıtları.... (ancak yarın download edilebilecek gerci...)

[fahrettin]

mesaja cevap yazma arasında iyi ki bir telefon geldi.... Arada karsilikli mesajlar gelip gitmiş haberimiz yok....

[ömer faruk]

Fahrettin abi derdime bir dermann sağolasınlar diğer arkadaşlarda yardımcı olmaya çalıştılar..trigger olayıyla deneyecem ama senin trigger makalenin tekrar incelemem gerekecek tecrube olmayınca olmuyor şimdilik bu işi kodla yapabilirmiyim yukarıda yazmıştım ne yapmak istedigimi ...eger olamz ise ne yapalım tiriggerları bişekilde iyi ogrenmemiz gerekecek er yada gec..

[husonet]

After insert olayına örnek bir triger

Kod: Tümünü seç

CREATE TRIGGER NAKITISLEMLER_AI0 FOR NAKITISLEMLER
ACTIVE AFTER INSERT POSITION 0
AS
begin
  /* Trigger text */
  insert into hareketler (hareketler.carikod, hareketler.cariunvan, hareketler.tarih, hareketler.islemturu,
  hareketler.borc, hareketler.alacak) values (nakitislemler.carikod, nakitislemler.cariunvan, nakitislemler.tarih,
  nakitislemler.islemturu, nakitislemler.borc, nakitislemler.alacak);


   if (nakitislemler.borc is null) then
    update carikart SET carikart.alacak = carikart.alacak + nakitislemler.alacak where CARIKART.carikod = nakitislemler.carikod;
  Else
    update carikart SET carikart.borc = carikart.borc + nakitislemler.borc where CARIKART.carikod = nakitislemler.carikod;
end

Kolay Gelsin...

[fahrettin]

isin asli kod ile yapılır tabi ama saglikli olmayacagi aşikar... Tek sağlıklı yontem trigger ile yapmak olacaktır.... 8. eğitim seminerinin kayıtları inşallah yarın download edilebilecek. Eger izlerseniz triggerlar ile çalışmayı anlamada faydalı olacağı kanaatindeyim....

[ömer faruk]

Eyvallah üstad eminim çok işime yarayacak... Teşekkürler herkeze...