Merge branch 'master' of http://jperez@192.168.10.111:8383/SIG.git

2022-06-29 10:15:10 -07:00
parent ee75258ef2 f28317c346
commit 09b1319bc3
45 changed files with 2346 additions and 590 deletions
--- a/Acumuladores/EntradasUsadosResumenRep.aspx
+++ b/Acumuladores/EntradasUsadosResumenRep.aspx
@@ -14,7 +14,7 @@
                <asp:LinkButton runat="server" ID="BtnDescargaSabana" OnClick="BtnDescargaSabana_Click" data-toggle="tooltip" data-placement="left" title="Descargar Sábana de Venta" Text="<i class='fa fa-download'></i> Descargar Sábana de Venta"></asp:LinkButton>
            </li>
            <li>
-                <asp:LinkButton runat="server" ID="BtnImprimir" OnClick="BtnImprimir_Click" data-toggle="tooltip" data-placement="left" title="PDF" Text="<i class='fa fa-file-pdf-o'></i> PDF"></asp:LinkButton>
+                <asp:LinkButton runat="server" ID="BtnImprimir" OnClick="BtnImprimir_Click" data-toggle="tooltip" data-placement="left" title="PDF" Text="<i class='fa fa-file-pdf-o'></i> PDF" Visible="false"></asp:LinkButton>
            </li>
        </ContentTemplate>
        <Triggers>
@@ -81,7 +81,9 @@
                <ContentTemplate>
                    <asp:GridView ID="GvAcum" Width="100%" runat="server" GridLines="None" CssClass="table table-striped table-advance table-hover ScrollAD "
                        ShowHeader="True" EmptyDataText="No se encontraron resultados." ShowHeaderWhenEmpty="true" AutoGenerateColumns="False" AllowPaging="False"
-                        ShowFooter="False" DataKeyNames="CvePSCargo,CodigoPS,Inicial,E_Almacen,E_Pub,E_Traspaso,E_Compra,E_Otros,S_Almacen,S_Traspaso,S_Otros,Exist_Actual">
+                        ShowFooter="False" DataKeyNames="CvePSCargo,CodigoPS,Inicial,E_Almacen,E_Pub,E_Traspaso,E_Compra,E_Otros,S_Almacen,S_Traspaso,S_Otros,Exist_Actual"
+                        OnRowDataBound="GvAcum_RowDataBound"
+                        >
                        <Columns>
                            <asp:BoundField DataField="CodigoPS" HeaderText="Grupo" ReadOnly="true" ></asp:BoundField>
                            <asp:BoundField DataField="Inicial" HeaderText="Inicial" ReadOnly="true" DataFormatString="{0:N0}"><ItemStyle HorizontalAlign="Center"></ItemStyle></asp:BoundField>
--- a/Acumuladores/EntradasUsadosResumenRep.aspx.vb
+++ b/Acumuladores/EntradasUsadosResumenRep.aspx.vb
@@ -53,14 +53,25 @@ Partial Class Acumuladores_RepEntradasUsados
    Protected Sub BtnConsultar_Click(sender As Object, e As EventArgs)
        Dim ObjAcum As New ClsAcumuladores

+        BtnImprimir.Visible = False
+
        If ObjAcum.EntradasUsadosGet(UsuarioActual.CveEmpresa, DdlAlmacenes.SelectedValue.ToEntero, txtFechaI.Text, txtFechaF.Text) Then
            GvAcum.DataSource = ObjAcum.DtResultados
            DatosEntradasUsados = ObjAcum.DtResultados

+            If DatosEntradasUsados IsNot Nothing AndAlso DatosEntradasUsados.Rows.Count > 0 Then
+                BtnImprimir.Visible = True
+            End If
+
        End If
+
        ObjAcum.Dispose()
+
        GvAcum.DataBind()

+        UpAcciones.Update()
+        UpDatos.Update()
+
    End Sub

    Protected Sub BtnImprimir_Click(sender As Object, e As EventArgs)
@@ -163,4 +174,20 @@ Partial Class Acumuladores_RepEntradasUsados


    End Sub
+
+    Protected Sub GvAcum_RowDataBound(sender As Object, e As GridViewRowEventArgs)
+
+        If e.Row.RowType = DataControlRowType.DataRow Then
+
+            If e.Row.DataKey("CvePSCargo").ToEntero <= 0 Then
+
+                e.Row.CssClass = "Totales"
+
+            End If
+
+
+        End If
+
+    End Sub
+
 End Class
--- a/Agropecuaria/CierreCultivo.aspx
+++ b/Agropecuaria/CierreCultivo.aspx
@@ -50,10 +50,7 @@
                                <div class="col-md-1 truncate"><asp:Label runat="server" ID="LblSubProyecto"></asp:Label></div>
                                <div class="col-md-2">
                                    <asp:DropDownList ID="DdlSubProyectoCierreCultivo" runat="server" Width="100%" CssClass="form-control select2me"  DataTextField="SubProyecto" DataValueField="CveSubProyecto"></asp:DropDownList>
-                                </div>
-
-
-                                       
+                                </div>                                      

                            </div>

@@ -75,7 +72,8 @@
                <div class="col-md-6">
                    <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False"
                        DataKeyNames="CveClasificacion"
-                        EmptyDataText="No se Encontraron datos" CssClass="table table-striped table-advance table-hover mysmallbtn " data-sort="true" Style="width: 100%" GridLines="None">
+                        EmptyDataText="No se Encontraron datos" CssClass="table table-striped table-advance table-hover mysmallbtn " data-sort="true" Style="width: 100%" GridLines="None"
+                        OnRowDataBound="GvDatos_RowDataBound" >
                        <Columns>
                            <asp:BoundField HeaderText="Clasificación" DataField="Clasificacion" ItemStyle-HorizontalAlign="Left" />
                            <asp:BoundField HeaderText="Importe" DataField="Importe" ItemStyle-HorizontalAlign="Right" DataFormatString="{0:n2}" />
@@ -102,21 +100,30 @@
                    </div>
                    <div class="modal-body">

-                       
+                         <div class="form-group form-md-line-input input-iconright" >

-                        <div class="form-group form-md-line-input input-iconright">
+                            <asp:TextBox ID="TxtModalConcepto" CssClass="form-control" MaxLength="100" runat="server"></asp:TextBox>
+                            <asp:RequiredFieldValidator ID="RfvTxtModalConcepto" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtModalConcepto"
+                                ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Concepto''</b> es necesario, por favor ingréselo." ValidationGroup="GpoModalCerrarCultivo"></asp:RequiredFieldValidator>
+                            <label for="<%= TxtModalConcepto.ClientID.ToString() %>">Concepto:</label>
+                            <i></i>

-                            <asp:TextBox ID="TxtmodalFechaCierreCultivo" CssClass="form-control" MaxLength="50" runat="server"></asp:TextBox>
+                        </div>
+
+
+                        <div class="form-group form-md-line-input input-iconright" style="width:150px!important">
+
+                            <asp:TextBox ID="TxtmodalFechaCierreCultivo" CssClass="form-control" MaxLength="50" runat="server" Width="110px"></asp:TextBox>
                            <span class="input-group-btn " style="position: absolute; right: 41px; top: -5px;">
                                <asp:LinkButton ID="LnkTxtmodalFechaCierreCultivo" class="btn default" Style="margin-top: 15px; margin-left: 6px" Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
                            </span>
                            <ajax:CalendarExtender runat="server" ID="CETxtmodalFechaCierreCultivo" TargetControlID="TxtmodalFechaCierreCultivo" PopupButtonID="LnkTxtmodalFechaCierreCultivo" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
-                            
-                            <asp:CompareValidator ID="CvTxtmodalFechaCierreCultivo" runat="server" ControlToValidate="TxtmodalFechaCierreCultivo" Display="None" 
-                                ErrorMessage="El campo <b>''Fecha de Cierre''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." 
+
+                            <asp:CompareValidator ID="CvTxtmodalFechaCierreCultivo" runat="server" ControlToValidate="TxtmodalFechaCierreCultivo" Display="None"
+                                ErrorMessage="El campo <b>''Fecha de Cierre''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)."
                                Operator="DataTypeCheck" Type="Date" ValidationGroup="GpoModalCerrarCultivo"></asp:CompareValidator>

-                            <asp:RequiredFieldValidator ID="RfvTxtmodalFechaCierreCultivo" runat="server" CssClass="help-block errorimput"  ControlToValidate="TxtmodalFechaCierreCultivo" 
+                            <asp:RequiredFieldValidator ID="RfvTxtmodalFechaCierreCultivo" runat="server" CssClass="help-block errorimput" ControlToValidate="TxtmodalFechaCierreCultivo" 
                                ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha de Cierre''</b> es necesario, por favor ingréselo." ValidationGroup="GpoModalCerrarCultivo"></asp:RequiredFieldValidator>

                            <ajax:ValidatorCalloutExtender ID="CvcTxtmodalFechaCierreCultivo" runat="server" HighlightCssClass="vco" TargetControlID="CvTxtmodalFechaCierreCultivo" Width="100px"></ajax:ValidatorCalloutExtender>
@@ -127,9 +134,11 @@

                        </div>

+                       
+
                    </div>
                    <div class="modal-footer">
-                        <asp:Button ID="BtnModalCerrarCultivo" runat="server" Text="Cerrar Cultivo" CssClass="btn btn-primary" ValidationGroup="GpoModalCerrarCultivo" />
+                        <asp:Button ID="BtnModalCerrarCultivo" runat="server" Text="Cerrar Cultivo" OnClick="BtnModalCerrarCultivo_Click" CssClass="btn btn-primary" ValidationGroup="GpoModalCerrarCultivo" />
                        <button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
                    </div>
                </div>
--- a/Agropecuaria/CierreCultivo.aspx.vb
+++ b/Agropecuaria/CierreCultivo.aspx.vb
@@ -19,6 +19,20 @@ Partial Class Agrupecuaria_CierreCultivo
    End Property


+    Private Property DT_Datos_Cierre_Cuadros As DataTable
+        Get
+
+            If ViewState("DT_Datos_Cierre_Cuadros") Is Nothing Then
+                ViewState("DT_Datos_Cierre_Cuadros") = New DataTable
+            End If
+
+            Return DirectCast(ViewState("DT_Datos_Cierre_Cuadros"), DataTable)
+
+        End Get
+        Set(ByVal value As DataTable)
+            ViewState("DT_Datos_Cierre_Cuadros") = value
+        End Set
+    End Property


    Private Sub Agrupecuaria_CierreCultivo_Load(sender As Object, e As EventArgs) Handles Me.Load
@@ -55,20 +69,40 @@ Partial Class Agrupecuaria_CierreCultivo
            Exit Sub
        End If

+
+
+        If Not DdlSubProyectoCierreCultivo.SelectedValue.ToEntero > 0 Then
+            Alert($"Debe de seleccionar un {LblSubProyecto.Text}", TipoMensaje.MsgAdvertencia)
+            Exit Sub
+        End If
+
+
+        DT_Datos_Cierre = Nothing
+        DT_Datos_Cierre_Cuadros = Nothing
+
        Dim ObjGral As New ClsGenerales

-        If ObjGral.GetCierreCultivos(DdlTemporada.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) Then
-            GvDatos.DataSource = ObjGral.DtResultados
-            DT_Datos_Cierre = ObjGral.DtResultados
+        'se valida que se ejecute la consulta, que el resultado tenga dos tablas y que  las dos tablas tengan por lo menos 1 registro
+        If ObjGral.GetCierreCultivos(DdlTemporada.SelectedValue.ToEntero, DdlSubProyectoCierreCultivo.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) AndAlso ObjGral.DSResultados.Tables.Count = 2 AndAlso
+            ObjGral.DSResultados.Tables(0).Rows.Count > 0 AndAlso ObjGral.DSResultados.Tables(1).Rows.Count > 0 Then
+
+            DT_Datos_Cierre = ObjGral.DSResultados.Tables(0).FiltraParametros("", "Gpo")
+            DT_Datos_Cierre_Cuadros = ObjGral.DSResultados.Tables(1)
+
+
+            GvDatos.DataSource = DT_Datos_Cierre
+
        Else
            GvDatos.DataSource = Nothing
            DT_Datos_Cierre = Nothing
+            DT_Datos_Cierre_Cuadros = Nothing
        End If

        OcultarmostrarControles(DT_Datos_Cierre)

        ObjGral.Dispose()
        GvDatos.DataBind()
+
        UpDatos.Update()


@@ -81,10 +115,12 @@ Partial Class Agrupecuaria_CierreCultivo

    Protected Sub LnkAccionesCerrarCultivo_Click(sender As Object, e As EventArgs)

-
+        TxtModalConcepto.Text = ""
+        TxtmodalFechaCierreCultivo.Text = ""
+        UpModalCerrarCultivo.Update()

        RegistraScript("$('#DivModalCerrarCultivo').modal('show');")
-        UpModalCerrarCultivo.Update()
+


    End Sub
@@ -108,17 +144,79 @@ Partial Class Agrupecuaria_CierreCultivo
        Dim ObjConta As New ClsContabilidad()
        ObjConta.IniciaTransacSQL()
        Dim CvePrePoliza As Integer = -1
+        Dim FolioPoliza As Integer = -1
        Dim ErrorProceso As Boolean = False

        Dim CveSubProyecto As Integer = DdlSubProyectoCierreCultivo.SelectedValue.ToEntero


-        Dim ImporteCierre As Decimal = DT_Datos_Cierre.SUMD("Importe")
+        Dim ImporteCierre As Decimal = DT_Datos_Cierre.SUMD("Importe", "CveClasificacion > 0")
+        Dim CveClasificacionTotalitaria As Integer = DT_Datos_Cierre.Rows(0)("CveClasificacion").ToString.ToEntero ' se usa la primera clasificacion 

-        CvePrePoliza = ObjConta.AddPrePolizas("CierreCultivo/Cerrar", 1, ImporteCierre, ImporteCierre, 1, TxtmodalFechaCierreCultivo.Text.ToDate, $"Cierre Temporada {DdlTemporada.Text}", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo:=FolioFijo, ReglaFolioPoliza:=ObjCompras.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, DdlTipoTransaccionCaja.SelectedValue, UsuarioActual.CveEmpresa), CveTipoPoliza:=ObjConta.ObtenerTipoPoliza(DdlTipoTransaccion.SelectedValue, DdlTipoTransaccionCaja.SelectedValue, UsuarioActual.CveEmpresa))
+
+        Dim ConceptoTotales As String = $"{DdlTemporada.SelectedItem.Text}-{DdlSubProyectoCierreCultivo.SelectedItem.Text}"
+
+        CvePrePoliza = ObjConta.AddPrePolizas("CierreCultivo/Cerrar", 53, ImporteCierre, ImporteCierre, 1, TxtmodalFechaCierreCultivo.Text.ToDate, TxtModalConcepto.Text, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveTipoPoliza:=3)
+        'FolioPoliza = ObjConta.FolioPoliza

        If CvePrePoliza > 0 Then

+            Dim Orden As Integer = 1
+
+            For Each dRow As DataRow In DT_Datos_Cierre.Rows
+
+                Dim ImporteMovimiento As Decimal = dRow("Importe").ToString.ToDecimal
+                Dim CveClasificacion As Integer = dRow("CveClasificacion").ToString.ToEntero
+                Dim Clasificacion As String = dRow("Clasificacion").ToString
+                Dim TipoMovimiento As Boolean = True
+
+                Dim CveConceptoClasificaiones As Integer = 336
+                Dim CveConceptoNominas As Integer = 336
+
+                Dim CveConceptoTotal As Integer = 69
+
+
+                If CveClasificacion > 0 Then
+
+
+                    If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, 1, ImporteMovimiento, Clasificacion, CveConceptoClasificaiones, Clasificacion, TxtmodalFechaCierreCultivo.Text.ToDate, -1, -1, -1, -1, ImporteMX:=ImporteMovimiento, CvePrePolizaOriginal:=CvePrePoliza, ImporteME:=0, TipoCambio:=1, CveSubProyecto:=CveSubProyecto, CveClasificacion:=CveClasificacion) Then
+                        ErrorProceso = True
+                        Exit For
+                    End If
+
+                Else
+
+                    If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, 0, ImporteCierre, ConceptoTotales, 69, ConceptoTotales, TxtmodalFechaCierreCultivo.Text.ToDate, -1, -1, -1, -1, -1, ImporteMX:=ImporteCierre, CvePrePolizaOriginal:=CvePrePoliza, ImporteME:=0, TipoCambio:=1, CveSubProyecto:=CveSubProyecto, CveClasificacion:=CveClasificacionTotalitaria) Then
+                        ErrorProceso = True
+                        Exit For
+                    End If
+
+                End If
+
+                Orden = Orden + 1
+            Next
+
+
+            If Not ErrorProceso Then
+
+                Dim ObjGral As New ClsGenerales(ObjConta.IniciaTransacSQL)
+
+
+                For Each dRow As DataRow In DT_Datos_Cierre_Cuadros.Rows
+                    If Not ObjGral.UpdateCierreCultivos(dRow("CveCultivoCuadro").ToString.ToEntero, CvePrePoliza, UsuarioActual.CveEmpresa) Then
+                        ErrorProceso = True
+                        Exit For
+                    End If
+                Next
+
+
+
+            End If
+
+
+
+            'ObjConta.UpdatePrePolizasOrdenamiento(CvePrePoliza, UsuarioActual.CveEmpresa)
+
        Else
            ErrorProceso = True
        End If
@@ -128,8 +226,9 @@ Partial Class Agrupecuaria_CierreCultivo
            ObjConta.RollBack()
        Else
            ObjConta.Commit()
-
+            Alert($"Cultivo Cerrado correctamente  <b><a target='_blank' href='/Contabilidad/RegPrePolizaS.aspx?CvePrePoliza={CvePrePoliza}'>Ver Pre Póliza</a><b>")
            RegistraScript("$('#DivModalCerrarCultivo').modal('hide');")
+            CargaDatos()
        End If

        ObjConta.Dispose()
@@ -137,4 +236,23 @@ Partial Class Agrupecuaria_CierreCultivo
    End Sub


+
+    Protected Sub GvDatos_RowDataBound(sender As Object, e As GridViewRowEventArgs)
+
+        If e.Row.RowType = DataControlRowType.DataRow Then
+
+
+            If e.Row.DataKey("CveClasificacion").ToEntero <= 0 Then
+
+                e.Row.Font.Bold = True
+
+            End If
+
+        End If
+
+    End Sub
+
+    Protected Sub BtnModalCerrarCultivo_Click(sender As Object, e As EventArgs)
+        CierraCultivo()
+    End Sub
 End Class
--- a/App_Code/ClsCompras.vb
+++ b/App_Code/ClsCompras.vb
@@ -3182,6 +3182,24 @@ Public Class ClsCompras
        Return Retorno
    End Function

+
+    Public Function UpdateFechaCompra(CveCompra As Integer, Fecha As Date, CveEmpresa As Integer) As Boolean
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_Comp_ComprasFechaUpdate")
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveCompra", SqlDbType.Int).Value = CveCompra
+            .Add("@Fecha", SqlDbType.Date).Value = Fecha
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+        End With
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error al actualizar la fecha de la compra.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+        Return Retorno
+    End Function
+
    Public Function GetRepEvaluacionesProveedores(CveEmpresa As Integer, CveProveedor As Integer, FechaI As Date, FechaF As Date, Evaluado As Integer) As Boolean
        Dim Retorno As Boolean = False
        DataAdapter("PA_Comp_RepEvaluacionesProveedoresGet")
@@ -3338,7 +3356,6 @@ Public Class ClsCompras
    End Function


-
 End Class


