From b3f136a27e73c2c9c7490a26c1e0102213489c8e Mon Sep 17 00:00:00 2001 From: JORGE LUIS CAUDILLO ESPARZA Date: Tue, 11 Jul 2023 08:31:28 -0700 Subject: [PATCH] repinventarios --- Compras/PopUpVerFactura.aspx.vb | 3 +++ 1 file changed, 3 insertions(+) diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb index 0705365f3..97fa6005b 100644 --- a/Compras/PopUpVerFactura.aspx.vb +++ b/Compras/PopUpVerFactura.aspx.vb @@ -345,6 +345,7 @@ Partial Class PopUpVerFactura Dim totalBachas As String = "" Dim fechas As String = "" Dim totalcajas As String = "" + Dim TotalBins As String = "" Dim tablaReportePallets As New DataTable @@ -359,6 +360,7 @@ Partial Class PopUpVerFactura End If If objnom.REPInventarioDiarioBins(DateTime.Now, UsuarioActual.CveEmpresa, "") And objnom.DtResultados.Rows.Count > 0 Then tablaReporteBins = objnom.DtResultados + TotalBins = tablaReporteBins.SUM("Bins").FormatoNumero(0) End If 'Remolque 1 12-TF-5E' }, { cveCamion: 2, placa: 'Remolque 2 15-TF-7f End Using @@ -366,6 +368,7 @@ Partial Class PopUpVerFactura params.Add(New ReportParameter("totalPallets", totalPallets)) params.Add(New ReportParameter("totalBachas", totalBachas)) params.Add(New ReportParameter("totalcajas", totalcajas)) + params.Add(New ReportParameter("TotalBins", TotalBins)) params.Add(New ReportParameter("Fecha", fechas)) Dim lrds As New List(Of ReportDataSource)