diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb
index c60c002ed..999ca0292 100644
--- a/Ventas/Ventas.aspx.vb
+++ b/Ventas/Ventas.aspx.vb
@@ -8657,10 +8657,10 @@ Partial Class Ventas
                 Exit Sub
             End If
 
-            If Not LblRFC.Text.Trim().ToUpper().Contiene("XAXX010101000", "XEXX010101000") AndAlso DdlUsoCFDI.SelectedValue = "23" Then
-                Alert("El uso cfdi del cliente no puede ser <b>'S01 - Sin efectos fiscales'</b> si no se utiliza el RFC genérico.", TipoMensaje.MsgAdvertencia)
-                Exit Sub
-            End If
+            'If Not LblRFC.Text.Trim().ToUpper().Contiene("XAXX010101000", "XEXX010101000") AndAlso DdlUsoCFDI.SelectedValue = "23" Then
+            '    Alert("El uso cfdi del cliente no puede ser <b>'S01 - Sin efectos fiscales'</b> si no se utiliza el RFC genérico.", TipoMensaje.MsgAdvertencia)
+            '    Exit Sub
+            'End If
 
             Dim EsPersonaMoral As Boolean = Me.TipoPersona
             Dim DtUsosCFDI = GlobalDTSATUsosCFDI(If(Not EsPersonaMoral, 1, 0), RegimenFiscalReceptor:=RegimenFiscalCliente).FiltraParametros($"CveUsoCFDI = {DdlUsoCFDI.SelectedValue}")
@@ -22787,6 +22787,8 @@ Partial Class Ventas
 
             DdlRegimenFiscalCliente.DataSource = GlobalDTRegimenesFiscales()
             DdlRegimenFiscalCliente.DataBind()
+            DdlRegimenFiscalCliente.Items.Insert(0, New ListItem("Seleccione", "-1"))
+
             CargaComboCFDICliente()
 
         End If