diff --git a/Contabilidad/RegPrePolizaS.aspx.vb b/Contabilidad/RegPrePolizaS.aspx.vb
index 979dc9b22..c482c796d 100644
--- a/Contabilidad/RegPrePolizaS.aspx.vb
+++ b/Contabilidad/RegPrePolizaS.aspx.vb
@@ -1963,10 +1963,10 @@ Partial Class ContabilidadC_RegPrePolizaS
         Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
         RowIndex = GvRow.RowIndex
 
-        If GvRow.FCTextBox("TxtAbono").Text = "" Then
-            CargaTipoTransaccion("Ing")
-        Else
+        If GvRow.FCTextBox("TxtAbono").Visible Then
             CargaTipoTransaccion("Egs")
+        Else
+            CargaTipoTransaccion("Ing")
         End If
 
         Dim IdMov As Integer = GvRow.DataKey("IdMov").ToString.ToEntero