-- cambio de es presupuestal a "no requiere unidad"

Transportes/RepContratos.aspx.vb

@@ -51,7 +51,7 @@ Partial Class ListadoContratos
         DdlEstatus.DataBind()
         DdlEstatus.Items.Insert(0, New ListItem("Todos", "-1"))
 
-        CargarCentrosDeCosto(Nothing, Nothing, Nothing, LblSubProyectoModal)
+        CargarCentrosDeCosto(Nothing, DdlCentroCostos, Nothing, LblSubProyectoModal)
 
         DdlSubProyectoModal.DataSource = GlobalDTSubProyectos(UsuarioActual.CveEmpresa)
         DdlSubProyectoModal.DataBind()
@@ -180,7 +180,7 @@ Partial Class ListadoContratos
             End If
             Anexo.Text = ""
 
-            If ErrorProceso = False AndAlso Not ChkEsPresupuestal.Checked Then
+            If ErrorProceso = False Then
 
                 Dim ObsRemisionPartida As String = $"{DdlTipoAF.SelectedItem.Text}-{ TxtDescripcion.Text}-{LbFolio.Text}"