diff --git a/Ventas/Clientes.aspx.vb b/Ventas/Clientes.aspx.vb
index d29106f29..92714d0e2 100644
--- a/Ventas/Clientes.aspx.vb
+++ b/Ventas/Clientes.aspx.vb
@@ -2606,18 +2606,7 @@ Partial Class Clientes
             If DdlTipoCliente.SelectedValue = "1" Then
                 If TxtContacto.Text.Trim() = "" Then InformacionCompleta = False
                 If TxtRepresentanteLegal.Text.Trim() = "" Then InformacionCompleta = False
-                'si es el concepto de pagaré
-                Dim tPagare As Integer = 0
-                For Each dRow As GridViewRow In GvDocumentosCliente.Rows
-                    Dim CveDocumentacion As Integer = dRow.DataKey("CveDocumentacion").ToEntero()
-                    If CveDocumentacion = 265 Then tPagare = 1
-                Next
-                If tPagare = 0 Then InformacionCompleta = False
-                tPagare = 0 'valida que cuando menos tenga una cuenta
-                For Each dRow As GridViewRow In GvBancosCuentas.Rows
-                    tPagare = 1
-                Next
-                If tPagare = 0 Then InformacionCompleta = False
+
             End If
         End If