-- parametro cveempresa en compradetalle

-- limpieza de codigo muy posiblemente duplicado. -- optmimzación de gvantcipo_rowdatabound
2023-01-28 10:42:18 -07:00
parent 7e4a52e5b2
commit fc994d9543
3 changed files with 62 additions and 57 deletions
--- a/Compras/Proveedores.aspx.vb
+++ b/Compras/Proveedores.aspx.vb
@@ -5625,7 +5625,7 @@ Partial Class Compras_Proveedores
                    TxtSerieFolio.Text = ObjCompras.DtResultados.Rows(0)("SerieFolio").ToString()
                End If
            End If
-            If ObjCompras.GetCompraDetalle(CveCompra) Then
+            If ObjCompras.GetCompraDetalle(CveCompra, UsuarioActual.CveEmpresa) Then
                Dim StrPS As New StringBuilder()
                For Each Row As DataRow In ObjCompras.DtResultados.Rows
                    If ObjCompras.DtResultados.Rows.Count > 1 Then