repinventarios

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)