diff --git a/Ventas/Clientes.aspx b/Ventas/Clientes.aspx
index 320c35caf..97a0b5725 100644
--- a/Ventas/Clientes.aspx
+++ b/Ventas/Clientes.aspx
@@ -1901,9 +1901,9 @@
diff --git a/Ventas/Clientes.aspx.vb b/Ventas/Clientes.aspx.vb
index 66f54796e..314227341 100644
--- a/Ventas/Clientes.aspx.vb
+++ b/Ventas/Clientes.aspx.vb
@@ -2609,18 +2609,6 @@ 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
'If DivInfoCompleta.Visible Then