AccessTr.neT

Tam Versiyon: FA.RESTAURANT-BAR
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
Sayfalar: 1 2
Sayın Access tr neT üyeleri,
    Değerli Hocalarımız Sayın Ozan Akkaya,Sayın Power ve Sayın Atoz112 nin değerli katkıları ile bitirmiş olduğum ve faydalı olacağını düşündüğüm Restaurant-Bar-Cafe lerde kullanabileceğiniz  çalışmam ekte. 
    Şüphesiz eksiklikler,hatalar olabilir bu husuda öneri ve düşüncelerinizi paylaşır iseniz memnun olurum.

Saygılarımla
İyi çalışmala.
Sayın fascioglu,

Eklediğiniz örnek uygulamanız için her ne kadar ayrıntılı bir inceleme içerisinde olmaya imkan ve zaman bulamadığımdan dolayı kendi adıma,kısa süreli bir inceleme neticesinde aşağıdaki bir hususa dair naçizane tavsiyede bulunmak sureti ile yorumumu paylaşmak isterim.

frm_masabılgılerı adlı ana formun içerisinde yer alan FIS adlı alt formdaki ürün değerleri için miktar değerini EKLEME / ÇIKARMA konusunda bir sıkıntı olduğu muhakkak.bunun nedeni de,herhangi bir ürün adına odaklanma olmaksızın direkt ilk ürün değerinin miktar değer artışları ya da azaltmaları söz konusu.bunun yerine,ilgili EKLE / ÇIKAR butonları içeriğinde yer alan “Ürün seçiniz” uyarı mesajının geçerli olmasını sağlamak için;aşağıda yazılı kod ifadelerini, frm_masabılgılerı adlı ana formun içerisinde yer alan Menu adlı alt formun üzerindeki urunadı denetimin Çift Tıklandığında (urunadı_DblClick) olay yordamının
Kod:
Call MASARENK

yazılı kod satırının hemen altına dahil edip kaydediniz.
Kod:
'ATOZ:
'BU KOD İFADELERİ;
'FIS ALT FORMUNDAKİ EKLE / ÇIKAR BUTONLARINDAKİ MESAJLARIN GEÇERLİLİĞİNİ SAĞLAMAK İÇİN DAHİL EDİLMİŞTİR.
With [Forms]![frm_masabılgılerı]![FIS]
      .SetFocus
      DoCmd.GoToRecord , Record:=acNewRec, Offset:=1
      .Form!urunadı.SetFocus
End With

denemede sorun görülmemiştir.ilerleyen zaman içerisinde eğer imkanlar söz konusu olduğu takdirde inşallah başka yorumlarda olursa paylaşımda bulunmayı isterim.bilginize…iyi çalışmalar,saygılar.
Sayın fascioglu,

Eklediğiniz örnek uygulamanıza yönelik olarak,bir diğer gerekli olacağına inandığım bir hususa dair de yine tavsiye niteliğinde bir yorumda bulunmak isterim.

frm_masabılgılerı adlı ana formunuzdaki FIS adlı alt formunuzda bulunan EKLE / ÇIKAR butonlarında miktar artırma eksiltme işlemlerinde özellikle de ÇIKAR butonu kodlarında miktar azaltılırken eksi (-) değerleri yazmakta olduğu görülmektedir.

Bu durumu engellemek ve eksi değerlere düşmemesi için,EKLE adlı butonun içerisindeki
Kod:
GeciciUrunadi = Me.urunadı

satırının bir altına

Kod:
'mıktar = mıktar + 1
 
If Me.mıktar.Value < 100 Then
    Me.mıktar = Me.mıktar + 1
End If

kodlarını dahil ediniz.

aynı şekilde,ÇIKAR adlı butonun içeriğindeki yine aynı ifadeli satırın (GeciciUrunadi = Me.urunadı) altına da
Kod:
'mıktar = mıktar - 1
If Me.mıktar.Value > 0 Then
    Me.mıktar = Me.mıktar - 1
End If

kod ifadelerini dahil edip kaydediniz.

Böylece,miktar artırma / eksiltme hususuna dair eksi değer gösterme sorununu da çözmüş olursunuz.bilginize…iyi çalışmalar,saygılar.
sayın fascioğlu;
paylaşım için teşekkürler güzel bir paylaşım ve çalışma olmuş

benimde dikkatimi çeken olay sayın atoz112 nin de belirtmiş olduğu ürün ekle / çıkar bölümündeydi kendisi de bununla ilgili gerekli açıklamayı yapmış
Çalışmalarınızın devamını dilerim.
Sayın Atoz 112,
Öncelikle zaman ayırıp ilgilendiğiniz için çok teşekkür ederim,Yalnız sorun çözülmedi daha anlaşılır olması adına sizden ricam iki masa açın ve menüden adisyon girişi yapın.Daha sonra dolu masalardan birine tıklayın,fıs formunda bulunan adisyon çeşitlerine ekleme yapmak veya çıkarmak için ekle butonuna tıklayın ve ilk ve hiç bir uyarı vermeden ilk satırda ekleme yaptığını göreceksiniz.
ikinci husuda yine çıkarma yaptıtığımızda - ye düştüğünü göreceksiniz.

Saygılarımla.
sayın fascioglu,

eklediğiniz örnek uygulama üzerinde yapılan çalışma ile konunuzun 2. ve 3.mesajlarında yazılı hususların uygulanması neticesinde herhangi bir olumsuz duruma denk gelinmemiştir.

EK'te;
bu hususlar ile hazırlanmış örnek uygulama mevcuttur.inceleyebilirsiniz.

bilginize...iyi çalışamalar,saygılar.
Sayfalar: 1 2