diff --git a/AF/AF.aspx.vb b/AF/AF.aspx.vb
index 2021d462e..562bcad8c 100644
--- a/AF/AF.aspx.vb
+++ b/AF/AF.aspx.vb
@@ -661,6 +661,7 @@ Partial Class AF_AF
 
     End Sub
     Private Sub CargaTipoActivoFijo()
+        DdlTipoActivoFijo.Items.Clear()
         DdlTipoActivoFijo.DataSource = GlobalDTTipoActivoFijo(CveEmpresaActual).FiltraParametros("", "TipoActivoFijo")
         DdlTipoActivoFijo.DataBind()
         CargaSubTipoActivoFijo()
diff --git a/AF/CatClasificacionesCaracteristicas.aspx b/AF/CatClasificacionesCaracteristicas.aspx
index 90528e45c..29c63c4cb 100644
--- a/AF/CatClasificacionesCaracteristicas.aspx
+++ b/AF/CatClasificacionesCaracteristicas.aspx
@@ -90,7 +90,7 @@
                                                 </asp:UpdatePanel>
                                                 <asp:UpdatePanel ID="UpDatosCL" runat="server" UpdateMode="Conditional">
                                                     <ContentTemplate>
-                                                        <asp:GridView ID="GvDatosCL" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCaracteristicaClasificacion" EmptyDataText="No se encontraron Clasificaciones" CssClass="table table-striped table-advance table-hover" Style="margin-top: -10px; text-align: center;" GridLines="None">
+                                                        <asp:GridView ID="GvDatosCL" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCaracteristicaClasificacion" EmptyDataText="No se encontraron Clasificaciones" CssClass="table table-striped table-advance table-hover mysmallbtn" Style="margin-top: -10px; text-align: center;" GridLines="None">
                                                             <Columns>
                                                                 <%--<asp:TemplateField>
                                                                     <ItemTemplate>&nbsp;<asp:Literal ID="LtlTiposActivosFijosCL" runat="server" Text='<%# Eval("TipoActivoFijo", "{0}")%>'></asp:Literal></ItemTemplate>
@@ -300,7 +300,7 @@
                                                 </asp:UpdatePanel>
                                                 <asp:UpdatePanel ID="UpDatosCA" runat="server" UpdateMode="Conditional">
                                                     <ContentTemplate>
-                                                        <asp:GridView ID="GvDatosCA" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCaracteristica" EmptyDataText="No se encontraron Características" CssClass="table table-striped table-advance table-hover" Style="margin-top: -10px; text-align: center;" GridLines="None">
+                                                        <asp:GridView ID="GvDatosCA" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCaracteristica" EmptyDataText="No se encontraron Características" CssClass="table table-striped table-advance table-hover mysmallbtn" Style="margin-top: -10px; text-align: center;" GridLines="None">
                                                             <Columns>
                                                                 <asp:TemplateField>
                                                                     <ItemTemplate>&nbsp;<asp:Literal ID="LtlTiposActivosFijosCA" runat="server" Text='<%# Eval("TipoActivoFijo", "{0}")%>'></asp:Literal></ItemTemplate>
@@ -537,7 +537,7 @@
                                                 </asp:UpdatePanel>
                                                 <asp:UpdatePanel ID="UpDatosOpciones" runat="server" UpdateMode="Conditional">
                                                     <ContentTemplate>
-                                                        <asp:GridView ID="GvDatosOpciones" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCaracteristicaOpcion" EmptyDataText="No se encontraron Opciones" CssClass="table table-striped table-advance table-hover" Style="margin-top: -10px; text-align: center;" GridLines="None">
+                                                        <asp:GridView ID="GvDatosOpciones" runat="server" AutoGenerateColumns="False" DataKeyNames="CveCaracteristicaOpcion" EmptyDataText="No se encontraron Opciones" CssClass="table table-striped table-advance table-hover mysmallbtn"  GridLines="None">
                                                             <Columns>
                                                                 <asp:TemplateField>
                                                                     <ItemTemplate>&nbsp;<asp:Literal ID="LtlTiposActivosFijosOpciones" runat="server" Text='<%# Eval("TipoActivoFijo", "{0}")%>'></asp:Literal></ItemTemplate>
