-- mejora

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