private void TransferCorralsToAuction()
{
MassInvoicingDAO massInvoicingDAO = new MassInvoicingDAO();
DistributionDAO distributionDAO = new DistributionDAO();
LogService.WriteInfo("Begin Transfer Corrals to Actions");
var results = new ConcurrentDictionary <string, ResultDTO>();
livestockInCorals.Select(l => l.Code).Distinct().AsParallel().ForAll(client => {
var transferLivestock = livestockInCorals.Where(l => l.Code == client && l.Quantity > 0).AsParallel().ToList();
var batches = massInvoicingDAO.GetBatches(client, user.WhsCode, "N");
results.TryAdd(client, LivestockTransfer.CreateStockTransfer(transferLivestock, batches, user.Series));
});
//another implemetation with same result
/*var results = livestockInCorals.Select(l => l.Code).Distinct().AsParallel().Select(client => {
* var transferLivestock = livestockInCorals.Where(l => l.Code == client && l.Quantity > 0).AsParallel().ToList();
* var batches = massInvoicingDAO.GetBatches(client, user.WhsCode, "N");
* return new KeyValuePair<string, ResultDTO>(client, LivestockTransfer.CreateStockTransfer(transferLivestock, batches, user.Series));
* }).ToDictionary(t => t.Key, t => t.Value);*/
Task.Factory.StartNew(() => {
BindResultColumn(results);
LogService.WriteInfo("Begin Transfer Corrals to Actions");
});
}
public void SetDefaultValues()
{
DistributionDAO distributionDAO = new DistributionDAO();
Task.Factory.StartNew(() => { user.Area = distributionDAO.GetUserCostCenter(); });
Task.Factory.StartNew(() => { return(distributionDAO.GetUserDefaultWarehouse()); })
.ContinueWith((t) => { user.WhsCode = t.Result; user.Series = distributionDAO.GetSeries(t.Result, SAPbobsCOM.BoObjectTypes.oStockTransfer.ToString()); });
}
/// <summary>
/// Create a Food Delivery in Corrals. Data will be stores in Tables ODLN and DLN1 frin SAP B1
/// </summary>
public static ResultDTO CreateDelivery(DeliveryDTO deliveryDTO)
{
var result = new ResultDTO();
var lObjDistributionDAO = new DistributionDAO();
try {
SAPbobsCOM.Documents lObjDocDelivery = (SAPbobsCOM.Documents)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oDeliveryNotes); //ODLN}
var task = Task.Run(() => {
lObjDocDelivery.CardCode = deliveryDTO.CardCode;
lObjDocDelivery.CardName = deliveryDTO.CardName;
lObjDocDelivery.UserFields.Fields.Item("U_GLO_BusinessPartner").Value = deliveryDTO.CardCode;
lObjDocDelivery.DocDate = deliveryDTO.DocDate;
lObjDocDelivery.Series = deliveryDTO.Series;
});
var task2 = Task.Factory.StartNew(() => {
foreach (var docLine in deliveryDTO.DocLines) //DLN
{
lObjDocDelivery.Lines.ItemCode = docLine.ItemCode;
lObjDocDelivery.Lines.ItemDescription = docLine.Dscription;
lObjDocDelivery.Lines.Quantity = docLine.Quantity;
lObjDocDelivery.Lines.WarehouseCode = docLine.WhsCode;
lObjDocDelivery.Lines.UserFields.Fields.Item("U_GLO_BagsBales").Value = docLine.BagsBales;
lObjDocDelivery.Lines.UserFields.Fields.Item("U_GLO_Corral").Value = docLine.Corral;
lObjDocDelivery.Lines.CostingCode = docLine.Area;
lObjDocDelivery.Lines.Price = docLine.Price;
lObjDocDelivery.Lines.Add();
}
});
Task.WaitAll(task, task2);
if (lObjDocDelivery.Add() != 0)
{
LogService.WriteError("DeliveryDI (CreateDocument) " + DIApplication.Company.GetLastErrorDescription());
result.Message = DIApplication.Company.GetLastErrorDescription();
result.Success = false;
return(result);
}
}
catch (Exception ex) {
LogService.WriteError(String.Format("{0}: {1}, {2}", "DeliveryDI(Exception)", ex.Message, ex.StackTrace));
result.Success = false;
result.Message = ex.Message;
return(result);
}
result.Message = "La Entrega se realizó con éxito";
result.Success = true;
return(result);
}
/// <summary>
/// Mass Invoicing
/// </summary>
/// <param name="invoice"></param>
/// <returns></returns>
public static ResultDTO CreateInvoice(DocumentDTO invoice, UserValues user, FloorService floorServiceItem, string type)
{
var result = new ResultDTO();
if (invoice.Document.Debt == 0)
{
result.Success = true;
result.Message = "Ya Se Habia Facturado";
return(result);
}
var massInvoicingDAO = new MassInvoicingDAO();
var distributionDAO = new DistributionDAO();
var objectCode = BoObjectTypes.oInvoices.ToString();
Documents lObjDocInvoice = null;
//var containMainUsage = true;
try {
//Documents lObjDocInvoice = (Documents)DIApplication.Company.GetBusinessObject(BoObjectTypes.oDrafts); //OINV
lObjDocInvoice = (SAPbobsCOM.Documents)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oDrafts);
lObjDocInvoice.DocDate = DateTime.Now;
lObjDocInvoice.CardCode = invoice.Document.Code;
lObjDocInvoice.CardName = invoice.Document.Name;
lObjDocInvoice.PaymentMethod = "99";
lObjDocInvoice.DocObjectCodeEx = "13";
lObjDocInvoice.UserFields.Fields.Item("U_B1SYS_MainUsage").Value = "P01";
lObjDocInvoice.Series = distributionDAO.GetSeries(user.WhsCode, objectCode);
lObjDocInvoice.PaymentGroupCode = massInvoicingDAO.GetPayCondition(invoice.Document.Code);
lObjDocInvoice.UserFields.Fields.Item("U_PE_Origin").Value = type;
lObjDocInvoice.UserFields.Fields.Item("U_GLO_BusinessPartner").Value = invoice.Document.Code;
//lObjDocInvoice.EDocExportFormat = 5;
lObjDocInvoice.EDocGenerationType = EDocGenerationTypeEnum.edocGenerate;
lObjDocInvoice.NumAtCard = string.Format("CM_CR_{0}", DateTime.Today.ToString("ddMMyy"));
#region Comments
//BusinessPartners BPartner = (BusinessPartners)DIApplication.Company.GetBusinessObject(BoObjectTypes.oBusinessPartners);
//BPartner.GetByKey(lObjDocInvoice.CardCode);
//if (BPartner.UserFields.Fields.Item("U_B1SYS_MainUsage").Value.ToString() == "")
//{
// BPartner.UserFields.Fields.Item("U_B1SYS_MainUsage").Value = "P01";
// containMainUsage = false;
//}
//lObjDocInvoice.UserFields.Fields.Item("U_B1SYS_MainUsage").Value = BPartner.UserFields.Fields.Item("U_B1SYS_MainUsage").Value;
#endregion
foreach (var line in invoice.FloorServiceLines)
{
lObjDocInvoice.Lines.ItemCode = floorServiceItem.ItemCode;
lObjDocInvoice.Lines.Quantity = (line.Existence * line.TotalDays);
lObjDocInvoice.Lines.WarehouseCode = line.Corral;
lObjDocInvoice.Lines.Price = floorServiceItem.Price;
lObjDocInvoice.Lines.CostingCode = user.Area;
lObjDocInvoice.Lines.UserFields.Fields.Item("U_SU_BatchAuc").Value = (type.Equals("N")) ? line.Batch : line.DocEntry.ToString();
lObjDocInvoice.Lines.Add();
}
foreach (var line in invoice.DeliveryLines)
{
lObjDocInvoice.Lines.ItemCode = line.ItemCode;
lObjDocInvoice.Lines.Quantity = line.Quantity;
lObjDocInvoice.Lines.Price = line.Price;
lObjDocInvoice.Lines.CostingCode = user.Area;
lObjDocInvoice.Lines.BaseEntry = line.DocEntry;
lObjDocInvoice.Lines.BaseLine = line.LineNum;
lObjDocInvoice.Lines.BaseType = 15; //ODLN
lObjDocInvoice.Lines.Add();
}
if (lObjDocInvoice.Add() != 0)
{
var error = DIApplication.Company.GetLastErrorDescription();
LogService.WriteError("InvoiceDI (CreateDocument) " + error);
result.Success = false;
result.Message = "Error: " + error;
return(result);
}
else
{
string lStrDocEntry = DIApplication.Company.GetNewObjectKey();
result.Success = true;
result.Message = string.Format("La Factura se realizó con éxito con el DocEntry: {0}", lStrDocEntry);
//Update StockTransfer When Auction Invoicing
if (type.Equals("S"))
{
var transferDocEntries = massInvoicingDAO.GetTransferDocEntries(invoice.Document.Code);
if (transferDocEntries != null)
{
if (transferDocEntries.Length > 0)
{
Task.Factory.StartNew(() => {
Parallel.ForEach(transferDocEntries, docEntry => {
StockTransfer lObjDocTransfer = (StockTransfer)DIApplication.Company.GetBusinessObject(BoObjectTypes.oStockTransfer); //OWTR
lObjDocTransfer.GetByKey(docEntry);
lObjDocTransfer.UserFields.Fields.Item("U_GLO_Status").Value = "C";
var resultCode = lObjDocTransfer.Update();
if (resultCode != 0)
{
var error = DIApplication.Company.GetLastErrorDescription();
LogService.WriteError("InvoiceDI (Update Stock Transfers) " + error);
result.Message += ", " + error;
}
});
});
}
}
else
{
result.Success = false;
result.Message += string.Format(" - No se encontró la transferencia para el SN {0}", invoice.Document.Code);
}
}
return(result);
}
}
catch (AggregateException ae) {
ae.Handle(e => {
HandleException(e, "InvoiceDI(Document)");
return(true);
});
}
catch (Exception ex) {
HandleException(ex, "InvoiceDI(Document)" + ex.Message + " " + ex.InnerException.Message);
}
return(new ResultDTO()
{
Success = false, Message = "Error: No Se Pudo Crear La Factura Para el Cliente " + invoice.Document.Name
});
}
/// <summary>
/// Mass Invoicing
/// </summary>
/// <param name="invoice"></param>
/// <returns></returns>
public static ResultDTO CreateDraft(DocumentDTO invoice, UserValues user, FloorService floorServiceItem, string type)
{
var result = new ResultDTO();
var massInvoicingDAO = new MassInvoicingDAO();
var distributionDAO = new DistributionDAO();
var objectCode = "13";
var containMainUsage = true;
try {
Documents lObjDocInvDrf = (Documents)DIApplication.Company.GetBusinessObject(BoObjectTypes.oDrafts); //ODRF
var task = Task.Run(() => {
lObjDocInvDrf.CardCode = invoice.Document.Code;
lObjDocInvDrf.CardName = invoice.Document.Name;
lObjDocInvDrf.PaymentMethod = "99";
BusinessPartners BPartner = (BusinessPartners)DIApplication.Company.GetBusinessObject(BoObjectTypes.oBusinessPartners);
BPartner.GetByKey(lObjDocInvDrf.CardCode);
if (BPartner.UserFields.Fields.Item("U_B1SYS_MainUsage").Value.ToString() == "")
{
BPartner.UserFields.Fields.Item("U_B1SYS_MainUsage").Value = "P01";
containMainUsage = false;
}
lObjDocInvDrf.UserFields.Fields.Item("U_B1SYS_MainUsage").Value = BPartner.UserFields.Fields.Item("U_B1SYS_MainUsage").Value;
//lObjDocInvDrf.UserFields.Fields.Item("U_B1SYS_MainUsage").Value = "Por Definir";
lObjDocInvDrf.UserFields.Fields.Item("U_PE_Origin").Value = type;
lObjDocInvDrf.DocObjectCode = BoObjectTypes.oInvoices;
lObjDocInvDrf.PaymentGroupCode = massInvoicingDAO.GetPayCondition(invoice.Document.Code);
lObjDocInvDrf.Series = distributionDAO.GetSeries(user.WhsCode, objectCode);
lObjDocInvDrf.EDocGenerationType = EDocGenerationTypeEnum.edocGenerate;
});
var task2 = Task.Factory.StartNew(() => {
foreach (var line in invoice.FloorServiceLines)
{
lObjDocInvDrf.Lines.ItemCode = floorServiceItem.ItemCode;
lObjDocInvDrf.Lines.WarehouseCode = line.Corral;
lObjDocInvDrf.Lines.Quantity = (line.Existence * line.TotalDays);
lObjDocInvDrf.Lines.Price = floorServiceItem.Price;
lObjDocInvDrf.Lines.CostingCode = user.Area;
lObjDocInvDrf.Lines.UserFields.Fields.Item("U_SU_BatchAuc").Value = line.Batch;
lObjDocInvDrf.Lines.Add();
}
foreach (var line in invoice.DeliveryLines)
{
lObjDocInvDrf.Lines.ItemCode = line.ItemCode;
lObjDocInvDrf.Lines.Quantity = line.Quantity;
lObjDocInvDrf.Lines.Price = line.Price;
lObjDocInvDrf.Lines.CostingCode = user.Area;
lObjDocInvDrf.Lines.BaseEntry = line.DocEntry;
lObjDocInvDrf.Lines.BaseLine = line.LineNum;
lObjDocInvDrf.Lines.BaseType = 15; //ODLN
lObjDocInvDrf.Lines.Add();
}
});
//lObjDocInvDrf.EDocGenerationType = SAPbobsCOM.EDocGenerationTypeEnum.edocGenerate;
//lObjDocInvDrf.EDocExportFormat = 9;
Task.WaitAll(task, task2);
if (lObjDocInvDrf.Add() != 0)
{
LogService.WriteError("InvoiceDI (Draft) " + DIApplication.Company.GetLastErrorDescription());
result.Success = false;
result.Message = "Error: " + DIApplication.Company.GetLastErrorDescription();
}
else
{
string lStrDocEntry = DIApplication.Company.GetNewObjectKey();
result.Success = true;
result.Message = DIApplication.Company.GetNewObjectKey();
if (containMainUsage == false)
{
result.Success = true;
result.Message = DIApplication.Company.GetNewObjectKey();
SAPbouiCOM.Framework.Application.SBO_Application.StatusBar.SetText("El socio de negocios no contenia Uso de CFDI, se asigno le asigno por default 'Por Definir'"
, SAPbouiCOM.BoMessageTime.bmt_Short, SAPbouiCOM.BoStatusBarMessageType.smt_Success);
}
}
}
catch (AggregateException ae) {
LogService.WriteInfo(String.Format("Error: {0}", ae.Message));
LogService.WriteError(ae);
ae.Handle(e => {
HandleException(e, "InvoiceDI(Draft)");
result.Message = "Error: " + e.Message;
result.Success = false;
return(true);
});
}
catch (Exception ex) {
HandleException(ex, "InvoiceDI(Draft)");
result.Message = "Error: " + ex.Message;
result.Success = false;
}
return(result);
}
/// <summary>
/// 이동 버튼 이벤트, 현재 값들의 물류가 이동된다.
/// </summary>
/// <param name="sender"></param>
/// <param name="e"></param>
private void btn_moving_Click(object sender, EventArgs e)
{
if (Validation())
{
// 물류등록 프로시저의 매개변수
Distribution dist = new Distribution();
// 출고창고 입력
foreach (var item in warehouses)
{
if (item.Warehouse_name != cmb_before.SelectedItem.ToString())
{
continue;
}
else
{
dist.Before_warehouse_code = item.Warehouse_code;
break;
}
}
// 이동날짜 입력
dist.Move_date = dt_moveDate.Value;
// 입고창고 입력 (반복입력)
foreach (var item in warehouses)
{
if (item.Warehouse_name != cmb_after.SelectedItem.ToString())
{
continue;
}
else
{
for (int i = 0; i < lv_afterStock.Items.Count; i++)
{
dist.After_warehouse_code += item.Warehouse_code + "|";
}
break;
}
}
dist.After_warehouse_code = dist.After_warehouse_code.Substring(0, dist.After_warehouse_code.Length - 1);
// 품목번호,갯수 입력 (반복입력)
foreach (ListViewItem item in lv_afterStock.Items)
{
dist.Item_code += item.SubItems[0].Text.ToString() + "|";
dist.Dist_count += item.SubItems[2].Text.ToString() + "|";
break;
}
dist.Item_code = dist.Item_code.Substring(0, dist.Item_code.Length - 1);
dist.Dist_count = dist.Dist_count.Substring(0, dist.Dist_count.Length - 1);
DistributionDAO distributionDAO = new DistributionDAO();
try
{
distributionDAO.SET_DISTRIBUTION(dist);
MessageBox.Show("등록 완료");
this.DialogResult = DialogResult.OK;
this.Close();
}
catch (Exception ex)
{
MessageBox.Show("DB 오류발생! \r\n" + ex.Message);
return;
}
}
}
/// <summary>
/// Mass Invoicing
/// </summary>
/// <param name="invoice"></param>
/// <returns></returns>
public static ResultDTO CreateInventoryExit(DocumentDTO iExit, string type, UserValues user)
{
var objectCode = BoObjectTypes.oInventoryGenExit.ToString();
var result = new ResultDTO();
var distributionDAO = new DistributionDAO();
try {
if (iExit.AuthProcess)
{
OpenGoodsIssuesForm(iExit, type, user);
}
else
{
Documents lObjDocIExit = (Documents)DIApplication.Company.GetBusinessObject(BoObjectTypes.oInventoryGenExit); //OIGE
var task = Task.Factory.StartNew(() => {
lObjDocIExit.Series = distributionDAO.GetSeries(user.WhsCode, objectCode);
lObjDocIExit.UserFields.Fields.Item("U_GLO_BusinessPartner").Value = iExit.Document.Code;
lObjDocIExit.UserFields.Fields.Item("U_PE_Origin").Value = type;
lObjDocIExit.UserFields.Fields.Item("U_GLO_Status").Value = !user.AppraisalValidation ? "O" : "C";
lObjDocIExit.UserFields.Fields.Item("U_GLO_InMo").Value = "S-GAN";
});
var task2 = Task.Factory.StartNew(() => {
foreach (var line in iExit.Lines)
{
lObjDocIExit.Lines.ItemCode = line.ItemCode;
lObjDocIExit.Lines.Quantity = line.Quantity;
lObjDocIExit.Lines.WarehouseCode = line.Corral;
lObjDocIExit.Lines.CostingCode = user.Area;
var batches = iExit.Batches.Where(b => b.Corral == line.Corral && b.AuctDate == line.AuctDate && b.ItemCode == line.ItemCode).AsParallel().ToList();
foreach (var batch in batches)
{
if (batches.Count == 1)
{
lObjDocIExit.Lines.BatchNumbers.Quantity = line.Quantity;
lObjDocIExit.Lines.BatchNumbers.BatchNumber = batch.Batch;
}
else
{
if (line.Quantity - batch.Quantity > 0)
{
lObjDocIExit.Lines.BatchNumbers.BatchNumber = batch.Batch;
lObjDocIExit.Lines.BatchNumbers.Quantity = batch.Quantity;
line.Quantity -= batch.Quantity;
}
else if (line.Quantity > 0)
{
lObjDocIExit.Lines.BatchNumbers.BatchNumber = batch.Batch;
lObjDocIExit.Lines.BatchNumbers.Quantity = line.Quantity;
line.Quantity -= batch.Quantity;
}
}
lObjDocIExit.Lines.BatchNumbers.Add();
}
lObjDocIExit.Lines.Add();
}
});
Task.WaitAll(task, task2);
if (lObjDocIExit.Add() != 0)
{
LogService.WriteError("InventoryExitDI (CreateDocument) " + DIApplication.Company.GetLastErrorDescription());
result.Success = false;
result.Message = "Error: " + DIApplication.Company.GetLastErrorDescription();
}
else
{
int lIntInvGenExit = int.Parse(DIApplication.Company.GetNewObjectKey());
result.Success = true;
result.Message = string.Format("La Salida de Inventario se Realizó con Éxito con DocEntry: {0}", lIntInvGenExit);
}
}
}
catch (AggregateException ae) {
ae.Handle(e => {
HandleException(e, "InventoryExitDI (AE)");
result.Message = "Error: " + e.Message;
result.Success = false;
return(true);
});
}
catch (Exception ex) {
HandleException(ex, "InventoryExitDI (Document)");
result.Message = "Error: " + ex.Message;
result.Success = false;
}
return(result);
}
private static void OpenGoodsIssuesForm(DocumentDTO pObjExitDTO, string pStrType, UserValues pObjUser)
{
int lIntDraftKey = 0;
string lStrObjectCode = "60";
var result = new ResultDTO();
var distributionDAO = new DistributionDAO();
//lIntDraftKey = distributionDAO.GetDraftKey(pObjExitDTO.Document.Code);
//if (lIntDraftKey == 0)
//{
SAPbobsCOM.Documents lObjDraftInvoice = (SAPbobsCOM.Documents)DIApplication.Company.GetBusinessObject(SAPbobsCOM.BoObjectTypes.oDrafts);
lObjDraftInvoice.DocObjectCodeEx = "60";
lObjDraftInvoice.Series = distributionDAO.GetSeries(pObjUser.WhsCode, lStrObjectCode);
lObjDraftInvoice.UserFields.Fields.Item("U_GLO_BusinessPartner").Value = pObjExitDTO.Document.Code;
lObjDraftInvoice.UserFields.Fields.Item("U_PE_Origin").Value = pStrType;
lObjDraftInvoice.UserFields.Fields.Item("U_GLO_Status").Value = !pObjUser.AppraisalValidation ? "O" : "A";
lObjDraftInvoice.UserFields.Fields.Item("U_GLO_InMo").Value = "S-GAN";
foreach (var line in pObjExitDTO.Lines)
{
lObjDraftInvoice.Lines.ItemCode = line.ItemCode;
lObjDraftInvoice.Lines.Quantity = line.Quantity;
lObjDraftInvoice.Lines.WarehouseCode = line.Corral;
lObjDraftInvoice.Lines.CostingCode = pObjUser.Area;
var batches = pObjExitDTO.Batches.Where(b => b.Corral == line.Corral && b.AuctDate == line.AuctDate && b.ItemCode == line.ItemCode).AsParallel().ToList();
foreach (var batch in batches)
{
if (batches.Count == 1)
{
lObjDraftInvoice.Lines.BatchNumbers.Quantity = line.Quantity;
lObjDraftInvoice.Lines.BatchNumbers.BatchNumber = batch.Batch;
}
else
{
if (line.Quantity - batch.Quantity > 0)
{
lObjDraftInvoice.Lines.BatchNumbers.BatchNumber = batch.Batch;
lObjDraftInvoice.Lines.BatchNumbers.Quantity = batch.Quantity;
line.Quantity -= batch.Quantity;
}
else if (line.Quantity > 0)
{
lObjDraftInvoice.Lines.BatchNumbers.BatchNumber = batch.Batch;
lObjDraftInvoice.Lines.BatchNumbers.Quantity = line.Quantity;
line.Quantity -= batch.Quantity;
}
}
lObjDraftInvoice.Lines.BatchNumbers.Add();
}
lObjDraftInvoice.Lines.Add();
}
if (lObjDraftInvoice.Add() != 0)
{
string gg = DIApplication.Company.GetLastErrorDescription();
LogService.WriteError("InventoryExitDI (CreateDocument) " + DIApplication.Company.GetLastErrorDescription());
}
else
{
//lIntDraftKey = distributionDAO.GetDraftKey(pObjExitDTO.Document.Code);
lIntDraftKey = int.Parse(DIApplication.Company.GetNewObjectKey());
if (lIntDraftKey > 0)
{
OpenDraft(lIntDraftKey);
}
}
//}
//else
//{
// OpenDraft(lIntDraftKey);
//}
}
public static ResultDTO CreateStockTransfer(List <LivestockDTO> livestock, List <BatchDTO> allBatches, int series)
{
DistributionDAO distributionDAO = new DistributionDAO();
var result = new ResultDTO();
try {
var oStockTransfer = (StockTransfer)DIApplication.Company.GetBusinessObject(BoObjectTypes.oStockTransfer); //OWTR
oStockTransfer.UserFields.Fields.Item("U_GLO_BusinessPartner").Value = livestock[0].Code;
oStockTransfer.FromWarehouse = "CRHE";
oStockTransfer.ToWarehouse = "SUHE";
oStockTransfer.Series = series;
oStockTransfer.DocDate = DateTime.Now;
foreach (var line in livestock)
{
oStockTransfer.Lines.ItemCode = line.ItemCode;
oStockTransfer.Lines.ItemDescription = line.ItemName;
oStockTransfer.Lines.Quantity = line.Quantity;
oStockTransfer.Lines.FromWarehouseCode = line.Corral;
oStockTransfer.Lines.WarehouseCode = "SUHE";
var batches = allBatches.Where(b => b.Corral == line.Corral && b.AuctDate == line.AuctDate && b.ItemCode == line.ItemCode).AsParallel().ToList();
foreach (var batch in batches)
{
if (batches.Count == 1)
{
oStockTransfer.Lines.BatchNumbers.Quantity = line.Quantity;
oStockTransfer.Lines.BatchNumbers.BatchNumber = batch.Batch;
}
else
{
if (line.Quantity - batch.Quantity > 0)
{
oStockTransfer.Lines.BatchNumbers.BatchNumber = batch.Batch;
oStockTransfer.Lines.BatchNumbers.Quantity = batch.Quantity;
line.Quantity -= batch.Quantity;
}
else if (line.Quantity > 0)
{
oStockTransfer.Lines.BatchNumbers.BatchNumber = batch.Batch;
oStockTransfer.Lines.BatchNumbers.Quantity = line.Quantity;
line.Quantity -= batch.Quantity;
}
}
oStockTransfer.Lines.BatchNumbers.Add();
}
oStockTransfer.Lines.Add();
}
if (oStockTransfer.Add() != 0)
{
LogService.WriteError("StockTransfer (CreateDocument) " + DIApplication.Company.GetLastErrorDescription());
result.Success = false;
result.Message = "Error: " + DIApplication.Company.GetLastErrorDescription();
}
else
{
result.Success = true;
result.Message = "El translado de corrales a subsata se realizó con éxito";
}
}
catch (Exception ex) {
HandleException(ex, "TransferDI");
}
return(result);
}