diff --git a/AF/CatClasificacionesCaracteristicas.aspx.vb b/AF/CatClasificacionesCaracteristicas.aspx.vb
index d67d76f89..8f6b1e18f 100644
--- a/AF/CatClasificacionesCaracteristicas.aspx.vb
+++ b/AF/CatClasificacionesCaracteristicas.aspx.vb
@@ -52,7 +52,6 @@ Partial Class AF_CatClasificacionesCaracteristicas
 
             'Carga Globals para DT
             CargaTiposActivosFijos()
-            CargaSubTiposActivosFijos()
             ''CargaCaracteristicasClasificaciones()
             'CargaCaracteristicas()
         End If
@@ -66,17 +65,7 @@ Partial Class AF_CatClasificacionesCaracteristicas
         DdlTiposActivosFijosOpciones.DataSource = GlobalDTTipoActivoFijo(UsuarioActual.CveEmpresa)
         DdlTiposActivosFijosOpciones.DataBind()
     End Sub
-    Private Sub CargaSubTiposActivosFijos()
-        Dim ObjAF As New ClsAF
 
-        If ObjAF.GetSubTiposActivosFijos(UsuarioActual.CveEmpresa) Then
-            GlobalDTSubTipoActivoFijo(UsuarioActual.CveEmpresa) = ObjAF.DtResultados
-        Else
-            Alert("Ocurrio un error al obtener los SubTipos de Activos Fijos", TipoMensaje.MsgError)
-        End If
-
-        ObjAF.Dispose()
-    End Sub
 #Region "CLASIFICACIONES"
     Protected Sub LbAgregarCL_Click(sender As Object, e As System.EventArgs) Handles LbAgregarCL.Click
         Dim ObjCaracteristicaClasificacion As New ClsAF
@@ -85,8 +74,7 @@ Partial Class AF_CatClasificacionesCaracteristicas
             TxtCaracteristicaClasificacionCL.Text = ""
             Alert("La Nueva Clasificación de Activo Fijo se guardó correctamente.", TipoMensaje.MsgInformacion)
             UpTitulosCL.Update()
-
-            CargaSubTiposActivosFijos()
+            GlobalDTAFCaracteristicasClasificaciones(UsuarioActual.CveEmpresa) = Nothing
 
             If ViewState("OrdenCL").ToString() <> String.Empty Then
                 CargaGrid(ViewState("OrdenCL").ToString(), 0)
@@ -147,10 +135,7 @@ Partial Class AF_CatClasificacionesCaracteristicas
         Dim ObjCaracteristicaClasificacion As New ClsAF
         If ObjCaracteristicaClasificacion.RemoveClasificacionesCaracteristicas(GvDatosCL.DataKeys(e.RowIndex).Value.ToString.ToEntero, UsuarioActual.CveEmpresa) Then
             GvDatosCL.EditIndex = -1
-
-            CargaSubTiposActivosFijos()
-            'CargaCaracteristicasClasificaciones()
-
+            GlobalDTAFCaracteristicasClasificaciones(UsuarioActual.CveEmpresa) = Nothing
             Alert("La Clasificación se eliminó correctamente.", TipoMensaje.MsgInformacion)
         End If
 
@@ -183,9 +168,7 @@ Partial Class AF_CatClasificacionesCaracteristicas
         If ObjCaracteristicaClasificacion.UpdateClasificacionesCaracteristicas(CaracteristicaClasificacion, Estatus, CveCaracteristicaClasificacion, UsuarioActual.CveEmpresa) Then
             GvDatosCL.EditIndex = -1
 
-            CargaSubTiposActivosFijos()
-            'CargaCaracteristicasClasificaciones()
-
+            GlobalDTAFCaracteristicasClasificaciones(UsuarioActual.CveEmpresa) = Nothing
             Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion)
         End If
 
@@ -228,12 +211,10 @@ Partial Class AF_CatClasificacionesCaracteristicas
             TxtLongitudCA.Text = ""
             Alert("La Nueva Característica de Activo Fijo se guardó correctamente.", TipoMensaje.MsgInformacion)
             UpTitulosCA.Update()