--- a/App_Code/ClsContabilidad.vb
+++ b/App_Code/ClsContabilidad.vb
@@ -228,6 +228,8 @@ Public Class ClsContabilidad
                OnError("No se puede registrar una póliza en un ejercicio Cerrado", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
            ElseIf ex.Message.Contains("CK_Conta_PrePolizas_Concepto") Then
                OnError("Ocurrio un error al registrar la póliza, el concepto o descripción no puede ir vacio", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+            ElseIf ex.Message.Contains("UK_CveEmpresa_CveTipoPoliza_AnioMes_FolioPoliza") Then
+                Alert("No se puede registrar la póliza, póliza duplicada, ya existe una póliza con los datos especificados.", TipoMensaje.MsgAdvertencia)
            Else
                OnError("Ocurrió un error al Guardar", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
            End If
@@ -289,7 +291,7 @@ Public Class ClsContabilidad

    Public Function UpdatePrePolizasDetalle(CvePrePolizaDetalle As Integer, Concepto As String, CveSubProyecto As Integer, IdCtaContable As Integer, TipoMovto As Boolean, ImporteMN As Decimal, Optional CveTipoGasto As Integer = -1,
                                            Optional CveConceptoContable As Integer = -1, Optional CveProveedor As Integer = -1, Optional CveCompra As Integer = -1, Optional CvePersonal As Integer = -1, Optional CveCliente As Integer = -1, Optional CveVenta As Integer = -1,
-                                            Optional Referencia As String = "-1", Optional CveUsuarioModifico As Integer = -1, Optional CveCuenta As Integer = -1, Optional PorcentajeImpuesto As Decimal = -1, Optional Importe As Decimal = -1) As Boolean
+                                            Optional Referencia As String = "-1", Optional CveUsuarioModifico As Integer = -1, Optional CveCuenta As Integer = -1, Optional PorcentajeImpuesto As Decimal = -1, Optional Importe As Decimal = -1, Optional CveIE As Integer = -1) As Boolean

        Dim Retorno As Boolean = False

@@ -314,6 +316,8 @@ Public Class ClsContabilidad
            .Add("@PorcentajeImpuesto", SqlDbType.Money).Value = PorcentajeImpuesto
            .Add("@CveUsuarioModifico", SqlDbType.Int).Value = CveUsuarioModifico
            .Add("@CveCuenta", SqlDbType.Int).Value = CveCuenta
+            .Add("@CveIE", SqlDbType.Int).Value = CveIE
+
        End With

        Try
@@ -1647,6 +1651,8 @@ Public Class ClsContabilidad

            If ex.Message.Contains("50015;") Then
                OnError("No se puede actualizar una póliza en un ejercicio Cerrado", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+            ElseIf ex.Message.Contains("UK_CveEmpresa_CveTipoPoliza_AnioMes_FolioPoliza") Then
+                Alert("No se puede actualizar la póliza, póliza duplicada, ya existe una póliza con los datos especificados.", TipoMensaje.MsgAdvertencia)
            Else
                OnError("Ocurrió un error al actualizar prepoliza del movimiento", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
            End If
--- a/App_Code/ClsGenerales.vb
+++ b/App_Code/ClsGenerales.vb
@@ -15,6 +15,7 @@ Public Class ClsGenerales
    Private SqlCommand As SqlCommand
    Private SqlTransacc As SqlTransaction
    Private Data As DataTable
+    Private DSet As New DataSet
    Private disposedValue As Boolean = False
    'REGISTRAR CONEXIONES ABIERTAS
    Private CveConexion As Integer = 0
@@ -50,6 +51,12 @@ Public Class ClsGenerales
        End Get
    End Property

+    Public ReadOnly Property DSResultados() As DataSet
+        Get
+            DSResultados = DSet
+        End Get
+    End Property
+
    Public Property FolioInsertado As Integer

    Public Property SerieInsertada As String
@@ -3623,18 +3630,40 @@ Public Class ClsGenerales
    End Function


-    Public Function GetCierreCultivos(CveTemporada As Integer, CveEmpresa As Integer) As Boolean
+    Public Function UpdateCierreCultivos(CveCultivoCuadro As Integer, CvePrePoliza As Integer, CveEmpresa As Integer) As Boolean

        Dim Retorno As Boolean = False
-        DataAdapter("PA_Agro_CierreCultivosGet")
+        DataAdapter("PA_Agro_CierreCultivosUpdate")
        With SqlAdapter.SelectCommand.Parameters
-            .Add("@CveTemporada", SqlDbType.Int).Value = CveTemporada
+            .Add("@CveCultivoCuadro", SqlDbType.Int).Value = CveCultivoCuadro
+            .Add("@CvePrePoliza", SqlDbType.Int).Value = CvePrePoliza
            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
        End With

        Try
            SqlAdapter.Fill(Data)
            Retorno = True
+        Catch ex As Exception
+            OnError($"Ocurrió un error al actualizar  la pre póliza del cuadro.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        End Try
+
+        Return Retorno
+
+    End Function
+
+    Public Function GetCierreCultivos(CveTemporada As Integer, CveSubProyecto As Integer, CveEmpresa As Integer) As Boolean
+
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_Agro_CierreCultivosGet")
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveTemporada", SqlDbType.Int).Value = CveTemporada
+            .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+        End With
+
+        Try
+            SqlAdapter.Fill(DSet)
+            Retorno = True
        Catch ex As Exception
            OnError($"Ocurrió un error al obtener los datos de cultivo.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
        End Try
@@ -3644,7 +3673,6 @@ Public Class ClsGenerales
    End Function


-
 #End Region


@@ -4031,7 +4059,7 @@ Public Class ClsGenerales

        Dim Retorno As Boolean = False

-        DataAdapter("PA_Inv_EntregaAlmacenRutaRepGet")
+        DataAdapter("PA_Inv_EntregaAlmacenRutaRepGet2")

        With SqlAdapter.SelectCommand.Parameters

--- a/App_Code/ClsInventarios.vb
+++ b/App_Code/ClsInventarios.vb
@@ -5903,6 +5903,164 @@ Public Class ClsInventarios
    End Function
 #End Region

+
+
+#Region "VIGENCIA COMPUESTOS"
+
+
+    Public Function AddCompuestosVigencia(CveCompuesto As Integer, CveProveedor As Integer, RegistroRSCO As String, FechaVigencia As Date, VigenciaIndeterminada As Boolean, CveUsuario As Integer, CveEmpresa As Integer) As Boolean
+        Dim Retorno As Boolean = False
+
+        DataAdapter("PA_CompuestosVigenciaAdd")
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveCompuesto", SqlDbType.Int).Value = CveCompuesto
+            .Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor
+            .Add("@RegistroRSCO", SqlDbType.VarChar).Value = RegistroRSCO
+            .Add("@FechaVigencia", SqlDbType.Date).Value = FechaVigencia
+            .Add("@VigenciaIndeterminada", SqlDbType.Bit).Value = VigenciaIndeterminada
+            .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch Ex1 As SqlException
+            If Ex1.Message.Contains("IX_Inv_CveCompuestoCveProveedorFechaVigneciaCveEmpresa") Then
+                Alert($"Ya existe un RSCO con los datos especificados (proveedor, compuesto, Fecha de vigencia).", TipoMensaje.MsgAdvertencia)
+            ElseIf Ex1.Message.Contains("UNIX_Inv_RegistroRSCO") Then
+                Alert($"El RSCO {RegistroRSCO} ya se encuentra registrado.", TipoMensaje.MsgAdvertencia)
+            Else
+                Me.OnError("Ocurrió un error al guardar la vigencia.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+            End If
+        Catch ex As Exception
+            OnError("Ocurrió un error al guardar la vigencia.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+
+        Return Retorno
+    End Function
+
+    Public Function UpdateCompuestosVigencia(CveCompuestoVigencia As Integer, CveCompuesto As Integer, CveProveedor As Integer, RegistroRSCO As String, FechaVigencia As Date, VigenciaIndeterminada As Boolean, CveUsuario As Integer, CveEmpresa As Integer) As Boolean
+        Dim Retorno As Boolean = False
+
+        DataAdapter("PA_CompuestosVigenciaUpdate")
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveCompuestoVigencia", SqlDbType.Int).Value = CveCompuestoVigencia
+            .Add("@CveCompuesto", SqlDbType.Int).Value = CveCompuesto
+            .Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor
+            .Add("@RegistroRSCO", SqlDbType.VarChar).Value = RegistroRSCO
+            .Add("@FechaVigencia", SqlDbType.Date).Value = FechaVigencia
+            .Add("@VigenciaIndeterminada", SqlDbType.Bit).Value = VigenciaIndeterminada
+            .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch Ex1 As SqlException
+            If Ex1.Message.Contains("IX_Inv_CveCompuestoCveProveedorFechaVigneciaCveEmpresa") Then
+                Alert($"Ya existe un RSCO con los datos especificados (proveedor, compuesto, Fecha de vigencia).", TipoMensaje.MsgAdvertencia)
+            ElseIf Ex1.Message.Contains("UNIX_Inv_RegistroRSCO") Then
+                Alert($"El RSCO {RegistroRSCO} ya se encuentra registrado.", TipoMensaje.MsgAdvertencia)
+            Else
+                Me.OnError("Ocurrió un error al actualizar la vigencia.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+            End If
+        Catch ex As Exception
+            OnError("Ocurrió un error al actualizar el RSCO.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+
+        Return Retorno
+    End Function
+
+
+    Public Function RemoveCompuestosVigencia(CveCompuestoVigencia As Integer, CveEmpresa As Integer) As Boolean
+        Dim Retorno As Boolean = False
+
+        DataAdapter("PA_CompuestosVigenciaRemove")
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveCompuestoVigencia", SqlDbType.Int).Value = CveCompuestoVigencia
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch Ex1 As SqlException
+            Me.OnError("Ocurrió un error al eliminar el RSCO.", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+
+        Catch ex As Exception
+            OnError("Ocurrió un error al eliminar  el RSCO.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+
+        Return Retorno
+    End Function
+
+
+    Public Function GetCompuestosVigencia(CveCompuesto As Integer, CveProveedor As Integer, FechaI As Date, FechaF As Date, VigenciaIndeterminada As Boolean, CveEmpresa As Integer) As Boolean
+        Dim Retorno As Boolean = False
+
+        DataAdapter("PA_CompuestosVigenciaGet")
+
+        With SqlAdapter.SelectCommand.Parameters
+
+            .Add("@CveCompuesto", SqlDbType.Int).Value = CveCompuesto
+            .Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor
+            .Add("@FechaI", SqlDbType.Date).Value = FechaI
+            .Add("@FechaF", SqlDbType.Date).Value = FechaF
+            .Add("@VigenciaIndeterminada", SqlDbType.Int).Value = VigenciaIndeterminada
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch Ex1 As SqlException
+            Me.OnError("Ocurrió un error al obtener los RSCO", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        Catch ex As Exception
+            OnError("Ocurrió un error al obtener los RSCO.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+
+        Return Retorno
+    End Function
+
+
+    Public Function RepCompuestosVigencia(CveCompuesto As Integer, CveProveedor As Integer, FechaI As Date, FechaF As Date, VigenciaIndeterminada As Boolean, CveEmpresa As Integer) As Boolean
+        Dim Retorno As Boolean = False
+
+        DataAdapter("PA_CompuestosVigenciaRep")
+
+        With SqlAdapter.SelectCommand.Parameters
+
+            .Add("@CveCompuesto", SqlDbType.Int).Value = CveCompuesto
+            .Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor
+            .Add("@FechaI", SqlDbType.Date).Value = FechaI
+            .Add("@FechaF", SqlDbType.Date).Value = FechaF
+            .Add("@VigenciaIndeterminada", SqlDbType.Int).Value = VigenciaIndeterminada
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch Ex1 As SqlException
+            Me.OnError("Ocurrió un error al obtener los RSCO", Ex1, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        Catch ex As Exception
+            OnError("Ocurrió un error al obtener los RSCO.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+
+        Return Retorno
+    End Function
+
+
+#End Region
+
 #Region " IDisposable Support "
    ' IDisposable
    Protected Overridable Sub Dispose(ByVal disposing As Boolean)
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -5603,6 +5603,8 @@ Public Class ClsPaginas
            PaginaDict.Add("/Contabilidad/OCDetalleAlmacen.aspx".ToUpper(), -1)

            PaginaDict.Add("/Agropecuaria/CierreCultivo.aspx".ToUpper(), 1326)
+            PaginaDict.Add("/Inventarios/RegRSCO.aspx".ToUpper(), 1327)
+            PaginaDict.Add("/Inventarios/RepRSCO.aspx".ToUpper(), 1328)


            PaginaDict.Add("/testApi.aspx".ToUpper(), -1)
@@ -8901,32 +8903,39 @@ Public Class ClsPaginas
        DTConceptosPagoRelacionado.Columns.Add("TipoCambioDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("ObjetoImpDR", GetType(String))

+        DTConceptosPagoRelacionado.Columns.Add("Tra001BaseDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Tra001ImpuestoDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Tra001TipoFactorDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Tra001TasaOCuotaDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Tra001ImporteDR", GetType(Decimal))

+
+        DTConceptosPagoRelacionado.Columns.Add("Tra002BaseDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Tra002ImpuestoDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Tra002TipoFactorDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Tra002TasaOCuotaDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Tra002ImporteDR", GetType(Decimal))

+        DTConceptosPagoRelacionado.Columns.Add("Tra003BaseDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Tra003ImpuestoDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Tra003TipoFactorDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Tra003TasaOCuotaDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Tra003ImporteDR", GetType(Decimal))


+        DTConceptosPagoRelacionado.Columns.Add("Ret001BaseDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Ret001ImpuestoDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Ret001TipoFactorDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Ret001TasaOCuotaDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Ret001ImporteDR", GetType(Decimal))

+        DTConceptosPagoRelacionado.Columns.Add("Ret002BaseDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Ret002ImpuestoDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Ret002TipoFactorDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Ret002TasaOCuotaDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Ret002ImporteDR", GetType(Decimal))

+        DTConceptosPagoRelacionado.Columns.Add("Ret003BaseDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Ret003ImpuestoDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Ret003TipoFactorDR", GetType(String))
        DTConceptosPagoRelacionado.Columns.Add("Ret003TasaOCuotaDR", GetType(String))
@@ -8934,14 +8943,6 @@ Public Class ClsPaginas



-        '001 ISR
-        '002 IVA
-        '003 IEPS
-        'Impuetos
-        'Retenciones
-
-
-
        Dim ObjBancos As New ClsBancos
        If ObjBancos.GetComplementoPagos(CveComplementoPago, CveIE, CveVenta, UsuarioActual.CveEmpresa) Then
            Serie = ObjBancos.DtResultados.FiltroPrimeroValor("Serie")
@@ -9114,12 +9115,15 @@ Public Class ClsPaginas
                            Dim NodosTraslados = Relacionado.SelectNodes($"{PagoVersion}:ImpuestosDR/{PagoVersion}:TrasladosDR/{PagoVersion}:TrasladoDR", namespaces)
                            For Each NodoTraslados As XmlNode In NodosTraslados

+                                Dim BaseDR As String = ValorXML(NodoTraslados, "BaseDR")
                                Dim ImpuestoDR As String = ValorXML(NodoTraslados, "ImpuestoDR")  ' ImpuestoDR
                                Dim TipoFactor As String = ValorXML(NodoTraslados, "TipoFactorDR")
                                Dim TasaOCuotaDR As String = ValorXML(NodoTraslados, "TasaOCuotaDR")
                                Dim ImporteDR As Decimal = ValorXML(NodoTraslados, "ImporteDR").ToDecimal

                                If ImpuestoDR = "001" Then
+
+                                    DrRelacionado("Tra001BaseDR") = BaseDR
                                    DrRelacionado("Tra001ImpuestoDR") = ImpuestoDR
                                    DrRelacionado("Tra001TipoFactorDR") = TipoFactor
                                    DrRelacionado("Tra001TasaOCuotaDR") = TasaOCuotaDR
@@ -9127,6 +9131,7 @@ Public Class ClsPaginas
                                End If

                                If ImpuestoDR = "002" Then
+                                    DrRelacionado("Tra002BaseDR") = BaseDR
                                    DrRelacionado("Tra002ImpuestoDR") = ImpuestoDR
                                    DrRelacionado("Tra002TipoFactorDR") = TipoFactor
                                    DrRelacionado("Tra002TasaOCuotaDR") = TasaOCuotaDR
@@ -9134,6 +9139,7 @@ Public Class ClsPaginas
                                End If

                                If ImpuestoDR = "003" Then
+                                    DrRelacionado("Tra003BaseDR") = BaseDR
                                    DrRelacionado("Tra003ImpuestoDR") = ImpuestoDR
                                    DrRelacionado("Tra003TipoFactorDR") = TipoFactor
                                    DrRelacionado("Tra003TasaOCuotaDR") = TasaOCuotaDR
@@ -9143,12 +9149,14 @@ Public Class ClsPaginas

                            For Each NodoRetenciiones As XmlNode In Relacionado.SelectNodes($"{PagoVersion}:ImpuestosDR/{PagoVersion}:RetencionesDR/{PagoVersion}:RetencionDR", namespaces)

+                                Dim BaseDR As String = ValorXML(NodoRetenciiones, "BaseDR")
                                Dim ImpuestoDR As String = ValorXML(NodoRetenciiones, "ImpuestoDR")  ' ImpuestoDR
                                Dim TipoFactor As String = ValorXML(NodoRetenciiones, "TipoFactorDR")
                                Dim TasaOCuotaDR As String = ValorXML(NodoRetenciiones, "TasaOCuotaDR")
                                Dim ImporteDR As Decimal = ValorXML(NodoRetenciiones, "ImporteDR").ToDecimal

                                If ImpuestoDR = "001" Then
+                                    DrRelacionado("Ret001BaseDR") = BaseDR
                                    DrRelacionado("Ret001ImpuestoDR") = ImpuestoDR
                                    DrRelacionado("Ret001TipoFactorDR") = TipoFactor
                                    DrRelacionado("Ret001TasaOCuotaDR") = TasaOCuotaDR
@@ -9156,6 +9164,7 @@ Public Class ClsPaginas
                                End If

                                If ImpuestoDR = "002" Then
+                                    DrRelacionado("Ret002BaseDR") = BaseDR
                                    DrRelacionado("Ret002ImpuestoDR") = ImpuestoDR
                                    DrRelacionado("Ret002TipoFactorDR") = TipoFactor
                                    DrRelacionado("Ret002TasaOCuotaDR") = TasaOCuotaDR
@@ -9163,6 +9172,7 @@ Public Class ClsPaginas
                                End If

                                If ImpuestoDR = "003" Then
+                                    DrRelacionado("Ret003BaseDR") = BaseDR
                                    DrRelacionado("Ret003ImpuestoDR") = ImpuestoDR
                                    DrRelacionado("Ret003TipoFactorDR") = TipoFactor
                                    DrRelacionado("Ret003TasaOCuotaDR") = TasaOCuotaDR
--- a/App_Code/ClsSisEmpresas.vb
+++ b/App_Code/ClsSisEmpresas.vb
@@ -630,6 +630,7 @@ Public Class ClsSisEmpresas

        Return Retorno
    End Function
+
    Public Function UpdateEmpresa(Empresa As String, Direccion As String, NoExt As String, NoInt As String, Colonia As String, Ciudad As String, Estado As String,
                                  RFC As String, CP As Integer, Telefono As String, Contacto As String, Mail As String, TipoFacturacion As String, BIUsuario As String, BIContraseña As String, ContraseñaKey As String, ArchivoKey As String,
                                  ArchivoCer As String, ArchivoPfx As String, Banner As String, Estatus As Boolean, FacturaProduccion As Boolean, MostrarRetIVA As Boolean, MostrarRetISR As Boolean, Regimen As String, EstatusFacturacion As Boolean,
@@ -768,6 +769,37 @@ Public Class ClsSisEmpresas

        Return Retorno
    End Function
+
+
+    Public Function UpdateEmpresasCertificados(ArchivoKey As String, ArchivoCer As String, ArchivoPfx As String, CveEmpresa As Integer) As Boolean
+
+
+        Dim Retorno As Boolean = False
+
+        DataAdapter("PA_Sis_EmpresasCertificadosUpdate")
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@ArchivoKey", SqlDbType.VarChar).Value = ArchivoKey
+            .Add("@ArchivoCer", SqlDbType.VarChar).Value = ArchivoCer
+            .Add("@ArchivoPfx", SqlDbType.VarChar).Value = ArchivoPfx
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch Ex1 As SqlException
+            Alert("Ocurrió un error al actualizar los archivos de certificados", TipoMensaje.MsgAdvertencia)
+        Catch ex As Exception
+            OnError("Ocurrió un error al actualizar los archivos de certificados.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+
+        Return Retorno
+    End Function
+
+
+
+
    Public Function UpdateEmpresaXWizard(Empresa As String, Direccion As String, NoExt As String, NoInt As String, Colonia As String, Ciudad As String, Estado As String,
                                  RFC As String, CP As Integer, Telefono As String, Contacto As String, Mail As String, Regimen As String, SendMail As String, SendMailPassword As String, SendMailServer As String, SendMailPuerto As Integer, SendMailSSL As Boolean,
                                  Buzon_Mail As String, Buzon_Server As String, Buzon_Puerto As Integer, Buzon_SSL As Boolean, Buzon_USR As String, Buzon_PWD As String, CveEmpresa As Integer,
--- a/Compras/Compras.aspx
+++ b/Compras/Compras.aspx
@@ -288,32 +288,50 @@
                                </div>
                            </div>
                            <div class="row">
-                                <div class="form-group whitoutcol" style="width: 280px;">
-                                    <span class="whitoutcol linewhitsize comprasdfleft" style="width: 85px; margin-top: 10px;">Fecha Factura:</span>
-                                    <div class="whitoutcol whitoutcol comprasdfleftvar">
-                                        <div class="input-group input-sm  input-small date date-picker" data-date-format="dd/mm/yyyy">
+                              
+                                    
+                                    
+                                    <table>
+                                        <tr>
+                                            <td align="Center" style="width: 100px">Fecha Factura:</td>
+                                            <td align="left" style="width: 100px">
+                                                

-                                            <asp:UpdatePanel runat="server">
-                                                <ContentTemplate>
-                                                    <asp:TextBox ID="TxtFecha" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10" ValidationGroup="GrpGuardar" Width="100px" ClientIDMode="Static"></asp:TextBox>
-                                                    <ajax:MaskedEditExtender ID="MEEFecha" runat="server" TargetControlID="TxtFecha" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
-                                                    <ajax:CalendarExtender runat="server" ID="CEFecha" TargetControlID="TxtFecha" PopupButtonID="ImgFecha" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
-                                                    <asp:RequiredFieldValidator ID="RFVFecha" runat="server" ControlToValidate="TxtFecha" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
-                                                    <asp:CompareValidator ID="CVFecha" runat="server" ControlToValidate="TxtFecha" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> no tiene el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpGuardar"></asp:CompareValidator>
-                                                    <ajax:ValidatorCalloutExtender ID="VCOFecha1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFecha" Width="350px"></ajax:ValidatorCalloutExtender>
-                                                    <ajax:ValidatorCalloutExtender ID="VCOFecha2" runat="server" HighlightCssClass="vco" TargetControlID="CVFecha" Width="350px"></ajax:ValidatorCalloutExtender>
-                                                </ContentTemplate>
-                                            </asp:UpdatePanel>
-                                            <asp:HiddenField ID="HdnEjercicioAC" runat="server" Value="-1" />
-                                            <asp:Button Text="" ID="BtnCambiaFechaTC" OnClick="BtnCambiaFechaTC_Click" ClientIDMode="Static" Style="display: none;" runat="server" />
-                                            <asp:Button Text="" ID="BtnCambiaFecha" OnClick="BtnCambiaFecha_Click" ClientIDMode="Static" Style="display: none;" runat="server" />
+                                                    <div class="input-group input-sm  input-small date date-picker" data-date-format="dd/mm/yyyy">

-                                            <span class="input-group-btn ">
-                                                <asp:LinkButton runat="server" ID="ImgFecha" class="btn default"> <i class="fa fa-calendar"></i>  </asp:LinkButton>
-                                            </span>
-                                        </div>
-                                    </div>
-                                </div>
+                                                        <asp:UpdatePanel runat="server">
+                                                            <ContentTemplate>
+                                                                <asp:TextBox ID="TxtFecha" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10" ValidationGroup="GrpGuardar" Width="100px" ClientIDMode="Static"></asp:TextBox>
+                                                                <ajax:MaskedEditExtender ID="MEEFecha" runat="server" TargetControlID="TxtFecha" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
+                                                                <ajax:CalendarExtender runat="server" ID="CEFecha" TargetControlID="TxtFecha" PopupButtonID="ImgFecha" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
+                                                                <asp:RequiredFieldValidator ID="RFVFecha" runat="server" ControlToValidate="TxtFecha" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
+                                                                <asp:CompareValidator ID="CVFecha" runat="server" ControlToValidate="TxtFecha" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> no tiene el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpGuardar"></asp:CompareValidator>
+                                                                <ajax:ValidatorCalloutExtender ID="VCOFecha1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFecha" Width="350px"></ajax:ValidatorCalloutExtender>
+                                                                <ajax:ValidatorCalloutExtender ID="VCOFecha2" runat="server" HighlightCssClass="vco" TargetControlID="CVFecha" Width="350px"></ajax:ValidatorCalloutExtender>
+                                                            </ContentTemplate>
+                                                        </asp:UpdatePanel>
+                                                        <asp:HiddenField ID="HdnEjercicioAC" runat="server" Value="-1" />
+                                                        <asp:Button Text="" ID="BtnCambiaFechaTC" OnClick="BtnCambiaFechaTC_Click" ClientIDMode="Static" Style="display: none;" runat="server" />
+                                                        <asp:Button Text="" ID="BtnCambiaFecha" OnClick="BtnCambiaFecha_Click" ClientIDMode="Static" Style="display: none;" runat="server" />
+
+                                                        <span class="input-group-btn ">
+                                                            <asp:LinkButton runat="server" ID="ImgFecha" class="btn default"> <i class="fa fa-calendar"></i>  </asp:LinkButton>
+                                                        </span>
+                                                    </div>
+                                                 
+                                            </td>
+                                            <td align="left">
+                                                <asp:LinkButton runat="server" Visible="false" ID="LnkActualziarFechadecompra" OnClick="LnkActualziarFechadecompra_Click" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea actualizar la fecha de la compra?"
+                                                    data-btn-ok-label="si" Text="<i class='fa fa-check' style='color:green'></i>" CssClass="btn btn-default btn-circle btn-xs" ToolTip="Actualizar Fecha de compra" />
+                                            </td>
+                                        </tr>
+                                    </table>
+                                    
+                                    
+
+                                    
+
+                               
                                <div class="form-group whitoutcol" style="width: 280px;">
                                    <span class="whitoutcol linewhitsize comprasdfleft">Descripción: </span>
                                    <div class="whitoutcol whitoutcol comprasdfleftvar">
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -1899,6 +1899,8 @@ Partial Class Compras_Compras
                    ImgFecha.Enabled = UsuarioActual.TienePermisoProceso(216)
                    CEFecha.Enabled = UsuarioActual.TienePermisoProceso(216)

+
+
                    TxtSubTotal.Enabled = False
                    TxtDescuento.Enabled = False
                    TxtSubTotal2.Enabled = False
@@ -2901,6 +2903,16 @@ Partial Class Compras_Compras
                ImgFecha.Enabled = False
                CEFecha.Enabled = False

+
+                If UsuarioActual.TienePermisoProceso(342) Then
+                    TxtFecha.Enabled = True
+                    ImgFecha.Enabled = True
+                    CEFecha.Enabled = True
+                    LnkActualziarFechadecompra.Visible = True
+                End If
+
+
+
                DdlProveedor.Enabled = False
                DdlProveedorSucursal.Enabled = False
                DdlEstatus.Enabled = False
@@ -21142,6 +21154,21 @@ Partial Class Compras_Compras
    Private Sub ChkAliasFlexible_CheckedChanged(sender As Object, e As EventArgs) Handles ChkAliasFlexible.CheckedChanged
        TxtPSAlias.Enabled = ChkAliasFlexible.Checked
    End Sub
+
+    Protected Sub LnkActualziarFechadecompra_Click(sender As Object, e As EventArgs)
+
+
+        Dim ObjCompra As New ClsCompras
+
+
+        If ObjCompra.UpdateFechaCompra(CveCompra, TxtFecha.Text.ToDate, UsuarioActual.CveEmpresa) Then
+            Alert("Fecha Actualizada Correctamente")
+        End If
+
+
+        ObjCompra.Dispose()
+
+    End Sub
 End Class

 Public Class MMensajeDevolucion
--- a/Compras/RepPagado.aspx
+++ b/Compras/RepPagado.aspx
@@ -61,8 +61,7 @@
                            </div>
                            <div class="col-md-1">Proveedor:</div>
                            <div class="col-md-2 ">
-                                <asp:DropDownList ID="DdlProveedor" runat="server" AppendDataBoundItems="true" DataTextField="RazonSocial" DataValueField="CveProveedor" CssClass="form-control  input-small input-sm select2me" Width="100%">
-                                </asp:DropDownList>
+                                 <ADS:Dropdownlost ID="DdlProveedores" runat="server" CssStyle="width: 100%;" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor"></ADS:Dropdownlost>   
                            </div>
                            <div class="col-md-1">Fecha Inicial:</div>
                            <div class="col-md-1">
--- a/Compras/RepPagado.aspx.cs
+++ b/Compras/RepPagado.aspx.cs
@@ -42,9 +42,10 @@ public partial class Compras_RepPagado : ClsPaginas
        DdlMoneda.DataBind();

        //Carga Proveedor
-        DdlProveedor.DataSource = get_GlobalDTCompProveedores(UsuarioActual.CveEmpresa);
-        DdlProveedor.Items.Insert(0, new ListItem("Todos", "-1"));
-        DdlProveedor.DataBind();
+        DdlProveedores.setEsWebService(true);
+        DdlProveedores.Attributes.Add("data-metodo", "getproveedores");
+        DdlProveedores.SelectedText = "Todos";
+        DdlProveedores.SelectedValue = "-1";

        //Carga Usuarios
        DdlUsuario.DataSource = get_GlobalDTUsuarios(CveEmpresa: UsuarioActual.CveEmpresa);
@@ -163,7 +164,7 @@ public partial class Compras_RepPagado : ClsPaginas
    private void CargaDatos()
    {
        ClsCompras ObjComp = new ClsCompras();
-        if (ObjComp.GetRepPagado(txtFechaI.Text.ToDate(), txtFechaF.Text.ToDate(), DdlProveedor.SelectedValue.ToEntero(), DdlProyecto.SelectedValue.ToEntero(),
+        if (ObjComp.GetRepPagado(txtFechaI.Text.ToDate(), txtFechaF.Text.ToDate(), DdlProveedores.SelectedValue.ToEntero(), DdlProyecto.SelectedValue.ToEntero(),
            DdlSubProyecto.SelectedValue.ToEntero(), DdlUsuario.SelectedValue.ToEntero(), UsuarioActual.CveEmpresa, DdlGrupo.SelectedValue.ToEntero(),
            DdlResponsable.SelectedValue.ToEntero(), UsuarioActual.CveUsuario, DdlBanco.SelectedValue.ToEntero(), DdlCuentaBancaria.SelectedValue.ToEntero(),
            DdlMoneda.SelectedValue.ToEntero(),TxtFechaICompra.Text.ToDate(),TxtFechaFCompra.Text.ToDate(),CveTipoProveedor: DdlTipoProveedor.SelectedValue.ToEntero(), 
@@ -229,8 +230,8 @@ public partial class Compras_RepPagado : ClsPaginas
            StrFiltro.AppendFormat("&emsp;<b>SubProyecto</b>: {0}", DdlSubProyecto.SelectedItem.Text);
        if (DdlGrupo.SelectedValue != "-1")
            StrFiltro.AppendFormat("&emsp;<b>Grupo</b>: {0}", DdlGrupo.SelectedItem.Text);
-        if (DdlProveedor.SelectedValue != "-1")
-            StrFiltro.AppendFormat("&emsp;<b>Proveedor</b>: {0}", DdlProveedor.SelectedItem.Text);
+        if (DdlProveedores.SelectedValue != "-1")
+            StrFiltro.AppendFormat("&emsp;<b>Proveedor</b>: {0}", DdlProveedores.txtText.Value);
        if (DdlUsuario.SelectedValue != "-1")
            StrFiltro.AppendFormat("&emsp;<b>Registro</b>: {0}", DdlUsuario.SelectedItem.Text);
        if (DdlResponsable.SelectedValue != "-1")
@@ -251,12 +252,14 @@ public partial class Compras_RepPagado : ClsPaginas
        }

        System.IO.FileInfo Imagen = new System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta));
+        
        string logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa);
        List<ReportParameter> para = new List<ReportParameter>();
        para.Add(new ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa));
        para.Add(new ReportParameter("UsuarioImprimio", UsuarioActual.Nombre));
        para.Add(new ReportParameter("FechaImpresion", DateTime.Now.ToShortDateString()));
        para.Add(new ReportParameter("Filtros", StrFiltro.ToString()));
+
        if (Imagen.Exists)
        {
            para.Add(new ReportParameter("LogoPath", logouri));
@@ -265,6 +268,7 @@ public partial class Compras_RepPagado : ClsPaginas
        {
            para.Add(new ReportParameter("LogoPath", ""));
        }
+
        ImprimirPDF(RutaPDF,DtPagado, para, "RepPagado" + DateTime.Now.ToString("yyyyMMddhhmmss"), Opcion);
    }

--- a/Compras/RepPagadoDetalle.aspx
+++ b/Compras/RepPagadoDetalle.aspx
@@ -48,8 +48,7 @@
                            </div>
                            <div class="col-md-1">Proveedor:</div>
                            <div class="col-md-2 ">
-                                <asp:DropDownList ID="DdlProveedor" runat="server" AppendDataBoundItems="true" DataTextField="RazonSocial" DataValueField="CveProveedor" CssClass="form-control  input-small input-sm select2me" Width="100%">
-                                </asp:DropDownList>
+                                <ADS:Dropdownlost ID="DdlProveedores" runat="server" CssStyle="width: 100%;" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor"></ADS:Dropdownlost>   
                            </div>
                            <div class="col-md-1">Fecha Inicial:</div>
                            <div class="col-md-1">
--- a/Compras/RepPagadoDetalle.aspx.cs
+++ b/Compras/RepPagadoDetalle.aspx.cs
@@ -47,9 +47,10 @@ public partial class Compras_RepPágadoDetalle : ClsPaginas
        DdlMoneda.DataBind();

        //Carga Proveedor
-        DdlProveedor.DataSource = get_GlobalDTCompProveedores(UsuarioActual.CveEmpresa);
-        DdlProveedor.Items.Insert(0, new ListItem("Todos", "-1"));
-        DdlProveedor.DataBind();
+        DdlProveedores.setEsWebService(true);
+        DdlProveedores.Attributes.Add("data-metodo", "getproveedores");
+        DdlProveedores.SelectedText = "Todos";
+        DdlProveedores.SelectedValue = "-1";

        //Carga Usuarios
        DdlUsuario.DataSource = get_GlobalDTUsuarios(CveEmpresa: UsuarioActual.CveEmpresa);
@@ -87,7 +88,9 @@ public partial class Compras_RepPágadoDetalle : ClsPaginas
        DdlGrupo.SelectedValueExist(Request["Grupo"] == null ? "-1" : Request["Grupo"].ToString());
        DdlProyecto.SelectedValueExist(Request["CveProyecto"] == null ? "-1" : Request["CveProyecto"].ToString());
        DdlSubProyecto.SelectedValueExist(Request["CveSubProyecto"] == null ? "-1" : Request["CveSubProyecto"].ToString());
+        
        DdlProveedor.SelectedValueExist(Request["CveProveedor"] == null ? "-1" : Request["CveProveedor"].ToString());
+
        DdlUsuario.SelectedValueExist(Request["CveUsuario"] == null ? "-1" : Request["CveUsuario"].ToString());
        DdlResponsable.SelectedValueExist(Request["CveResponsable"] == null ? "-1" : Request["CveResponsable"].ToString());
        DdlBanco.SelectedValueExist(Request["CveBanco"] == null ? "-1" : Request["CveBanco"].ToString());
--- a/Compras/RepPagadoPeriodo.aspx
+++ b/Compras/RepPagadoPeriodo.aspx
@@ -64,8 +64,10 @@
                            </div>
                            <div class="col-md-1">Proveedor:</div>
                            <div class="col-md-2 ">
-                                <asp:DropDownList ID="DdlProveedor" runat="server" AppendDataBoundItems="true" DataTextField="RazonSocial" DataValueField="CveProveedor" CssClass="form-control  input-small input-sm select2me" Width="100%">
-                                </asp:DropDownList>
+                              <%--  <asp:DropDownList ID="DdlProveedor" runat="server" AppendDataBoundItems="true" DataTextField="RazonSocial" DataValueField="CveProveedor" CssClass="form-control  input-small input-sm select2me" Width="100%">
+                                </asp:DropDownList>--%>
+
+                                <ADS:Dropdownlost ID="DdlProveedores" runat="server" CssStyle="width: 100%;" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor"></ADS:Dropdownlost>   
                            </div>
                            <div class="col-md-1">Fecha Inicial:</div>
                            <div class="col-md-1">
--- a/Compras/RepPagadoPeriodo.aspx.cs
+++ b/Compras/RepPagadoPeriodo.aspx.cs
@@ -50,9 +50,10 @@ public partial class Compras_RepPagadoPeriodo : ClsPaginas
        DdlMoneda.DataBind();

        //Carga Proveedor
-        DdlProveedor.DataSource = get_GlobalDTCompProveedores(UsuarioActual.CveEmpresa);
-        DdlProveedor.Items.Insert(0, new ListItem("Todos", "-1"));
-        DdlProveedor.DataBind();
+        DdlProveedores.setEsWebService(true);
+        DdlProveedores.Attributes.Add("data-metodo", "getproveedores");
+        DdlProveedores.SelectedText = "Todos";
+        DdlProveedores.SelectedValue = "-1";

        //Carga Usuarios
        DdlUsuario.DataSource = get_GlobalDTUsuarios(CveEmpresa: UsuarioActual.CveEmpresa);
@@ -278,8 +279,8 @@ public partial class Compras_RepPagadoPeriodo : ClsPaginas
            StrFiltro.AppendFormat("&emsp;<b>SubProyecto</b>: {0}", DdlSubProyecto.SelectedItem.Text);
        if (DdlGrupo.SelectedValue != "-1")
            StrFiltro.AppendFormat("&emsp;<b>Grupo</b>: {0}", DdlGrupo.SelectedItem.Text);
-        if (DdlProveedor.SelectedValue != "-1")
-            StrFiltro.AppendFormat("&emsp;<b>Proveedor</b>: {0}", DdlProveedor.SelectedItem.Text);
+        if (DdlProveedores.SelectedValue != "-1")
+            StrFiltro.AppendFormat("&emsp;<b>Proveedor</b>: {0}", DdlProveedores.txtText.Value);
        if (DdlUsuario.SelectedValue != "-1")
            StrFiltro.AppendFormat("&emsp;<b>Registro</b>: {0}", DdlUsuario.SelectedItem.Text);
        if (DdlResponsable.SelectedValue != "-1")
@@ -332,7 +333,7 @@ public partial class Compras_RepPagadoPeriodo : ClsPaginas
    {
        if (RblTipoCambio.SelectedValue.ToEntero() == 3 && TxtEspecifico.Text != "") { TCEspecifico = TxtEspecifico.Text.ToDouble(); } else { TCEspecifico = -1; }
        ClsCompras ObjCompras = new ClsCompras();
-        if(ObjCompras.GetRepPagadoPeriodo(txtFechaI.Text.ToDate(), txtFechaF.Text.ToDate(), DdlProveedor.SelectedValue.ToEntero(), DdlProyecto.SelectedValue.ToEntero(),
+        if(ObjCompras.GetRepPagadoPeriodo(txtFechaI.Text.ToDate(), txtFechaF.Text.ToDate(), DdlProveedores.SelectedValue.ToEntero(), DdlProyecto.SelectedValue.ToEntero(),
            DdlSubProyecto.SelectedValue.ToEntero(), DdlUsuario.SelectedValue.ToEntero(), UsuarioActual.CveEmpresa, DdlGrupo.SelectedValue.ToEntero(),
            DdlResponsable.SelectedValue.ToEntero(), UsuarioActual.CveUsuario, DdlBanco.SelectedValue.ToEntero(), DdlCuentaBancaria.SelectedValue.ToEntero(),
            DdlMoneda.SelectedValue.ToEntero(), TxtFechaICompra.Text.ToDate(), TxtFechaFCompra.Text.ToDate(), TipoCambio, TCEspecifico)){
--- a/Compras/eFacturas.aspx
+++ b/Compras/eFacturas.aspx
@@ -69,9 +69,16 @@
            <li>
                <asp:LinkButton ID="LnkBitacotaFacturas" runat="server" OnClick="LnkBitacotaFacturas_Click"><i class="fa fa-book"    ></i> Bitácora Facturas</asp:LinkButton>
            </li>
-              <li>
+            <li>
                <asp:LinkButton ID="LnkVinculacionMasivaComplementos" runat="server" OnClick="LnkVinculacionMasivaComplementos_Click" Visible ="false" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea realizar la vinculación masiva de complementos?" data-btn-ok-label="si"><i class="fa fa-tasks" ></i> Vinculación Masiva Complementos</asp:LinkButton>
            </li>
+
+            <li>                 
+                <asp:LinkButton ID="LnkPersonalizar" runat="server" OnClick="LnkPersonalizar_Click"  ><i class="fa fa-pencil"></i>  Personalizar</asp:LinkButton>
+            </li>
+
+
+            
        </ContentTemplate>
        <Triggers>
            <asp:PostBackTrigger  ControlID="LnkPdf"/>
@@ -196,6 +203,7 @@
                        <asp:GridView ID="GvD" runat="server" Width="100%" AutoGenerateColumns="False" DataKeyNames="CveFactura,CveCompra,CveProveedor,SerieFolio,NombreProveedor,UUID,RFCDe,RFCPara,TipoFactura,FueValidado,TipoComprobante,Version,RFCde,XML,PDF,BloquePorComplemento,Total"
                            EmptyDataText="No se encontraron Registros con el filtro actual" CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn" data-sort="true" GridLines="None">
                            <Columns>
+
                                <asp:TemplateField HeaderText="Tipo">
                                    <ItemTemplate>
                                        <asp:Label ID="LtTipoComprobante" runat="server" Text='<%# Eval("TipoComprobante") %>'></asp:Label>
@@ -260,6 +268,14 @@
                                    </ItemTemplate>
                                    <ItemStyle HorizontalAlign="Center" />
                                </asp:TemplateField>
+
+                                <%--Folio Fiscal 11--%>                               
+                                 <asp:TemplateField HeaderText="Folio Fiscal" Visible="false">
+                                    <ItemTemplate>
+                                        <asp:Literal ID="LtlFolioFiscal" runat="server" Text='<%# Eval("UUID") %>'></asp:Literal>
+                                    </ItemTemplate>
+                                </asp:TemplateField>
+
                                <asp:TemplateField HeaderText="Agregar">
                                    <ItemTemplate>
                                        <%--<asp:Image ID="ImgAgregar" runat="server" Style="cursor: pointer;" Visible='<%# Eval("CveProveedor").ToString <> "" %>' ToolTip="Agregar Factura" ImageUrl="/Imagenes/Nota.gif" Height="18px" />--%>
@@ -372,6 +388,13 @@
                                        </ItemTemplate>
                                        <ItemStyle HorizontalAlign="Center" />
                                    </asp:TemplateField>
+
+                                    <%--  Folio Fiscal 9 --%>
+                                   <asp:TemplateField HeaderText="Folio Fiscal" Visible="false">
+                                        <ItemTemplate>
+                                            <asp:Literal ID="LtlFolioFiscal" runat="server" Text='<%# Eval("UUID") %>'></asp:Literal>
+                                        </ItemTemplate>
+                                    </asp:TemplateField>
                                    <asp:TemplateField HeaderText="Agregar">
                                        <ItemTemplate>
                                            <asp:HyperLink ID="HplAgregarP" runat="server" CssClass="btn btn-circle btn-sm green" Visible='<%# Eval("CveProveedor").ToString <> "" %>' data-toggle="tooltip" title="Agregar Factura" Target="_blank" rel="opener"><i class="fa fa-plus"></i></asp:HyperLink>
@@ -485,6 +508,12 @@
                                            <asp:LinkButton ID="ImgValidarCFDi" runat="server" CssClass="btn btn-xs btn-success" Text="Validar" Visible="false" CommandName="ValidarCFDi" CommandArgument='<%# Eval("CveFactura") %>' />
                                        </ItemTemplate>
                                        <ItemStyle HorizontalAlign="Center" />
+                                    </asp:TemplateField>
+                                      <%--  Folio Fiscal 9 --%>
+                                    <asp:TemplateField HeaderText="Folio Fiscal" Visible="false">
+                                        <ItemTemplate>
+                                            <asp:Literal ID="LtlFolioFiscal" runat="server" Text='<%# Eval("UUID") %>'></asp:Literal>
+                                        </ItemTemplate>
                                    </asp:TemplateField>
                                    <asp:TemplateField HeaderText="Agregar">
                                        <ItemTemplate>
@@ -898,6 +927,36 @@
    </div>


+    <div id="DvmodalPersonalizar" class="modal ADS fade" role="dialog">
+        <asp:UpdatePanel class="modal-dialog" runat="server" ID="UpModalPersonalizar" UpdateMode="Conditional">
+            <ContentTemplate>
+                <div class="modal-content">
+                    <div class="modal-header">
+                        <button type="button" class="close" data-dismiss="modal" aria-label="Close">
+                            <span aria-hidden="true">&times;</span>
+                        </button>
+                        <h4 class="modal-title" id="H3" runat="server">
+                            <asp:Literal runat="server" ID="LtlModalPErsonalizarTitulo">Personalizar</asp:Literal></h4>
+                    </div>
+                    <div class="modal-body">
+
+                        <div class="row">
+
+                            <div class="col-md-4">
+                                <asp:CheckBox runat="server" ID="ChkModalPersonalzarFolioFiscal" Text="Folio Fiscal" TextAlign="Right" />
+                            </div>
+
+                        </div>
+
+                    </div>
+                    <div class="modal-footer">
+                        <asp:LinkButton ID="LnkModalPersonalizar" runat="server" CssClass="btn btn-primary"   OnClick="LnkModalPersonalizar_Click">Personalizar</asp:LinkButton>
+                        <button type="button" class="btn btn-default" data-dismiss="modal">Cerrar</button>
+                    </div>
+                </div>
+            </ContentTemplate>
+        </asp:UpdatePanel>
+    </div>


        <div id="DvModalVincularTrasaldo" class="modal ADS fade" role="dialog">
@@ -1142,6 +1201,12 @@
            </contenttemplate>
        </asp:UpdatePanel>
    </div>
+
+
+
+   
+
+
 </asp:Content>
 <asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
    <script type="text/javascript">
--- a/Compras/eFacturas.aspx.vb
+++ b/Compras/eFacturas.aspx.vb
@@ -710,6 +710,22 @@ Partial Class Compras_eFacturas
    End Property


+
+
+    Property DTTraslados As DataTable
+        Get
+            If ViewState("DTTraslados") Is Nothing Then
+                Return New DataTable
+            Else
+                Return DirectCast(ViewState("DTTraslados"), DataTable)
+            End If
+        End Get
+        Set(value As DataTable)
+            ViewState("DTTraslados") = value
+        End Set
+    End Property
+
+
 #End Region

    Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
@@ -750,8 +766,8 @@ Partial Class Compras_eFacturas
            'If UsuarioActual.TienePermisoProceso(206) Then GvD.Columns(10).Visible = False
            'If UsuarioActual.Empresa.Funcionalidad(156) = "1" Then GvD.Columns(5).Visible = True

-            If UsuarioActual.TienePermisoProceso(81) Then GvD.Columns(12).Visible = True : GvD.Columns(13).Visible = True
-            If UsuarioActual.TienePermisoProceso(206) Then GvD.Columns(11).Visible = False
+            If UsuarioActual.TienePermisoProceso(81) Then GvD.Columns(13).Visible = True : GvD.Columns(14).Visible = True
+            If UsuarioActual.TienePermisoProceso(206) Then GvD.Columns(12).Visible = False
            If UsuarioActual.Empresa.Funcionalidad(156) = "1" Then GvD.Columns(6).Visible = True


@@ -773,6 +789,9 @@ Partial Class Compras_eFacturas
    End Sub

    Private Sub CargaDatos()
+
+        DTTraslados = New DataTable
+
        Dim Folio, RFC, Proveedor As String
        Folio = If(TxtFolio.Text.Trim.Length > 0, String.Format("%{0}%", TxtFolio.Text.Trim.ToUpper), "-1")
        RFC = "-1" 'If(TxtRFC.Text.Trim.Length > 0, TxtRFC.Text.Trim, "-1")
@@ -792,7 +811,7 @@ Partial Class Compras_eFacturas
        End If

        Dim DtPagos As DataTable = Nothing
-        Dim DTTrasaldos As DataTable = Nothing
+        'Dim DTTrasaldos As DataTable = Nothing

        Dim ObjDatos As New ClsCompras
        If ObjDatos.GetFacturas(-1, Folio, FechaI, FechaF, RFC, Proveedor, DdlValidado.SelectedValue.ToEntero, DdlResponsable.SelectedValue.ToEntero, DdlClasificacionProv.SelectedValue.ToEntero, DdlCveTipoProveedor.SelectedValue.ToEntero, DdlTipoComprobante.SelectedValue.ToString, UsuarioActual.CveEmpresa) Then
@@ -813,10 +832,9 @@ Partial Class Compras_eFacturas
            If ObjDatos.GetFacturas(-1, Folio, FechaI, FechaF, RFC, Proveedor, DdlValidado.SelectedValue.ToEntero, DdlResponsable.SelectedValue.ToEntero, DdlClasificacionProv.SelectedValue.ToEntero, DdlCveTipoProveedor.SelectedValue.ToEntero, DdlTipoComprobante.SelectedValue.ToString, UsuarioActual.CveEmpresa, Opcion:=2) Then

                If ObjDatos.DtResultados.Rows.Count > 0 Then
-
-                    DTTrasaldos = ObjDatos.DtResultados.FiltraParametros("TipoComprobante = 'T'")
-
+                    DTTraslados = ObjDatos.DtResultados.FiltraParametros("TipoComprobante = 'T'")
                End If
+
            End If
        End If
        LblTotalTraslados.Text = String.Format("{0} Traslados", ObjDatos.DtResultados.FiltraParametros("TipoComprobante = 'T'").Rows.Count.ToString("N0"))
@@ -825,11 +843,10 @@ Partial Class Compras_eFacturas
            GvPagos.DataSource = DtPagos
        End If

-        If DTTrasaldos IsNot Nothing AndAlso DTTrasaldos.Rows.Count > 0 Then
-            GvTraslados.DataSource = DTTrasaldos
+        If DTTraslados IsNot Nothing AndAlso DTTraslados.Rows.Count > 0 Then
+            GvTraslados.DataSource = DTTraslados
        End If

-
        ObjDatos.Dispose()

        GvD.DataBind()
@@ -1427,7 +1444,7 @@ Partial Class Compras_eFacturas
        If dt IsNot Nothing Then

            Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
-            Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
+

            Dim params As New List(Of ReportParameter)
            params.Add(New ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa))
@@ -1435,13 +1452,22 @@ Partial Class Compras_eFacturas
            params.Add(New ReportParameter("FechaFin", FechaF))
            params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
            params.Add(New ReportParameter("FechaImpresion", Now.ToDateTime.ToShortDateString))
+
            If Imagen.Exists Then
-                params.Add(New ReportParameter("LogoPath", logouri))
+                params.Add(New ReportParameter("LogoPath", $"file//:{Imagen.FullName}"))
            Else
                params.Add(New ReportParameter("LogoPath", ""))
            End If

-            ImprimirPDF("Empresas/Grales/Formatos/RepFacturas.rdlc", dt, params, $"FacturasBuzon_{Now.ToString("yyyyMMyyddmmss")}", Tipo)
+
+            If Tab.ActiveTabIndex = 2 Then
+
+                ImprimirPDF("Empresas/Grales/Formatos/RepFacturas.rdlc", DTTraslados, params, $"FacturasBuzon_{Now.ToString("yyyyMMyyddmmss")}", Tipo)
+            Else
+                ImprimirPDF("Empresas/Grales/Formatos/RepFacturas.rdlc", dt, params, $"FacturasBuzon_{Now.ToString("yyyyMMyyddmmss")}", Tipo)
+            End If
+
+
        End If

    End Sub
@@ -4540,4 +4566,27 @@ Partial Class Compras_eFacturas

 #End Region

+
+    Protected Sub LnkModalPersonalizar_Click(sender As Object, e As EventArgs)
+
+        GvD.Columns(11).Visible = ChkModalPersonalzarFolioFiscal.Checked
+        GvPagos.Columns(9).Visible = ChkModalPersonalzarFolioFiscal.Checked
+        GvTraslados.Columns(9).Visible = ChkModalPersonalzarFolioFiscal.Checked
+
+
+        UpDatos.Update()
+        UpPagos.Update()
+        UpTraslados.Update()
+
+        RegistraScript("$('#DvmodalPersonalizar').modal('hide');")
+    End Sub
+
+
+
+
+    Protected Sub LnkPersonalizar_Click(sender As Object, e As EventArgs)
+
+        RegistraScript("$('#DvmodalPersonalizar').modal('show');")
+
+    End Sub
 End Class
--- a/Contabilidad/RegPrePolizaS.aspx
+++ b/Contabilidad/RegPrePolizaS.aspx
@@ -477,7 +477,7 @@
                    <div class="portlet-body nomarginleftright form-horizontal form-row-sepe formnombottom ">

                        <asp:GridView ID="GvPrePoliza" runat="server" AutoGenerateColumns="False" CssClass="table table-striped table-advance table-hover mysmallbtn GvPrePoliza" GridLines="None"
-                            DataKeyNames="CvePrePolizaDetalle,IdMov, CveConceptoContable, IdCtaContable, CveSubProyecto, CveTipoGasto,Referencia,CveVenta,CveCompra, CveProveedor, CveCliente, CvePersonal, CveCuenta, PorcentajeImpuesto,TipoMovto,EsComplementaria,EsMonedaExtranjera,Concepto,CveClasificacion,ContadoCuenta,ContadoTipoTransaccion,ContadoNumeroFolio,ContadoBeneficiario,ContadoObservaciones,ContadoImporte,TC,ImporteME,Cargo,Abono" Width="100%" >
+                            DataKeyNames="CvePrePolizaDetalle,CvePrePoliza,IdMov, CveConceptoContable, IdCtaContable, CveSubProyecto, CveTipoGasto,Referencia,CveVenta,CveCompra, CveProveedor, CveCliente, CvePersonal, CveCuenta, PorcentajeImpuesto,TipoMovto,EsComplementaria,EsMonedaExtranjera,Concepto,CveClasificacion,ContadoCuenta,ContadoTipoTransaccion,ContadoNumeroFolio,ContadoBeneficiario,ContadoObservaciones,ContadoImporte,TC,ImporteME,Cargo,Abono,CveIE" Width="100%" >
                            <Columns>
                                <asp:TemplateField>
                                    <HeaderTemplate>Movimiento</HeaderTemplate>
--- a/Contabilidad/RegPrePolizaS.aspx.vb
+++ b/Contabilidad/RegPrePolizaS.aspx.vb
@@ -1156,22 +1156,61 @@ Partial Class ContabilidadC_RegPrePolizaS
            OcurrioError = True
        End If

+        Dim CveIEAgregado As Integer = -1
        For Each row As GridViewRow In GvPrePoliza.Rows
            If row.DataKey("CvePrePolizaDetalle").ToEntero > 0 Then
                If row.FCCheckBox("chkModificado").Checked Then
                    contador = contador + 1
+
+
+
+
+
+                    Dim ImporteIE As Decimal = If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0, row.FCLiteral("TxtCargo").Text.ToDecimal, row.FCLiteral("TxtAbono").Text.ToDecimal)
+
+                    If row.DataKey("CveConceptoContable").ToEntero = 30 AndAlso ImporteIE > 0 AndAlso row.DataKey("CveIE").ToDecimal <= 0 Then
+                        Dim ObjIE As New ClsBancos(ObjContabilidad.IniciaTransacSQL)
+                        CveIEAgregado = ObjIE.AddBancos_IE(row.DataKey("ContadoCuenta").ToEntero, row.DataKey("ContadoTipoTransaccion").ToEntero, TxtFechaDocumento.Text, row.DataKey("ContadoNumeroFolio"),
+                                                   row.DataKey("ContadoBeneficiario"), ImporteIE, CveMoneda, 0, row.DataKey("ContadoObservaciones"), "",
+                                                   False, False, 0, row.DataKey("CvePrePoliza").ToEntero, "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
+                        If CveIEAgregado < 0 Then
+                            'MsgError = "No se pudo registrar movimiento bancario"
+                            OcurrioError = True
+                            Exit For
+                        End If
+                    End If
+
+
+
+
                    If Not ObjContabilidad.UpdatePrePolizasDetalle(row.DataKey("CvePrePolizaDetalle").ToEntero, row.FCLiteral("TxtConcepto").Text, row.DataKey("CveSubProyecto").ToEntero,
-                                                                   row.DataKey("IdCtaContable").ToEntero, If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0, False, True), If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0,
-                                                                   row.FCLiteral("TxtCargo").Text.ToDecimal, row.FCLiteral("TxtAbono").Text.ToDecimal), CveTipoGasto:=If(DdlTipoGasto.Visible, row.DataKey("CveTipoGasto").ToEntero, row.DataKey("CveTipoGasto").ToEntero),
-                                                                   CveConceptoContable:=row.DataKey("CveConceptoContable").ToEntero, CveProveedor:=row.DataKey("CveProveedor").ToEntero, CveCompra:=row.DataKey("CveCompra").ToEntero,
-                                                                   CveCliente:=row.DataKey("CveCliente").ToEntero, CveVenta:=row.DataKey("CveVenta").ToEntero,
-                                                                   CvePersonal:=row.DataKey("CvePersonal").ToEntero, Referencia:=row.FCLiteral("TxtRef").Text, CveCuenta:=row.DataKey("CveCuenta").ToEntero, CveUsuarioModifico:=UsuarioActual.CveUsuario) Then
+                                                                       row.DataKey("IdCtaContable").ToEntero, If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0, False, True), If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0,
+                                                                       row.FCLiteral("TxtCargo").Text.ToDecimal, row.FCLiteral("TxtAbono").Text.ToDecimal), CveTipoGasto:=If(DdlTipoGasto.Visible, row.DataKey("CveTipoGasto").ToEntero, row.DataKey("CveTipoGasto").ToEntero),
+                                                                       CveConceptoContable:=row.DataKey("CveConceptoContable").ToEntero, CveProveedor:=row.DataKey("CveProveedor").ToEntero, CveCompra:=row.DataKey("CveCompra").ToEntero,
+                                                                       CveCliente:=row.DataKey("CveCliente").ToEntero, CveVenta:=row.DataKey("CveVenta").ToEntero,
+                                                                       CvePersonal:=row.DataKey("CvePersonal").ToEntero, Referencia:=row.FCLiteral("TxtRef").Text, CveCuenta:=row.DataKey("CveCuenta").ToEntero, CveUsuarioModifico:=UsuarioActual.CveUsuario, CveIE:=CveIEAgregado) Then
                        OcurrioError = True
                        Exit For
                    End If
                End If
-            Else
+                Else
                contador = contador + 1
+
+
+                Dim ImporteIE As Decimal = If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0, row.FCLiteral("TxtCargo").Text.ToDecimal, row.FCLiteral("TxtAbono").Text.ToDecimal)
+
+                If row.DataKey("CveConceptoContable").ToEntero = 30 AndAlso ImporteIE > 0 AndAlso row.DataKey("CveIE").ToDecimal <= 0 Then
+                    Dim ObjIE As New ClsBancos(ObjContabilidad.IniciaTransacSQL)
+                    CveIEAgregado = ObjIE.AddBancos_IE(row.DataKey("ContadoCuenta").ToEntero, row.DataKey("ContadoTipoTransaccion").ToEntero, TxtFechaDocumento.Text, row.DataKey("ContadoNumeroFolio"),
+                                                   row.DataKey("ContadoBeneficiario"), ImporteIE, CveMoneda, 0, row.DataKey("ContadoObservaciones"), "",
+                                                   False, False, 0, row.DataKey("CvePrePoliza").ToEntero, "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
+                    If CveIEAgregado < 0 Then
+                        'MsgError = "No se pudo registrar movimiento bancario"
+                        OcurrioError = True
+                        Exit For
+                    End If
+                End If
+
                If Not ObjContabilidad.AddPrePolizasDetalle(CvePrePoliza, If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0, False, True), If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0,
                                                            row.FCLiteral("TxtCargo").Text.ToDecimal, row.FCLiteral("TxtAbono").Text.ToDecimal), row.DataKey("Referencia").ToString,
                                                            row.DataKey("CveConceptoContable").ToEntero, row.FCLiteral("TxtConcepto").Text, Now,
@@ -1180,7 +1219,7 @@ Partial Class ContabilidadC_RegPrePolizaS
                                                            ImporteMX:=If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0,
                                                            row.FCLiteral("TxtCargo").Text.ToDecimal, row.FCLiteral("TxtAbono").Text.ToDecimal), CveProveedor:=row.DataKey("CveProveedor").ToEntero,
                                                            CveCompra:=row.DataKey("CveCompra").ToEntero, CveCliente:=row.DataKey("CveCliente").ToEntero, CveVenta:=row.DataKey("CveVenta").ToEntero,
-                                                            CvePersonal:=row.DataKey("CvePersonal").ToEntero, CveCuenta:=row.DataKey("CveCuenta").ToEntero, PorcentajeImpuesto:=row.DataKey("PorcentajeImpuesto").ToDecimal) Then
+                                                            CvePersonal:=row.DataKey("CvePersonal").ToEntero, CveCuenta:=row.DataKey("CveCuenta").ToEntero, PorcentajeImpuesto:=row.DataKey("PorcentajeImpuesto").ToDecimal, CveIE:=CveIEAgregado) Then
                    OcurrioError = True
                    Exit For
                End If
@@ -1252,6 +1291,7 @@ Partial Class ContabilidadC_RegPrePolizaS
        DdlConceptosContablesE.SelectedValueExist(CveConceptoContable)
        DdlConceptosContablesE_SelectedIndexChanged(DdlConceptosContablesE, e)

+
        TxtTipoCambio.Text = GvPrePoliza.Rows(IndiceGrid).DataKey("TC").ToString.ToDecimal.ToString("###,###,###.00")

        TxtME.Text = GvPrePoliza.Rows(IndiceGrid).DataKey("ImporteME").ToDecimal.FormatoNumero
@@ -1313,6 +1353,12 @@ Partial Class ContabilidadC_RegPrePolizaS
        End If


+        If DdlConceptosContablesE.SelectedValue.ToEntero = 30 AndAlso CvePrePoliza > 0 Then
+            DdlConceptosContablesE.Enabled = False
+        Else
+            DdlConceptosContablesE.Enabled = True
+        End If
+
        UpModalConcepto.Update()

    End Sub
--- a/Empresas/119/Formatos/ReciboDePago.rdlc
+++ b/Empresas/119/Formatos/ReciboDePago.rdlc
@@ -702,7 +702,7 @@
              </TablixCells>
            </TablixRow>
            <TablixRow>
-              <Height>0.39427cm</Height>
+              <Height>0.43188cm</Height>
              <TablixCells>
                <TablixCell>
                  <CellContents>
@@ -798,6 +798,7 @@
                        <PaddingBottom>2pt</PaddingBottom>
                      </Style>
                    </Textbox>
+                    <rd:Selected>true</rd:Selected>
                  </CellContents>
                </TablixCell>
                <TablixCell>
@@ -901,7 +902,6 @@
                        <rd:FormatSymbolCulture>es-MX</rd:FormatSymbolCulture>
                      </Style>
                    </Textbox>
-                    <rd:Selected>true</rd:Selected>
                  </CellContents>
                </TablixCell>
                <TablixCell>
@@ -938,7 +938,6 @@
                        <PaddingBottom>2pt</PaddingBottom>
                      </Style>
                    </Textbox>
-                    <rd:Selected>true</rd:Selected>
                  </CellContents>
                </TablixCell>
              </TablixCells>
@@ -970,13 +969,13 @@
                      <rd:DefaultName>Textbox108</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 
-	OR Fields!Tra002ImporteDR.Value &gt; 0 
-	OR Fields!Tra003ImporteDR.Value &gt; 0 
-	OR Fields!Ret001ImporteDR.Value &gt; 0 
-	OR Fields!Ret002ImporteDR.Value &gt; 0 
-	OR Fields!Ret003ImporteDR.Value &gt; 0 
-	,False,True)</Hidden>
+			   Fields!Tra001BaseDR.Value &gt; 0 
+			OR Fields!Tra002BaseDR.Value &gt; 0 
+			OR Fields!Tra003BaseDR.Value &gt; 0 
+			OR Fields!Ret001BaseDR.Value &gt; 0 
+			OR Fields!Ret002BaseDR.Value &gt; 0 
+			OR Fields!Ret003BaseDR.Value &gt; 0 
+		,False,true)</Hidden>
                      </Visibility>
                      <Style>
                        <Border>
@@ -1011,13 +1010,13 @@
                      <rd:DefaultName>Textbox109</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 
-	OR Fields!Tra002ImporteDR.Value &gt; 0 
-	OR Fields!Tra003ImporteDR.Value &gt; 0 
-	OR Fields!Ret001ImporteDR.Value &gt; 0 
-	OR Fields!Ret002ImporteDR.Value &gt; 0 
-	OR Fields!Ret003ImporteDR.Value &gt; 0 
-	,False,True)</Hidden>
+			   Fields!Tra001BaseDR.Value &gt; 0 
+			OR Fields!Tra002BaseDR.Value &gt; 0 
+			OR Fields!Tra003BaseDR.Value &gt; 0 
+			OR Fields!Ret001BaseDR.Value &gt; 0 
+			OR Fields!Ret002BaseDR.Value &gt; 0 
+			OR Fields!Ret003BaseDR.Value &gt; 0 
+		,False,true)</Hidden>
                      </Visibility>
                      <Style>
                        <Border>
@@ -1052,13 +1051,13 @@
                      <rd:DefaultName>Textbox110</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 
-	OR Fields!Tra002ImporteDR.Value &gt; 0 
-	OR Fields!Tra003ImporteDR.Value &gt; 0 
-	OR Fields!Ret001ImporteDR.Value &gt; 0 
-	OR Fields!Ret002ImporteDR.Value &gt; 0 
-	OR Fields!Ret003ImporteDR.Value &gt; 0 
-	,False,True)</Hidden>
+			   Fields!Tra001BaseDR.Value &gt; 0 
+			OR Fields!Tra002BaseDR.Value &gt; 0 
+			OR Fields!Tra003BaseDR.Value &gt; 0 
+			OR Fields!Ret001BaseDR.Value &gt; 0 
+			OR Fields!Ret002BaseDR.Value &gt; 0 
+			OR Fields!Ret003BaseDR.Value &gt; 0 
+		,False,true)</Hidden>
                      </Visibility>
                      <Style>
                        <Border>
@@ -1093,13 +1092,13 @@
                      <rd:DefaultName>Textbox111</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 
-	OR Fields!Tra002ImporteDR.Value &gt; 0 
-	OR Fields!Tra003ImporteDR.Value &gt; 0 
-	OR Fields!Ret001ImporteDR.Value &gt; 0 
-	OR Fields!Ret002ImporteDR.Value &gt; 0 
-	OR Fields!Ret003ImporteDR.Value &gt; 0 
-	,False,True)</Hidden>
+			   Fields!Tra001BaseDR.Value &gt; 0 
+			OR Fields!Tra002BaseDR.Value &gt; 0 
+			OR Fields!Tra003BaseDR.Value &gt; 0 
+			OR Fields!Ret001BaseDR.Value &gt; 0 
+			OR Fields!Ret002BaseDR.Value &gt; 0 
+			OR Fields!Ret003BaseDR.Value &gt; 0 
+		,False,true)</Hidden>
                      </Visibility>
                      <Style>
                        <Border>
@@ -1134,13 +1133,13 @@
                      <rd:DefaultName>Textbox112</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 
-	OR Fields!Tra002ImporteDR.Value &gt; 0 
-	OR Fields!Tra003ImporteDR.Value &gt; 0 
-	OR Fields!Ret001ImporteDR.Value &gt; 0 
-	OR Fields!Ret002ImporteDR.Value &gt; 0 
-	OR Fields!Ret003ImporteDR.Value &gt; 0 
-	,False,True)</Hidden>
+			   Fields!Tra001BaseDR.Value &gt; 0 
+			OR Fields!Tra002BaseDR.Value &gt; 0 
+			OR Fields!Tra003BaseDR.Value &gt; 0 
+			OR Fields!Ret001BaseDR.Value &gt; 0 
+			OR Fields!Ret002BaseDR.Value &gt; 0 
+			OR Fields!Ret003BaseDR.Value &gt; 0 
+		,False,true)</Hidden>
                      </Visibility>
                      <Style>
                        <Border>
@@ -1175,13 +1174,13 @@
                      <rd:DefaultName>Textbox113</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 
-	OR Fields!Tra002ImporteDR.Value &gt; 0 
-	OR Fields!Tra003ImporteDR.Value &gt; 0 
-	OR Fields!Ret001ImporteDR.Value &gt; 0 
-	OR Fields!Ret002ImporteDR.Value &gt; 0 
-	OR Fields!Ret003ImporteDR.Value &gt; 0 
-	,False,True)</Hidden>
+			   Fields!Tra001BaseDR.Value &gt; 0 
+			OR Fields!Tra002BaseDR.Value &gt; 0 
+			OR Fields!Tra003BaseDR.Value &gt; 0 
+			OR Fields!Ret001BaseDR.Value &gt; 0 
+			OR Fields!Ret002BaseDR.Value &gt; 0 
+			OR Fields!Ret003BaseDR.Value &gt; 0 
+		,False,true)</Hidden>
                      </Visibility>
                      <Style>
                        <Border>
@@ -1216,13 +1215,13 @@
                      <rd:DefaultName>Textbox114</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 
-	OR Fields!Tra002ImporteDR.Value &gt; 0 
-	OR Fields!Tra003ImporteDR.Value &gt; 0 
-	OR Fields!Ret001ImporteDR.Value &gt; 0 
-	OR Fields!Ret002ImporteDR.Value &gt; 0 
-	OR Fields!Ret003ImporteDR.Value &gt; 0 
-	,False,True)</Hidden>
+			   Fields!Tra001BaseDR.Value &gt; 0 
+			OR Fields!Tra002BaseDR.Value &gt; 0 
+			OR Fields!Tra003BaseDR.Value &gt; 0 
+			OR Fields!Ret001BaseDR.Value &gt; 0 
+			OR Fields!Ret002BaseDR.Value &gt; 0 
+			OR Fields!Ret003BaseDR.Value &gt; 0 
+		,False,true)</Hidden>
                      </Visibility>
                      <Style>
                        <Border>
