Fix compilación

This commit is contained in:
MLopez
2023-01-30 18:19:36 -07:00
parent 3a3f8b82db
commit 9263cba81a
2 changed files with 2 additions and 2 deletions

View File

@@ -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