Sayın hocalarım,
Ekteki çalışmamdaki ÜRETİM formunda ürün kodunu seçince daha önce girmiş olduğum aynı ürünün numaratör son sayısının ilk no ya getirmesini istiyorum.
Saygılarımla,
Ahmet Yenginoğlu
Alıntı: XX denetiminden YY seçince ZZ tablosunda TT alanında yer alan verinin son GG karakterinin formda RR alanında gösterilmesini istiyorum.
Me.URUN_ADI.Value = Me![URUN_KODU].Column(2)
Me.FIRMA_KODU.Value = Me![URUN_KODU].Column(3)
Me.FIRMA_ADI.Value = Me![URUN_KODU].Column(4)
Me.F_OZEL_KODU.Value = Me![URUN_KODU].Column(5)
Me.MAM_GRAM.Value = Me![URUN_KODU].Column(6)
Me.KALIP_GOZU_SAYISI.Value = Me![URUN_KODU].Column(7)
Me.KALIP_RAFI.Value = Me![URUN_KODU].Column(8)
Me.BASKI_SURESI.Value = Me![URUN_KODU].Column(9)
Me.HAMMADDE_KOD.Value = Me![URUN_KODU].Column(10)
Me.HAMMADDE_AD.Value = Me![URUN_KODU].Column(11)
Me.Açılan_Kutu361.Value = Me![URUN_KODU].Column(12)
Me.PRES_NO.Value = Me![URUN_KODU].Column(13)
Me.Metin365.Value = Me![URUN_KODU].Column(14)
Me.PHOTO_IMG.Picture = Me![URUN_KODU].Column(16)
Me.ImagePath.Value = Me![URUN_KODU].Column(16)
Me.SIPARISNO.Value = Me![URUN_KODU].Column(18)
Me.FSMNO.Value = Me![URUN_KODU].Column(19)
Me.KAPASTE.Value = Me![URUN_KODU].Column(15)
URETADET = Dlookup ("[ToplaSIP_ADET]", "URET_ADET_SAY", "[SIPARIS_NO]=" & Form![SIPARISNO])
SIPARISADET = Dlookup ("[ADEDI]", "tbl_SIPARIS", "[SIPARIS_NO]=" & Me.SIPARISNO)
'ATOZ112
'AŞAĞIDAKİ KODLAR İPTAL EDİLMİŞTİR.
'Me.ILKNO.Value = Dlookup ("SONNO", "URET Sorgu", "[URUN_KODU]= '" & [URUN_KODU] & "' And [URET_NO]= '" & [URET_NO] & "'")
'ATOZ112
'AŞAĞIDAKİ KODLAR DAHİL EDİLMİŞTİR.
Me.ILKNO.Value = Dlookup ("SONNO", "URET Sorgu", "URUN_KODU='" & Me.URUN_KODU.Column(1) & "' And [URET_NO]=" & Me.URET_NO)
Me.GUNLUK_KALIP = 32000 / Me.BASKI_SURESI
Me.GUNLUK_ADET = Me.GUNLUK_KALIP * Me.KALIP_GOZU_SAYISI