Üretim emirleri üzerinde sağtuş menüsündeki “Hızlı gerçekleşen miktar girişi” işleminin karşılığıdır. Metodun düzgün çalışması sonucunda yeni oluşan fişlerin referansları aşağıdaki listelerden okunabilir.
Sarf Fişlerinin listesi : UsageSlips
Ambar Fişlerinin listesi : WHTransSlips
Üretimden Giriş Fişlerinin listesi : InputfromProdSlips
Fire Fişlerinin listesi : ScarpSlips
Bu metod ile oluşan üretimden giriş fişlerinde lot numaralarının şablona göre alınması için Malzeme Yönetimi Parametrelerine yeni bir parametre eklendi. Bu parametre True olduğunda "hızlı gerçekleşen miktar girişleri" ile oluşan üretimden giriş fişlerinde "Lot numaraları" şablona göre alınır.
| Parametreleri | Type | Açıklama |
|---|---|---|
prodOrdRef | Long | Üretim emrinin referansı |
ItemRef | Long | Mamul malzeme referansı |
prodAmnt | Double | Gerçekleşen miktar |
uomRef | Long | Mamul malzeme birimi referansı |
method | Long | Hesaplama şekli (0-reçete, 1-üretim emri) |
removeSidePrdct | Boolean | Yan ürün oluşsun(1)/oluşmasın(0) parametresi |
SlipLists | FastRealizeSlipRefLists | Oluşan fişlerin referans listesi |
[fcDate] | Date | (Opsiyonel) Fişlere tarih set eder. Doldurulmadığında sistem tarihi baz alınır |
[vrntRef] | Long | (Opsiyonel) Variantlı mamul için variant referansı |
| Return Type | Açıklama | |
| Boolean | İşlemin gerçekleşip gerçekleşmediğini bildirir | |
Set ProdApp = UnityApp.NewProductionApplication
Set Lines = ProdApp.NewSlipRefLists
ok = ProdApp.FastRealizeFicheGenerate(5, 4, 6, 23, 1, False, Lines, "10.03.2009", 7)
If ok = 0 Then
If Lines.InputfromProdSlips.Count > 0 Then
For i = 0 To Lines.InputfromProdSlips.Count - 1
Lines.InputfromProdSlips.ITEM(i).lref
Next i
End If
Else
MsgBox (CStr(ProdApp.GetLastError) + (ProdApp.GetLastErrorString))
End IfUnityObjects.IProductionApplication ProdApp = UnityApp.NewProductionApplication();
UnityObjects.FastRealizeSlipRefLists Lines = ProdApp.NewSlipRefLists();
bool ok =ProdApp.FastRealizeFicheGenerate(5, 4, 6, 23, 1, false , Lines , DateTime.Today, 7);
if (ok)
{
if (Lines.InputfromProdSlips.Count > 0)
{
for (int i = 0; i < Lines.InputfromProdSlips.Count - 1; i++)
{
int line= Lines.InputfromProdSlips.Item[i].lref;
}
}
}
else
{
MessageBox.Show(ProdApp.GetLastError() + "-" + ProdApp.GetLastErrorString());
}| RESPONSE |
|---|
|