george/itca_api_sap_wms
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
3bce3ed1177ce5a254aa294f9c38041a4783d0f6
itca_api_sap_wms/Net.Data/WMS/Recibo/ReciboRepository.cs
T

653 lines
41 KiB
C#
Raw Normal View History

Commit inicial: ITCA_API_SAP_WMS (.NET Core 3.1)
2026-10-05 17:53:41 -05:00
using Microsoft.Extensions.Configuration;
using Microsoft.Extensions.Logging.Abstractions;
using Net.Business.Entities;
using Net.Business.Entities.ServicesLayer;
using Net.Business.Entities.ServicesLayer.CreditNotes;
using Net.Business.Entities.ServicesLayer.InventoryGenEntries;
using Net.Business.Entities.ServicesLayer.Invoices;
using Net.Business.Entities.ServicesLayer.PurchaseDeliveryNotes;
using Net.Business.Entities.ServicesLayer.PurchaseInvoices;
using Net.Business.Entities.ServicesLayer.PurchaseOrders;
using Net.Business.Entities.ServicesLayer.ReturnRequest;
using Net.Business.Entities.ServicesLayer.StockTransfer;
using Net.Business.Entities.WMS.Recibo;
using Net.Connection;
using Net.CrossCotting;
using Net.Data.HelperData.Correlativo;
using Net.Data.HelperData.Stock;
using Net.Data.ServicesLayer;
using Net.Data.ServicesLayer.CreditNotes;
using Net.Data.ServicesLayer.GlobalData;
using Net.Data.ServicesLayer.InventoryGenEntries;
using Net.Data.ServicesLayer.ReturnRequest;
using Net.Data.ServicesLayer.StockTransfer;
using Net.Data.WMS.Enums;
using System;
using System.Collections.Generic;
using System.Linq;
using System.Net.Http;
using System.Text.RegularExpressions;
using System.Threading.Tasks;
namespace Net.Data.WMS.Recibo
{
public class ReciboRepository : RepositoryBase<object>, IReciboRepository
{
#region Variables Globales
private string _aplicacionName;
private string _metodoName;
private readonly Regex regex = new Regex(@"<(\w+)>.*");
private readonly IHttpClientFactory _clientFactory;
private readonly IConfiguration _configuration;
#endregion
public ReciboRepository(IConnectionSQL context, IHttpClientFactory clientFactory, IConfiguration configuration) : base(context)
{
_clientFactory = clientFactory;
_configuration = configuration;
_aplicacionName = GetType().Name;
}
public async Task<BE_ResultadoTransaccion<object>> Create(BE_ReciboRequest entidad)
{
_metodoName = regex.Match(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType.Name).Groups[1].Value.ToString();
ResultadoTransaccion<object> resultadoTransaccion = new ResultadoTransaccion<object>(_metodoName, _aplicacionName);
return await Task.Run(async () =>
{
try
{
//=== INICIALIZA OBJETO DE SAP
PurchaseDeliveryNotesRepository _purchaseDeliveryNotes = new PurchaseDeliveryNotesRepository(_clientFactory, _configuration);
CreditNotesRepository _creditNotesRepository = new CreditNotesRepository(_clientFactory, _configuration, context);
BusinessPartnersRepository businessPartnersRepository = new BusinessPartnersRepository(_clientFactory, _configuration, context);
var response_businessPartnersRepository = await businessPartnersRepository.GetBusinessPartnersByFilter(new FE_BusinessPartners()
{
CardCode = entidad.CodigoERPProveedor
});
if (response_businessPartnersRepository.ListData.Count() == 0)
{
return resultadoTransaccion.GetInformacionResultado("SAP: El Proveedor no se encuentra registrado en SAP", entidad);
}
#region PROCESO POR COMPRA DE IMPORTACION
if (entidad.IdTipo == EnumRecibo.IMPORTACION)
{
//=== INICIALIZA OBJETO DE SAP
BE_PurchaseDeliveryNotes purchaseDeliveryNotes = new BE_PurchaseDeliveryNotes
{
DocObjectCode = "oPurchaseDeliveryNotes",
DocumentLines = new List<BE_PurchaseDeliveryNotesLine>()
};
if (entidad.IdTipoDoc == EnumRecibo.IMPORTACION_ORDEN)
{
PurchaseInvoicesRepository purchaseInvoicesRepository = new PurchaseInvoicesRepository(_clientFactory, _configuration);
BE_ResultadoTransaccion<BE_PurchaseInvoices> response_purchaseInvoicesRepository = purchaseInvoicesRepository.GetPurchaseInvoices(entidad.DocEntry).Result;
if (response_purchaseInvoicesRepository.DocEntry == -1)
{
return resultadoTransaccion.GetInformacionResultado("SAP: Factura de reserva por importaciones no se encuentra", entidad);
}
BE_PurchaseInvoices purchaseOrders = response_purchaseInvoicesRepository.ListData.FirstOrDefault();
purchaseDeliveryNotes.DocCurrency = purchaseOrders.DocCurrency;
purchaseDeliveryNotes.CardCode = purchaseOrders.CardCode;
purchaseDeliveryNotes.CardName = purchaseOrders.CardName;
purchaseDeliveryNotes.PaymentGroupCode = purchaseOrders.PaymentGroupCode;
purchaseDeliveryNotes.DocDate = DateTime.Now;
purchaseDeliveryNotes.DocDueDate = DateTime.Now;
purchaseDeliveryNotes.NumAtCard = entidad.DocImportacion;
purchaseDeliveryNotes.U_SYP_MDCD = entidad.U_SYP_MDCD;
purchaseDeliveryNotes.U_SYP_MDSD = entidad.U_SYP_MDSD;
purchaseDeliveryNotes.U_SYP_MDTD = entidad.U_SYP_MDTD;
entidad.Detalle.ForEach(x =>
{
if (x.CantidadPedida > 0)
{
var Item = purchaseOrders.DocumentLines.ToList().FirstOrDefault(t => t.LineNum == x.Item);
if (Item != null)
{
purchaseDeliveryNotes.DocumentLines.Add(new BE_PurchaseDeliveryNotesLine()
{
Currency = purchaseOrders.DocCurrency,
BatchNumbers = new List<BE_PurchaseDeliveryNotesBatchNumbers>
{
new BE_PurchaseDeliveryNotesBatchNumbers()
{
BatchNumber = DateTime.Now.ToString("yyyyMMddhhmmss"),
Quantity = (int)x.CantidadPedida
},
},
ItemCode = Item.ItemCode,
ItemDescription = Item.ItemDescription,
PriceAfterVAT = Item.PriceAfterVAT,
Quantity = (double)x.CantidadPedida,
WarehouseCode = Item.WarehouseCode,
BaseEntry = entidad.DocEntry,
BaseLine = x.Item,
BaseType = 18,
LineNum = x.Item,
});
}
}
});
var result_purchaseDeliveryNotes = _purchaseDeliveryNotes.SetCreatePurchaseDeliveryNotes(purchaseDeliveryNotes).Result;
if (result_purchaseDeliveryNotes.DocEntry == -1)
{
return resultadoTransaccion.GetInformacionResultado(result_purchaseDeliveryNotes.Message, entidad);
}
return resultadoTransaccion.GetInformacionResultado((int)result_purchaseDeliveryNotes.Data.DocEntry, result_purchaseDeliveryNotes.Data.DocNum.ToString(), "Se registro correctamente...!!!", entidad);
}
if (entidad.IdTipoDoc == EnumRecibo.IMPORTACION_ORDEN_COMPRA)
{
PurchaseOrdersRepository purchaseOrdersRepository = new PurchaseOrdersRepository(_clientFactory, _configuration);
BE_ResultadoTransaccion<BE_PurchaseOrders> response_purchaseOrdersRepository = purchaseOrdersRepository.GetPurchaseInvoices(entidad.DocEntry).Result;
if (response_purchaseOrdersRepository.DocEntry == -1)
{
return resultadoTransaccion.GetInformacionResultado("SAP: Orden de Compra no se encuentra", entidad);
}
BE_PurchaseOrders purchaseOrders = response_purchaseOrdersRepository.ListData.FirstOrDefault();
purchaseDeliveryNotes.DocCurrency = purchaseOrders.DocCurrency;
purchaseDeliveryNotes.CardCode = purchaseOrders.CardCode;
purchaseDeliveryNotes.CardName = purchaseOrders.CardName;
purchaseDeliveryNotes.PaymentGroupCode = purchaseOrders.PaymentGroupCode;
purchaseDeliveryNotes.DocDate = DateTime.Now;
purchaseDeliveryNotes.DocDueDate = DateTime.Now;
purchaseDeliveryNotes.NumAtCard = entidad.DocImportacion;
purchaseDeliveryNotes.U_SYP_MDCD = entidad.U_SYP_MDCD;
purchaseDeliveryNotes.U_SYP_MDSD = entidad.U_SYP_MDSD;
purchaseDeliveryNotes.U_SYP_MDTD = entidad.U_SYP_MDTD;
entidad.Detalle.ForEach(x =>
{
var Item = purchaseOrders.DocumentLines.ToList().FirstOrDefault(t => t.LineNum == x.Item);
if (Item != null)
{
purchaseDeliveryNotes.DocumentLines.Add(new BE_PurchaseDeliveryNotesLine()
{
Currency = purchaseOrders.DocCurrency,
BatchNumbers = new List<BE_PurchaseDeliveryNotesBatchNumbers>
{
new BE_PurchaseDeliveryNotesBatchNumbers()
{
BatchNumber = DateTime.Now.ToString("yyyyMMddhhmmss"),
Quantity = (int)x.CantidadPedida
},
},
ItemCode = Item.ItemCode,
ItemDescription = Item.ItemDescription,
PriceAfterVAT = Item.PriceAfterVAT,
Quantity = (double)x.CantidadPedida,
WarehouseCode = Item.WarehouseCode,
BaseEntry = entidad.DocEntry,
BaseLine = x.Item,
BaseType = 22,
LineNum = x.Item
});
}
});
var result_purchaseDeliveryNotes = _purchaseDeliveryNotes.SetCreatePurchaseDeliveryNotes(purchaseDeliveryNotes).Result;
if (result_purchaseDeliveryNotes.DocEntry == -1)
{
return resultadoTransaccion.GetInformacionResultado(result_purchaseDeliveryNotes.Message, entidad);
}
return resultadoTransaccion.GetInformacionResultado((int)result_purchaseDeliveryNotes.Data.DocEntry, result_purchaseDeliveryNotes.Data.DocNum.ToString(), "Se registro correctamente...!!!", entidad);
}
if (entidad.IdTipoDoc == EnumRecibo.IMPORTACION_SOL_ENTRADA)
{
GlobalDataRepository globalDataRepository = new GlobalDataRepository(_clientFactory, _configuration, context);
var Result_globalDataRepository = globalDataRepository.GetSolicitudIngreso(entidad.DocEntry).Result.ListData.FirstOrDefault();
BE_InventoryGenEntries _InventoryGenEntries = new BE_InventoryGenEntries()
{
DocObjectCode = "oInventoryGenEntry",
DocDate = DateTime.Now,
DocDueDate = DateTime.Now,
PaymentGroupCode = "-2",
DocCurrency = "S/",
DocRate = 1,
DocumentLines = new List<BE_InventoryGenEntriesLine>(),
U_SYP_TPOENTME = Result_globalDataRepository.U_ITC_MDTI,
U_ITC_WMS_NUMINV = "",
U_ARD_PERSOLIC = Result_globalDataRepository.U_ITC_USRSOL,
Comments = Result_globalDataRepository.U_ITC_MDCM
};
int LineNum = 0;
entidad.Detalle.ForEach(detalle =>
{
var LineaDetalle = Result_globalDataRepository.ITC_SOLINGMERDETCollection.FirstOrDefault(x => x.LineId == detalle.Item);
var Precio = HelperStock.GetConsolidado(detalle.CodigoArticulo, Result_globalDataRepository.U_ITC_MDWC).FirstOrDefault().AvgPrice;
_InventoryGenEntries.DocumentLines.Add(new BE_InventoryGenEntriesLine()
{
Currency = "S/",
ItemCode = detalle.CodigoArticulo,
ItemDescription = LineaDetalle.U_ITC_ITEMNAME,
Quantity = (double)detalle.CantidadPedida,
LineNum = LineNum,
PriceAfterVAT = Precio,
LineTotal = Precio * (double)detalle.CantidadPedida,
WarehouseCode = Result_globalDataRepository.U_ITC_MDWC,
AccountCode = LineaDetalle.U_ITC_ACCCODE,
CostingCode = LineaDetalle.U_ITC_CCOSTO ?? "",
BatchNumbers = new List<BE_InventoryGenEntriesBatchNumbers>()
{
new BE_InventoryGenEntriesBatchNumbers()
{
BatchNumber = DateTime.Now.ToString("yyyyMMddhhmmss"),
Quantity = (double)detalle.CantidadPedida
}
}
});
LineNum++;
});
InventoryGenEntriesRepository inventoryGenEntries = new InventoryGenEntriesRepository(_clientFactory, _configuration, context);
var inventoryGenEntries_result = inventoryGenEntries.SetCreateInventoryGenEntries(_InventoryGenEntries, false).Result;
if (inventoryGenEntries_result.StatusCode == -1)
{
return resultadoTransaccion.GetInformacionResultado(inventoryGenEntries_result.Message.ToString(), entidad);
}
return resultadoTransaccion.GetInformacionResultado((int)inventoryGenEntries_result.Data.DocEntry, inventoryGenEntries_result.Data.DocNum.ToString(), "Registrado Correctamente", entidad);
}
}
#endregion
#region PROCESO POR COMPRA NACIONAL
if (entidad.IdTipo == EnumRecibo.NACIONAL)
{
//=== INICIALIZA OBJETO DE SAP
BE_PurchaseDeliveryNotes purchaseDeliveryNotes = new BE_PurchaseDeliveryNotes
{
DocObjectCode = "oPurchaseDeliveryNotes",
DocumentLines = new List<BE_PurchaseDeliveryNotesLine>()
};
PurchaseOrdersRepository purchaseOrdersRepository = new PurchaseOrdersRepository(_clientFactory, _configuration);
BE_ResultadoTransaccion<BE_PurchaseOrders> response_purchaseOrdersRepository = purchaseOrdersRepository.GetPurchaseInvoices(entidad.DocEntry).Result;
if (response_purchaseOrdersRepository.DocEntry == -1)
{
return resultadoTransaccion.GetInformacionResultado("SAP: Orden de Compra no se encuentra", entidad);
}
BE_PurchaseOrders purchaseOrders = response_purchaseOrdersRepository.ListData.FirstOrDefault();
purchaseDeliveryNotes.DocCurrency = purchaseOrders.DocCurrency;
purchaseDeliveryNotes.CardCode = purchaseOrders.CardCode;
purchaseDeliveryNotes.CardName = purchaseOrders.CardName;
purchaseDeliveryNotes.PaymentGroupCode = purchaseOrders.PaymentGroupCode;
purchaseDeliveryNotes.DocDate = DateTime.Now;
purchaseDeliveryNotes.DocDueDate = DateTime.Now;
purchaseDeliveryNotes.NumAtCard = entidad.DocImportacion;
purchaseDeliveryNotes.U_SYP_MDCD = entidad.U_SYP_MDCD;
purchaseDeliveryNotes.U_SYP_MDSD = entidad.U_SYP_MDSD;
purchaseDeliveryNotes.U_SYP_MDTD = entidad.U_SYP_MDTD;
entidad.Detalle.ForEach(x =>
{
var Item = purchaseOrders.DocumentLines.ToList().FirstOrDefault(t => t.LineNum == x.Item);
if (Item != null)
{
purchaseDeliveryNotes.DocumentLines.Add(new BE_PurchaseDeliveryNotesLine()
{
Currency = purchaseOrders.DocCurrency,
BatchNumbers = new List<BE_PurchaseDeliveryNotesBatchNumbers>
{
new BE_PurchaseDeliveryNotesBatchNumbers()
{
BatchNumber = DateTime.Now.ToString("yyyyMMddhhmmss"),
Quantity = (int)x.CantidadPedida
},
},
ItemCode = Item.ItemCode,
ItemDescription = Item.ItemDescription,
PriceAfterVAT = Item.PriceAfterVAT,
Quantity = (double)x.CantidadPedida,
WarehouseCode = Item.WarehouseCode,
BaseEntry = entidad.DocEntry,
BaseLine = x.Item,
BaseType = 22,
LineNum = x.Item
});
}
});
var result_purchaseDeliveryNotes = _purchaseDeliveryNotes.SetCreatePurchaseDeliveryNotes(purchaseDeliveryNotes).Result;
if (result_purchaseDeliveryNotes.DocEntry == -1)
{
return resultadoTransaccion.GetInformacionResultado(result_purchaseDeliveryNotes.Message, entidad);
}
return resultadoTransaccion.GetInformacionResultado((int)result_purchaseDeliveryNotes.Data.DocEntry, result_purchaseDeliveryNotes.Data.DocNum.ToString(), "Se registro correctamente...!!!", entidad);
}
#endregion
Limpieza: comentarios en el codigo, if vacio de CreateHojaRuta y documentacion. Versión 2.1.8.0
2026-10-14 19:31:06 -05:00
// DEVOLUCION: NC (oCreditNotes) con base en la Solicitud de Devolucion (BaseType 234000031).
// Si las lineas de la solicitud vienen de una factura se usan los datos y lotes de la factura; si no, los de la solicitud y el stock de HANA
Commit inicial: ITCA_API_SAP_WMS (.NET Core 3.1)
2026-10-05 17:53:41 -05:00
#region PROCESO DE NOTA DE CREDITO
if (entidad.IdTipo == EnumRecibo.DEVOLUCION)
{
BE_CreditNotesNotes creditNotesNotes = new BE_CreditNotesNotes
{
DocObjectCode = "oCreditNotes",
DocumentLines = new List<BE_CreditNotesLine>()
};
ReturnRequestRepository returnRequestRepository = new ReturnRequestRepository(_clientFactory, _configuration);
BE_ResultadoTransaccion<BE_ReturnRequest> response_purchaseOrdersRepository = returnRequestRepository.GetRequestReturn(entidad.DocEntry).Result;
if (response_purchaseOrdersRepository.DocEntry == -1)
{
return resultadoTransaccion.GetInformacionResultado("SAP: Solicitud de Devolucion no se encuentra", entidad);
}
BE_ReturnRequest returnRequest = response_purchaseOrdersRepository.ListData.FirstOrDefault();
#region OBTIENE FACTURAS RELACIONADA A LA SOLICITUD DE DEVOLUCION
List<int> ListaDocEntryFactura = returnRequest.DocumentLines.Select(x => !x.BaseEntry.HasValue? 0: x.BaseEntry.Value).Distinct().Where(x => x > 0).ToList();
BE_InvoicesConsulta _Invoice = null;
ListaDocEntryFactura.ForEach(DocEntry =>
{
var _InvoiceRepository = new InvoiceRepository(_clientFactory, _configuration, context);
var _Invoice_Result = _InvoiceRepository.GetInvoice(DocEntry).Result;
if (_Invoice_Result.ListData.Count() > 0)
{
_Invoice = _Invoice_Result.ListData.FirstOrDefault();
}
});
string U_SYP_MDTO = "";
string U_SYP_MDCO = "";
string U_SYP_MDSO = "";
DateTime DocDate;
if (_Invoice == null)
{
U_SYP_MDTO = returnRequest.U_SYP_MDTO;
U_SYP_MDCO = returnRequest.U_SYP_MDCO;
U_SYP_MDSO = returnRequest.U_SYP_MDSO;
DocDate = returnRequest.U_SYP_FECHAREF;
}
else
{
U_SYP_MDTO = _Invoice.U_SYP_MDTD;
U_SYP_MDCO = _Invoice.U_SYP_MDCD;
U_SYP_MDSO = _Invoice.U_SYP_MDSD;
DocDate = _Invoice.DocDate;
}
#endregion
Recibo (NC desde Solicitud de Devolucion): lotes solo de la distribucion y serie segun tipo de documento. Versión 2.1.7.0
2026-10-14 18:03:58 -05:00
// Serie segun el TIPO de documento origen (03 = boleta), no segun su serie
Limpieza: comentarios en el codigo, if vacio de CreateHojaRuta y documentacion. Versión 2.1.8.0
2026-10-14 19:31:06 -05:00
// El correlativo sale de @SYP_NUMDOC (HelperCorrelativo)
Recibo (NC desde Solicitud de Devolucion): lotes solo de la distribucion y serie segun tipo de documento. Versión 2.1.7.0
2026-10-14 18:03:58 -05:00
string Serie = U_SYP_MDTO == "03" ? "BC10" : "FC10";
Commit inicial: ITCA_API_SAP_WMS (.NET Core 3.1)
2026-10-05 17:53:41 -05:00
string Correlativo = HelperCorrelativo.Get(Serie);
creditNotesNotes.DocCurrency = returnRequest.DocCurrency;
creditNotesNotes.CardCode = returnRequest.CardCode;
creditNotesNotes.CardName = returnRequest.CardName;
creditNotesNotes.PaymentGroupCode = returnRequest.PaymentGroupCode;
creditNotesNotes.DocDate = DateTime.Now;
creditNotesNotes.DocDueDate = DateTime.Now;
//creditNotesNotes.NumAtCard = entidad.DocImportacion;
creditNotesNotes.NumAtCard = ("07-" + Serie +"-" + Correlativo);
creditNotesNotes.U_SYP_MDTO = U_SYP_MDTO;
creditNotesNotes.U_SYP_MDCO = U_SYP_MDCO;
creditNotesNotes.U_SYP_MDSO = U_SYP_MDSO;
creditNotesNotes.U_SYP_MOTNC = returnRequest.U_SYP_MOTNC;
creditNotesNotes.U_SYP_TPONC = returnRequest.U_SYP_TPONC;
creditNotesNotes.U_SYP_MDCD = Correlativo;
creditNotesNotes.U_SYP_MDSD = Serie;
creditNotesNotes.U_SYP_MDTD = "07";
creditNotesNotes.U_SYP_FECHAREF = DocDate.ToString("yyyy-MM-dd");
entidad.Detalle.ForEach(x =>
{
var Item = returnRequest.DocumentLines.ToList().FirstOrDefault(t => t.LineNum == x.Item);
if (Item != null)
{
creditNotesNotes.DocumentLines.Add(new BE_CreditNotesLine()
{
Currency = returnRequest.DocCurrency,
BatchNumbers = new List<BE_CreditNotesBatchNumbers>
{
new BE_CreditNotesBatchNumbers()
{
BatchNumber = x.LoteProducto,
Quantity = (int)x.CantidadPedida
},
},
ItemCode = Item.ItemCode,
ItemDescription = Item.ItemDescription,
PriceAfterVAT = Item.PriceAfterVAT,
Quantity = x.CantidadPedida,
WarehouseCode = Item.WarehouseCode,
BaseEntry = entidad.DocEntry,
BaseLine = x.Item,
BaseType = 234000031,
LineNum = x.Item
});
}
});
Limpieza: comentarios en el codigo, if vacio de CreateHojaRuta y documentacion. Versión 2.1.8.0
2026-10-14 19:31:06 -05:00
// Lotes de cada linea: sin factura relacionada, FIFO por vencimiento del stock de HANA; con factura, los lotes de la factura.
// En ambos casos se parte de la lista vacia para que los lotes sumen exactamente la cantidad de la linea
Commit inicial: ITCA_API_SAP_WMS (.NET Core 3.1)
2026-10-05 17:53:41 -05:00
if (_Invoice == null)
{
//=== REALIZA DISTRIBUCION DE STOCK POR LOTE
creditNotesNotes.DocumentLines.ForEach(line =>
{
Recibo (NC desde Solicitud de Devolucion): lotes solo de la distribucion y serie segun tipo de documento. Versión 2.1.7.0
2026-10-14 18:03:58 -05:00
// La linea nace con un lote del request (LoteProducto); se descarta para que
// los lotes finales sean solo los de la distribucion y sumen la cantidad de la linea
line.BatchNumbers.Clear();
Commit inicial: ITCA_API_SAP_WMS (.NET Core 3.1)
2026-10-05 17:53:41 -05:00
#region CONSULTA A HANA
var ListaStock = HelperStock.Get(line.ItemCode, line.WarehouseCode);
if (ListaStock.Count > 0)
{
var CantidadPendiente = line.Quantity;
var ListOrdenadaFecha = ListaStock.OrderBy(x => x.ExpDate).ToList();
ListOrdenadaFecha.ForEach(Lote =>
{
if (CantidadPendiente > 0)
{
if (Lote.OnHandQty >= (double)CantidadPendiente)
{
line.BatchNumbers.Add(new BE_CreditNotesBatchNumbers() { BatchNumber = Lote.DistNumber, Quantity = (double)CantidadPendiente });
CantidadPendiente = 0;
}
else if (Lote.OnHandQty < (double)CantidadPendiente)
{
line.BatchNumbers.Add(new BE_CreditNotesBatchNumbers() { BatchNumber = Lote.DistNumber, Quantity = (double)Lote.OnHandQty });
CantidadPendiente -= (decimal)Lote.OnHandQty;
}
}
});
}
else
{
line.BatchNumbers.Add(new BE_CreditNotesBatchNumbers() { BatchNumber = DateTime.Now.ToString("yyyyMMddhhmmss"), Quantity = (double)line.Quantity });
}
#endregion
});
}
else
{
creditNotesNotes.DocumentLines.ForEach(line =>
{
Recibo (NC desde Solicitud de Devolucion): lotes solo de la distribucion y serie segun tipo de documento. Versión 2.1.7.0
2026-10-14 18:03:58 -05:00
line.BatchNumbers.Clear();
Commit inicial: ITCA_API_SAP_WMS (.NET Core 3.1)
2026-10-05 17:53:41 -05:00
var ReferenciaFactura = returnRequest.DocumentLines.FirstOrDefault(t => t.LineNum == line.LineNum);
var ListaStock = _Invoice.DocumentLines.FirstOrDefault(InvoiceLine => InvoiceLine.LineNum == ReferenciaFactura.BaseLine).BatchNumbers;
if (ListaStock.Count > 0)
{
var CantidadPendiente = line.Quantity;
var ListOrdenadaFecha = ListaStock;
ListOrdenadaFecha.ForEach(Lote =>
{
if (CantidadPendiente > 0)
{
if (Lote.Quantity >= (double)CantidadPendiente)
{
line.BatchNumbers.Add(new BE_CreditNotesBatchNumbers() { BatchNumber = Lote.BatchNumber, Quantity = (double)CantidadPendiente });
CantidadPendiente = 0;
}
else if (Lote.Quantity < (double)CantidadPendiente)
{
line.BatchNumbers.Add(new BE_CreditNotesBatchNumbers() { BatchNumber = Lote.BatchNumber, Quantity = (double)Lote.Quantity });
CantidadPendiente -= (decimal)Lote.Quantity;
}
}
});
}
else
{
line.BatchNumbers.Add(new BE_CreditNotesBatchNumbers() { BatchNumber = DateTime.Now.ToString("yyyyMMddhhmmss"), Quantity = (double)line.Quantity });
}
});
}
var result_creditNotesRepository = _creditNotesRepository.SetCreateCreditNotes(creditNotesNotes).Result;
if (result_creditNotesRepository.DocEntry == -1)
{
return resultadoTransaccion.GetInformacionResultado(result_creditNotesRepository.Message, entidad);
}
else
{
Limpieza: comentarios en el codigo, if vacio de CreateHojaRuta y documentacion. Versión 2.1.8.0
2026-10-14 19:31:06 -05:00
// Transferencias por almacen destino (U_ITC_ALMDES). OJO: en Recibo las lineas de la NC no llenan U_ITC_ALMDES, por lo que hoy no se genera ninguna
Commit inicial: ITCA_API_SAP_WMS (.NET Core 3.1)
2026-10-05 17:53:41 -05:00
List<string> ListaUnicaAlmacen = creditNotesNotes.DocumentLines.Select(x => x.WarehouseCode).Distinct().ToList();
List<int> ListDocEntry = new List<int>();
ListaUnicaAlmacen.ForEach(Almacen =>
{
List<string> ListaUnicaAlmDestino = creditNotesNotes.DocumentLines.Where(Linea => Linea.WarehouseCode == Almacen).ToList().Select(x => x.U_ITC_ALMDES).Distinct().ToList().Where(x => !string.IsNullOrEmpty(x)).ToList();
ListaUnicaAlmDestino.ForEach(Destino =>
{
if (Almacen != Destino)
{
BE_StockTransferAutomatico Transfer = new BE_StockTransferAutomatico();
Transfer.FromWarehouse = Almacen;
Transfer.ToWarehouse = Destino;
Transfer.DocDate = creditNotesNotes.DocDate;
Transfer.TaxDate = creditNotesNotes.DocDate;
Transfer.DueDate = creditNotesNotes.DocDueDate;
Transfer.U_SYP_MDTS = "TSI";
Transfer.U_SYP_MDMT = "24";
Transfer.PriceList = -2;
var ListaDetalle_PorAlmacen = creditNotesNotes.DocumentLines.Where(x => x.WarehouseCode == Almacen && x.U_ITC_ALMDES == Destino).ToList();
var ListaUnicaArticulo = ListaDetalle_PorAlmacen.Select(x => x.ItemCode).Distinct().ToList();
Transfer.StockTransferLines = new List<BE_StockTransferLine>();
Transfer.DocumentReferences = new List<BE_StockTransferDocumentReferences>();
ListaUnicaArticulo.ForEach(x =>
{
var ListLote = new List<BE_StockTransferLineBatchNumber>();
Cantidades: PICKING filtra lineas sin diferencia; transferencias juntan lotes de todas las lineas del articulo. Versión 2.1.6.0
2026-10-14 17:27:29 -05:00
// Lotes de todas las lineas del articulo (si el mismo lote esta en varias lineas se suma)
ListaDetalle_PorAlmacen.Where(t => t.ItemCode == x).SelectMany(t => t.BatchNumbers).GroupBy(r => r.BatchNumber).ToList().ForEach(g =>
Commit inicial: ITCA_API_SAP_WMS (.NET Core 3.1)
2026-10-05 17:53:41 -05:00
{
ListLote.Add(new BE_StockTransferLineBatchNumber()
{
Cantidades: PICKING filtra lineas sin diferencia; transferencias juntan lotes de todas las lineas del articulo. Versión 2.1.6.0
2026-10-14 17:27:29 -05:00
BatchNumber = g.Key,
Quantity = g.Sum(r => r.Quantity)
Commit inicial: ITCA_API_SAP_WMS (.NET Core 3.1)
2026-10-05 17:53:41 -05:00
});
});
Transfer.StockTransferLines.Add(new BE_StockTransferLine()
{
ItemCode = x,
ItemDescription = ListaDetalle_PorAlmacen.Where(t => t.ItemCode == x).FirstOrDefault().ItemDescription,
Quantity = Convert.ToDouble(ListaDetalle_PorAlmacen.Where(t => t.ItemCode == x).Sum(t => t.Quantity)),
WarehouseCode = Destino,
FromWarehouseCode = Almacen,
BatchNumbers = ListLote
});
//=== AGREGA DOCUMENTO REFERENCIA
Transfer.DocumentReferences = new List<BE_StockTransferDocumentReferences>
{
new BE_StockTransferDocumentReferences()
{
RefDocEntr = (int)result_creditNotesRepository.Data.DocEntry,
RefObjType = "rot_SalesCreditNote",
IssueDate = DateTime.Now,
Remark = "Nota de Credito",
}
};
});
//=== CREA INSTANCIA PARA CONECTAR A SAP
StockTransferRepository stockTransferRepository = new StockTransferRepository(_clientFactory, _configuration);
var ResultTransfer = stockTransferRepository.StockTransfer(Transfer).Result;
Limpieza: comentarios en el codigo, if vacio de CreateHojaRuta y documentacion. Versión 2.1.8.0
2026-10-14 19:31:06 -05:00
// OJO: si la transferencia falla se ignora (la NC ya esta creada)
Commit inicial: ITCA_API_SAP_WMS (.NET Core 3.1)
2026-10-05 17:53:41 -05:00
if (ResultTransfer.StatusCode == -1)
{
}
else
{
ListDocEntry.Add((int)ResultTransfer.Data.DocEntry);
}
}
});
});
if (ListDocEntry.Count > 0)
{
var listaReferencia = new List<BE_CreditNotesDocumentReferences>();
ListDocEntry.ForEach(x =>
{
listaReferencia.Add(new BE_CreditNotesDocumentReferences()
{
RefDocEntr = x,
IssueDate = DateTime.Now,
RefObjType = "rot_InventoryTransfer",
Remark = "Transferencias Automatica"
});
});
var credit = new
{
DocumentReferences = listaReferencia
};
var Actualizacion = _creditNotesRepository.UpdateCreateCreditNotes(credit, (int)result_creditNotesRepository.Data.DocEntry).Result;
}
return resultadoTransaccion.GetInformacionResultado((int)result_creditNotesRepository.Data.DocEntry, result_creditNotesRepository.Data.DocNum.ToString(), "Se registro correctamente...!!!", entidad);
}
//return resultadoTransaccion.GetInformacionResultado((int)result_creditNotesRepository.Data.DocEntry, result_creditNotesRepository.Data.DocNum.ToString(), "Se registro correctamente...!!!", entidad);
}
#endregion
return resultadoTransaccion.GetInformacionResultado(0, "", "Se registro correctamente...!!!", entidad);
}
catch (Exception ex)
{
return resultadoTransaccion.GetInformacionResultado(ex.Message.ToString(), entidad);
}
});
}
}
}
Reference in new issue Copy Permalink