--mejora

General/SaldosIniciales.aspx.vb

@@ -935,7 +935,7 @@ Partial Class General_SaldosIniciales
                     End If
                 Next
 
-                For Each Row As DataRow In dt.Rows
+                For Each Row As DataRow In dt.FiltraParametros("RazonSocial <> ''").Rows
                     Dim RazonSocial As String = Row("RazonSocial").ToString()
                     If Not (Row("TipoProveedor").ToString().Trim.ToUpper).Contiene("PROVEEDOR", "ACREEDOR") Then
                         sbErrores.AppendLine($"Proveedor {RazonSocial} TipoProveedor {Row("TipoProveedor")} invalido.<br>")