OP Taze Üye
Teşekkür Sayısı: 0
8 mesaj
Kayıt Tarihi:Kayıt: Haz 2010
Arkadaşlar Özellikle Site Tasarlayanlar için İşine yarayacaktır.(Hocamız Can Şahinöz 'e Teşekkür ederim .)
- [ Tüm kodu seç ] [ Yeni Pencerede Göster ]
create table TBL_HESAP2 ( HESAPNO CHAR(10), ISIM VARCHAR(20), SOYAD VARCHAR(20), SUBE INT, BAKIYE MONEY ) INSERT INTO TBL_HESAP2 VALUES ('0000000023','CAN','ŞAHİNÖZ',749,15000),('0000000042','YASİN','YARAMIŞ',740,50000) ALTER PROC SP_HAVALEISLEMI ( @GONDEREN CHAR(10), @ALICI CHAR(10), @MIKTAR MONEY ) AS BEGIN BEGIN TRANSACTION UPDATE TBL_HESAP2 SET BAKIYE=BAKIYE-@MIKTAR WHERE HESAPNO=@GONDEREN IF @@ERROR<>0 ROLLBACK --HATA VARSA İŞLEMİ GERİ AL UPDATE TBL_HESAP2 SET BAKIYE=BAKIYE+@MIKTAR WHERE HESAPNO=@ALICI IF @@ERROR <>0 ROLLBACK COMMIT --EĞER HİÇ HATA YOKSA ONAYLA END SELECT * fROM TBL_HESAP2 EXEC SP_HAVALEISLEMI '0000000042','0000000023',4099990000