diff --git a/Compras/Compras.aspx b/Compras/Compras.aspx
index 8a87f6cbb..5e7cc40c9 100644
--- a/Compras/Compras.aspx
+++ b/Compras/Compras.aspx
@@ -4545,7 +4545,7 @@
diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 73fb13dfd..8da9cddc6 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -13496,7 +13496,7 @@ Partial Class Compras_Compras
GvOC1.DataBind()
' TmpDT = OrdenarTablas("CvePS", DTOCTemp, TmpDT)
- GvOC2.DataSource = TmpDT.FiltraParametros("", "CodigoPS")
+ GvOC2.DataSource = TmpDT
GvOC2.DataBind()
UpGvOC1.Update()
@@ -14541,11 +14541,10 @@ Partial Class Compras_Compras
CargaTipoCentroCostoOC()
- GvOC1.DataSource = DTOCGV.FiltraParametros("", "CveOrdenCompra, CodigoPS")
+ GvOC1.DataSource = DTOCGV
GvOC1.DataBind()
-
Dim DTCVEOGV As DataTable = DTOCGV.FiltraParametros("", "", {"CveOrdenCompra"})
If DTCVEOGV.Rows.Count > 1 Then
GvOC1.Columns(0).Visible = True
@@ -14559,7 +14558,7 @@ Partial Class Compras_Compras
Cont += 1
Next
UpGvOC1.Update()
- TmpDT = TmpDT.FiltraParametros("", "CodigoPS")
+ TmpDT = TmpDT.FiltraParametros("", "PU")
GvOC2.DataSource = TmpDT
GvOC2.DataBind()