Merge branch 'master' of http://192.168.10.111:8383/SIG

2023-01-31 13:09:12 -07:00
parent 6cb8289bff b06176f6b4
commit 5258ce0b47
23 changed files with 613 additions and 1294 deletions
--- a/Compras/EvaluacionProveedor.aspx.vb
+++ b/Compras/EvaluacionProveedor.aspx.vb
@@ -118,7 +118,7 @@ Partial Class Compras_EvaluacionProveedor
                    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