@@ -1257,13 +1256,13 @@
                      <rd:DefaultName>Textbox115</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 
-	OR Fields!Tra002ImporteDR.Value &gt; 0 
-	OR Fields!Tra003ImporteDR.Value &gt; 0 
-	OR Fields!Ret001ImporteDR.Value &gt; 0 
-	OR Fields!Ret002ImporteDR.Value &gt; 0 
-	OR Fields!Ret003ImporteDR.Value &gt; 0 
-	,False,True)</Hidden>
+			   Fields!Tra001BaseDR.Value &gt; 0 
+			OR Fields!Tra002BaseDR.Value &gt; 0 
+			OR Fields!Tra003BaseDR.Value &gt; 0 
+			OR Fields!Ret001BaseDR.Value &gt; 0 
+			OR Fields!Ret002BaseDR.Value &gt; 0 
+			OR Fields!Ret003BaseDR.Value &gt; 0 
+		,False,true)</Hidden>
                      </Visibility>
                      <Style>
                        <Border>
@@ -1296,13 +1295,13 @@
                      <rd:DefaultName>Textbox116</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 
-	OR Fields!Tra002ImporteDR.Value &gt; 0 
-	OR Fields!Tra003ImporteDR.Value &gt; 0 
-	OR Fields!Ret001ImporteDR.Value &gt; 0 
-	OR Fields!Ret002ImporteDR.Value &gt; 0 
-	OR Fields!Ret003ImporteDR.Value &gt; 0 
-	,False,True)</Hidden>
+			   Fields!Tra001BaseDR.Value &gt; 0 
+			OR Fields!Tra002BaseDR.Value &gt; 0 
+			OR Fields!Tra003BaseDR.Value &gt; 0 
+			OR Fields!Ret001BaseDR.Value &gt; 0 
+			OR Fields!Ret002BaseDR.Value &gt; 0 
+			OR Fields!Ret003BaseDR.Value &gt; 0 
+		,False,true)</Hidden>
                      </Visibility>
                      <Style>
                        <Border>
