[FORM] aynı kayıt varsa uyarsın
#7
(14-09-2013, 19:25)dazi demiş ki: örneğinizi eklermisiniz.
tabiki: http://dosya.co/f9j27bwuaze8/Database1_B...accdb.html
ancak mesela sadece ben dosya no sütunun üzerinden benzerlik yakalandığında değil sadece
durum (gönderdiğim projede listbox'a baktığımızda) dosya no sunu aynı yakaladığı kaydın durum sütununda da eğer tamamlanmadı veya risk durum sütununda değerlendirilmedi durumu değişmediyse kayıtlayamazsın mesajı veya kaydın aynısındaan var mesajı gelsin istiyorum
yardımcı olursanız sevinirim Smile



  Alıntı
Bu mesajı beğenenler:
#8
sayın mesut açıkcası sorunuzdaki mantığı anlamadım.
Şartınız: Eğer Girilen dosya numarası aynı ise ve girilen aynı dosya numarasına ait ilk kaydın durum alanı=tamamlanmadı veya risk durum alanı=değerlendirilmedi ise uyarı ver.
soru1: Girilen dosya numarasının aynı olmasına rağmen, durum alanı=tamamlanmadı veya risk durum alanı=değerlendirilmedi dışında başka değerler alırsa mükerrer girilen dosya numarasına ne olacak?


Bence şu daha mantıklı ; eğer dosya numarası mükerrer girilirse mesaj ver (mükerrer kayıt girdiniz, ilgili kayıda yönlendiriliyorsunuz) kayıda gidildiğinde de durum alanı=tamamlanmadı veya risk durum alanı=değerlendirilmedi ise tekrar ikinci bir mesaj ver (ilgili alanları değiştiriniz) değilse mükerrer girilen kaydı geri al ve bir başka mesaj ver (Girmiş olduğunuz dosya numarası mevcut yeni bir dosya no girin.)



  Alıntı
Bu mesajı beğenenler:
#9
(15-09-2013, 01:41)dazi demiş ki: sayın mesut açıkcası sorunuzdaki mantığı anlamadım.
Şartınız: Eğer Girilen dosya numarası aynı ise ve girilen aynı dosya numarasına ait ilk kaydın durum alanı=tamamlanmadı veya risk durum alanı=değerlendirilmedi ise uyarı ver.
soru1: Girilen dosya numarasının aynı olmasına rağmen, durum alanı=tamamlanmadı veya risk durum alanı=değerlendirilmedi dışında başka değerler alırsa mükerrer girilen dosya numarasına ne olacak?


Bence şu daha mantıklı ; eğer dosya numarası mükerrer girilirse mesaj ver (mükerrer kayıt girdiniz, ilgili kayıda yönlendiriliyorsunuz) kayıda gidildiğinde de durum alanı=tamamlanmadı veya risk durum alanı=değerlendirilmedi ise tekrar ikinci bir mesaj ver (ilgili alanları değiştiriniz) değilse mükerrer girilen kaydı geri al ve bir başka mesaj ver (Girmiş olduğunuz dosya numarası mevcut yeni bir dosya no girin.)
üstat şimdi bu proje de gelen evraklar öndeğerlendirmeci tarafından değelendirilir doktor görüşüne sunulacaksa ön değerlendirmeci tarafından doktor görüş formu kullanılarak kaydı yapılır durum değeri = tamamlanmadı olarak kaydı yapılan dosya doktor tarafından değerlendirilir,görüşünü yazan doktor durum değerini tamamlandı diye değiştirir. DURUM değerini tamamlandı olarak gören risk değeerlendirmeci son değerlendirmeyi yapar aalacağı kararı risk durum değeri üzerinden belirtir dosya ya ödenecektir,ya red vs ancak bunu risk durum değerindeki: değerlendirilmedi varsayılan değerini değiştirerek yapar. Bu arada eğer dosya hakkında risk durum değeri evrak istendi gibi bir sonuç çıkmışsa o dosya hakkında tekrar eksik evrak istenecek ve eksik evrakın gönderilmesi halinde aynı doktor görüş talebi yine yapılacakdır demektir . Sadece dosya numarası üzerinden katı bir kayıt engelleme yaparsam dosya daha değerlendirme işlemi tamamlanmış olmasına rağmen daha önceki kayıtları da görüp bana aynı kişi için kayda izin vermeyecek anlamına gelir ki olmaz.Bu yüzden dosya numarası= aynı ise ama durum değeri tamamlandı ve risk durum değeri "evrak istendi" olduyssa dosyanın yenide kaydına izin verilmeli
teşekkür ederim şimdidenCool



  Alıntı
Bu mesajı beğenenler:
#10
Merhabalar
önce tablonuzda
dosya numarası=dosya_numarası
rısk durumu=rısk_durumu
olarak değiştirildi.(alan isimleri arasında boşluk bırakacaksanız bunu alt tire ile yapınız)
sonra formunuzda dosya numarası alanın güncelleştirme sonrası olay yordamındaki eski kod

Visual Basic
  1. If DLookup("DOSYA_NUMARASI", "TDRGR", "DOSYA_NUMARASI='" & Me.DOSYA_NUMARASI & "' And DURUM = 'TAMAMLANMADI' and RISK_DURUMU='DEĞERLENDİRİLMEDİ'") Then
  2.  
  3. Me.Undo
  4.  
  5. MsgBox "Girmeye çalıştığınız " _
  6. & Me.DOSYA_NUMARASI & " Adlı dosya no daha önce girilmiş." _
  7. & vbCr & vbCr & "Lütfen Kayıtlarınızı Kontrol Ediniz.", vbInformation _
  8. , "Tekrarlanan Veri Girişi"
  9.  
  10. End If


ile değiştirildi.Kolay gelsin.Örnek ekte.


Eklenti Dosyaları
.rar   Database1_Backup (1).rar (Boyut: 245,92 KB / İndirilme: 182)



  Alıntı
Bu mesajı beğenenler:
#11
Eywallah..........



  Alıntı
Bu mesajı beğenenler:
#12
(31-08-2012, 10:31)dazi demiş ki: Buyrun sizin için küçük bir örnek hazırladım tablo ve alan isimlerini ve istiyorsanız uyarı mesajını kendinize göre düzenleyiniz.Kolay gelsin

sayın hocam örneğiniz ilaç gibi geldi çok teşekkür ediyorum, ilgili kaydıda açıp göstermesi çok güzel ama işim gereği yine aynı isim oluşturarak başka bir kayıt yapmam gerektiği durumlar olabiliyor burda yinede devam et veya ilgili kaydı aç gibi eklemeler yapılabilirmi veyahut ilgili sayfada ( mükerrer kayıt on-off ) gibi bir tuş anahtar olabilirmi eğer mümkünse örnek bir dosya eklerseniz çok memnun olurum. saygılar..



  Alıntı
Bu mesajı beğenenler:


Benzer Konular...
Konu: Yazar Cevaplar: Gösterim: Son Mesaj
  Aramada Hep Aynı Veriler Geliyor ankaram 4 131 21-11-2023, 10:46
Son Mesaj: ankaram
  Aynı Tarihli Veri Varsa Işlem Yapmasın Ve Sql Col Sayısını Arttırma snapper 9 320 20-10-2023, 00:36
Son Mesaj: dsezgin
  [VBA] Kayıt Iptali: Kayıt Iptal Tablosuna Ekle, Kayıdı Sil Işlemi programmer67 6 309 21-07-2023, 10:40
Son Mesaj: onur_can
  [TABLO] Tablodaki Aynı Isimlerin Sayısını Yazdırma omergenc7 13 560 26-03-2023, 13:11
Son Mesaj: dsezgin
access-sql-9 [RAPOR] Aynı Satırları Bir Kere Gösterip Saydırma oguzt 10 303 14-03-2023, 22:17
Son Mesaj: oguzt
  Başlıkları Aynı Olmayan EXcel Tablosunu Dosya Bul Butonu Ile Accese Veri Almak snapper 1 189 17-12-2022, 03:13
Son Mesaj: dsezgin
  Raporda Aynı ürünler Toplama ankaram 6 264 23-11-2022, 17:54
Son Mesaj: ankaram
  [SORGU] Access Tabloda Sutunundaki Veriyi Aynı Tablodaki Başka Sutuna Kopyalama SBNS 1 291 12-03-2022, 22:55
Son Mesaj: dsezgin

Foruma Git:


Bu konuyu görüntüleyen kullanıcı(lar): 1 Ziyaretçi