ERP Nedir? | Türkiye'nin ERP Forum Platformu Ana Sayfa
Forum Anasayfa Forum Anasayfa > ERP Temel Paketler > ERP Fatura Modülü
  Aktif Konular Aktif Konular RSS - Mal Fazlasi Problemi
  SSS SSS  Forumu Ara   Etkinlikler   Kayıt Ol Kayıt Ol  Giriş Giriş

ERP Nedir? Enterprise Resource Planning nasıl çalışır? İş süreçleri ile ilgili tüm soru ve cevapları ERPNe.org'da.

Ülkemizde hızla gelişmekte olan ERP yazılım sektörümüzün, Yerli ve Yabancı ERP işlemlerinin tanıtımı ve kullanıcılarının buluşma noktası olması hedefiyle kurulan sitemize hoş geldiniz.

Ülkemizdeki Ne.org konseptinde bir ilk olarak yayın hayatına başlayan ERPNe.org, Kurumsal Kaynak Planlaması yazılımlarını kullananların bilgi kaynağı/Portal olmak amacı ile kurulmuştur.

Genellikle yurt dışında büyük üreticiler tarafından geliştirilen SQL, Delphi, ASP, CSharp gibi teknolojilerin anlatıldığı sitelerin kullandıkları (WhatisSQL, WhatisASP) (Ülkemizde Netsis Nedir, Mikro Nedir, SAP Nedir yada Logo Nedir gibi kullanıcı sorularına) Ne ve nedir konseptinde yeni bir açılım olmasını da hedefleyen ERPNe.ORG' un, ülkemizin uluslararası ERP sektörü içinde hak ettiği yeri almasında ve ERP ürünlerini kullananların bir araya gelerek Yerli ERP'nin gelişmesine katkı sağlayacakları önemli bir kilometre taşı olacağı düşüncesindeyiz.


Mal Fazlasi Problemi

 Yanıt Yaz Yanıt Yaz
Yazar
Mesaj
  Konu Arama Konu Arama  Topic Seçenekleri Topic Seçenekleri
wolverine81 Açılır Kutu İzle
Yeni Üye
Yeni Üye
Simge

Kayıt Tarihi: 02 Mayıs 2008
Durum: Aktif Değil
Puanlar: 0
Mesaj Seçenekleri Mesaj Seçenekleri   Teşekkürler (0) Teşekkürler(0)   Alıntı wolverine81 Alıntı  Yanıt YazCevapla Mesajın Direkt Linki Konu: Mal Fazlasi Problemi
    Gönderim Zamanı: 19 Mayıs 2010 Saat 17:59
Merhaba Arkadaslar
 
Biz netsis fusion @6 kullaniyoruz. Bir firmamizda mal fazlasi uygulamasina gececegiz fakat bir kac problemimiz var.
 
Mesela bir stok icin 1000 adet satildiginda 100 adet bedelsiz verilecek bunu ile ilgili kosul tanimlamalarini kosullardan yaptik .
 
Faturada stoku ilk ekledigimizde problemsiz ekliyor fakat stogun uzerinden gectigimizde adet arttirimi ve azaltildiginda mevcut satir da bir degisiklik olmuyor veya ayni stok kodunu stok kodu hanesine yazdigimizda yeni satir ekliyor
 
Bu konu ile ilgili ne yaparsak stok uzerinden gecerken veya stok kodu yazdigimizda ilk girilen satir guncellenir
 
Simdiden tesekkurler
Kolay gelsin
Yukarı Dön
wolverine81 Açılır Kutu İzle
Yeni Üye
Yeni Üye
Simge