@@ -1335,13 +1334,13 @@
                      <rd:DefaultName>Textbox117</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 
-	OR Fields!Tra002ImporteDR.Value &gt; 0 
-	OR Fields!Tra003ImporteDR.Value &gt; 0 
-	OR Fields!Ret001ImporteDR.Value &gt; 0 
-	OR Fields!Ret002ImporteDR.Value &gt; 0 
-	OR Fields!Ret003ImporteDR.Value &gt; 0 
-	,False,True)</Hidden>
+			   Fields!Tra001BaseDR.Value &gt; 0 
+			OR Fields!Tra002BaseDR.Value &gt; 0 
+			OR Fields!Tra003BaseDR.Value &gt; 0 
+			OR Fields!Ret001BaseDR.Value &gt; 0 
+			OR Fields!Ret002BaseDR.Value &gt; 0 
+			OR Fields!Ret003BaseDR.Value &gt; 0 
+		,False,true)</Hidden>
                      </Visibility>
                      <Style>
                        <Border>
@@ -1381,7 +1380,7 @@
                      <rd:DefaultName>Textbox61</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 	
+	   Fields!Tra001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1416,7 +1415,7 @@
                      <rd:DefaultName>Textbox204</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 	
+	   Fields!Tra001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1453,7 +1452,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 	
+	   Fields!Tra001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1490,7 +1489,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 	
+	   Fields!Tra001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1527,7 +1526,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 	
+	   Fields!Tra001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1551,7 +1550,7 @@
                              <Style>
                                <FontFamily>Myriad Pro</FontFamily>
                                <FontSize>7pt</FontSize>
-                                <Format>'$'#,0.00;-'$'#,0.00;'-'</Format>
+                                <Format>'$'#,0.00</Format>
                                <rd:FormatSymbolCulture>es-MX</rd:FormatSymbolCulture>
                              </Style>
                            </TextRun>
@@ -1564,7 +1563,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 	
+	   Fields!Tra001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1599,7 +1598,7 @@
                      <rd:DefaultName>Textbox4</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 	
+	   Fields!Tra001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1634,7 +1633,7 @@
                      <rd:DefaultName>Textbox13</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 	
+	   Fields!Tra001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1667,7 +1666,7 @@
                      <rd:DefaultName>Textbox17</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 	
+	   Fields!Tra001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1700,7 +1699,7 @@
                      <rd:DefaultName>Textbox18</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	   Fields!Tra001ImporteDR.Value &gt; 0 	
+	   Fields!Tra001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1740,7 +1739,7 @@
                      <rd:DefaultName>Textbox61</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	  
-	 Fields!Tra002ImporteDR.Value &gt; 0 	
+	 Fields!Tra002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1775,7 +1774,7 @@
                      <rd:DefaultName>Textbox204</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	  
-	 Fields!Tra002ImporteDR.Value &gt; 0 	
+	 Fields!Tra002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1812,7 +1811,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	  
-	 Fields!Tra002ImporteDR.Value &gt; 0 	
+	 Fields!Tra002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1849,7 +1848,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	  
-	 Fields!Tra002ImporteDR.Value &gt; 0 	
+	 Fields!Tra002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1886,7 +1885,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	  
-	 Fields!Tra002ImporteDR.Value &gt; 0 	
+	 Fields!Tra002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1910,7 +1909,7 @@
                              <Style>
                                <FontFamily>Myriad Pro</FontFamily>
                                <FontSize>7pt</FontSize>
-                                <Format>'$'#,0.00;-'$'#,0.00;'-'</Format>
+                                <Format>'$'#,0.00</Format>
                                <rd:FormatSymbolCulture>es-MX</rd:FormatSymbolCulture>
                              </Style>
                            </TextRun>
@@ -1923,7 +1922,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	  
-	 Fields!Tra002ImporteDR.Value &gt; 0 	
+	 Fields!Tra002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1958,7 +1957,7 @@
                      <rd:DefaultName>Textbox67</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	  
-	 Fields!Tra002ImporteDR.Value &gt; 0 	
+	 Fields!Tra002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -1993,7 +1992,7 @@
                      <rd:DefaultName>Textbox68</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	  
-	 Fields!Tra002ImporteDR.Value &gt; 0 	
+	 Fields!Tra002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2026,7 +2025,7 @@
                      <rd:DefaultName>Textbox69</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	  
-	 Fields!Tra002ImporteDR.Value &gt; 0 	
+	 Fields!Tra002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2059,7 +2058,7 @@
                      <rd:DefaultName>Textbox70</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	  
-	 Fields!Tra002ImporteDR.Value &gt; 0 	
+	 Fields!Tra002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2099,7 +2098,7 @@
                      <rd:DefaultName>Textbox61</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	Fields!Tra003ImporteDR.Value &gt; 0 	
+	Fields!Tra003BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2134,7 +2133,7 @@
                      <rd:DefaultName>Textbox204</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	Fields!Tra003ImporteDR.Value &gt; 0 	
+	Fields!Tra003BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2171,7 +2170,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	Fields!Tra003ImporteDR.Value &gt; 0 	
+	Fields!Tra003BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2208,7 +2207,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	Fields!Tra003ImporteDR.Value &gt; 0 	
+	Fields!Tra003BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2245,7 +2244,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	Fields!Tra003ImporteDR.Value &gt; 0 	
+	Fields!Tra003BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2269,7 +2268,7 @@
                              <Style>
                                <FontFamily>Myriad Pro</FontFamily>
                                <FontSize>7pt</FontSize>
-                                <Format>'$'#,0.00;-'$'#,0.00;'-'</Format>
+                                <Format>'$'#,0.00</Format>
                                <rd:FormatSymbolCulture>es-MX</rd:FormatSymbolCulture>
                              </Style>
                            </TextRun>
@@ -2282,7 +2281,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	Fields!Tra003ImporteDR.Value &gt; 0 	
+	Fields!Tra003BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2317,7 +2316,7 @@
                      <rd:DefaultName>Textbox51</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	Fields!Tra003ImporteDR.Value &gt; 0 	
+	Fields!Tra003BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2352,7 +2351,7 @@
                      <rd:DefaultName>Textbox55</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	Fields!Tra003ImporteDR.Value &gt; 0 	
+	Fields!Tra003BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2385,7 +2384,7 @@
                      <rd:DefaultName>Textbox56</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	Fields!Tra003ImporteDR.Value &gt; 0 	
+	Fields!Tra003BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2418,7 +2417,7 @@
                      <rd:DefaultName>Textbox58</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 
-	Fields!Tra003ImporteDR.Value &gt; 0 	
+	Fields!Tra003BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2458,7 +2457,7 @@
                      <rd:DefaultName>Textbox61</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	   
-	Fields!Ret001ImporteDR.Value &gt; 0 	
+	Fields!Ret001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2493,7 +2492,7 @@
                      <rd:DefaultName>Textbox207</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	   
