Selam,

Öncelikli olarak üstadlara ve uzmanlara çalışmalarıma kattıkları desteklerden ötürü saygılarımı sunarım.


Devam etmekte olduğum ve bitirmeme çok az kalan "denetim" konulu çalışmamla ilgili bir kaç sorum var. Çalışmamı bitirdiğimde siteye ekleyeceğim.


Sorularım;

1-GunBirim isimli bir sorgum var. Birime göre gruplanan Tarihler alanı yanyana fonksiyonu ile yanyana getirilmiştir. Yanyana gelen tarihlerde tespit edilen toplam aksaklık sayısı tarihlerin hemen yanında "()" içinde görülmektedir. Tarihler alanına ilgili tarihte yapılan kontrolün KayıtNo sunu nasıl getirilebilir. GunBirim sorgusu Tarihler alanı 1-22.02.2019(9) olmalı. 1=KayitNo


2-Form üzerindeki Aylık Raporu Hazırla butonu DosyaGecici tablosundaki verileri DosyaAy tablosuna atmaktadır. Atmadan önce atılacak verilerin DosyaAy tablosunda olup olmadığının kontrol ettirilmesini, kontrol sonrasında aktarma işlemi öncesi evet/hayır sorusunun bulunmasını ve cevap evet ise prosedürün uygulanmasını, hayır ise uygulanmamasını nasıl sağlarız.

Teşekkürler

Public Function GB(strField As String, strTable As String, Optional strWhere As String, Optional
...
strSql = "SELECT [KayitNo] & '-' & " & strField & " & ' (' & Count(*) & ')' As Kac FROM " & strTable
...
strSql = strSql & " GROUP BY DosyaGun." & strField & ", DosyaGun.[Birim], DosyaGun.[KayitNo]"
...
end sub
Koyu olan yerleri ekleyiniz.




DosyaAy'a kayit yuklemeyi, kontrollu yapilabilmesi icin once sor, sonra yukle ile VBA ile yapilabilir.

Sayın dsezgin üstad cevap için teşekkürler,
#Mesaj-1# ekine Denetim1 ekledim. Bi düzeltmem olacak.

1.Sorum sonuçlandı.

2.Sorumu aşağıdaki şekilde düzeltmek istiyorum.

"Form üzerindeki Aylık Raporu Hazırla butonu DosyaGecici tablosundaki verileri önce DosyaKalici tablosunda aramalı,
A-DosyaGecici tablosundaki verilerin tamamı (KayitNosu, Tarihi, Birimi, Maddesi, Onerisi = ise) DosyaKalici tablosunda varsa işlem İPTAL olmalı, hiç bir yere hiçbir kayıt atmamalı.

B-Kayıt yoksa DosyaKalici ve DosyaAy tablolarına atmalı. Verileri aktarmadan önce evet/hayır sorusu sormalı. Cevap Evet ise prosedür uygulansın, Cevap hayır ise hiçbir değişiklik yapmasın.

Teşeküürler

Açıklama:
1-DosyaKalici tablosunun olma nedeni aylık rapora gönderilen günlük raporların kayıtlarını muhafaza edecektir.
2-DosyaAy (Buraya atılacak kayıtlar ayda bir kez atılacağı için aylık tek KayitNo artar ve işlemin yapıldığı tarihi alır. DosyaGecici tablosunda kayıtlı veriler zaman içinde giderilen aksaklıklar nedeniyle azalabilmektedir. Buradaki form üzerinde buton ve formların birçoğu bulunmuyor. İşlem bitince atacağım)

Puf noktasi Dcount(... fonksiyonu, yontemleri kendi senaryonuza uygun degisiklikleri yapabilirsiniz.