+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Form Ve Alt Forma Otomatik Id Numarası Tanımlama (/konu-form-ve-alt-forma-otomatik-id-numarasi-tanimlama.html)
Form Ve Alt Forma Otomatik Id Numarası Tanımlama - enginceken - 26/04/2020
Herkese merhabalar. Uğraştığım bu uygulamada bir çok temel hatayı düzelttiğime inanıyorum. Ama bazı ufak ayrıntılarda boğuldum ve benim bilgim ve araştırmalarım çözmem için yeterli olmadı. Biraz ayrıntılı yazdım ki anlaşılır olsun diye. Vakit ayırıp yardımcı olursanız çok sevinirim. Teşekkür ederim.
Sorunlar :
1) "F_FATURA_GIRISI" formunda "Yeni Fatura" butonuna tıklayınca, otomatik "Kayıt Id" numaramı ekrana yazdırdım. ama "Fatura Ayrıntısı Girişi" butonuna tıklayınca, bununla ilişkilendirdiğim "FATURA_IDFK" numarasını ne ekrana ne de kayıta otomatik olarak attıramıyorum. Her seferinde elle girmem gerekiyor.
2) "F_FATURA_AYRINTI" formunda "ÜRÜN ADI" birleşik giriş kutusundan ürünü seçince, "ÜRÜNGRUBU" nu otomatik yazdırabildim. ama "KDV" yi bir türlü otomatik yazdıramadım.
3) "T_FATURA_AYRINTI" tablosundaki "KDVLIFIYAT" ı, ID numarasına göre toplatmak istiyorum. Yani Fatura Toplamı.
4) "S_FATURALAR_SORGU" sorgusunda ve "RAPORLAMA" formunda, sorgu sonuçlarında, adetleri ve KDV li fiyatları toplatamadım. Bunları formun altındaki kutulara yazdırmak istiyorum.
Bir de son olarak; "F_RAPORLAMA" formunda tarih filtresini seçerken, takvim görüntüsünden mouse ile seçilecek şekilde yapmamız mümkün mü? Ben uğraştım ama beceremedim.
RE: Form Ve Alt Forma Otomatik Id Numarası Tanımlama - ozanakkaya - 26/04/2020
Merhaba,
Fatura Ayrıntısı Girişi (Komut432) butonunun tıklandığında olayındaki katıştırılmış makroyu sil, yerine olay yordamı olarak
If Nz(DCount("FATURA_IDFK", "T_FATURA_AYRINTI", "[FATURA_IDFK]= " & [Metin425]), 0) = 0 Then
DoCmd.SetWarnings False
DoCmd.RunSQL "INSERT INTO T_FATURA_AYRINTI (FATURA_IDFK) VALUES ('" & Me.Metin425 & "')"
DoCmd.SetWarnings True
End If
DoCmd.OpenForm "F_FATURA_AYRINTI", acNormal, , "[FATURA_IDFK]=" & [Metin425]kodu ekle.
Diğer soruların için uygun konu başlığı ile yeni konu açarak sorunuzu sorunuz.
RE: Form Ve Alt Forma Otomatik Id Numarası Tanımlama - enginceken - 26/04/2020
Ozan bey çok teşekkürler. yalnız "FATURA AYRINTI" formunda, "Kayıt Ekle" ile Faturaya yeni satır eklemek isteyince değer yine sıfır geliyor. Aynı kod o butonda da işe yarar mı?
RE: Form Ve Alt Forma Otomatik Id Numarası Tanımlama - ozanakkaya - 26/04/2020
F_FATURA_AYRINTI isimli formdaki Kayıt Ekle butonunun tıklandığında olayına
Dim GKayitNo As Integer
GKayitNo = Me.FATURA_IDFK
DoCmd.GoToRecord , , acNewRec
Me.FATURA_IDFK = GKayitNokodu ekle. KATIŞTIRILMIŞ MAKRO YERİNE HER ZAMAN OLAY YORDAMI KULLANMAYA ÇALIŞ
RE: Form Ve Alt Forma Otomatik Id Numarası Tanımlama - enginceken - 26/04/2020
Ozan bey çok teşekkür ederim. Elinize sağlık.