-	Fields!Ret001ImporteDR.Value &gt; 0 	
+	Fields!Ret001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2530,7 +2529,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	   
-	Fields!Ret001ImporteDR.Value &gt; 0 	
+	Fields!Ret001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2567,7 +2566,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	   
-	Fields!Ret001ImporteDR.Value &gt; 0 	
+	Fields!Ret001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2604,7 +2603,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	   
-	Fields!Ret001ImporteDR.Value &gt; 0 	
+	Fields!Ret001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2628,7 +2627,7 @@
                              <Style>
                                <FontFamily>Myriad Pro</FontFamily>
                                <FontSize>7pt</FontSize>
-                                <Format>'$'#,0.00;-'$'#,0.00;'-'</Format>
+                                <Format>'$'#,0.00</Format>
                                <rd:FormatSymbolCulture>es-MX</rd:FormatSymbolCulture>
                              </Style>
                            </TextRun>
@@ -2641,7 +2640,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	   
-	Fields!Ret001ImporteDR.Value &gt; 0 	
+	Fields!Ret001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2676,7 +2675,7 @@
                      <rd:DefaultName>Textbox75</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	   
-	Fields!Ret001ImporteDR.Value &gt; 0 	
+	Fields!Ret001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2711,7 +2710,7 @@
                      <rd:DefaultName>Textbox76</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	   
-	Fields!Ret001ImporteDR.Value &gt; 0 	
+	Fields!Ret001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2744,7 +2743,7 @@
                      <rd:DefaultName>Textbox77</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	   
-	Fields!Ret001ImporteDR.Value &gt; 0 	
+	Fields!Ret001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2777,7 +2776,7 @@
                      <rd:DefaultName>Textbox78</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF( 	   
-	Fields!Ret001ImporteDR.Value &gt; 0 	
+	Fields!Ret001BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2791,7 +2790,7 @@
              </TablixCells>
            </TablixRow>
            <TablixRow>
-              <Height>0.07938cm</Height>
+              <Height>0.07939cm</Height>
              <TablixCells>
                <TablixCell>
                  <CellContents>
@@ -2817,7 +2816,7 @@
                      <rd:DefaultName>Textbox61</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret002ImporteDR.Value &gt; 0 	
+	Fields!Ret002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2852,7 +2851,7 @@
                      <rd:DefaultName>Textbox207</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret002ImporteDR.Value &gt; 0 	
+	Fields!Ret002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2889,7 +2888,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret002ImporteDR.Value &gt; 0 	
+	Fields!Ret002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2926,7 +2925,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret002ImporteDR.Value &gt; 0 	
+	Fields!Ret002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2963,7 +2962,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret002ImporteDR.Value &gt; 0 	
+	Fields!Ret002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -2987,7 +2986,7 @@
                              <Style>
                                <FontFamily>Myriad Pro</FontFamily>
                                <FontSize>7pt</FontSize>
-                                <Format>'$'#,0.00;-'$'#,0.00;'-'</Format>
+                                <Format>'$'#,0.00</Format>
                                <rd:FormatSymbolCulture>es-MX</rd:FormatSymbolCulture>
                              </Style>
                            </TextRun>
@@ -3000,7 +2999,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret002ImporteDR.Value &gt; 0 	
+	Fields!Ret002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -3035,7 +3034,7 @@
                      <rd:DefaultName>Textbox85</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret002ImporteDR.Value &gt; 0 	
+	Fields!Ret002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -3070,7 +3069,7 @@
                      <rd:DefaultName>Textbox86</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret002ImporteDR.Value &gt; 0 	
+	Fields!Ret002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -3103,7 +3102,7 @@
                      <rd:DefaultName>Textbox87</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret002ImporteDR.Value &gt; 0 	
+	Fields!Ret002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -3136,7 +3135,7 @@
                      <rd:DefaultName>Textbox88</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret002ImporteDR.Value &gt; 0 	
+	Fields!Ret002BaseDR.Value &gt; 0 	
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -3176,7 +3175,7 @@
                      <rd:DefaultName>Textbox59</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret003ImporteDR.Value &gt; 0 
+	Fields!Ret003BaseDR.Value &gt; 0 
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -3211,7 +3210,7 @@
                      <rd:DefaultName>Textbox207</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret003ImporteDR.Value &gt; 0 
+	Fields!Ret003BaseDR.Value &gt; 0 
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -3248,7 +3247,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret003ImporteDR.Value &gt; 0 
+	Fields!Ret003BaseDR.Value &gt; 0 
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -3285,7 +3284,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret003ImporteDR.Value &gt; 0 
+	Fields!Ret003BaseDR.Value &gt; 0 
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -3322,7 +3321,7 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret003ImporteDR.Value &gt; 0 
+	Fields!Ret003BaseDR.Value &gt; 0 
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -3346,7 +3345,7 @@
                              <Style>
                                <FontFamily>Myriad Pro</FontFamily>
                                <FontSize>7pt</FontSize>
-                                <Format>'$'#,0.00;-'$'#,0.00;'-'</Format>
+                                <Format>'$'#,0.00</Format>
                                <rd:FormatSymbolCulture>es-MX</rd:FormatSymbolCulture>
                              </Style>
                            </TextRun>
@@ -3359,13 +3358,14 @@
                      <rd:DefaultName>ImpPagado</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret003ImporteDR.Value &gt; 0 
+	Fields!Ret003BaseDR.Value &gt; 0 
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
                        <Border>
                          <Style>None</Style>
                        </Border>
+                        <rd:FormatSymbolCulture>es-MX</rd:FormatSymbolCulture>
                      </Style>
                    </Textbox>
                  </CellContents>
@@ -3394,7 +3394,7 @@
                      <rd:DefaultName>Textbox95</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret003ImporteDR.Value &gt; 0 
+	Fields!Ret003BaseDR.Value &gt; 0 
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -3429,7 +3429,7 @@
                      <rd:DefaultName>Textbox96</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret003ImporteDR.Value &gt; 0 
+	Fields!Ret003BaseDR.Value &gt; 0 
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -3462,7 +3462,7 @@
                      <rd:DefaultName>Textbox97</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret003ImporteDR.Value &gt; 0 
+	Fields!Ret003BaseDR.Value &gt; 0 
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -3495,7 +3495,7 @@
                      <rd:DefaultName>Textbox98</rd:DefaultName>
                      <Visibility>
                        <Hidden>= IIF(	  
-	Fields!Ret003ImporteDR.Value &gt; 0 
+	Fields!Ret003BaseDR.Value &gt; 0 
 	,False,True)</Hidden>
                      </Visibility>
                      <Style>
@@ -3546,7 +3546,7 @@
        </TablixRowHierarchy>
        <DataSetName>DataSet2</DataSetName>
        <Top>4.62704cm</Top>
-        <Height>1.51927cm</Height>
+        <Height>1.55689cm</Height>
        <Width>20.53139cm</Width>
        <ZIndex>1</ZIndex>
        <Style>
@@ -4747,7 +4747,7 @@
          </Paragraph>
        </Paragraphs>
        <rd:DefaultName>Textbox5</rd:DefaultName>
-        <Top>12.34604cm</Top>
+        <Top>12.02854cm</Top>
        <Height>0.11466cm</Height>
        <Width>20.5314cm</Width>
        <ZIndex>8</ZIndex>
@@ -4763,7 +4763,7 @@
        </Style>
      </Textbox>
    </ReportItems>
-    <Height>12.4607cm</Height>
+    <Height>12.1432cm</Height>
    <Style />
  </Body>
  <Width>20.53564cm</Width>
@@ -5375,6 +5375,30 @@
          <DataField>Ret003ImporteDR</DataField>
          <rd:TypeName>System.Float</rd:TypeName>
        </Field>
+        <Field Name="Tra001BaseDR">
+          <DataField>Tra001BaseDR</DataField>
+          <rd:TypeName>System.Float</rd:TypeName>
+        </Field>
+        <Field Name="Tra002BaseDR">
+          <DataField>Tra002BaseDR</DataField>
+          <rd:TypeName>System.Float</rd:TypeName>
+        </Field>
+        <Field Name="Tra003BaseDR">
+          <DataField>Tra003BaseDR</DataField>
+          <rd:TypeName>System.Float</rd:TypeName>
+        </Field>
+        <Field Name="Ret001BaseDR">
+          <DataField>Ret001BaseDR</DataField>
+          <rd:TypeName>System.Float</rd:TypeName>
+        </Field>
+        <Field Name="Ret002BaseDR">
+          <DataField>Ret002BaseDR</DataField>
+          <rd:TypeName>System.Float</rd:TypeName>
+        </Field>
+        <Field Name="Ret003BaseDR">
+          <DataField>Ret003BaseDR</DataField>
+          <rd:TypeName>System.Float</rd:TypeName>
+        </Field>
      </Fields>
      <rd:DataSetInfo>
        <rd:DataSetName>DataSet</rd:DataSetName>
--- a/Empresas/140/Formatos/RepEntradasUsados.rdlc
+++ b/Empresas/140/Formatos/RepEntradasUsados.rdlc
@@ -1,5 +1,5 @@
 <?xml version="1.0" encoding="utf-8"?>
-<Report xmlns="http://schemas.microsoft.com/sqlserver/reporting/2010/01/reportdefinition" xmlns:rd="http://schemas.microsoft.com/SQLServer/reporting/reportdesigner">
+<Report xmlns:rd="http://schemas.microsoft.com/SQLServer/reporting/reportdesigner" xmlns:cl="http://schemas.microsoft.com/sqlserver/reporting/2010/01/componentdefinition" xmlns="http://schemas.microsoft.com/sqlserver/reporting/2010/01/reportdefinition">
  <AutoRefresh>0</AutoRefresh>
  <DataSources>
    <DataSource Name="DataSet">
@@ -17,6 +17,10 @@
        <CommandText>/* Local Query */</CommandText>
      </Query>
      <Fields>
+        <Field Name="CvePSCargo">
+          <DataField>CvePSCargo</DataField>
+          <rd:TypeName>System.Int</rd:TypeName>
+        </Field>
        <Field Name="CodigoPS">
          <DataField>CodigoPS</DataField>
          <rd:TypeName>System.String</rd:TypeName>
@@ -485,7 +489,7 @@
                  </TablixCells>
                </TablixRow>
                <TablixRow>
-                  <Height>0.58521cm</Height>
+                  <Height>0.32063cm</Height>
                  <TablixCells>
                    <TablixCell>
                      <CellContents>
@@ -499,6 +503,7 @@
                                  <Value>=Fields!CodigoPS.Value</Value>
                                  <Style>
                                    <FontSize>7pt</FontSize>
+                                    <FontWeight>=IIF(Fields!CvePSCargo.Value &gt; 0, "Default","Bold")</FontWeight>
                                  </Style>
                                </TextRun>
                              </TextRuns>
@@ -510,9 +515,10 @@
                          <rd:DefaultName>CodigoPS</rd:DefaultName>
                          <Style>
                            <Border>
-                              <Color>White</Color>
+                              <Color>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</Color>
                              <Style>Solid</Style>
                            </Border>
+                            <BackgroundColor>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</BackgroundColor>
                            <PaddingLeft>2pt</PaddingLeft>
                            <PaddingRight>2pt</PaddingRight>
                            <PaddingTop>2pt</PaddingTop>
@@ -533,6 +539,7 @@
                                  <Value>0</Value>
                                  <Style>
                                    <FontSize>7pt</FontSize>
+                                    <FontWeight>=IIF(Fields!CvePSCargo.Value &gt; 0, "Default","Bold")</FontWeight>
                                  </Style>
                                </TextRun>
                              </TextRuns>
@@ -544,9 +551,10 @@
                          <rd:DefaultName>TipoAgrupador</rd:DefaultName>
                          <Style>
                            <Border>
-                              <Color>White</Color>
+                              <Color>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</Color>
                              <Style>Solid</Style>
                            </Border>
+                            <BackgroundColor>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</BackgroundColor>
                            <PaddingLeft>2pt</PaddingLeft>
                            <PaddingRight>2pt</PaddingRight>
                            <PaddingTop>2pt</PaddingTop>
@@ -567,6 +575,7 @@
                                  <Value>=Fields!E_Almacen.Value</Value>
                                  <Style>
                                    <FontSize>7pt</FontSize>
+                                    <FontWeight>=IIF(Fields!CvePSCargo.Value &gt; 0, "Default","Bold")</FontWeight>
                                    <Format>#,0;(#,0)</Format>
                                  </Style>
                                </TextRun>
@@ -579,9 +588,10 @@
                          <rd:DefaultName>E_Almacen</rd:DefaultName>
                          <Style>
                            <Border>
-                              <Color>White</Color>
+                              <Color>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</Color>
                              <Style>Solid</Style>
                            </Border>
+                            <BackgroundColor>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</BackgroundColor>
                            <PaddingLeft>2pt</PaddingLeft>
                            <PaddingRight>2pt</PaddingRight>
                            <PaddingTop>2pt</PaddingTop>
@@ -602,6 +612,7 @@
                                  <Value>0</Value>
                                  <Style>
                                    <FontSize>7pt</FontSize>
+                                    <FontWeight>=IIF(Fields!CvePSCargo.Value &gt; 0, "Default","Bold")</FontWeight>
                                    <Format>d</Format>
                                  </Style>
                                </TextRun>
@@ -614,9 +625,10 @@
                          <rd:DefaultName>Paqueteria1</rd:DefaultName>
                          <Style>
                            <Border>
-                              <Color>White</Color>
+                              <Color>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</Color>
                              <Style>Solid</Style>
                            </Border>
+                            <BackgroundColor>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</BackgroundColor>
                            <PaddingLeft>2pt</PaddingLeft>
                            <PaddingRight>2pt</PaddingRight>
                            <PaddingTop>2pt</PaddingTop>
@@ -637,6 +649,7 @@
                                  <Value>=Fields!E_Traspaso.Value</Value>
                                  <Style>
                                    <FontSize>7pt</FontSize>
+                                    <FontWeight>=IIF(Fields!CvePSCargo.Value &gt; 0, "Default","Bold")</FontWeight>
                                    <Format>#,0;(#,0)</Format>
                                  </Style>
                                </TextRun>
@@ -649,9 +662,10 @@
                          <rd:DefaultName>E_Traspaso</rd:DefaultName>
                          <Style>
                            <Border>
-                              <Color>White</Color>
+                              <Color>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</Color>
                              <Style>Solid</Style>
                            </Border>
+                            <BackgroundColor>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</BackgroundColor>
                            <PaddingLeft>2pt</PaddingLeft>
                            <PaddingRight>2pt</PaddingRight>
                            <PaddingTop>2pt</PaddingTop>
@@ -672,6 +686,7 @@
                                  <Value>=Fields!E_Compra.Value</Value>
                                  <Style>
                                    <FontSize>7pt</FontSize>
+                                    <FontWeight>=IIF(Fields!CvePSCargo.Value &gt; 0, "Default","Bold")</FontWeight>
                                    <Format>#,0;(#,0)</Format>
                                  </Style>
                                </TextRun>
@@ -684,9 +699,10 @@
                          <rd:DefaultName>E_Compra</rd:DefaultName>
                          <Style>
                            <Border>
-                              <Color>White</Color>
+                              <Color>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</Color>
                              <Style>Solid</Style>
                            </Border>
+                            <BackgroundColor>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</BackgroundColor>
                            <PaddingLeft>2pt</PaddingLeft>
                            <PaddingRight>2pt</PaddingRight>
                            <PaddingTop>2pt</PaddingTop>
@@ -707,6 +723,7 @@
                                  <Value>0</Value>
                                  <Style>
                                    <FontSize>7pt</FontSize>
+                                    <FontWeight>=IIF(Fields!CvePSCargo.Value &gt; 0, "Default","Bold")</FontWeight>
                                    <Format>d</Format>
                                  </Style>
                                </TextRun>
@@ -719,9 +736,10 @@
                          <rd:DefaultName>Fecha</rd:DefaultName>
                          <Style>
                            <Border>
-                              <Color>White</Color>
+                              <Color>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</Color>
                              <Style>Solid</Style>
                            </Border>
+                            <BackgroundColor>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</BackgroundColor>
                            <PaddingLeft>2pt</PaddingLeft>
                            <PaddingRight>2pt</PaddingRight>
                            <PaddingTop>2pt</PaddingTop>
@@ -742,6 +760,7 @@
                                  <Value>=Fields!S_Almacen.Value</Value>
                                  <Style>
                                    <FontSize>7pt</FontSize>
+                                    <FontWeight>=IIF(Fields!CvePSCargo.Value &gt; 0, "Default","Bold")</FontWeight>
                                    <Format>#,0;(#,0)</Format>
                                  </Style>
                                </TextRun>
@@ -754,9 +773,10 @@
                          <rd:DefaultName>S_Almacen</rd:DefaultName>
                          <Style>
                            <Border>
-                              <Color>White</Color>
+                              <Color>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</Color>
                              <Style>Solid</Style>
                            </Border>
+                            <BackgroundColor>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</BackgroundColor>
                            <PaddingLeft>2pt</PaddingLeft>
                            <PaddingRight>2pt</PaddingRight>
                            <PaddingTop>2pt</PaddingTop>
@@ -777,6 +797,7 @@
                                  <Value>=Fields!S_Traspaso.Value</Value>
                                  <Style>
                                    <FontSize>7pt</FontSize>
+                                    <FontWeight>=IIF(Fields!CvePSCargo.Value &gt; 0, "Default","Bold")</FontWeight>
                                    <Format>#,0;(#,0)</Format>
                                  </Style>
                                </TextRun>
@@ -789,9 +810,10 @@
                          <rd:DefaultName>S_Traspaso</rd:DefaultName>
                          <Style>
                            <Border>
-                              <Color>White</Color>
+                              <Color>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</Color>
                              <Style>Solid</Style>
                            </Border>
+                            <BackgroundColor>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</BackgroundColor>
                            <PaddingLeft>2pt</PaddingLeft>
                            <PaddingRight>2pt</PaddingRight>
                            <PaddingTop>2pt</PaddingTop>
@@ -812,6 +834,7 @@
                                  <Value>0</Value>
                                  <Style>
                                    <FontSize>7pt</FontSize>
+                                    <FontWeight>=IIF(Fields!CvePSCargo.Value &gt; 0, "Default","Bold")</FontWeight>
                                  </Style>
                                </TextRun>
                              </TextRuns>
@@ -823,9 +846,10 @@
                          <rd:DefaultName>Textbox16</rd:DefaultName>
                          <Style>
                            <Border>
-                              <Color>White</Color>
+                              <Color>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</Color>
                              <Style>Solid</Style>
                            </Border>
+                            <BackgroundColor>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</BackgroundColor>
                            <PaddingLeft>2pt</PaddingLeft>
                            <PaddingRight>2pt</PaddingRight>
                            <PaddingTop>2pt</PaddingTop>
@@ -846,6 +870,7 @@
                                  <Value>0</Value>
                                  <Style>
                                    <FontSize>7pt</FontSize>
+                                    <FontWeight>=IIF(Fields!CvePSCargo.Value &gt; 0, "Default","Bold")</FontWeight>
                                  </Style>
                                </TextRun>
                              </TextRuns>
@@ -857,9 +882,10 @@
                          <rd:DefaultName>Textbox42</rd:DefaultName>
                          <Style>
                            <Border>
-                              <Color>White</Color>
+                              <Color>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</Color>
                              <Style>Solid</Style>
                            </Border>
+                            <BackgroundColor>=IIF(Fields!CvePSCargo.Value &gt; 0, "White","Silver")</BackgroundColor>
                            <PaddingLeft>2pt</PaddingLeft>
                            <PaddingRight>2pt</PaddingRight>
                            <PaddingTop>2pt</PaddingTop>
@@ -900,7 +926,7 @@
            <DataSetName>DataSet1</DataSetName>
            <Top>0.10583cm</Top>
            <Left>0.08377cm</Left>
-            <Height>1.2148cm</Height>
+            <Height>0.95022cm</Height>
            <Width>20.80089cm</Width>
            <Style>
              <Border>
@@ -1108,12 +1134,12 @@
          </Style>
        </PageHeader>
        <PageFooter>
-          <Height>1.01804cm</Height>
+          <Height>0.6cm</Height>
          <PrintOnFirstPage>true</PrintOnFirstPage>
          <PrintOnLastPage>true</PrintOnLastPage>
          <ReportItems>
            <Line Name="Line2">
-              <Top>0.12694cm</Top>
+              <Top>0.12693cm</Top>
              <Left>0.01325cm</Left>
              <Height>0cm</Height>
              <Width>20.90669cm</Width>
@@ -1146,7 +1172,6 @@
                </Paragraph>
              </Paragraphs>
              <rd:DefaultName>FechaConFormato</rd:DefaultName>
-              <Top>0.30333cm</Top>
              <Height>0.6cm</Height>
              <Width>8.45793cm</Width>
              <ZIndex>1</ZIndex>
@@ -1183,7 +1208,6 @@
                </Paragraph>
              </Paragraphs>
              <rd:DefaultName>FechaConFormato</rd:DefaultName>
-              <Top>0.30333cm</Top>
              <Left>8.69316cm</Left>
              <Height>0.6cm</Height>
              <Width>8.00814cm</Width>
@@ -1221,7 +1245,6 @@
                </Paragraph>
              </Paragraphs>
              <rd:DefaultName>PageNumber</rd:DefaultName>
-              <Top>0.30333cm</Top>
              <Left>16.84241cm</Left>
              <Height>0.6cm</Height>
              <Width>4.00442cm</Width>
@@ -1294,7 +1317,6 @@
      <Prompt>ReportParameter1</Prompt>
    </ReportParameter>
  </ReportParameters>
-  
  <EmbeddedImages>
    <EmbeddedImage Name="Logo">
      <MIMEType>image/png</MIMEType>
--- a/Empresas/Grales/Formatos/ReciboDePago.rdlc
+++ b/Empresas/Grales/Formatos/ReciboDePago.rdlc
--- a/Empresas/Grales/Formatos/RepFacturas.rdlc
+++ b/Empresas/Grales/Formatos/RepFacturas.rdlc
@@ -16,7 +16,10 @@
                        <TextRuns>
                          <TextRun>
                            <Value>Tipo</Value>
-                            <Style />
+                            <Style>
+                              <FontSize>7pt</FontSize>
+                              <FontWeight>Bold</FontWeight>
+                            </Style>
                          </TextRun>
                        </TextRuns>
                        <Style>
@@ -27,12 +30,13 @@
                    <rd:DefaultName>Textbox3</rd:DefaultName>
                    <Style>
                      <Border>
-                        <Color>DimGray</Color>
+                        <Color>Silver</Color>
                        <Style>Solid</Style>
                      </Border>
                      <RightBorder>
                        <Style>None</Style>
                      </RightBorder>
+                      <BackgroundColor>Silver</BackgroundColor>
                      <PaddingLeft>2pt</PaddingLeft>
                      <PaddingRight>2pt</PaddingRight>
                      <PaddingTop>2pt</PaddingTop>
@@ -51,7 +55,10 @@
                        <TextRuns>
                          <TextRun>
                            <Value>Folio</Value>
-                            <Style />
+                            <Style>
+                              <FontSize>7pt</FontSize>
+                              <FontWeight>Bold</FontWeight>
+                            </Style>
                          </TextRun>
                        </TextRuns>
                        <Style>
@@ -62,12 +69,13 @@
                    <rd:DefaultName>Textbox28</rd:DefaultName>
                    <Style>
                      <Border>
-                        <Color>DimGray</Color>
+                        <Color>Silver</Color>
                        <Style>Solid</Style>
                      </Border>
                      <RightBorder>
                        <Style>None</Style>
                      </RightBorder>
+                      <BackgroundColor>Silver</BackgroundColor>
                      <PaddingLeft>2pt</PaddingLeft>
                      <PaddingRight>2pt</PaddingRight>
                      <PaddingTop>2pt</PaddingTop>
@@ -82,21 +90,24 @@
        <TablixBody>
          <TablixColumns>
            <TablixColumn>
-              <Width>2.36727cm</Width>
+              <Width>1.70632cm</Width>
            </TablixColumn>
            <TablixColumn>
-              <Width>7.23964cm</Width>
+              <Width>6.55172cm</Width>
            </TablixColumn>
            <TablixColumn>
-              <Width>2.57894cm</Width>
+              <Width>1.87355cm</Width>
            </TablixColumn>
            <TablixColumn>
-              <Width>2.34081cm</Width>
+              <Width>1.67935cm</Width>
+            </TablixColumn>
+            <TablixColumn>
+              <Width>5.52508cm</Width>
            </TablixColumn>
          </TablixColumns>
          <TablixRows>
            <TablixRow>
-              <Height>0.6cm</Height>
+              <Height>0.33542cm</Height>
              <TablixCells>
                <TablixCell>
                  <CellContents>
@@ -109,7 +120,7 @@
                            <TextRun>
                              <Value>=Fields!FechaFactura.Value</Value>
                              <Style>
-                                <FontSize>9pt</FontSize>
+                                <FontSize>7pt</FontSize>
                                <Format>dd/MM/yyyy</Format>
                              </Style>
                            </TextRun>
@@ -143,7 +154,7 @@
                            <TextRun>
                              <Value>=Fields!NombreProveedor.Value</Value>
                              <Style>
-                                <FontSize>9pt</FontSize>
+                                <FontSize>7pt</FontSize>
                                <Format>#,0.00;(#,0.00)</Format>
                              </Style>
                            </TextRun>
@@ -175,7 +186,7 @@
                            <TextRun>
                              <Value>=Fields!Total.Value</Value>
                              <Style>
-                                <FontSize>9pt</FontSize>
+                                <FontSize>7pt</FontSize>
                                <Format>#,0.00;(#,0.00)</Format>
                              </Style>
                            </TextRun>
@@ -212,7 +223,7 @@ Fields!FueValidado.Value = "2","Cancelada",
 Fields!FueValidado.Value = "3","Omitida",
 1=1,"No validado")</Value>
                              <Style>