Kayıt Tarihi: 02 Mayıs 2008
Durum: Aktif Değil
Puanlar: 0
Mesaj Seçenekleri Mesaj Seçenekleri   Teşekkürler (0) Teşekkürler(0)   Alıntı wolverine81 Alıntı  Yanıt YazCevapla Mesajın Direkt Linki Gönderim Zamanı: 20 Mayıs 2010 Saat 13:28
Soruma cevap verecek baba yigit yok mu :(
Yukarı Dön
fameto Açılır Kutu İzle
Üye
Üye
Simge

Kayıt Tarihi: 21 Kasım 2008
Konum: İstanbul
Durum: Aktif Değil
Puanlar: 0
Mesaj Seçenekleri Mesaj Seçenekleri   Teşekkürler (0) Teşekkürler(0)   Alıntı fameto Alıntı  Yanıt YazCevapla Mesajın Direkt Linki Gönderim Zamanı: 26 Mayıs 2010 Saat 16:19
Arkadaslar Netsiste mal fazlasi vermek istedigimiz stoklarini detay kosullardan tanimlama yaptik. Ilgili Stoklar fatura kalemine ilk ekleme de çalisiyor ancak  kalemler kismina atildiktan sonra Üstünden Tekrar geçip miktar degistirdigimizde Netsis detay kosullarindaki oranlara göre stogun mal fazlasini otomatik degistirmiyor. Sorunu script çalistirarak çözmek istedik ve asagidaki kodu yazdik Ancak;
Miktar kisminin OnExit eventine kodumu yazdim script çalisiyor mal fazlasi yeniden hesaplanip Malfazlasi.Text e ataniyor ancak tabla ilerledigimde asagiya yeni mal fazlasi miktarini atmiyor. Isin ilginç tarafi ayni sekilde stogun üstünden geçip elle mal fazlasi yazarsak kalemi editliyor :(
Uzman arkadaslardan ricam konu hakkinda yardim edebilirmisiniz?
Ahmet SASMAZ
 
if NETSISCORE.NetLibSession.SirketAdi = "Scriptin Çalismasini Istedigim Sirket Adi" and (NETSISCORE.NetLibSession.AktifProgramNo = 1 or NETSISCORE.NetLibSession.AktifProgramNo = 3 or NETSISCORE.NetLibSession.AktifProgramNo = 7) then
Dim KosMiktar
Dim KosMalFaz
Dim Miktar1
Dim Kosul
Dim Carpan
Kosul = Kosul_Kodu.Text
Miktar1 = cint(Miktar.Text)

SET SQL1=NETSISCORE.NetLibDB.GetNewQuery
SQL1.RECSQL("select malfmiktar1, malfazlasi1 from tblkosdetay where kosul_kod='" & Kosul & "' and Stokkodu='" & Kod.Text & "'")

KosMiktar = SQL1.FIELDBYNAME("malfmiktar1").ASSTRING
KosMalFaz = SQL1.FIELDBYNAME("malfazlasi1").ASSTRING

SET SQL1 = Nothing

Carpan = (Miktar1 / KosMiktar)

If Carpan - cint(Carpan)<0 then
 Carpan = cint(Carpan)-1
else
 Carpan = cint(Carpan)
end if

if Carpan >= 1 then
 Malfazlasi.text = (KosMalFaz * Carpan)
 else
 Malfazlasi.text=""
end if
end if



Düzenleyen fameto - 26 Mayıs 2010 Saat 16:23
Yukarı Dön
fameto Açılır Kutu İzle
Üye
Üye
Simge

Kayıt Tarihi: 21 Kasım 2008
Konum: İstanbul
Durum: Aktif Değil
Puanlar: 0
Mesaj Seçenekleri Mesaj Seçenekleri   Teşekkürler (0) Teşekkürler(0)   Alıntı fameto Alıntı  Yanıt YazCevapla Mesajın Direkt Linki Gönderim Zamanı: 31 Mayıs 2010 Saat 16:16
Merhaba Arkadaslar Sorunu Çözdük;
Asagidaki Scripti Malfazlasinin OnEnter eventine yazdigimizda editleme problemide ortadan kalkti.
Tesekkürler Herkeze
Ahmet SASMAZ
 
'Sadece Çalismasini istediginiz sirkette Fatura - Satis Irsaliye - Müsteri siparisinde çalisir.
if NETSISCORE.NetLibSession.SirketAdi = "Çalismasini istedigimiz sirket" and (NETSISCORE.NetLibSession.AktifProgramNo = 1 or NETSISCORE.NetLibSession.AktifProgramNo = 3 or NETSISCORE.NetLibSession.AktifProgramNo = 7) then
Dim KosMiktar
Dim KosMalFaz
Dim Miktar1
Dim Kosul
Dim Carpan
Kosul = Kosul_Kodu.Text
Miktar1 = cint(Miktar.Text)
KosMalFaz = 0
KosMiktar = 0

SET SQL1=NETSISCORE.NetLibDB.GetNewQuery
SQL1.RECSQL("select malfmiktar1, malfazlasi1 from tblkosdetay where kosul_kod='" & Kosul & "' and Stokkodu='" & Kod.Text & "'")

if SQL1.FIELDBYNAME("malfmiktar1").ASSTRING <> "" then KosMiktar = SQL1.FIELDBYNAME("malfmiktar1").ASSTRING
if SQL1.FIELDBYNAME("malfazlasi1").ASSTRING <> "" then KosMalFaz = SQL1.FIELDBYNAME("malfazlasi1").ASSTRING

SET SQL1 = Nothing
    if KosMalFaz <> 0 and KosMalFaz <> "" and KosMiktar <> 0 and  KosMiktar <> "" then
    msgbox(KosMalFaz)
    msgbox(KosMiktar)
    Carpan = (Miktar1 / KosMiktar)
      if Carpan - cint(Carpan)<0 then
       Carpan = cint(Carpan)-1
      else
       Carpan = cint(Carpan)
      end if
      if Carpan >= 1 then
       Malfazlasi.text = (KosMalFaz * Carpan)
      else
       Malfazlasi.text=""
      end if
   end if
end if

Yukarı Dön
 Yanıt Yaz Yanıt Yaz
  Konu Paylaş   

Forum Atla Forum İzinleri Açılır Kutu İzle

Forum Software by Web Wiz Forums® version 11.10
Copyright ©2001-2017 Web Wiz Ltd.

Bu Sayfa 0,890 Saniyede Yüklendi.