-            ViewState("DTCatacteristica") = ObjCaracteristicas.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
 
 
-            CargaSubTiposActivosFijos()
-            ''CargaCaracteristicasClasificaciones()
-            'CargaCaracteristicas()
+            GlobalDTAFCaracteristicas(UsuarioActual.CveEmpresa) = Nothing
+
 
             If ViewState("OrdenCA").ToString() <> String.Empty Then
                 CargaGrid(ViewState("OrdenCA").ToString(), 1)
@@ -262,7 +243,7 @@ Partial Class AF_CatClasificacionesCaracteristicas
     End Sub
     Protected Sub DdlTiposActivosFijosCA_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlTiposActivosFijosCA.SelectedIndexChanged
         DdlSubTiposActivosFijosCA.Items.Clear()
-        DdlSubTiposActivosFijosCA.DataSource = GlobalDTSubTipoActivoFijo(UsuarioActual.CveEmpresa).FiltraParametros(String.Format("CveTipoActivoFijo = {0} AND CveEmpresa = {1}", DdlTiposActivosFijosCA.SelectedValue.ToEntero, UsuarioActual.CveEmpresa))
+        DdlSubTiposActivosFijosCA.DataSource = GlobalDTSubTipoActivoFijo(UsuarioActual.CveEmpresa, DdlTiposActivosFijosCA.SelectedValue.ToEntero)
         DdlSubTiposActivosFijosCA.DataBind()
         DdlSubTiposActivosFijosCA.Items.Insert(0, New ListItem("Todos", "-1"))
     End Sub
@@ -368,8 +349,6 @@ Partial Class AF_CatClasificacionesCaracteristicas
             GvDatosCA.EditIndex = -1
             GlobalDTAFCaracteristicas(UsuarioActual.CveEmpresa) = Nothing
 
-            CargaSubTiposActivosFijos()
-
             Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion)
         End If
 
@@ -596,8 +575,6 @@ Partial Class AF_CatClasificacionesCaracteristicas
             GvDatosOpciones.EditIndex = -1
             ViewState("DTCatacteristicaOpciones") = ObjCaracteristicas.DtResultados.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
 
-            CargaSubTiposActivosFijos()
-
             Alert("Los cambios se guardaron correctamente.", TipoMensaje.MsgInformacion)
         End If
 
diff --git a/AF/CatTiposServicios.aspx.cs b/AF/CatTiposServicios.aspx.cs
index c553b8dd1..9c3ae2767 100644
--- a/AF/CatTiposServicios.aspx.cs
+++ b/AF/CatTiposServicios.aspx.cs
@@ -72,7 +72,7 @@ public partial class AF_CatTiposServicios : ClsPaginas
         GridViewRow GvRow = (GridViewRow)(((LinkButton)sender).NamingContainer);
         CveTipoServicio = GvRow.DataKey("CveTipoServicio").ToEntero();
         ClsAF ObjAF = new ClsAF();