-                                <FontSize>9pt</FontSize>
+                                <FontSize>7pt</FontSize>
                                <Format>#,0.00;(#,0.00)</Format>
                              </Style>
                            </TextRun>
@@ -233,6 +244,37 @@ Fields!FueValidado.Value = "3","Omitida",
                    </Textbox>
                  </CellContents>
                </TablixCell>
+                <TablixCell>
+                  <CellContents>
+                    <Textbox Name="UUID">
+                      <CanGrow>true</CanGrow>
+                      <KeepTogether>true</KeepTogether>
+                      <Paragraphs>
+                        <Paragraph>
+                          <TextRuns>
+                            <TextRun>
+                              <Value>=Fields!UUID.Value</Value>
+                              <Style>
+                                <FontSize>7pt</FontSize>
+                              </Style>
+                            </TextRun>
+                          </TextRuns>
+                          <Style />
+                        </Paragraph>
+                      </Paragraphs>
+                      <rd:DefaultName>UUID</rd:DefaultName>
+                      <Style>
+                        <Border>
+                          <Style>None</Style>
+                        </Border>
+                        <PaddingLeft>2pt</PaddingLeft>
+                        <PaddingRight>2pt</PaddingRight>
+                        <PaddingTop>2pt</PaddingTop>
+                        <PaddingBottom>2pt</PaddingBottom>
+                      </Style>
+                    </Textbox>
+                  </CellContents>
+                </TablixCell>
              </TablixCells>
            </TablixRow>
          </TablixRows>
@@ -241,7 +283,7 @@ Fields!FueValidado.Value = "3","Omitida",
          <TablixMembers>
            <TablixMember>
              <TablixHeader>
-                <Size>0.6cm</Size>
+                <Size>0.44125cm</Size>
                <CellContents>
                  <Textbox Name="Textbox40">
                    <CanGrow>true</CanGrow>
@@ -251,7 +293,10 @@ Fields!FueValidado.Value = "3","Omitida",
                        <TextRuns>
                          <TextRun>
                            <Value>Fecha Fact.</Value>
-                            <Style />
+                            <Style>
+                              <FontSize>7pt</FontSize>
+                              <FontWeight>Bold</FontWeight>
+                            </Style>
                          </TextRun>
                        </TextRuns>
                        <Style>
@@ -262,9 +307,10 @@ Fields!FueValidado.Value = "3","Omitida",
                    <rd:DefaultName>Textbox40</rd:DefaultName>
                    <Style>
                      <Border>
-                        <Color>DimGray</Color>
+                        <Color>Silver</Color>
                        <Style>Solid</Style>
                      </Border>
+                      <BackgroundColor>Silver</BackgroundColor>
                      <PaddingLeft>2pt</PaddingLeft>
                      <PaddingRight>2pt</PaddingRight>
                      <PaddingTop>2pt</PaddingTop>
@@ -276,7 +322,7 @@ Fields!FueValidado.Value = "3","Omitida",
            </TablixMember>
            <TablixMember>
              <TablixHeader>
-                <Size>0.6cm</Size>
+                <Size>0.44125cm</Size>
                <CellContents>
                  <Textbox Name="Textbox42">
                    <CanGrow>true</CanGrow>
@@ -286,7 +332,10 @@ Fields!FueValidado.Value = "3","Omitida",
                        <TextRuns>
                          <TextRun>
                            <Value>Proveedor</Value>
-                            <Style />
+                            <Style>
+                              <FontSize>7pt</FontSize>
+                              <FontWeight>Bold</FontWeight>
+                            </Style>
                          </TextRun>
                        </TextRuns>
                        <Style>
@@ -297,9 +346,10 @@ Fields!FueValidado.Value = "3","Omitida",
                    <rd:DefaultName>Textbox42</rd:DefaultName>
                    <Style>
                      <Border>
-                        <Color>DimGray</Color>
+                        <Color>Silver</Color>
                        <Style>Solid</Style>
                      </Border>
+                      <BackgroundColor>Silver</BackgroundColor>
                      <PaddingLeft>2pt</PaddingLeft>
                      <PaddingRight>2pt</PaddingRight>
                      <PaddingTop>2pt</PaddingTop>
@@ -311,7 +361,7 @@ Fields!FueValidado.Value = "3","Omitida",
            </TablixMember>
            <TablixMember>
              <TablixHeader>
-                <Size>0.6cm</Size>
+                <Size>0.44125cm</Size>
                <CellContents>
                  <Textbox Name="Textbox44">
                    <CanGrow>true</CanGrow>
@@ -321,7 +371,10 @@ Fields!FueValidado.Value = "3","Omitida",
                        <TextRuns>
                          <TextRun>
                            <Value>Importe</Value>
-                            <Style />
+                            <Style>
+                              <FontSize>7pt</FontSize>
+                              <FontWeight>Bold</FontWeight>
+                            </Style>
                          </TextRun>
                        </TextRuns>
                        <Style>
@@ -332,9 +385,10 @@ Fields!FueValidado.Value = "3","Omitida",
                    <rd:DefaultName>Textbox44</rd:DefaultName>
                    <Style>
                      <Border>
-                        <Color>DimGray</Color>
+                        <Color>Silver</Color>
                        <Style>Solid</Style>
                      </Border>
+                      <BackgroundColor>Silver</BackgroundColor>
                      <PaddingLeft>2pt</PaddingLeft>
                      <PaddingRight>2pt</PaddingRight>
                      <PaddingTop>2pt</PaddingTop>
@@ -346,7 +400,7 @@ Fields!FueValidado.Value = "3","Omitida",
            </TablixMember>
            <TablixMember>
              <TablixHeader>
-                <Size>0.6cm</Size>
+                <Size>0.44125cm</Size>
                <CellContents>
                  <Textbox Name="Textbox49">
                    <CanGrow>true</CanGrow>
@@ -356,7 +410,10 @@ Fields!FueValidado.Value = "3","Omitida",
                        <TextRuns>
                          <TextRun>
                            <Value>EstatusSAT</Value>
-                            <Style />
+                            <Style>
+                              <FontSize>7pt</FontSize>
+                              <FontWeight>Bold</FontWeight>
+                            </Style>
                          </TextRun>
                        </TextRuns>
                        <Style>
@@ -367,9 +424,49 @@ Fields!FueValidado.Value = "3","Omitida",
                    <rd:DefaultName>Textbox49</rd:DefaultName>
                    <Style>
                      <Border>
-                        <Color>DimGray</Color>
+                        <Color>Silver</Color>
                        <Style>Solid</Style>
                      </Border>
+                      <BackgroundColor>Silver</BackgroundColor>
+                      <PaddingLeft>2pt</PaddingLeft>
+                      <PaddingRight>2pt</PaddingRight>
+                      <PaddingTop>2pt</PaddingTop>
+                      <PaddingBottom>2pt</PaddingBottom>
+                    </Style>
+                  </Textbox>
+                </CellContents>
+              </TablixHeader>
+            </TablixMember>
+            <TablixMember>
+              <TablixHeader>
+                <Size>0.44125cm</Size>
+                <CellContents>
+                  <Textbox Name="Textbox4">
+                    <CanGrow>true</CanGrow>
+                    <KeepTogether>true</KeepTogether>
+                    <Paragraphs>
+                      <Paragraph>
+                        <TextRuns>
+                          <TextRun>
+                            <Value>Folio Fiscal</Value>
+                            <Style>
+                              <FontSize>7pt</FontSize>
+                              <FontWeight>Bold</FontWeight>
+                            </Style>
+                          </TextRun>
+                        </TextRuns>
+                        <Style>
+                          <TextAlign>Center</TextAlign>
+                        </Style>
+                      </Paragraph>
+                    </Paragraphs>
+                    <rd:DefaultName>Textbox4</rd:DefaultName>
+                    <Style>
+                      <Border>
+                        <Color>Silver</Color>
+                        <Style>Solid</Style>
+                      </Border>
+                      <BackgroundColor>Silver</BackgroundColor>
                      <PaddingLeft>2pt</PaddingLeft>
                      <PaddingRight>2pt</PaddingRight>
                      <PaddingTop>2pt</PaddingTop>
@@ -398,7 +495,7 @@ Fields!FueValidado.Value = "3","Omitida",
                </SortExpression>
              </SortExpressions>
              <TablixHeader>
-                <Size>2.16269cm</Size>
+                <Size>1.30938cm</Size>
                <CellContents>
                  <Textbox Name="TipoComprobante">
                    <CanGrow>true</CanGrow>
@@ -412,7 +509,7 @@ Fields!TipoComprobante.Value="E","Egreso",
 Fields!TipoComprobante.Value="P","Pago"
 )</Value>
                            <Style>
-                              <FontSize>9pt</FontSize>
+                              <FontSize>7pt</FontSize>
                            </Style>
                          </TextRun>
                        </TextRuns>
@@ -435,7 +532,7 @@ Fields!TipoComprobante.Value="P","Pago"
              <TablixMembers>
                <TablixMember>
                  <TablixHeader>
-                    <Size>2.33715cm</Size>
+                    <Size>1.96039cm</Size>
                    <CellContents>
                      <Textbox Name="SerieFolio">
                        <CanGrow>true</CanGrow>
@@ -446,7 +543,7 @@ Fields!TipoComprobante.Value="P","Pago"
                              <TextRun>
                                <Value>=Fields!SerieFolio.Value</Value>
                                <Style>
-                                  <FontSize>9pt</FontSize>
+                                  <FontSize>7pt</FontSize>
                                </Style>
                              </TextRun>
                            </TextRuns>
@@ -473,8 +570,8 @@ Fields!TipoComprobante.Value="P","Pago"
        </TablixRowHierarchy>
        <DataSetName>DataSet1</DataSetName>
        <Left>0.06614cm</Left>
-        <Height>1.2cm</Height>
-        <Width>19.0265cm</Width>
+        <Height>0.77667cm</Height>
+        <Width>20.60579cm</Width>
        <Style>
          <Border>
            <Style>None</Style>
@@ -482,10 +579,10 @@ Fields!TipoComprobante.Value="P","Pago"
        </Style>
      </Tablix>
    </ReportItems>
-    <Height>0.47244in</Height>
+    <Height>0.35786in</Height>
    <Style />
  </Body>
-  <Width>7.52397in</Width>
+  <Width>8.13855in</Width>
  <Page>
    <PageHeader>
      <Height>2.22362cm</Height>
@@ -505,12 +602,14 @@ Fields!TipoComprobante.Value="P","Pago"
                  </Style>
                </TextRun>
              </TextRuns>
-              <Style />
+              <Style>
+                <TextAlign>Center</TextAlign>
+              </Style>
            </Paragraph>
          </Paragraphs>
          <rd:DefaultName>Textbox1</rd:DefaultName>
          <Top>0.18521cm</Top>
-          <Left>2.8349cm</Left>
+          <Left>3.4699cm</Left>
          <Height>0.6cm</Height>
          <Width>12.60299cm</Width>
          <Style>
@@ -558,7 +657,7 @@ Fields!TipoComprobante.Value="P","Pago"
          </Paragraphs>
          <rd:DefaultName>Textbox2</rd:DefaultName>
          <Top>1.10271cm</Top>
-          <Left>3.80842cm</Left>
+          <Left>4.76092cm</Left>
          <Height>0.52945cm</Height>
          <Width>9.98771cm</Width>
          <ZIndex>1</ZIndex>
@@ -643,7 +742,7 @@ Fields!TipoComprobante.Value="P","Pago"
          </Paragraphs>
          <rd:DefaultName>Textbox13</rd:DefaultName>
          <Top>0.0259cm</Top>
-          <Left>15.579cm</Left>
+          <Left>17.07478cm</Left>
          <Height>2.18834cm</Height>
          <Width>3.53188cm</Width>
          <ZIndex>2</ZIndex>
@@ -679,7 +778,7 @@ Fields!TipoComprobante.Value="P","Pago"
      </Style>
    </PageHeader>
    <PageFooter>
-      <Height>0.84667cm</Height>
+      <Height>0.76376cm</Height>
      <PrintOnFirstPage>true</PrintOnFirstPage>
      <PrintOnLastPage>true</PrintOnLastPage>
      <ReportItems>
@@ -703,8 +802,7 @@ Fields!TipoComprobante.Value="P","Pago"
            </Paragraph>
          </Paragraphs>
          <rd:DefaultName>Textbox3</rd:DefaultName>
-          <Top>0.08291cm</Top>
-          <Left>16.97887cm</Left>
+          <Left>18.56637cm</Left>
          <Height>0.68085cm</Height>
          <Width>2.06587cm</Width>
          <Style>
@@ -801,7 +899,7 @@ Fields!TipoComprobante.Value="P","Pago"
          </Paragraphs>
          <rd:DefaultName>Textbox10</rd:DefaultName>
          <Top>0.08291cm</Top>
-          <Left>6.93622cm</Left>
+          <Left>7.57122cm</Left>
          <Height>0.68085cm</Height>
          <Width>2.92333cm</Width>
          <ZIndex>3</ZIndex>
@@ -834,7 +932,7 @@ Fields!TipoComprobante.Value="P","Pago"
          </Paragraphs>
          <rd:DefaultName>Textbox11</rd:DefaultName>
          <Top>0.08291cm</Top>
-          <Left>9.84544cm</Left>
+          <Left>10.48044cm</Left>
          <Height>0.68085cm</Height>
          <Width>4.32745cm</Width>
          <ZIndex>4</ZIndex>
@@ -857,8 +955,8 @@ Fields!TipoComprobante.Value="P","Pago"
    </PageFooter>
    <PageHeight>29.7cm</PageHeight>
    <PageWidth>21cm</PageWidth>
-    <LeftMargin>0.5cm</LeftMargin>
-    <RightMargin>0.5cm</RightMargin>
+    <LeftMargin>0cm</LeftMargin>
+    <RightMargin>0cm</RightMargin>
    <TopMargin>1cm</TopMargin>
    <BottomMargin>1cm</BottomMargin>
    <ColumnSpacing>0.13cm</ColumnSpacing>
@@ -905,6 +1003,10 @@ Fields!TipoComprobante.Value="P","Pago"
          <DataField>NombreProveedor</DataField>
          <rd:TypeName>System.String</rd:TypeName>
        </Field>
+        <Field Name="UUID">
+          <DataField>UUID</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
      </Fields>
      <rd:DataSetInfo>
        <rd:DataSetName>DataSet</rd:DataSetName>
--- a/General/SaldosIniciales.aspx.vb
+++ b/General/SaldosIniciales.aspx.vb
@@ -1253,6 +1253,7 @@ Partial Class General_SaldosIniciales
                    Dim CveClienteSucursal As Integer = 0 'Row("CveClienteSucursal").ToString.ToEntero
                    Dim FolioFiscal As String = If(dt.Columns.Contains("Folio Fiscal"), Row("Folio Fiscal").ToString, "")
                    Dim PorcentajeIVA As Decimal = If(dt.Columns.Contains("PorcentajeIVA"), Round(Row("PorcentajeIVA").ToString.ToDecimal, 4), 0)
+                    Dim PorcentajeRetIVA As Decimal = If(dt.Columns.Contains("PorcentajeRetIVA"), Round(Row("PorcentajeRetIVA").ToString.ToDecimal, 4), 0)

                    Dim PedidoContrato As String = If(dt.Columns.Contains("Pedido"), Row("Pedido").ToString, "")

@@ -1309,7 +1310,7 @@ Partial Class General_SaldosIniciales
                            End If
                            CveVenta = ObjVentas.CveVenta

-                            If Not ObjVentas.AddVentaDetalle(CveVenta, CvePS, 1, CveUnidadMedida, SubTotal, IVA, SubTotal * PorcentajeIVA, "Saldo Inicial", 0, 0, Sucursal.ToEntero, 0, PorcentajeIVA:=PorcentajeIVA) Then
+                            If Not ObjVentas.AddVentaDetalle(CveVenta, CvePS, 1, CveUnidadMedida, SubTotal, IVA, SubTotal * PorcentajeIVA, "Saldo Inicial", 0, 0, Sucursal.ToEntero, 0, PorcentajeIVA:=PorcentajeIVA, PorcentajeRetIVA:=PorcentajeRetIVA, ImporteRetIVA:=RetIVA) Then
                                ErrorVentas = True
                                Exit For
                            End If
