Boş kayıtta Tarih kaydının yapılması.

Sayın fascioglu,

Ek’te talebinize dair örnek uygulama mevcuttur.inceleyebilirsiniz.

Masa no boş durumdayken ya da herhangi bir masa no’yu seçtiğinizde tarih bilgisi eklenmemektedir.ancak,sağdaki menüden seçim yapıldığında tabloya giriş tarihi eklenmesi gerçekleşmektedir.

Ayrıca,uygulamanızı incelediğimde;giderilmesi gerektiğine inandığım bir husus dikkatimi çektiğinden dolayı bir tavsiye paylaşımında da bulunmak isterim,nacizane.

ek’teki resimlerde de görüleceği üzere,sağdaki fiş alt formuna resimlerdeki gibi gerek birimi gerekse de ürün adı alanlarından menü dışı herhangi bir değer girişinin de mümkün olduğu gözlenmiştir.bunu dikkate alarak,gereken açığın kapatılmasını da sağlamanızı öneririm.

İyi çalışmalar,
Saygılar.

Öncelikle görüştüğümüze sevindim,
Sayın hocam,boş masaya tıkladığınızda tarih siliniyor,ancak kayıt girildiğinde geri geliyor,yaptığınız yorum içinde teşekkürler,iyi bir tespit ben bunu hiç fark etmemiştim.Ayrıca
sitedeki örnek dışında kendi yaptığım çalışmayıda ekliyorum,burada sıkıntı tam tersine döndü,
Tarihle ilgili Date leri modül 2 den ve Kaydagit yordamından kaldırdım,formdaki Tarih alanınıda ilişkisiz yaptım,bu seferde kaydını yaptığım masa ile ilgili tarih tbl_masabilgilerine atmıyor,eğer
son örnek üzerinde bir inceleme ve uygulama yapma şansınız olursa sevinirim,saygılarımla.

frm_masabilgileri isimli forma "mtn_giristarihi" adında denetim kaynağı "Giristarihi" olan metin kutusu ekle,

kaydet butonunun tıklandığında olayına yazılı kodları aşağıdakilerle değiştir.

Private Sub Kaydet_Click()

If Me.masano = 0 Then

MsgBox ("Masano sıfır olamaz")

Exit Sub

End If

If MsgBox("Yeni masano kaydını onaylıyormusunuz ?", vbQuestion + vbYesNo, "Kayıt Onayı") = vbNo Then

DoCmd.RunCommand acCmdUndo

Else

Me.mtn_giristarihi = Date

DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70

End If

Call MASARENK

Me.Requery

End Sub

Ozan hocam emeğinize sağlık,yalnız burada küçük bir ayrıntı var,Kaydet butonuna basmayı
unuttuk veya dalgınlığımıza geldiyse tarih atma olayı gerçekleşmiyor,ayrıca kaydet demesek bile menüden seçim yapıp fişe aktarabiliyor ve kayıt gerçekleşiyor.Bunun çaresini bulabilirsek sanırım sorun çözülecek.
Saygılarımla.

Sayın fascioglu,

Bahsettiğiniz tarih konusu ile ilgili olarak benim nacizane görüşüm şu doğrultudadır,bir örnek ile anlatacak olunduğunda:

Müşteri gelip masada yerini aldıktan ve ancak siparişini verdikten sonra bu tarih bilgisi devreye girmeli.sipariş verilmeden öncesinde henüz müşteri masada ikamet etmiş sayılmaz.belki masada sorun olup da beğenmeyecek veya masa değiştirmek zorunda kalacak ya da bir işi çıkar gitmek durumunda kalacak.bu sebeple,en geçerli durum;müşteri siparişini verip bu siparişlerin masaya getirilmesi ya da kullanımı söz konusu olduğunda bu giriş tarihi alanı aktif olup tabloya eklenmeli.

