rdlc 4.0 emp 38,137 , Compras redondedo concepto 68, RegPrepolizas tipo de gasto

Contabilidad/RegPrePolizaS.aspx.vb

@@ -2143,9 +2143,23 @@ Partial Class ContabilidadC_RegPrePolizaS
 
     Protected Sub DdlTipoGasto_SelectedIndexChanged(sender As Object, e As EventArgs)
         If UpPrePoliza.Visible Then
-            For Each Gvr As GridViewRow In GvPrePoliza.Rows
-                Gvr.FCDropDownList("DdlTipoGasto").SelectedValueExist(DdlTipoGasto.SelectedValue)
+
+
+            For Each dRow As DataRow In DtMovimientos.Rows
+                dRow("CveTipoGasto") = DdlTipoGasto.SelectedValue
+                dRow("TipoGasto") = DdlTipoGasto.SelectedItem.Text
             Next
+
+            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