--- a/Inventarios/RegRSCO.aspx
+++ b/Inventarios/RegRSCO.aspx
@@ -0,0 +1,187 @@
+<%@ Page Title="Reg RSCO" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RegRSCO.aspx.vb" Inherits="Inventarios_RegRSCO" EnableEventValidation="false" %>
+
+<%@ 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">
+
+    <style>
+        #DivAgregarUnidad > div.modal-dialog > div label input {
+            padding: 0px !important;
+        }
+    </style>
+
+</asp:Content>
+<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
+    Reg RSCO
+</asp:Content>
+<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
+</asp:Content>
+<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
+    <asp:UpdatePanel runat="server" ID="UpAgregar">
+        <ContentTemplate>
+            <li>                
+                <asp:LinkButton runat="server" ID="LnkAgregarRSCO" OnClick="LnkAgregarRSCO_Click" data-toggle="tooltip" data-placement="left" title="Agregar RSCO" Text="<i class='fa fa-plus'></i>Agregar RSCO"></asp:LinkButton>
+            </li>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+</asp:Content>
+<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
+</asp:Content>
+<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
+    <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+            <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" 
+
+                DataKeyNames="CveCompuestoVigencia,CveCompuesto,CveProveedor,RegistroRSCO,FechaVigencia,VigenciaIndeterminada,CveUsuario, NombreComercial"
+                EmptyDataText="No se Encontraron Registros" ToolTip="Listado de Unidades" CssClass="table table-striped table-advance table-hover mysmallbtn " data-sort="true" Style="width: 100%" GridLines="None">
+                <Columns>
+                    <asp:BoundField HeaderText="Proveedor" DataField="NombreComercial" ItemStyle-HorizontalAlign="Left" />
+                    <asp:BoundField HeaderText="Compuesto" DataField="Compuesto" ItemStyle-HorizontalAlign="Left" />
+                    <asp:BoundField HeaderText="Registro RSCO" DataField="RegistroRSCO" ItemStyle-HorizontalAlign="Left" />
+
+                    <asp:BoundField HeaderText="Fecha. Vigencia" ItemStyle-HorizontalAlign="Center" DataField="FechaVigencia" ItemStyle-Width="5%" DataFormatString="{0:d}" />
+                    <asp:BoundField HeaderText="Fecha Indeterminada" DataField="VigenciaIndeterminadaStr" ItemStyle-HorizontalAlign="Center" />                   
+                    
+                    
+                    <asp:BoundField HeaderText="Usuario" DataField="Usuario" />
+                    <asp:BoundField HeaderText="Fecha Ing." ItemStyle-HorizontalAlign="Center" DataField="FechaIng" ItemStyle-Width="5%" DataFormatString="{0:d}" />
+                    
+                    <asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Center" HeaderStyle-HorizontalAlign="Left" HeaderText="Editar">
+                        <ItemTemplate>
+                            <asp:LinkButton ID="LnkEditar" OnClick="LnkEditar_Click" runat="server" Visible="true" AlternateText="Eitar" CausesValidation="False" CssClass="btn btn-circle btn-sm green" Text="<i title='Editar' class='fa fa-pencil' title='Editar' ></i>" />
+                            <asp:LinkButton ID="LnkEliminar" OnClick="LnkEliminar_Click" runat="server" Visible="true" AlternateText="Eliminar" CausesValidation="False" CssClass="btn btn-circle btn-sm red" Text="<i title='Eliminar' class='icon-trash' title='Eliminar' ></i>" data-toggle="confirmation" data-popout="true" data-original-title="Eliminar" data-btn-ok-label="Si" />
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                </Columns>
+            </asp:GridView>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+
+
+    <div id="DivAgregarRSCO" class="modal ADS fade" role="dialog">
+        <div class="modal-dialog ">
+
+            <asp:UpdatePanel runat="server" class="modal-content rowpadding" tabindex="-1" ID="UpModalRSCO" UpdateMode="Conditional">
+                <ContentTemplate>
+
+                    <div class="modal-header ">
+                        <button type="button" class="close" data-dismiss="modal">&times;</button>
+                        <h4 class="modal-title">
+                            <asp:Literal runat="server" ID="LtlTituloModal" Text="Agregar Unidad"></asp:Literal></h4>
+                    </div>
+
+                    <div class="modal-body">
+
+                        <div class="row">
+                            <div class="col-md-12" runat="server" id="DVTiposRemolque" >
+                                <div class="form-group form-md-line-input input-iconright"  >
+                                    <ADS:Dropdownlost ID="DdlProveedores" runat="server" CssClass="form-control" CssStyle="width: 100%;" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor"></ADS:Dropdownlost>                                
+                                    <label for="<%= DdlProveedores.ClientID.ToString()%>" style="margin-top:-6px" >Proveedor:</label>                                    
+                                    <i></i>
+                                </div>
+
+                            </div>
+                        </div>
+                        <div class="row">
+                            <div class="col-md-12" runat="server">
+                                <div class="form-group form-md-line-input input-iconright">
+                                    <asp:DropDownList ID="DdlCompuesto" CssClass="form-control input-sm select2me " Width="100%" runat="server" AppendDataBoundItems="true" AutoPostBack="false" CausesValidation="true" DataValueField="CveCompuesto" DataTextField="Compuesto" Style="padding: 0px">
+                                    </asp:DropDownList>
+                                    <label for="<%= DdlCompuesto.ClientID.ToString()%>">Compuesto:</label>
+                                    <asp:RequiredFieldValidator runat="server" ID="RfvDdlCompuesto" ControlToValidate="DdlCompuesto" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Compuesto''</b> es necesario, por favor ingréselo." ValidationGroup="GrpRSCO"></asp:RequiredFieldValidator>
+                                    <i></i>
+                                </div>
+
+                            </div>
+                        </div>
+
+                        <div class="row">
+                            <div class="col-md-12">
+
+                                <div class="form-group form-md-line-input input-iconright">
+                                    <asp:TextBox ID="TxtRegistroRSCO" CssClass="form-control" runat="server" MaxLength="50"></asp:TextBox>
+                                    <label for="<%= TxtRegistroRSCO.ClientID.ToString()%>">Registro RSCO:</label>
+                                    <asp:RequiredFieldValidator runat="server" ID="RfvTxtRegistroRSCO" ControlToValidate="TxtRegistroRSCO" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Registro RSCO''</b> es necesario, por favor ingréselo." ValidationGroup="GrpRSCO"></asp:RequiredFieldValidator>
+                                    <i></i>
+                                </div>
+
+
+                            </div>
+                        </div>
+
+ 
+                                <div class="form-group form-md-line-input input-iconright" style="width: 160px!important"  runat="server"  id="DvFechaVijencia">
+
+                                    <asp:TextBox ID="TxtFechaVigencia" CssClass="form-control" MaxLength="50" runat="server" Width="130px"></asp:TextBox>
+                                    <span class="input-group-btn " style="position: absolute; right: 41px; top: -5px;">
+                                        <asp:LinkButton ID="LnkTxtFechaVigencia" class="btn default" Style="margin-top: 15px; margin-left: 6px" Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
+                                    </span>
+                                    <ajax:CalendarExtender runat="server" ID="CETxtFechaVigencia" TargetControlID="TxtFechaVigencia" PopupButtonID="LnkTxtFechaVigencia" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
+
+                                    <asp:CompareValidator ID="CvTxtFechaVigencia" runat="server" ControlToValidate="TxtFechaVigencia" Display="None"
+                                        ErrorMessage="El campo <b>''Fecha de Cierre''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)."
+                                        Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpRSCO"></asp:CompareValidator>
+
+                                    <asp:RequiredFieldValidator ID="RfvTxtFechaVigencia" runat="server"  ControlToValidate="TxtFechaVigencia" Display="None"
+                                        ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha de Cierre''</b> es necesario, por favor ingréselo." ValidationGroup="GrpRSCO"></asp:RequiredFieldValidator>
+
+                                    <ajax:ValidatorCalloutExtender ID="CvcTxtFechaVigencia" runat="server" HighlightCssClass="vco" TargetControlID="CvTxtFechaVigencia" Width="300px"></ajax:ValidatorCalloutExtender>
+                                    <ajax:ValidatorCalloutExtender ID="VCETxtFechaVigencia" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtFechaVigencia" Width="300px"></ajax:ValidatorCalloutExtender>
+
+                                    <label for="<%= TxtFechaVigencia.ClientID.ToString() %>">Fecha de Vigencia:</label>
+                                    
+
+                                </div>
+
+                          
+
+
+                            <div class="row">
+                            
+                            <div class="col-md-6">
+
+                                <div class="form-group form-md-line-input input-iconright"  runat="server">
+                                        <asp:CheckBox ID="ChkFechaIndeterminada" runat="server" CssClass="form-control"  OnCheckedChanged="ChkFechaIndeterminada_CheckedChanged" AutoPostBack="true" />
+                                        <label for="<%= ChkFechaIndeterminada.ClientID.ToString()%>">Fecha Indeterminada:</label>
+                                  </div>
+                              
+                            </div>
+                        </div>
+
+
+                        
+                            <div class="row" runat="server" id="DivModalContinuarAgregando">
+                            
+                            <div class="col-md-12" style="text-align:right!important">                                                                        
+                                <asp:CheckBox ID="ChkModalContinuarAgregando" runat="server"    Text="Continuar Agregando" TextAlign="Left" />                                                                       
+                              
+                            </div>
+                        </div>
+
+
+
+                    </div>                    
+
+                    <div class="modal-footer">
+
+                        <asp:Button ID="BtnAgregarRSCO" Text="Agregar" runat="server" ClientIDMode="Static" CssClass="btn btn-primary" OnClick="BtnAgregarRSCO_Click" ValidationGroup="GrpRSCO" />
+                        <button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
+
+                    </div>
+
+                </ContentTemplate>
+            </asp:UpdatePanel>
+
+        </div>
+    </div>
+
+
+
+
+
+
+</asp:Content>
+<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
+</asp:Content>
+
--- a/Inventarios/RegRSCO.aspx.vb
+++ b/Inventarios/RegRSCO.aspx.vb
@@ -0,0 +1,232 @@
+Imports Extensiones
+Partial Class Inventarios_RegRSCO
+    Inherits ClsPaginas
+
+    Private Property CveCompuestoVigencia As Integer
+        Get
+
+            If ViewState("CveCompuestoVigencia") Is Nothing Then
+                Return -1
+            Else
+                Return ViewState("CveCompuestoVigencia").ToString().ToEntero()
+            End If
+        End Get
+        Set(ByVal value As Integer)
+            ViewState("CveCompuestoVigencia") = value
+        End Set
+    End Property
+
+    Private Sub Inventarios_RegRSCO_Load(sender As Object, e As EventArgs) Handles Me.Load
+        If Not Page.IsPostBack Then
+            CargaCombos()
+
+            CargaDatos()
+        End If
+    End Sub
+
+
+
+
+
+
+    Public Sub CargaDatos()
+
+
+        Dim ObjInventarios As New ClsInventarios
+
+        If ObjInventarios.GetCompuestosVigencia(-1, -1, MinFecha, MaxFecha, 1, UsuarioActual.CveEmpresa) Then
+            GvDatos.DataSource = ObjInventarios.DtResultados
+        Else
+            GvDatos.DataSource = Nothing
+        End If
+
+        ObjInventarios.Dispose()
+        GvDatos.DataBind()
+        UpDatos.Update()
+
+
+    End Sub
+
+    Private Sub CargaCombos()
+
+
+        DdlProveedores.setEsWebService(True)
+        DdlProveedores.Attributes.Add("data-metodo", "getproveedores")
+        DdlProveedores.SelectedText = "Seleccione Uno"
+        DdlProveedores.SelectedValue = "-1"
+
+
+        Dim ObjPS As New ClsProductosServicios
+
+        If ObjPS.GetCompuestosActivos(UsuarioActual.CveEmpresa) Then
+            DdlCompuesto.DataSource = ObjPS.DtResultados
+        Else
+            DdlCompuesto.DataSource = Nothing
+        End If
+
+        ObjPS.Dispose()
+        DdlCompuesto.DataBind()
+        DdlCompuesto.Items.Insert(0, New ListItem("Seleccione Uno", "-1"))
+
+
+
+        UpModalRSCO.Update()
+
+    End Sub
+
+    Private Sub LimpiarModalDivAgregarRSCO()
+        CveCompuestoVigencia = -1
+
+        BtnAgregarRSCO.Text = "Agregar"
+
+        DdlProveedores.txtValue.Value = "-1"
+        DdlProveedores.txtText.Value = ""
+
+        DdlCompuesto.SelectedValueExist(-1)
+
+        TxtFechaVigencia.Text = ""
+        TxtRegistroRSCO.Text = ""
+        ChkFechaIndeterminada.Checked = False
+
+        LtlTituloModal.Text = "Agregar RSCO"
+
+        DivModalContinuarAgregando.Visible = True
+        ChkModalContinuarAgregando.Checked = True
+
+        UpModalRSCO.Update()
+    End Sub
+
+    Protected Sub LnkAgregarRSCO_Click(sender As Object, e As EventArgs)
+
+        LimpiarModalDivAgregarRSCO()
+        RegistraScript(String.Format("$('#{0}').modal();", "DivAgregarRSCO"))
+
+    End Sub
+
+    Protected Sub LnkEditar_Click(sender As Object, e As EventArgs)
+
+        BtnAgregarRSCO.Text = "Actualizar"
+        Dim GvRow As GridViewRow = CType(((CType(sender, LinkButton)).NamingContainer), GridViewRow)
+
+        CveCompuestoVigencia = GvRow.DataKey("CveCompuestoVigencia").ToEntero()
+
+
+
+        DdlProveedores.txtValue.Value = GvRow.DataKey("CveProveedor")
+        DdlProveedores.txtText.Value = GvRow.DataKey("NombreComercial")
+
+
+        DdlCompuesto.SelectedValueExist(GvRow.DataKey("CveCompuesto"))
+        TxtFechaVigencia.Text = GvRow.DataKey("FechaVigencia").ToDate.ToString("dd/MM/yyyy")
+        TxtRegistroRSCO.Text = GvRow.DataKey("RegistroRSCO")
+        ChkFechaIndeterminada.Checked = Boolean.Parse(GvRow.DataKey("VigenciaIndeterminada"))
+
+        LtlTituloModal.Text = "Actualizar RSCO"
+
+        DivModalContinuarAgregando.Visible = False
+        ChkModalContinuarAgregando.Checked = False
+
+
+        If ChkFechaIndeterminada.Checked Then
+            DvFechaVijencia.Visible = False
+            TxtFechaVigencia.Text = "01/01/1900"
+        Else
+            DvFechaVijencia.Visible = True
+        End If
+
+
+
+
+        UpModalRSCO.Update()
+
+        RegistraScript(String.Format("$('#{0}').modal();", "DivAgregarRSCO"))
+    End Sub
+
+    Protected Sub LnkEliminar_Click(sender As Object, e As EventArgs)
+
+        Dim ErrorAlElimiar As Boolean = False
+
+        Dim GvRow As GridViewRow = CType(((CType(sender, LinkButton)).NamingContainer), GridViewRow)
+
+        Dim CveCompuestoVigenciaEliminar = GvRow.DataKey("CveCompuestoVigencia").ToEntero()
+
+        Using ObjInventarios As New ClsInventarios
+
+            If (ObjInventarios.RemoveCompuestosVigencia(CveCompuestoVigenciaEliminar, UsuarioActual.CveEmpresa)) Then
+
+                RegistraScript(String.Format("$('#{0}').modal('hide');", "DivAgregarRSCO"))
+                Alert("RSCO Eliminado Correctamente.")
+            Else
+                ErrorAlElimiar = True
+            End If
+        End Using
+
+
+        If Not ErrorAlElimiar Then
+            GlobalDTInvCamiones(UsuarioActual.CveEmpresa) = Nothing
+            CargaDatos()
+        End If
+
+    End Sub
+
+    Protected Sub BtnAgregarRSCO_Click(sender As Object, e As EventArgs)
+
+        Dim ErrorPrceso As Boolean = False
+
+
+        If DdlProveedores.SelectedValue.ToEntero <= 0 Then
+            Alert("Debe de seleccionar un proveedor.")
+            Exit Sub
+        End If
+
+        Using ObjInventarios As New ClsInventarios
+
+            If CveCompuestoVigencia <= 0 Then
+                If ObjInventarios.AddCompuestosVigencia(DdlCompuesto.SelectedValue.ToEntero, DdlProveedores.SelectedValue.ToEntero, TxtRegistroRSCO.Text, TxtFechaVigencia.Text.ToDate, ChkFechaIndeterminada.Checked, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
+                    Alert("RSCO agregado correctamente")
+                Else
+                    ErrorPrceso = True
+                End If
+            Else
+                If ObjInventarios.UpdateCompuestosVigencia(CveCompuestoVigencia, DdlCompuesto.SelectedValue.ToEntero, DdlProveedores.SelectedValue.ToEntero, TxtRegistroRSCO.Text, TxtFechaVigencia.Text.ToDate, ChkFechaIndeterminada.Checked, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
+                    Alert("RSCO actualizado correctamente")
+                Else
+                    ErrorPrceso = True
+                End If
+            End If
+        End Using
+
+
+        If Not ErrorPrceso Then
+            GlobalDTInvCamiones(UsuarioActual.CveEmpresa) = Nothing
+            CargaDatos()
+
+            If Not ChkModalContinuarAgregando.Checked Then
+                RegistraScript(String.Format("$('#{0}').modal('hide');", "DivAgregarRSCO"))
+            Else
+                LimpiarModalDivAgregarRSCO()
+            End If
+
+            UpDatos.Update()
+        End If
+
+
+
+    End Sub
+
+
+
+    Protected Sub ChkFechaIndeterminada_CheckedChanged(sender As Object, e As EventArgs)
+
+        If ChkFechaIndeterminada.Checked Then
+            DvFechaVijencia.Visible = False
+            TxtFechaVigencia.Text = "01/01/1900"
+        Else
+            DvFechaVijencia.Visible = True
+            TxtFechaVigencia.Text = ""
+        End If
+
+        UpModalRSCO.Update()
+
+    End Sub
+End Class
--- a/Inventarios/RepEntregaAlmacenRuta.aspx.cs
+++ b/Inventarios/RepEntregaAlmacenRuta.aspx.cs
@@ -644,11 +644,25 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
            if (e.Row.DataKey("Estatus").ToEntero() == 1)
            {
                LnkCancelaTimbre.Visible = UsuarioActual.TienePermisoProceso(338);
-
-                if (bool.Parse(e.Row.DataKey("AplicaCP")))
+                if (e.Row.DataKey("Tipo").ToString() == "I")
                {
-                    if (e.Row.FCHyperLink("HplPDF") != null)
-                        e.Row.FCHyperLink("HplPDF").NavigateUrl = "/Compras/PopUpVerFactura.aspx?P=" + Extensiones.ModExtensiones.Encripta(String.Format("OP=CARPOTIMBRE&CVETIMBRE={0}", e.Row.DataKey("CveTimbre")));
+                    LnkCancelaTimbre.Visible = false;
+                }
+
+
+                    if (bool.Parse(e.Row.DataKey("AplicaCP")))
+                {
+                    
+                    if(e.Row.DataKey("Tipo").ToString() == "I")
+                    {
+                        if (e.Row.FCHyperLink("HplPDF") != null)
+                            e.Row.FCHyperLink("HplPDF").NavigateUrl = "/Compras/PopUpVerFactura.aspx?P=" + Extensiones.ModExtensiones.Encripta(String.Format("OP=DesXmlTra&CVEMOVIMIENTO={0}&EXT={1}&FOLIO={2}&TIPODOCTO={3}", -1, "PDF", e.Row.DataKey("SerieFolio"), e.Row.DataKey("TimbreTipoDocto")));
+                    }
+                    else
+                    {
+                        if (e.Row.FCHyperLink("HplPDF") != null)
+                            e.Row.FCHyperLink("HplPDF").NavigateUrl = "/Compras/PopUpVerFactura.aspx?P=" + Extensiones.ModExtensiones.Encripta(String.Format("OP=CARPOTIMBRE&CVETIMBRE={0}", e.Row.DataKey("CveTimbre")));
+                    }
                }
                else
                {
@@ -660,8 +674,16 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas

                if (File.Exists(ArchivoXML))
                {
-                    if (e.Row.FCHyperLink("HplXML") != null)
-                        e.Row.FCHyperLink("HplXML").NavigateUrl = "/Compras/PopUpVerFactura.aspx?P=" + Extensiones.ModExtensiones.Encripta(String.Format("OP=DesXmlTra&CVEMOVIMIENTO={0}&EXT={1}&FOLIO={2}&TIPODOCTO={3}", -1, "XML", e.Row.DataKey("SerieFolio"), e.Row.DataKey("TimbreTipoDocto")));
+                    if (e.Row.DataKey("Tipo").ToString() == "I")
+                    {
+                        if (e.Row.FCHyperLink("HplXML") != null)                            
+                            e.Row.FCHyperLink("HplXML").NavigateUrl = "/Compras/PopUpVerFactura.aspx?P=" + Extensiones.ModExtensiones.Encripta(String.Format("OP=DesXmlTra&CVEMOVIMIENTO={0}&EXT={1}&FOLIO={2}&TIPODOCTO={3}", -1, "XML", e.Row.DataKey("SerieFolio"), e.Row.DataKey("TimbreTipoDocto")));
+                    }
+                    else
+                    {
+                        if (e.Row.FCHyperLink("HplXML") != null)
+                            e.Row.FCHyperLink("HplXML").NavigateUrl = "/Compras/PopUpVerFactura.aspx?P=" + Extensiones.ModExtensiones.Encripta(String.Format("OP=DesXmlTra&CVEMOVIMIENTO={0}&EXT={1}&FOLIO={2}&TIPODOCTO={3}", -1, "XML", e.Row.DataKey("SerieFolio"), e.Row.DataKey("TimbreTipoDocto")));
+                    }
                }

            }
@@ -680,6 +702,9 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas

            switch (e.Row.DataKey("Tipo"))
            {
+                case "I":
+                    e.Row.FCLabel("LtTipo").CssClass = "label label-sm label-success";
+                    break;
                case "E":
                    e.Row.FCLabel("LtTipo").CssClass = "label label-sm label-success";
                    break;
--- a/Inventarios/RepRSCO.aspx
+++ b/Inventarios/RepRSCO.aspx
@@ -0,0 +1,154 @@
+<%@ Page Title="Rep RSCO" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepRSCO.aspx.vb" Inherits="Inventarios_RepRSCO" EnableEventValidation="false" %>
+
+<%@ 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">
+
+    <style>
+        #DivAgregarUnidad > div.modal-dialog > div label input {
+            padding: 0px !important;
+        }
+    </style>
+
+</asp:Content>
+<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
+    Rep RSCO
+</asp:Content>
+<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
+</asp:Content>
+<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
+    <asp:UpdatePanel runat="server" ID="UpAcciones" UpdateMode="Conditional">
+        <ContentTemplate>
+            <li>                
+                <asp:LinkButton runat="server" ID="LnkDescargaExcel" Visible="false" OnClick="LnkDescargaExcel_Click" data-toggle="tooltip" data-placement="left" title="Excel" Text="<i class='fa fa-file-excel-o'></i>Excel"></asp:LinkButton>
+            </li>
+        </ContentTemplate>
+        <Triggers>
+            <asp:PostBackTrigger ControlID="LnkDescargaExcel" />
+        </Triggers>
+    </asp:UpdatePanel>
+</asp:Content>
+<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
+</asp:Content>
+<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
+
+
+
+      <asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+            <div class="portlet solid  grey-cascade portlet-filter" id="idnecesaria">
+                <div class="portlet-title portlet-filterT smalltitle">
+                    <div class="tools">
+                        <asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" OnClick="BtnConsultar_Click" />
+                        <a href="javascript:;" class="expand"></a>
+                    </div>
+                    <div class="titlefiltros  caption ">
+                        <div class="row">
+                            <div class="col-md-1 ">Proveedor:</div>                            
+                            <div class="col-md-2 ">                                
+                                <ADS:Dropdownlost ID="DdlProveedores" runat="server" CssStyle="width: 100%;" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor"></ADS:Dropdownlost>                                
+                            </div>
+                            <div class="col-md-1">Compuesto: </div>
+                            <div class="col-md-2">
+                                    <asp:DropDownList ID="DdlCompuesto" CssClass="form-control input-sm select2me " Width="100%" runat="server" AppendDataBoundItems="true" AutoPostBack="false" CausesValidation="true" DataValueField="CveCompuesto" DataTextField="Compuesto" Style="padding: 0px">
+                                    </asp:DropDownList>
+                            </div>
+
+                            <div class="col-md-1 truncate">
+                                Fecha Inicio:                           
+                            </div>
+                            <div class="col-md-1" style="min-width: 115px">
+                                <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 100px !important; padding: 0px;">
+                                    <asp:TextBox Width="80px" ID="txtFechaI" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10"></asp:TextBox>
+                                    <span class="input-group-btn ">
+                                        <asp:LinkButton ID="imgCalendario" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
+                                    </span>
+                                </div>
+                                <ajax:MaskedEditExtender ID="MEEFechaI" runat="server" TargetControlID="txtFechaI" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
+                                <ajax:CalendarExtender runat="server" ID="Calendario" TargetControlID="txtFechaI" PopupButtonID="ImgCalendario" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
+                                <asp:RequiredFieldValidator ID="rfvFechaI" runat="server" ControlToValidate="txtFechaI" Display="None" ErrorMessage="El campo <b>''Fecha Inicial''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
+                                <asp:CompareValidator ID="cvFechaI" runat="server" ControlToValidate="txtFechaI" Display="None" ErrorMessage="El campo <b>''Fecha Inicial''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="Valida"></asp:CompareValidator>
+                                <ajax:ValidatorCalloutExtender ID="vcoFfvFI" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
+                                <ajax:ValidatorCalloutExtender ID="vcoCvFI" runat="server" HighlightCssClass="vco" TargetControlID="cvFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
+                            </div>
+                            <div class="col-md-1 truncate">
+                                Fecha Fin: 
+                           
+                            </div>
+                            <div class="col-md-1" style="min-width: 115px">
+                                <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 100px !important; padding: 0px;">
+                                    <asp:TextBox Width="80px" ID="txtFechaF" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10"></asp:TextBox>
+                                    <span class="input-group-btn ">
+                                        <asp:LinkButton ID="imgCalendarioF" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
+                                    </span>
+                                </div>
+                                <ajax:MaskedEditExtender ID="MEEFechaF" runat="server" TargetControlID="txtFechaF" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
+                                <ajax:CalendarExtender runat="server" ID="Calendario2" TargetControlID="txtFechaF" PopupButtonID="imgCalendarioF" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
+                                <asp:RequiredFieldValidator ID="rfvFechaF" runat="server" ControlToValidate="txtFechaF" Display="None" ErrorMessage="El campo <b>''Fecha Final''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
+                                <asp:CompareValidator ID="cvFechaF" runat="server" ControlToValidate="txtFechaF" Display="None" ErrorMessage="El campo <b>''Fecha Final''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="Valida"></asp:CompareValidator>
+                                <ajax:ValidatorCalloutExtender ID="vcoRfvFF" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
+                                <ajax:ValidatorCalloutExtender ID="vcoCvFF" runat="server" HighlightCssClass="vco" TargetControlID="cvFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
+                            </div>
+
+
+                          
+
+                        </div>
+                    </div>
+                </div>
+                <div class="portlet-body" style="display: none">                
+                </div>
+            </div>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+    <br />
+
+
+
+
+
+
+
+
+    <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+            <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" 
+
+                DataKeyNames="CveCompuestoVigencia,CveCompuesto,CveProveedor,RegistroRSCO,FechaVigencia,VigenciaIndeterminada,CveUsuario"
+                EmptyDataText="No se Encontraron Registros" ToolTip="Listado de Unidades" CssClass="table table-striped table-advance table-hover mysmallbtn " data-sort="true" Style="width: 100%" GridLines="None">
+                <Columns>
+                    <asp:BoundField HeaderText="Proveedor" DataField="NombreComercial" ItemStyle-HorizontalAlign="Left" />
+                    <asp:BoundField HeaderText="Compuesto" DataField="Compuesto" ItemStyle-HorizontalAlign="Left" />
+                    <asp:BoundField HeaderText="Registro RSCO" DataField="RegistroRSCO" ItemStyle-HorizontalAlign="Left" />
+
+                    <asp:BoundField HeaderText="Fecha. Vigencia" ItemStyle-HorizontalAlign="Center" DataField="FechaVigencia" ItemStyle-Width="5%" DataFormatString="{0:d}" />
+                    <asp:BoundField HeaderText="Fecha Indeterminada" DataField="VigenciaIndeterminadaStr" ItemStyle-HorizontalAlign="Center" />                   
+                    
+                    
+                    <asp:BoundField HeaderText="Usuario" DataField="Usuario" />
+                    <asp:BoundField HeaderText="Fecha Ing." ItemStyle-HorizontalAlign="Center" DataField="FechaIng" ItemStyle-Width="5%" DataFormatString="{0:d}" />
+                    
+                   <%-- <asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Center" HeaderStyle-HorizontalAlign="Left" HeaderText="Editar">
+                        <ItemTemplate>
+                            <asp:LinkButton ID="LnkEditar" OnClick="LnkEditar_Click" runat="server" Visible="true" AlternateText="Eitar" CausesValidation="False" CssClass="btn btn-circle btn-sm green" Text="<i title='Editar' class='fa fa-pencil' title='Editar' ></i>" />
+                            <asp:LinkButton ID="LnkEliminar" OnClick="LnkEliminar_Click" runat="server" Visible="true" AlternateText="Eliminar" CausesValidation="False" CssClass="btn btn-circle btn-sm red" Text="<i title='Eliminar' class='icon-trash' title='Eliminar' ></i>" data-toggle="confirmation" data-popout="true" data-original-title="Eliminar" data-btn-ok-label="Si" />
+                        </ItemTemplate>
+                    </asp:TemplateField>--%>
+                </Columns>
+            </asp:GridView>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+
+
+ 
+
+
+
+
+
+
+</asp:Content>
+<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
+</asp:Content>
+
--- a/Inventarios/RepRSCO.aspx.vb
+++ b/Inventarios/RepRSCO.aspx.vb
@@ -0,0 +1,150 @@
+Imports System.Data
+Imports Extensiones
+Imports Microsoft.Reporting.WebForms
+
+Partial Class Inventarios_RepRSCO
+    Inherits ClsPaginas
+
+    Private Property DTDatos As DataTable
+        Get
+
+            If ViewState("DTDatos") Is Nothing Then
+
+                ViewState("DTDatos") = New DataTable
+            End If
+
+            Return DirectCast(ViewState("DTDatos"), DataTable)
+
+        End Get
+        Set(ByVal value As DataTable)
+            ViewState("DTDatos") = value
+        End Set
+    End Property
+
+    Private Sub Inventarios_RepRSCO_Load(sender As Object, e As EventArgs) Handles Me.Load
+        If Not Page.IsPostBack Then
+            CargaCombos()
+
+        End If
+    End Sub
+
+
+    Public Sub CargaDatos()
+
+
+        Dim ObjInventarios As New ClsInventarios
+
+        LnkDescargaExcel.Visible = False
+
+        If ObjInventarios.RepCompuestosVigencia(DdlCompuesto.SelectedValue.ToEntero, DdlProveedores.SelectedValue.ToEntero, txtFechaI.Text.ToDate, txtFechaF.Text.ToDate, 1, UsuarioActual.CveEmpresa) Then
+
+            DTDatos = ObjInventarios.DtResultados
+            GvDatos.DataSource = DTDatos
+            If DTDatos IsNot Nothing AndAlso DTDatos.Rows.Count > 0 Then
+                LnkDescargaExcel.Visible = True
+                UpAcciones.Update()
+            End If
+        Else
+            GvDatos.DataSource = Nothing
+        End If
+
+        ObjInventarios.Dispose()
+        GvDatos.DataBind()
+        UpDatos.Update()
+
+
+    End Sub
+
+    Private Sub CargaCombos()
+
+
+        DdlProveedores.setEsWebService(True)
+        DdlProveedores.Attributes.Add("data-metodo", "getproveedores")
+        DdlProveedores.SelectedText = "Todos"
+        DdlProveedores.SelectedValue = "-1"
+
+
+        Dim ObjPS As New ClsProductosServicios
+
+        If ObjPS.GetCompuestosActivos(UsuarioActual.CveEmpresa) Then
+            DdlCompuesto.DataSource = ObjPS.DtResultados
+        Else
+            DdlCompuesto.DataSource = Nothing
+        End If
+
+        ObjPS.Dispose()
+        DdlCompuesto.DataBind()
+        DdlCompuesto.Items.Insert(0, New ListItem("Todos", "-1"))
+
+
+        txtFechaF.Text = Now.ToString("dd/MM/yyyy")
+        txtFechaI.Text = txtFechaF.Text.ToDate.AddMonths(-2).ToString("dd/MM/yyyy")
+
+
+
+    End Sub
+
+
+
+
+
+
+    Protected Sub LnkDescargaExcel_Click(sender As Object, e As EventArgs)
+        ImprimirReporte("EXCEL")
+    End Sub
+
+
+    Private Sub ImprimirReporte(Optional Formato As String = "PDF")
+
+        Dim ObjTareas As New ClsOIEventos
+        Dim params As New List(Of ReportParameter)
+
+        Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
+        Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
+
+        Dim FechaI, FechaF As String
+        FechaI = If(txtFechaI.Text = "" Or txtFechaI.Text = "__/__/____", "-1", txtFechaI.Text)
+        FechaF = If(txtFechaF.Text = "" Or txtFechaF.Text = "__/__/____", "-1", txtFechaF.Text)
+
+
+        params.Add(New ReportParameter("Filtros", FiltrosUsados()))
+        'params.Add(New ReportParameter("GPO", DdlGrupo.SelectedItem.Text))
+        params.Add(New ReportParameter("Titulo", "Reporte RSCO"))
+        params.Add(New ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa))
+        params.Add(New ReportParameter("FechaInicio", FechaI))
+        params.Add(New ReportParameter("FechaFin", FechaF))
+        params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
+        params.Add(New ReportParameter("FechaImpresion", Now.ToDateTime.ToShortDateString))
+
+        If Imagen.Exists Then
+            params.Add(New ReportParameter("LogoPath", $"file://{Imagen.FullName}"))
+        Else
+            params.Add(New ReportParameter("LogoPath", ""))
+        End If
+
+        ImprimirPDF("Empresas\Grales\Formatos\RepRSCO.rdlc", DTDatos, params, "RepRSCO" & Now.ToString("yyyyMMddmmss"), Formato:=Formato)
+
+    End Sub
+
+    Private Function FiltrosUsados() As String
+        Dim Filtros As String = ""
+
+        If DdlProveedores.SelectedValue.ToEntero > 0 Then
+            Filtros = $"<b>Proveedor:</b> {DdlProveedores.txtText.Value}, "
+        End If
+
+        If DdlCompuesto.SelectedValue.ToEntero > 0 Then
+            Filtros = Filtros & $"<b>Compuesto:</b> {DdlProveedores.txtText.Value}, "
+        End If
+
+
+        Filtros = Filtros & $"<b>Fecha Inicio:</b> {txtFechaI.Text}, <b>Fecha Fin:</b> {txtFechaF.Text}"
+
+        Return Filtros
+
+    End Function
+
+    Protected Sub BtnConsultar_Click(sender As Object, e As EventArgs)
+        CargaDatos()
+    End Sub
+End Class
--- a/Nomina/Nomina.aspx
+++ b/Nomina/Nomina.aspx
@@ -578,7 +578,7 @@
                                                    <asp:HyperLink ID="HypPDF" ToolTip="Formato Timbre" CssClass="btn btn-circle btn-sm btn-xs red mysmallbtn" Visible="false" NavigateUrl="#" runat="server"><i class="fa fa-file-pdf-o"></i></asp:HyperLink>
                                                    <asp:LinkButton runat="server" ID="LnkTimbrar" CssClass="btn btn-circle btn-sm btn-xs blue mysmallbtn" Text="<i class='fa fa-bell'></i>" OnClick="LnkTimbrar_Click" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea Timbrar?" data-btn-ok-label="si" />
                                                    <asp:LinkButton runat="server" ID="Imgdesautorizar" CssClass="btn btn-circle btn-sm btn-xs yellow-gold mysmallbtn" Text="<i class='fa fa-ban'></i>" OnClick="Imgdesautorizar_Click" CommandArgument='<%# Eval("CveNomina") %>' Visible='<%# (Eval("CveNomina").ToString() != "" && Eval("SeTimbro").ToString() == "False"? true :false)%>' data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar la autorizacion?" data-btn-ok-label="si" />
-                                                    <asp:LinkButton runat="server" ID="ImgDelete" CssClass="btn btn-circle btn-sm btn-xs red mysmallbtn" Text="<i class='icon-trash'></i>" OnClick="ImgDelete_Click" CommandArgument='<%# Eval("CveNomina") %>' Visible='<%# (Eval("CveNomina").ToString() != "" && Eval("SeTimbro").ToString() == "False"? true :false)%>' data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar la nómina?" data-btn-ok-label="si" />
+                                                    <asp:LinkButton runat="server" ID="ImgDelete" CssClass="btn btn-circle btn-sm btn-xs red mysmallbtn" Text="<i class='icon-trash'></i>" OnClick="ImgDelete_Click" CommandArgument='<%# Eval("CveNomina") %>' Visible='<%# (Eval("CveNomina").ToString() != "" && Eval("SeTimbro").ToString() == "False"? false :false)%>' data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar la nómina?" data-btn-ok-label="si" />
                                                    <asp:LinkButton runat="server" ID="LnkCancelar" CssClass="btn btn-circle btn-sm btn-xs yellow-gold mysmallbtn" Text="<i class='fa fa-ban'></i>" OnClick="LnkCancelar_Click" CommandArgument='<%# Eval("CveNomina") %>' Visible='<%# (Eval("CveNomina").ToString() != "" && PermisoCancelarEmitido && Eval("SeTimbro").ToString() == "True"? true :false)%>' data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea cancelar la nómina?" data-btn-ok-label="si" />
                                                </div>
                                            </ItemTemplate>
--- a/RH/CatPersonal.aspx
+++ b/RH/CatPersonal.aspx
@@ -628,6 +628,12 @@
                                    <asp:Literal ID="LtlRiesgoPuesto" runat="server" Text='<%# Eval("RiesgoPuesto") %>'></asp:Literal>
                                </ItemTemplate>
                            </asp:TemplateField>
+                            <asp:TemplateField ItemStyle-HorizontalAlign="Left" Visible="false">
+                                <HeaderTemplate>Registro patronal</HeaderTemplate>
+                                <ItemTemplate>
+                                    <asp:Literal ID="LtlRiesgoPuesto" runat="server" Text='<%# Eval("RegistroPatronal") %>'></asp:Literal>
+                                </ItemTemplate>
+                            </asp:TemplateField>

                        </Columns>
                        <RowStyle CssClass="Texto" />
@@ -728,13 +734,14 @@
                                            <asp:CheckBox ID="ChkSeInscribioSS" runat="server" Text="SeInscribioSS" />
                                        </div>
                                        <div class="col-md-3">
-                                            <asp:CheckBox ID="ChkSalarioDiarioPago" runat="server" Text="SalarioDiarioPago" />
+                                            <asp:CheckBox ID="ChkRegistroPatronal" runat="server" Text="Registro patronal" />
+                                            <asp:CheckBox ID="ChkSalarioDiarioPago" Visible="false" runat="server" Text="SalarioDiarioPago" />
                                        </div>
                                        <div class="col-md-3">
                                            <asp:CheckBox ID="ChkSalarioDiario" runat="server" Text="SalarioDiario" />
                                        </div>
                                    </div>
-                                    <div class="row">
+                                    <div class="row" runat="server" Visible="false">
                                        <div class="col-md-3">
                                            <asp:CheckBox ID="ChkSDI" runat="server" Text="SDI" />
                                        </div>
--- a/RH/CatPersonal.aspx.vb
+++ b/RH/CatPersonal.aspx.vb
@@ -592,7 +592,12 @@ Partial Class RH_CatPersonal
        If ChkRiesgoPuesto.Checked Then
            GvDatos.Columns(43).Visible = True
        Else
-            GvDatos.Columns(42).Visible = False
+            GvDatos.Columns(43).Visible = False
+        End If
+        If ChkRegistroPatronal.Checked Then
+            GvDatos.Columns(44).Visible = True
+        Else
+            GvDatos.Columns(44).Visible = False
        End If


--- a/Sistemas/Empresa.aspx
+++ b/Sistemas/Empresa.aspx
@@ -1761,6 +1761,12 @@
        </tr>
    </table>
    <br />
+
+
+    <asp:UpdatePanel runat="server" ID="UpModalCertificados" UpdateMode="Conditional">
+        <ContentTemplate>
+
+            
    <div id="ModalArchvivo" class="modal ADS fade" role="dialog">
        <div class="modal-dialog">

@@ -1768,7 +1774,7 @@
            <div class="modal-content" style="width: 700px;">
                <div class="modal-header ">
                    <button type="button" class="close" data-dismiss="modal">&times;</button>
-                    <h4 class="modal-title">Subir Imagen</h4>
+                    <h4 class="modal-title"><asp:Label runat="server" ID="LblModalCertificadosTitulo"></asp:Label></h4>
                </div>

                <div class="modal-body" style="height: 200px;">
@@ -1787,17 +1793,33 @@
                        </ContentTemplate>
                    </asp:UpdatePanel>
                </div>
+                <br />
                <div class="modal-footer">
                    <asp:UpdatePanel runat="server">
                        <ContentTemplate>
-                            <asp:Button ID="BtnGuardarArchivo" runat="server" OnClick="BtnGuardarArchivo_Click" ClientIDMode="Static" Text="Guardar" CssClass="btn btn-primary" />
-                            <button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
+                            
+                            <div class="row">
+                                <div class="col-md-12">
+                                     <asp:Button ID="BtnGuardarArchivo" runat="server" OnClick="BtnGuardarArchivo_Click" ClientIDMode="Static" Text="Guardar" CssClass="btn btn-primary" />
+                                    <button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
+                                </div>
+                            </div>
+                           
+
                        </ContentTemplate>
                    </asp:UpdatePanel>
                </div>
            </div>
        </div>
-    </div>
+    </div>
+
+
+
+        </ContentTemplate>
+    </asp:UpdatePanel>
+
+
+
 </asp:Content>
 <asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="server">
    <script type="text/javascript">
--- a/Sistemas/Empresa.aspx.vb
+++ b/Sistemas/Empresa.aspx.vb
@@ -107,6 +107,31 @@ Partial Class Sistemas_Empresa
        End Set
    End Property

+
+    Enum EnumOpActualizaArchivosCer
+        SinOpcion
+        KEY
+        CER
+        PFX
+    End Enum
+
+
+    Property OpActualizaArchivosCer As EnumOpActualizaArchivosCer
+
+        Get
+            If ViewState("OpActualizaArchivosCer") Is Nothing Then
+                ViewState("OpActualizaArchivosCer") = EnumOpActualizaArchivosCer.SinOpcion
+            End If
+
+            Return DirectCast(ViewState("OpActualizaArchivosCer"), EnumOpActualizaArchivosCer)
+
+        End Get
+        Set(value As EnumOpActualizaArchivosCer)
+            ViewState("OpActualizaArchivosCer") = value
+        End Set
+
+    End Property
+
 #End Region


@@ -1644,15 +1669,35 @@ Partial Class Sistemas_Empresa

            If result.Exitoso Then
                Alert("El emisor se registró correctamente.<br>" & result.Descripcion)
+            Else
+                Alert("Ocurrió un error al registrar el emisor.<br>" & result.Descripcion & ".<br> Numero Error: " & result.NumeroError, TipoMensaje.MsgError)
+            End If
+
+        Catch ex As Exception
            OnError("Ocurrió un error al registrar el emisor", ex)
+        End Try
+
+    End Sub
+
+




+    Protected Sub LnkArchivoKey_Click(sender As Object, e As EventArgs) Handles LnkArchivoKey.Click
+        TxtCargaImg.getfiles().Archivos = Nothing
+        TxtCargaImg.Text = "[]"
+        OpActualizaArchivosCer = EnumOpActualizaArchivosCer.KEY
+        LblModalCertificadosTitulo.Text = "Archivo KEY"
        UpModalCertificados.Update()
        RegistraScript(String.Format("$('#{0}').modal();", "ModalArchvivo"))
    End Sub

+    Protected Sub LnkArchivoCer_Click(sender As Object, e As EventArgs) Handles LnkArchivoCer.Click
+        TxtCargaImg.getfiles().Archivos = Nothing
+        TxtCargaImg.Text = "[]"
+        OpActualizaArchivosCer = EnumOpActualizaArchivosCer.CER
+        LblModalCertificadosTitulo.Text = "Archivo CER"
        UpModalCertificados.Update()
        RegistraScript(String.Format("$('#{0}').modal();", "ModalArchvivo"))
    End Sub
@@ -1663,6 +1708,7 @@ Partial Class Sistemas_Empresa
        OpActualizaArchivosCer = EnumOpActualizaArchivosCer.PFX
        LblModalCertificadosTitulo.Text = "Archivo PFX"
        UpModalCertificados.Update()
+        RegistraScript(String.Format("$('#{0}').modal();", "ModalArchvivo"))
    End Sub

    Protected Sub BtnGuardarArchivo_Click(sender As Object, e As EventArgs)
@@ -1670,6 +1716,9 @@ Partial Class Sistemas_Empresa
        Dim filesgral As List(Of Archivo) = TxtCargaImg.getfiles().Archivos
        Dim filemove As String = ""
        Dim TieneError As Boolean = False
+
+        For Each fileItem As Archivo In filesgral
+
            FileExtension = IO.Path.GetExtension(String.Format("{0}Temp\{1}", AppDomain.CurrentDomain.BaseDirectory, fileItem.filename)).Replace(".", "")
            filemove = fileItem.filename

@@ -1681,13 +1730,57 @@ Partial Class Sistemas_Empresa
            Dim ArchivoCertificado As String = $"{NombreArchivo}.{FileExtension}"

            If File.Exists(yaExistente) Then
+                File.Delete(yaExistente)
+            End If
+            Try
+                If filemove <> "" Then
+                    Dim Ruta As String = String.Format("Empresas\{0}\Certificados\", CveEmpresa)
+                    filemove.FilesMove(NombreArchivo, Ruta)
+                End If
+            Catch ex As Exception
+                TieneError = True
+            End Try
+
+
+            If CveEmpresa > 0 AndAlso Not TieneError Then
+
+                Dim ObjEmpresas As New ClsSisEmpresas
+
+
+                Dim ArchivoKey As String = "-1"
+                Dim ArchivoCer As String = "-1"
+                Dim ArchivoPfx As String = "-1"
+
+
+                If OpActualizaArchivosCer = EnumOpActualizaArchivosCer.KEY Then
+                    ArchivoKey = ArchivoCertificado
+                    TxtArchivoKey.Text = ArchivoKey
+                ElseIf OpActualizaArchivosCer = EnumOpActualizaArchivosCer.CER Then
+                    ArchivoCer = ArchivoCertificado
+                    TxtArchivoCer.Text = ArchivoCer
+                ElseIf OpActualizaArchivosCer = EnumOpActualizaArchivosCer.PFX Then
+                    ArchivoPfx = ArchivoCertificado
+                    TxtArchivoPfx.Text = ArchivoPfx
+                End If
+
+                If Not ObjEmpresas.UpdateEmpresasCertificados(ArchivoKey, ArchivoCer, ArchivoPfx, CveEmpresa) Then
                    TieneError = True
+                End If
+
+
+                ObjEmpresas.Dispose()
+
            End If



        Next

+
+
+
+
+        If Not TieneError Then
            Alert("Certificado cargado con exito")
            RegistraScript(String.Format("$('#{0}').modal('hide');", "ModalArchvivo"))
        End If
--- a/Ventas/Clientes.aspx
+++ b/Ventas/Clientes.aspx
@@ -3372,6 +3372,7 @@
                                            <asp:BoundField DataField="IMEI" ItemStyle-Width="20%" HeaderText="IMEI" ItemStyle-HorizontalAlign="Left" />
                                            <asp:BoundField DataField="NumeroTelefono" ItemStyle-Width="20%" HeaderText="Número Teléfono" ItemStyle-HorizontalAlign="Center" />
                                            <asp:BoundField DataField="FechaIng" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-Width="15%" HeaderText="Fecha Ing" ItemStyle-HorizontalAlign="Left" />
+                                            <asp:BoundField DataField="FechaBaja" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-Width="15%" HeaderText="Fecha Baja" ItemStyle-HorizontalAlign="Left" />

                                            <asp:TemplateField HeaderText="Estatus" ItemStyle-Width="10%" ItemStyle-HorizontalAlign="Center" ItemStyle-VerticalAlign="Middle" FooterStyle-VerticalAlign="Middle">
                                                <ItemTemplate>
--- a/Ventas/RepProductosServiciosPeriodo.aspx
+++ b/Ventas/RepProductosServiciosPeriodo.aspx
@@ -202,9 +202,11 @@
                        </div>
                        <label class="col-md-1 ">Cliente:</label>
                        <div class="col-md-2">
-                            <asp:DropDownList ID="DdlClientes" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
+
+                            <ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClientes" Width="100%" data-metodo="getcliente" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%;"></ADS:Dropdownlost>
+                            <%--<asp:DropDownList ID="DdlClientes" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
                                <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
-                            </asp:DropDownList>
+                            </asp:DropDownList>--%>
                        </div>
                        <label class="col-md-1 truncate">Fecha Mostrada:</label>
                        <div class="col-md-2">
--- a/Ventas/RepProductosServiciosPeriodo.aspx.cs
+++ b/Ventas/RepProductosServiciosPeriodo.aspx.cs
@@ -70,14 +70,18 @@ public partial class Ventas_RepProductosServiciosPeriodo : ClsPaginas
        {
            DdlTipoComprobante.SelectedValueExist(Opcion);
            DdlGrupo.SelectedValueExist("7");
-            DdlTipoComprobante_SelectedIndexChanged(DdlTipoComprobante, EventArgs.Empty);
-            DdlEstatus.SelectedValue = "-1";
-        }
-    }
-
-    private void CargaCombos()
-    {
-        //CargaClientes
+            DdlTipoComprobante_SelectedIndexChanged(DdlTipoComprobante, EventArgs.Empty);
+            DdlEstatus.SelectedValue = "-1";
+        }
+    }
+
+    private void CargaCombos()
+    {
+        ////CargaClientes
+        //ClsClientes ObjClientes = new ClsClientes();
+        //if (ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa))
+        //{
+        //    DdlClientes.DataSource = ObjClientes.DtResultados;
        //}
        //ObjClientes.Dispose();
        //DdlClientes.DataBind();
@@ -260,10 +264,10 @@ public partial class Ventas_RepProductosServiciosPeriodo : ClsPaginas
        DdlGrupo.SelectedValueExist("8");
    }

-
+
    #endregion

-    #region SELECTED INDEX CHANGE
+    #region SELECTED INDEX CHANGE

    protected void DdlClienteClasificacion_SelectedIndexChanged(object sender, EventArgs e)
    {
--- a/Ventas/RepRecuperacionPeriodo.aspx
+++ b/Ventas/RepRecuperacionPeriodo.aspx
@@ -114,9 +114,10 @@
                        </div>
                        <div class="col-md-1 truncate">Cliente:</div>
                        <div class="col-md-2 ">
-                            <asp:DropDownList ID="DdlClientes" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" CssClass="form-control  input-small input-sm select2me" Width="100%">
+                            <ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClientes" Width="100%" data-metodo="getcliente" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%;"></ADS:Dropdownlost>
+                            <%--<asp:DropDownList ID="DdlClientes" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" CssClass="form-control  input-small input-sm select2me" Width="100%">
                                <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
-                            </asp:DropDownList>
+                            </asp:DropDownList>--%>
                        </div>
                        <div class="col-md-1 truncate">Clasificación Cli.:</div>
                        <div class="col-md-2 ">
--- a/Ventas/RepRecuperacionPeriodo.aspx.cs
+++ b/Ventas/RepRecuperacionPeriodo.aspx.cs
@@ -76,9 +76,16 @@ public partial class Ventas_RepRecuperacionPeriodo : ClsPaginas
        DdlBanco.Items.Insert(0, new ListItem("Todos", "-1"));
        DdlBanco.DataBind();

+        //Carga Clasificacion Cliente
        ClsClientes ObjCliente = new ClsClientes();
        if (ObjCliente.GetClienteClasificacion(UsuarioActual.CveEmpresa))
        {
+            DdlClienteClasificacion.DataSource = ObjCliente.DtResultados;
+        }
+        ObjCliente.Dispose();
+
+        DdlClienteClasificacion.Items.Insert(0, new ListItem("Todos", "-1"));
+        DdlClienteClasificacion.DataBind();


        DdlClientes.setEsWebService(true);
@@ -92,7 +99,7 @@ public partial class Ventas_RepRecuperacionPeriodo : ClsPaginas
    }

    private void GenerarPDF(string Opcion)
-    {
+    {
        string FechaInicio, FechaFin, Sucursal, Grupo, Vendedor,Cliente, ClasificacionCliente,Banco,CuentaBancaria,TipoDocto,EstatusCliente,Registro,Responsable;
        if (txtFechaI.Text == "") { FechaInicio = ""; } else { FechaInicio = $"&emsp;<b>Fecha Inicio:</b> {txtFechaI.Text}"; }
        if (txtFechaF.Text == "") { FechaFin = ""; } else { FechaFin = $"&emsp;<b>Fecha Fin:</b> {txtFechaF.Text}"; }
--- a/Ventas/RepVentasPeriodo.aspx
+++ b/Ventas/RepVentasPeriodo.aspx
@@ -226,9 +226,11 @@
                        </div>
                        <label class="col-md-1 ">Cliente:</label>
                        <div class="col-md-2">
-                            <asp:DropDownList ID="DdlClientes" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
+
+                            <%--<asp:DropDownList ID="DdlClientes" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" Class="table-group-action-input form-control input-inline input-small input-sm select2me">
                                <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
-                            </asp:DropDownList>
+                            </asp:DropDownList>--%>
+                            <ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClientes" Width="100%" data-metodo="getcliente" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%;"></ADS:Dropdownlost>
                        </div>
                        <label title="Clasificación Cliente" data-toggle="tooltip" data-placement="top" class="col-md-1 ">Clasificacion Cli.:</label>
                        <div class="col-md-2">
--- a/Ventas/RepVentasPeriodo.aspx.vb
+++ b/Ventas/RepVentasPeriodo.aspx.vb
@@ -96,16 +96,20 @@ Partial Class RepVentasPeriodo

    End Sub

-    Private Sub CargaCombos()
-        'CargaClientes
-        Dim ObjClientes As New ClsClientes
-        If ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa) Then
-            DdlClientes.DataSource = ObjClientes.DtResultados
-        Else
-            DdlClientes.DataSource = Nothing
-        End If
-        ObjClientes.Dispose()
-        DdlClientes.DataBind()
+    Private Sub CargaCombos()
+        ''CargaClientes
+        'Dim ObjClientes As New ClsClientes
+        'If ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa) Then
+        '    DdlClientes.DataSource = ObjClientes.DtResultados
+        'Else
+        '    DdlClientes.DataSource = Nothing
+        'End If
+        'ObjClientes.Dispose()
+        'DdlClientes.DataBind()
+        DdlClientes.setEsWebService(True)
+        DdlClientes.Attributes.Add("data-metodo", "getcliente")
+        DdlClientes.SelectedText = "Todos"
+        DdlClientes.SelectedValue = "-1"

        'CargaSucursales

@@ -192,8 +196,10 @@ Partial Class RepVentasPeriodo
        FechaIEjec = If(IsDate(TxtFechaIEjec.Text.Trim()), TxtFechaIEjec.Text.Trim.ToDate, MinFecha)
        FechaFEjec = If(IsDate(TxtFechaFEjec.Text.Trim()), TxtFechaFEjec.Text.Trim.ToDate, MaxFecha)

-        Dim ModalidadContable As Boolean = Not ChkLecturaAdmin.Checked
-
+        Dim ModalidadContable As Boolean = Not ChkLecturaAdmin.Checked
+
+
+
        If ObjVentas.GetRepVentasPeriodos(FechaI, FechaF, FechaIEjec, FechaFEjec, DdlClientes.SelectedValue.ToEntero, DdlSubProyectoEjecucion.SelectedValue.ToEntero, DdlVendedor.SelectedValue.ToEntero,
                                  DdlUsuario.SelectedValue.ToEntero, DdlEstatus.SelectedValue.ToEntero, "-1", UsuarioActual.CveEmpresa, DdlGrupo.SelectedValue.ToEntero, DdlTipoComprobante.SelectedValue,
                                  DdlProyecto.SelectedValue.ToEntero, DdlSubProyecto.SelectedValue.ToEntero, RblTipoCambio.SelectedValue.ToEntero, TCEspecifico, CveUsuarioConsulta:=UsuarioActual.CveUsuario,
@@ -408,11 +414,13 @@ Partial Class RepVentasPeriodo
        CargaClientes()
    End Sub

-    Private Sub CargaClientes()
-        DdlClientes.Items.Clear()
+    Private Sub CargaClientes()
+
+
+        DdlClientes.ddl.Items.Clear()
        DdlClientes.DataSource = GlobalDTCliente(UsuarioActual.CveEmpresa, -1).FiltraParametros($"CveClienteClasificacion = {DdlClienteClasificacion.SelectedValue.ToEntero} OR {DdlClienteClasificacion.SelectedValue.ToEntero} = -1")
        DdlClientes.DataBind()
-        DdlClientes.Items.Insert(0, New ListItem("Todos", "-1"))
+        DdlClientes.ddl.Items.Insert(0, New ListItem("Todos", "-1"))
    End Sub

 End Class
--- a/vwd.webinfo
+++ b/vwd.webinfo
@@ -510,6 +510,8 @@
    
  
    
+  
+