diğer durumda hala bekleme ve henüz masanın aktif olarak açılması geçerli olmamaktadır diye düşünüyorum,yorum olarak.çünkü;sizin bu konudaki talebiniz şu;masa no seçilmeden yani boştayken ve fiş alt formundan da herhangi bir sipariş verilmeden tabloya giriş tarihi eklenmesin.ancak sipariş verildiğinde eklensin.zaten,bu konuda da daha önceki yazışmalarımızda böyle olması gerektiğini belirtmiştim,siz de uygun bulmuştunuz.

Bu durum geçerli ise,o zaman;

Alıntı:...eğer
son örnek üzerinde bir inceleme ve uygulama yapma şansınız olursa sevinirim...

bu talebinize de dahil olarak,ek’teki uygulamanızın bu duruma dair ki son hali mevcuttur.bu şekilde kullanılması uygun görülmektedir.takdir sizindir elbette.

İnceleme neticesinde birkaç hususa daha dikkat edilmesinin gerekliliği görüldü.şöyle ki;

1)
frm_masabılgılerı formu üzerindeki günlük kasa bilgileri içerikleri,sadece dolu masalarda görüntüye gelmekte fakat boş masalar seçildiğinde bilgiler boş gelmektedir.

2)
Hesabın alınacağı bir masa için nakit değeri girilip hesap al butonu seçildiğinde aşağıdaki sorguda hata vermektedir.

DoCmd.RunSQL "INSERT INTO tbl_masabılgılerıaktar ( masano, Giristarihi,hesaptop, ıskonto, Nakitodeme, Kredikartiodeme, kalan, musterino ) SELECT tbl_masabılgılerı.masano, tbl_masabılgılerı.Giristarihi,tbl_masabılgılerı.hesaptop, tbl_masabılgılerı.ıskonto, tbl_masabılgılerı.Nakitodeme, tbl_masabılgılerı.kredikartiodeme, tbl_masabılgılerı.kalan, tbl_masabılgılerı.musterino FROM tbl_masabılgılerı WHERE (((tbl_masabılgılerı.masano)=[Formlar]![frm_masabılgılerı]![masano]));"

Bunun sebebi de, tbl_masabılgılerıaktar tablosunda daha önceden var olan musterino alanını tablodan iptal etmenize rağmen bu sorgudan da gerekli düzenlemeyi yapmadığınız için.bu sorunu fark etmeniz için,hatanın giderilmesi yapılmamıştır.siz gerekli düzenlemeyi yapabilirsiniz.

3)
frm_masabılgılerı formu üzerindeki YENİ KAYIT butonuna neden gereksinimde bulunduğunuzu bilmiyorum fakat bana göre bu butona ve yaptığı işleme(yeni kayıt açmasına) bu uygulama için geçerli bir gereksinim değil.zira,form içeriği itibarı ile size bağlı olacağı tabloda yeni bir kayıt açmayı gerektirecek bir gidişat söz konusu değildir.bu ekstra bir eklemeden öteye geçmeyecek bir eklemedir kanısındayım.

4)
Madde 3 içeriğinde yazılı olan açıklama,YENİLE butonu için de geçerlidir.bu yenileme ihtiyacı söz konusu ise,o zaman bir işlem sonrasında peşisıra yazılarak hem unutulma veya üşenme durumlarının önüne geçilmiş olunur hem de buna gerek olmaksızın işlemler akabinde otomatikman yapılması sağlanmış olur.

Paylaşmak istediğim yorumlar şimdilik bunlardır.bilgilerinize.

Son olarak bir de uygulamanızı konularınıza eklerken;

Araçlar – başlangıç – geçerli veritabanı – kapatırken düzenle ifadesi seçili – tamam

Olacak şekilde kaydederek,düzenle onar işlemini de uygulama sureti ile;uygulamanın kaplayacağı miktarı biraz daha azaltmanız yerinde olacaktır.

İyi çalışmalar,
Saygılar.

Herşeyden evvel yakın ilgi ve alakanız için çok teşekkür ederim sayın Atoz112,emeğinize sağlık,sağolun varolun,konu çözülmüştür.
Saygılarımla.