diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index a532870b4..dfa005080 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -3502,7 +3502,7 @@ Partial Class Compras_Compras
 
                 ViewState("CveProveedor") = ObjProveedor.CveProveedor
                 ViewState("CveTipoProveedor") = ObjProveedor.CveTipoProveedor
-                RFCProveedor = ObjProveedor.RFC
+				RFCProveedor = ObjProveedor.RFC
                 If ObjProveedor.CveTipoProveedor = 2 Then
                     LblProveedor.Text = "Acreedor:"
                 Else
@@ -6767,7 +6767,7 @@ Partial Class Compras_Compras
                                                                                                 Dim tTipoMovimiento As Boolean
                                                                                                 Dim Diferencia As Decimal = 0
 
-                                                                                                If CompraActual.TC < TCNC Then
+                                                                                                If CompraActual.TC > TCNC Then
                                                                                                     tConceptoContable = 64
                                                                                                     tTipoMovimiento = True
                                                                                                 Else
@@ -14560,8 +14560,7 @@ Partial Class Compras_Compras
         UpGvOC1.Update()
         TmpDT = TmpDT.FiltraParametros("", "PU")
 
-        GvOC2.DataSource = TmpDT
-        GvOC2.DataBind()
+
 
         'PROCESO DE ASIGNACION DE CANTIDAD DEPENDIENDO DEL NoIdentificacion DEL XML Y EL NumeroParte DEL PRODUCTO
         If UsuarioActual.Empresa.Funcionalidad(382) = "1" Then
@@ -14592,7 +14591,11 @@ Partial Class Compras_Compras
             'condicion temporal rmf
             GvOC1.Columns(6).Visible = False
             GvOC2.Columns(4).Visible = False
+            GvOC2.DataSource = TmpDT.FiltraParametros("", "CodigoPS")
+        Else
+            GvOC2.DataSource = TmpDT
         End If
+        GvOC2.DataBind()
 
         UpGvOC2.Update()
     End Sub