diff --git a/Contabilidad/RegPrePolizaS.aspx b/Contabilidad/RegPrePolizaS.aspx
index b442b4cf4..4856937c2 100644
--- a/Contabilidad/RegPrePolizaS.aspx
+++ b/Contabilidad/RegPrePolizaS.aspx
@@ -528,8 +528,7 @@
                                     <ItemTemplate>
                                         <asp:LinkButton ID="LnkEdit" runat="server" AlternateText="Actualizar" CausesValidation="True" CommandName="Update" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
                                         <asp:LinkButton ID="LnkEliminar" OnClick="LnkGvPrePolizaEliminar_Click" runat="server" AlternateText="Eliminar"  CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>"
-                                             data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si"   />
-                                        <asp:CheckBox runat="server" ID="chkModificado" Checked="false" Visible="false"/>
+                                             data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si"   />                                        
                                     </ItemTemplate>
                                    <ItemStyle Width="75px" />
                                 </asp:TemplateField>
diff --git a/Contabilidad/RegPrePolizaS.aspx.vb b/Contabilidad/RegPrePolizaS.aspx.vb
index 6bb286c1d..8bf6adaad 100644
--- a/Contabilidad/RegPrePolizaS.aspx.vb
+++ b/Contabilidad/RegPrePolizaS.aspx.vb
@@ -558,9 +558,6 @@ Partial Class ContabilidadC_RegPrePolizaS
             If CveConceptoContable.Contiene(68) Then e.Row.FCHyperLink("HlReferencia").NavigateUrl = String.Format("/Inventarios/EntradasSalidas.aspx?CveMovimiento={0}", e.Row.DBCampo("CveMovimientoAlmacen"))
             If CveConceptoContable.Contiene(30, 204, 66, 92, 202, 10, 21, 48, 56, 338, 339, 340, 345, 346, 347) Then e.Row.FCHyperLink("HlReferencia").NavigateUrl = String.Format("/Bancos/IE.aspx?CveIE={0}", e.Row.DBCampo("CveIE"))
 
-            If e.Row.DBCampo("Modificado") = "True" Then
-                e.Row.FCCheckBox("chkModificado").Checked = True
-            End If
         End If
 
         If e.Row.RowType = DataControlRowType.Header Then
@@ -1188,10 +1185,10 @@ Partial Class ContabilidadC_RegPrePolizaS
                                     Exit For
                                 End If
                             End If
-
-                            If Not ObjContabilidad.AddPrePolizasDetalle(CvePrePoliza, If(row.DataKey("TipoMovto") = "True", True, False),
-                                                                        row.DataKey("Cargo").ToDecimal,
-                                                                        row.DataKey("Abono").ToDecimal,
+                            Dim tTipoMovto As Boolean = If(row.DataKey("TipoMovto") = "True", True, False)
+                            If Not ObjContabilidad.AddPrePolizasDetalle(CvePrePoliza, tTipoMovto,
+                                                                        If(Not tTipoMovto, row.DataKey("Cargo").ToDecimal, row.DataKey("Abono").ToDecimal),
+                                                                        If(Not tTipoMovto, row.DataKey("Cargo").ToDecimal, row.DataKey("Abono").ToDecimal),
                                                                         row.DataKey("CveConceptoContable").ToEntero, row.DataKey("Referencia").ToString, row.FCLiteral("TxtConcepto").Text,
                                                                         CveSubProyecto:=row.DataKey("CveSubProyecto").ToEntero,
                                                                         CveTipoGasto:=If(DdlTipoGasto.Visible, row.DataKey("CveTipoGasto").ToEntero, row.DataKey("CveTipoGasto").ToEntero),
@@ -1726,7 +1723,6 @@ Partial Class ContabilidadC_RegPrePolizaS
         GvPrePoliza.DataBind()
         UpPrePoliza.Update()
         GvPrePoliza.Visible = True
-        If IndiceGrid >= 0 Then GvPrePoliza.Rows(IndiceGrid).FCCheckBox("chkModificado").Checked = True
 
         TxtTotalCargos.Text = DtMovimientos.SUMD("Cargo").ToString.FormatoNumero
         TxtTotalAbonos.Text = DtMovimientos.SUMD("Abono").ToString.FormatoNumero
@@ -1993,7 +1989,6 @@ Partial Class ContabilidadC_RegPrePolizaS
     Protected Sub DdlTipoGasto_SelectedIndexChanged(sender As Object, e As EventArgs)
         If UpPrePoliza.Visible Then
 
-
             For Each dRow As DataRow In DtMovimientos.Rows
                 dRow("CveTipoGasto") = DdlTipoGasto.SelectedValue
                 dRow("TipoGasto") = DdlTipoGasto.SelectedItem.Text
@@ -2003,12 +1998,6 @@ Partial Class ContabilidadC_RegPrePolizaS
             DtMovimientos.AcceptChanges()
             GvPrePoliza.DataSource = DtMovimientos
             GvPrePoliza.DataBind()
-
-            For Each Gvr As GridViewRow In GvPrePoliza.Rows
-                'Gvr.FCDropDownList("DdlTipoGasto").SelectedValueExist(DdlTipoGasto.SelectedValue)
-                Gvr.FCCheckBox("chkModificado").Checked = True
-            Next
-
             UpPrePoliza.Update()
         End If
         If divMovtos.Visible Then