Aşağıdaki şekilde üretim emrini oluşturabilirsiniz.
if ctrl="Uretimemri" then
ProdApp = Application.NewProductionApplication()
itmCls = ProdApp.NewPrdItmClsLines()
PackDate(16, 02, 2016, ttarih)
PackDate(16, 02, 2016, tarih)
ProdRef = ProdApp.ProdOrderAutomaticGenerate(10, 2, 2, ttarih, 0, 20, itmCls, tarih, "~", 23)
if ProdRef = 0 then
warn(ProdApp.GetLastErrorString())
else
warn(ProdRef)
end if
end if
Parametreler;
1.Mamul referansı
2.Reçete referansı
3.Reçete Revizyon referansı
4.Üretim başlanğıç tarihi
5.Fabrika numarası
6.Planlanan üretim
7.Malzeme Listesi
8.Fiş tarihi
9.Fiş numarası
10.Mamul kartına bağlı birim setinin üretimde kullanılacacak biriminin referansı
Umut Bey;
Resimdeki bibi bir hata alıyorum kodlar aşğıdaki gibidir.
Fakat hataya ragmen üretim emri oluşuyor.
itemRef=84
BOMRef=5
BOMRevRef=5
FactoryNr=0
ficheNo=11111111
uomR = 24
Adet = 20
ProdApp = Application.NewProductionApplication()
itmCls = ProdApp.NewPrdItmClsLines()
PackDate(16, 03, 2016, ttarih)
PackDate(16, 03, 2016, tarih)
ProdRef = ProdApp.ProdOrderAutomaticGenerate(itemRef, BOMRef, BOMRevRef, ttarih, FactoryNr, Adet, itmCls, tarih, ficheNo, uomR)
if ProdRef = 0 then
err = ProdApp.GetLastErrorString()
warn(err)
else
warn(ProdRef)
end if
Bu hata varchar tanımlı bir alana int bir değer göndermeye çalıştığınız için meydana gelmektedir.
Fiş numarası string olması gerekmektedir direkt olarak integer gönderdiğiniz için bu hatayı almaktasınız.
Aşağıdaki şekilde Fiş numarasını gönderirseniz sıkıntı çıkmayacaktır ayrıca Fiş numarası kısmında "~" da gönderebilirsiniz kayıt numaralama şablonundan sıradaki numarayı alacaktır.
ficheNo="11111111" veya ficheNo="~"
Üretim emrini başarılı bir şekilde oluşturuyorum.
Fakat üretim emrinden sonra üretim fişinide oluşturmak istiyorum, mümkünmüdür.
Cevap vermek için giriş yapmanız gerekmektedir.
Soru sormak için lütfen oturum açınız.
Object Designer İçinden Üretim Emri
16/02/16 13:06   Tiger/Logo Object Designer (LOD)Merhaba;
Linkte c# için üretim emri örneği mevcut : http://wikidocs.logo.com.tr/display/WUA/NewProductionApplication
Fakat Lobject.dll'i Object designer içinden kullanarak üretim emri oluşturmak istiyorum fakat nesneyi oluşturamıyorum.
ItemClsLines = Application.NewProductionApplication(45) 'Burada Hata Veriyor.
ItemClsLines.NewPrdItmClsLines()
itemRef=10
BOMRef=1
targetDate="2016-02-19"
FactoryNr=4
PlnAmount=1
ficheDate="2016-02-19"
ficheNo="~"
uomR = 23
prodOrdRef = ItemClsLines.ProdOrderAutomaticGenerate(itemRef, BOMRef, RevRef, targetDate, FactoryNr, PlnAmount, ItemClsLines, ficheDate, ficheNo, uomR)
warn(prodOrdRef)
ProdApp.GetLastError().ToString() + " : " + ProdApp.GetLastErrorString().ToString()
Üretim Emri