AccessTr.neT

Merhaba,

Sayın sledgeab'ın desteği ile bir şeyler yapmaya çalışıyorum başından beride kendisi yardımcı olduğu için sanırım yine kendisinin çözeceği bir konu olacak.
Ekte paylaştığım örnekte alt formda hesaplanan bir alanın toplamını üst formda bir alana hesaplatıp yazdırıyoruz.
örneğin en alt formda MİKTAR bir üstündeki formda bağlı satırın SEVK Toplamı alanına Sql komutu ile tabloya yazdırarak kayıt ediliyor.
Aynı şekilde orta formdaki TUTAR alanı en üst formda TAHMİNİ TOPLAM MALİYET alanına yazdırılıyor.
Son olarak Aşağıdaki çözülmüş konuda bir satır silindiğinde tekrar hesaplama yapılmasını çözmüştük.

https://accesstr.net/konu-alt-formda-sat...atmak.html

Şu an şöyle bir sorunum var satır silindikten sonra ilgili alanlar hesaplanıp ilgili alanlara kayıt ediliyor ama silinen satır yerine bir boş satır ekleniyor. En alt formda da, üst formda da bu böyle bu hafta bu işi bitirmem gerekiyor yardımcı olabilirseniz çok sevinirim.
Saygılarımla,

Merhaba,

Silme işleminden sonra çalışacak kodda hesaplama işlemi olduğu için yeni kayıt ekliyor.

Alt formun silme onayı sonrasında olayındaki 

call SEVKHESAP

kodu yerine

DoCmd.RunCommand acCmdSaveRecord

DoCmd.SetWarnings False

DoCmd.RunSQL "UPDATE ORD_LINE INNER JOIN ORD_SHIP ON ORD_LINE.SIP_LINE_ID = ORD_SHIP.SIP_LINE_ID SET ORD_LINE.SEVK_TOPLAMI = Dsum ('SEVK_MIKTAR','ORD_SHIP','[SIP_LINE_ID]=' & [Formlar]![ORD_MAIN_FORM]![mtn_geciciid]) WHERE (((ORD_LINE.SIP_LINE_ID)=[Formlar]![ORD_MAIN_FORM]![mtn_geciciid]));"

DoCmd.RunSQL "UPDATE ORD_LINE SET KALAN_MIKTAR = (SIP_MIKTAR - SEVK_TOPLAMI) WHERE SIP_ID = Forms!ORD_MAIN_FORM.SIP_ID"

DoCmd.SetWarnings True

Kodunu kullanarak deneyiniz. Ayrıca silindiğinde olayına eklenen kodu tamamen iptal edin.

Maalesef durum değişmedi diğer hesaplamalar ile lakası yok onları kaldırarak daha önce denedim.
Şimdi çıkacağım kızım rahatsızlandı saat 21 gibi dönmüş olurum sanırım.

Geçmiş olsun.

Eklediğiniz Sub SEVKHESAP() kodunu değiştirmeyeceksiniz. Sadece silme onayı sonrasında olayına bu sub yerine sadece veri güncelleyen kodu kullanacaksınız.

Teşekkür ederim, hızlıca kontrol ettim sanırım haklısınız ama şimdilik konuyu taşımazsanız sevinirim tam kontrol ettiğimde tekrar dönüş yapacağım.