diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index 097e8aec3..0706e5dba 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -32178,8 +32178,12 @@ Partial Class Ventas
                 HdnIVAOriginal.Value = TxtIVA.Text
             End If
 
-            RBLPago.Items(0).Enabled = True 'sino está activo lo activamos porque las remisiones pueden ser a crédito
-            RBLPago.SelectedValue = "1"
+            If UsuarioActual.Empresa.Funcionalidad(109) = "1" Then
+                RBLPago.SelectedValuesIfExist(dtSeleccionadas.FiltroPrimeroValor("CondicionesPago"))
+            Else
+                RBLPago.Items(0).Enabled = True 'sino está activo lo activamos porque las remisiones pueden ser a crédito
+                RBLPago.SelectedValue = "1"
+            End If
 
             RemisionesLista.Clear()