-        if (ObjAF.DeleteTiposServicios(CveTipoServicio))
+        if (ObjAF.DeleteTiposServicios(CveTipoServicio, UsuarioActual.CveEmpresa))
         {
             CargaDatos();
             UpDatos.Update();
@@ -87,7 +87,7 @@ public partial class AF_CatTiposServicios : ClsPaginas
         ClsAF ObjAF = new ClsAF();
         if (BtnAgregarTipoServicio.Text == "Agregar")
         {
-            if (ObjAF.AddTiposServicios(TxtNombre.Text,DdlTipoMantenimiento.SelectedValue.ToEntero(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa))
+            if (ObjAF.AddTiposServicios(TxtNombre.Text,DdlTipoMantenimiento.SelectedValue.ToEntero(), 1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa))
             {
                 CargaDatos();
                 UpDatos.Update();
@@ -97,7 +97,7 @@ public partial class AF_CatTiposServicios : ClsPaginas
         }
         else
         {
-            if (ObjAF.UpdateTiposServicios(CveTipoServicio, TxtNombre.Text, DdlTipoMantenimiento.SelectedValue.ToEntero(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa))
+            if (ObjAF.UpdateTiposServicios(CveTipoServicio, TxtNombre.Text, DdlTipoMantenimiento.SelectedValue.ToEntero(), 1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa))
             {
                 CargaDatos();
                 UpDatos.Update();
diff --git a/AF/TipoOrdenTrabajo.aspx.vb b/AF/TipoOrdenTrabajo.aspx.vb
index aa2110249..a8396d98a 100644
--- a/AF/TipoOrdenTrabajo.aspx.vb
+++ b/AF/TipoOrdenTrabajo.aspx.vb
@@ -603,7 +603,7 @@ Partial Class AF_TipoOrdenTrabajo
 
         If CveTipoServicio = -1 Then
 
-            If ObjAF.AddTiposServicios(TxtTipoServicio.Text.Trim, DdlTipoMantenimiento.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
+            If ObjAF.AddTiposServicios(TxtTipoServicio.Text.Trim, DdlTipoMantenimiento.SelectedValue.ToEntero, 1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
 
 
                 CveTipoServicio = ObjAF.CveTipoServicio
@@ -651,7 +651,7 @@ Partial Class AF_TipoOrdenTrabajo
 
         Else
 
-            If Not ObjAF.UpdateTiposServicios(CveTipoServicio, TxtTipoServicio.Text.Trim, DdlTipoMantenimiento.SelectedValue.ToEntero, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
+            If Not ObjAF.UpdateTiposServicios(CveTipoServicio, TxtTipoServicio.Text.Trim, DdlTipoMantenimiento.SelectedValue.ToEntero, 1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
                 ErrorProceso = True
             End If
 
diff --git a/Contratos/RepContratosAvances.aspx b/Contratos/RepContratosAvances.aspx
new file mode 100644
index 000000000..cbc3d6769
--- /dev/null
+++ b/Contratos/RepContratosAvances.aspx
@@ -0,0 +1,124 @@
+<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepContratosAvances.aspx.vb" Inherits="RepContratosAvances" %>
+
+<%@ Register Assembly="AjaxControlToolkit" Namespace="AjaxControlToolkit" TagPrefix="asp" %>
+<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
+</asp:Content>
+<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
+</asp:Content>
+<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
+</asp:Content>
+<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
+    Reporte de Contratos
+</asp:Content>
+<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
+</asp:Content>
+<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
+    <asp:UpdatePanel ID="UpFiltros" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+            <asp:Panel ID="PnlFiltros" runat="server" DefaultButton="CmdConsultar">
+                <div class="portlet solid grey-cascade portlet-filter" style="">
+                    <div class="portlet-title portlet-filterT" style="">
+                        <div class="titlefiltros caption ">
+                            <ul class="list-inline" id="TrProgramar" runat="server">
+                                <li>Cliente:
+                                <asp:DropDownList ID="DdlCliente" runat="server" AutoPostBack="true" DataTextField="NombreComercial" DataValueField="CveCliente" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 250px !important;"></asp:DropDownList>
+                                </li>
+                                <li>Contratos:
+                                <asp:DropDownList ID="DdlContrato" runat="server" AutoPostBack="true" DataTextField="NumeroContrato" DataValueField="CveContrato" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;"></asp:DropDownList>
+                                </li>
+                                <li style="display: none;">Sección:
+                                <asp:DropDownList ID="DdlSeccion" runat="server" AutoPostBack="false" DataTextField="Seccion" DataValueField="CveSeccion" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;"></asp:DropDownList>
+                                </li>
+                                <li>Partida:
+                                <asp:DropDownList ID="DdlClasificacion" runat="server" AutoPostBack="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 90px !important;"></asp:DropDownList>
+                                </li>
+                                <li>Productos y Servicios:
+                                <asp:DropDownList ID="DdlPS" runat="server" AutoPostBack="true" DataTextField="PS" DataValueField="CvePS" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 150px !important;"></asp:DropDownList>
+                                </li>
+                            </ul>
+                        </div>
+                        <div class="tools">
+                            <asp:Button ID="CmdConsultar" runat="server" Text="Consultar" class="btn btn-primary" CausesValidation="true" ValidationGroup="GrConsulta" />
+                        </div>
+                    </div>
+                </div>
+            </asp:Panel>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+
+    <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+            <table class="table table-striped table-advance table-hover">
+                <thead>
+                    <tr class="Titulos">
+                        <th width="60px">#</th>
+                        <th width="300px">
+                            <asp:LinkButton ID="LbSubSeccion" runat="server" CausesValidation="false" Text="Cliente/ Contrato / Partida" /></th>
+                        <th width="120px">
+                            <asp:LinkButton ID="LinkButton1" runat="server" CausesValidation="false" Text="Contratado" /></th>
+                        <th width="120px">
+                            <asp:LinkButton ID="LinkButton4" runat="server" CausesValidation="false" Text="Actual" /></th>
+                        <th width="120px">
+                            <asp:LinkButton ID="LinkButton5" runat="server" CausesValidation="false" Text="Por Estimar" /></th>
+                        <th width="120px">
+                            <asp:LinkButton ID="LinkButton2" runat="server" CausesValidation="false" Text="Ejecutado" /></th>
+                        <th width="120px">
+                            <asp:LinkButton ID="LinkButton3" runat="server" CausesValidation="false" Text="Obra Faltante" /></th>
+                    </tr>
+                </thead>
+            </table>
+            <asp:GridView ID="GV" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron Estimaciones con los Filtros seleccionados" DataKeyNames="CveContrato" ShowHeader="false" SelectedRowStyle-BackColor="#CCFF66" CssClass="table table-striped table-advance table-hover" Style="margin-top: -10px; text-align: center;" GridLines="None">
+                <Columns>
+                    <asp:TemplateField>
+                        <ItemTemplate>
+                            <asp:Literal ID="LitEst" runat="server" Text='<%# Eval("CveContrato")%>' />
+                        </ItemTemplate>
+                        <ItemStyle HorizontalAlign="Center"></ItemStyle>
+                    </asp:TemplateField>
+                    <asp:TemplateField>
+                        <ItemTemplate>
+                            <asp:HyperLink ID="HplAgrupador" CssClass="Texto" runat="server" Text='<%# Eval("Agrupador") %>' NavigateUrl='<%# Eval("CveContrato", "ContratosDetalle.aspx?CveContrato={0}&Op=2")%>'></asp:HyperLink>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField>
+                        <ItemTemplate>
+                            <asp:HyperLink ID="HplContratado" CssClass="Texto" runat="server" Text='<%# Eval("Contratado", "{0:N2}")%>'></asp:HyperLink>
+                        </ItemTemplate>
+                        <ItemStyle HorizontalAlign="Right"></ItemStyle>
+                    </asp:TemplateField>
+                    <asp:TemplateField>
+                        <ItemTemplate>
+                            <asp:HyperLink ID="HplActual" CssClass="Texto" runat="server" Text='<%# Eval("LoQueEstoyHaciendo", "{0:N2}")%>'></asp:HyperLink>
+                        </ItemTemplate>
+                        <ItemStyle HorizontalAlign="Right"></ItemStyle>
+                    </asp:TemplateField>
+                    <asp:TemplateField>
+                        <ItemTemplate>
+                            <asp:HyperLink ID="HPlPorEstimar" CssClass="Texto" runat="server" Text='<%# Eval("PorEstimar", "{0:N2}")%>'></asp:HyperLink>
+                        </ItemTemplate>
+                        <ItemStyle HorizontalAlign="Right"></ItemStyle>
+                    </asp:TemplateField>
+                    <asp:TemplateField>
+                        <ItemTemplate>
+                            <asp:HyperLink ID="HplEjecutado" CssClass="Texto" runat="server" Text='<%# Eval("Ejecutado", "{0:N2}")%>'></asp:HyperLink>
+                        </ItemTemplate>
+                        <ItemStyle HorizontalAlign="Right"></ItemStyle>
+                    </asp:TemplateField>
+                    <asp:TemplateField>
+                        <ItemTemplate>
+                            <asp:HyperLink ID="HplOFA" CssClass="Texto" runat="server" Text='<%# Eval("OFA", "{0:N2}")%>'></asp:HyperLink>
+                        </ItemTemplate>
+                        <ItemStyle HorizontalAlign="Right"></ItemStyle>
+                    </asp:TemplateField>
+                </Columns>
+                <RowStyle CssClass="Texto" />
+                <AlternatingRowStyle CssClass="TextoAlterno" />
+                <HeaderStyle CssClass="Titulos" />
+            </asp:GridView>
+            <br />
+        </ContentTemplate>
+    </asp:UpdatePanel>
+</asp:Content>
+<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
+</asp:Content>
+