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

App_Code/ClsInventarios.vb

@@ -1702,6 +1702,28 @@ Public Class ClsInventarios
         Return Retorno
     End Function
 
+    Public Function RepTraspasoAlmacen(FechaI As String, FechaF As String, CveAlmacenOrigen As Integer, CveAlmacenDestino As Integer, Recibido As Boolean, CveEmpresa As Integer) As Boolean
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_Inv_RepTraspasoAlmacen")
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@FechaI", SqlDbType.VarChar).Value = FechaI
+            .Add("@FechaF", SqlDbType.VarChar).Value = FechaF
+            .Add("@CveAlmacenOrigen", SqlDbType.Int).Value = CveAlmacenOrigen
+            .Add("@CveAlmacenDestino", SqlDbType.Int).Value = CveAlmacenDestino
+            .Add("@Recibido", SqlDbType.Bit).Value = Recibido
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+        End With
+        Try
+            SqlAdapter.Fill(Data)
+
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error al obtener el Reporte de Traspaso de Almacén.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        End Try
+
+        Return Retorno
+    End Function
 #End Region
 
 #Region "  INVENTARIOS - EXISTENCIAS  "
@@ -1889,8 +1911,8 @@ Public Class ClsInventarios
         Catch ex As Exception
             OnError("Ocurrió un error al obtener las existencias del producto.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
         End Try
-
         Return Retorno
+
     End Function
 
     Public Function GetExistenciasPSEmpaque(CvePS As Integer, CveUnidadMedida As Integer, CveEmpresa As Integer,

App_Code/ClsPaginas.vb

@@ -4091,6 +4091,7 @@ Public Class ClsPaginas
             ' PaginaDict.Add("/Inventarios/RecepcionUsados.aspx".ToUpper(), 1202)
             PaginaDict.Add("/Inventarios/RepTraspasoEmitido.aspx".ToUpper(), 891)
             PaginaDict.Add("/Inventarios/KardexSeccionAlmacen.aspx".ToUpper(), 892)
+            PaginaDict.Add("/Inventarios/RepTraspasoAlmacen.aspx".ToUpper(), 688)
 #End Region
 #Region "MF"
             PaginaDict.Add("/MF/BitacoraDiaria.aspx".ToUpper(), 801)
@@ -4451,6 +4452,8 @@ Public Class ClsPaginas
             PaginaDict.Add("/Ventas/RepAnticiposEspeciales.aspx".ToUpper(), 678)
             PaginaDict.Add("/Ventas/RepArqueos.aspx".ToUpper(), 679)
             PaginaDict.Add("/Ventas/RepArqueosDetalle.aspx".ToUpper(), 680)
+            PaginaDict.Add("/Ventas/RepCotizacionesxFacturar.aspx".ToUpper(), 686)
+            PaginaDict.Add("/Ventas/RepRemisionesNC.aspx".ToUpper(), 687)
 #End Region
 
 

App_Code/ClsVentas.vb

@@ -2452,6 +2452,50 @@ Public Class ClsVentas
 
         Return Retorno
     End Function
+    Public Function GetRepCotizacionesSinFacturar(FechaI As String, FechaF As String, CveSubProyecto As String, CveCliente As Integer, CveEmpresa As Integer, Optional CveUsuarioConsulta As Integer = -1) As Boolean
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_Vta_RepCotizacionesSinFacturarGet")
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@FechaI", SqlDbType.VarChar).Value = FechaI
+            .Add("@FechaF", SqlDbType.VarChar).Value = FechaF
+            .Add("@CveSubProyecto", SqlDbType.VarChar).Value = CveSubProyecto
+            .Add("@CveCliente", SqlDbType.Int).Value = CveCliente
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+            .Add("@CveUsuarioConsulta", SqlDbType.Int).Value = CveUsuarioConsulta
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error al obtener las cotizaciones sin facturar.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+
+        Return Retorno
+    End Function
+    Public Function GetRepRemisionesNCSinFacturar(FechaI As String, FechaF As String, CveSubProyecto As String, CveCliente As Integer, CveEmpresa As Integer, Optional CveUsuarioConsulta As Integer = -1) As Boolean
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_Vta_RepRemisionesNCGet")
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@FechaI", SqlDbType.VarChar).Value = FechaI
+            .Add("@FechaF", SqlDbType.VarChar).Value = FechaF
+            .Add("@CveSubProyecto", SqlDbType.VarChar).Value = CveSubProyecto
+            .Add("@CveCliente", SqlDbType.Int).Value = CveCliente
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+            .Add("@CveUsuarioConsulta", SqlDbType.Int).Value = CveUsuarioConsulta
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error al obtener las Remisiones de NC sin facturar.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+
+        Return Retorno
+    End Function
     Public Function GetReporteHP(CveEmpresa As Integer, FechaInicio As Date, FechaFin As Date) As Boolean
         Dim Retorno As Boolean = False
         DataAdapter("PA_Compu_HPRep")

Compras/ReembolsosComprobaciones.aspx.vb

@@ -1367,10 +1367,13 @@ Partial Class Compras_ReembolsosComprobaciones
 
             If CvePrePolizaExcedente > 0 Then
                 Mensaje.AppendFormat("Abono Registrado Correctamente. <br/><br/> Cheque:  <a target='_blank' href=/Bancos/IE.aspx?CveIE={0}>{1}</a> <br/><br/> <a target='_blank' href=""/Bancos/Reportes.aspx?Opcion=ImprimeMov&CveIE={0}"">Imprimir</a>", CveIEExcedente, TxtFolio.Text)
-                Mensaje.AppendFormat("</br> <br/>Poliza: <b> <a href='/Contabilidad/RegPoliza.aspx?IdPoliza={0}' class='Texto' target='_blank'>{1}</a><br/>", ObjMov.ContaIdPoliza, ObjMov.ContaFolio)
+                Mensaje.AppendFormat("</br> <br/>Póliza: <b> <a href='/Contabilidad/RegPoliza.aspx?IdPoliza={0}' class='Texto' target='_blank'>{1}</a><br/>", ObjMov.ContaIdPoliza, ObjMov.ContaFolio)
                 Alert(Mensaje.ToString, TipoMensaje.MsgInformacion)
             Else
                 Mensaje.AppendFormat("Abono Registrado Correctamente. <br/><br/> <a  class=""Texto"" target='_blank' href=""/Bancos/Reportes.aspx?Opcion=ImprimeMov&CveIE={0}"">Imprimir</a>", CveIERegistrado)
+                If CvePrePolizaIERegistrado > 0 Then
+                    Mensaje.AppendFormat("</br> <br/>Póliza: <b> <a href='/Contabilidad/RegPoliza.aspx?IdPoliza={0}' class='Texto' target='_blank'>{1}</a><br/>", ObjMov.ContaIdPoliza, ObjMov.ContaFolio)
+                End If
                 Alert(Mensaje.ToString, TipoMensaje.MsgInformacion)
             End If
 

Empresas/72/Formatos/TrasladoAlmacen.rdlc

@@ -3186,6 +3186,18 @@
       <AllowBlank>true</AllowBlank>
       <Prompt>ReportParameter1</Prompt>
     </ReportParameter>
+    <ReportParameter Name="ResponsableCarga">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="ResponsableRecibio">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
   </ReportParameters>
   <EmbeddedImages>
     <EmbeddedImage Name="compuproveedores">

Inventarios/RepTraspasoAlmacen.aspx

@@ -0,0 +1,348 @@
+<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepTraspasoAlmacen.aspx.vb" Inherits="RepTraspasoAlmacen" %>
+
+<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
+</asp:Content>
+<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
+    <style>
+        .Widthall {
+            width: 100% !important;
+        }
+
+        .dataTables_scrollHeadInner {
+            width: 100% !important;
+            background-color: #dddddd;
+            padding-left: 0px !important;
+        }
+
+        .dataTables_scrollFoot {
+            display: none;
+            position: static;
+        }
+
+        .table-scrollable {
+            margin: 0px !important;
+        }
+
+        .dataTables_scroll {
+            margin-bottom: 0px;
+        }
+
+        .table.dataTable {
+            margin-top: 0px !important;
+        }
+
+        .dataTables_scrollBody table th {
+            padding: 0px !important;
+            padding-right: 4px !important;
+            padding-left: 4px !important;
+        }
+
+        .sinlink td a {
+            pointer-events: none;
+            cursor: default;
+            color: black;
+            font-size: small;
+        }
+
+        .white a {
+            color: white !important;
+        }
+
+        .select2 .select2-selection__rendered {
+            line-height: 1;
+            color: #111;
+        }
+
+        .select2 .select2-selection--multiple {
+            box-sizing: border-box;
+            cursor: pointer;
+            display: block;
+            min-height: 20px;
+            user-select: none;
+            -webkit-user-select: none;
+        }
+
+        .select2-container--default .select2-selection--multiple .select2-selection__choice {
+            margin-top: 10px;
+        }
+
+        .select2-selection__rendered {
+            margin-top: 0px;
+            height: 25px;
+        }
+
+        .select2-selection {
+            margin-top: 0px;
+            height: 31px;
+        }
+
+        .select2-container--default.select2-container--focus .select2-selection--multiple {
+            border: none;
+            outline: 0;
+        }
+    </style>
+</asp:Content>
+<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
+        <li>
+        <asp:LinkButton ID="LnkPdf" runat="server"> <i class="fa fa-file-pdf-o" style="font-weight:bold;"></i> PDF</asp:LinkButton>
+    </li>
+    <li>
+        <asp:LinkButton ID="ImgExcel" runat="server"><i class="fa fa-file-excel-o" style="font-weight:bold;"></i> Excel</asp:LinkButton>
+    </li>
+</asp:Content>
+<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
+    <asp:Label ID="LblTitulo" runat="server" Text="Reporte de Traspaso de Almacén"></asp:Label>
+</asp:Content>
+<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
+</asp:Content>
+
+<asp:Content ID="Content8" ContentPlaceHolderID="HA" runat="Server">
+
+    <%-- <asp:UpdatePanel ID="UpdatePanel1" runat="server" RenderMode="Inline" UpdateMode="Conditional">
+        <ContentTemplate> 
+            <div class="btn-group pull-right btn-separete">
+                        
+            </div>
+        </ContentTemplate>
+    </asp:UpdatePanel>--%>
+</asp:Content>
+
+<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server" defaultbutton="BtnConsultar">
+    <asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+            <div class="portlet solid grey-cascade portlet-filter" style="">
+                <div class="portlet-title portlet-filterT smalltitle" style="min-height: 49px; position: relative;">
+                    <div class="tools">
+                        <asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" />
+                        <a href="javascript:;" data-idchekbox="<%= chkexpand.ClientID%>" class=" <%= IIf(chkexpand.Checked = True, "collapse", "expand")%>"></a>
+                        <asp:CheckBox ID="chkexpand" CssClass="hidden" runat="server" />
+                    </div>
+                    <div class="portlet-body">
+                        <div class="row">
+
+
+                            <label class="col-md-1 truncate">F.I.:</label>
+                            <div class="col-md-2">
+                                <div class="input-group input-sm input-small date date-picker" data-date-format="dd/mm/yyyy" style="width: 140px !important; padding: 0px; margin-top: 10px;">
+                                    <asp:TextBox 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>
+                                    <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>
+                            <label class="col-md-1 truncate">F.F.:</label>
+                            <div class="col-md-2">
+                                <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 140px !important; padding: 0px; margin-top: 10px;">
+                                    <asp:TextBox 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>
+                                    <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>
+
+                            <label class="col-md-2">Almacén Origen:</label>
+                            <div class="col-md-3">
+                                <asp:DropDownList ID="DdlAlmacenOrigen" Width="150px" AppendDataBoundItems="true" runat="server" DataTextField="Almacen" DataValueField="CveAlmacen" CssClass="form-control input-sm  input-small select2me"></asp:DropDownList>
+                            </div>
+
+                        </div>
+                    </div>
+                </div>
+
+                <div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style=""display:none;""")%>>
+                    <div class="row">
+                        <label class="col-md-1 truncate" data-toggle="tooltip" title="Almacén Destino">Almacén Destino:</label>
+                        <div class="col-md-2">
+                            <asp:DropDownList ID="DdlAlmacenDestino" DataTextField="Almacen" DataValueField="CveAlmacen" CssClass="form-control input-sm  input-small select2me" Width="150px" runat="server"></asp:DropDownList>
+                        </div>
+
+                        <label class="col-md-1 truncate">Recibido:</label>
+                        <div class="col-md-2">
+                            <asp:CheckBox ID="ChkRecibido" runat="server" CssClass="make-switchsd" data-size="small" Text=" " />
+                        </div>
+                    </div>
+                </div>
+            </div>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+    <br />
+    <div class="row">
+        <div align="right">
+            <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="display: inline-block; width: 150px;" />
+            <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
+        </div>
+    </div>
+    <asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+            <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontró ningun corte"
+                ToolTip="Remisiones sin Facturar"
+                CssClass="table table-striped table-advance table-hover Widthall ScrollAD"
+                data-sort="true" Style="text-align: center;" GridLines="None">
+                <Columns>
+                    <asp:BoundField HeaderText="Disponible" DataField="Cantidad" DataFormatString="{0:#,##0.00####}" ItemStyle-HorizontalAlign="Right" ItemStyle-Width="10%" />
+                    <asp:BoundField HeaderText="Unidad" DataField="UnidadMedida" ItemStyle-Width="10%" />
+                    <asp:BoundField HeaderText="Código" DataField="Codigo" ItemStyle-Width="10%" />
+                    <asp:BoundField HeaderText="Producto" DataField="PS" ItemStyle-Width="40%" ItemStyle-HorizontalAlign="Left"/>
+                    <asp:BoundField HeaderText="SerieLote" DataField="SerieLote" ItemStyle-Width="15%" ItemStyle-HorizontalAlign="Left"/>
+                </Columns>
+                <HeaderStyle CssClass="Titulos" />
+                <RowStyle CssClass="Texto" />
+                <AlternatingRowStyle CssClass="TextoAlterno" />
+            </asp:GridView>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+
+    <asp:UpdatePanel runat="server" ID="UPPersonalizar" UpdateMode="Conditional">
+        <ContentTemplate>
+            <div id="DivPersonalizar" class="modal fade" role="dialog">
+                <div class="modal-dialog">
+
+                    <!-- Modal content-->
+                    <div class="modal-content">
+                        <div class="modal-header">
+                            <button type="button" class="close" data-dismiss="modal">&times;</button>
+                            <h4 class="modal-title">
+                                <asp:Label ID="Label1" runat="server" ClientIDMode="Static" Text="Personalizar Columnas"></asp:Label></h4>
+                        </div>
+                        <div class="modal-body">
+                            <table class="table table-striped table-advance table-hover Widthall">
+                                <tbody>
+                                    <tr>
+                                        <td style="text-align: left;">
+                                            <asp:CheckBox ID="ChkUsuarioCancelacion" runat="server" Text="Usuario Cancelación" /></td>
+                                    </tr>
+                                    <tr>
+                                        <td style="text-align: left;">
+                                            <asp:CheckBox ID="ChkTipo" runat="server" Text="Cargo/Abono" /></td>
+                                    </tr>
+
+                                </tbody>
+                            </table>
+                        </div>
+                        <div class="modal-footer">
+                            <asp:Button ID="BtnPersonalizar" runat="server" Text="Personalizar" class="btn btn-success" />
+                            <button type="button" class="btn btn-default" data-dismiss="modal">Cancelar</button>
+                        </div>
+                    </div>
+
+                </div>
+            </div>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+</asp:Content>
+<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
+    <%--<script type="text/javascript">
+
+        function Scroll() {
+            $(document).ready(function () {
+                var Tam = TamañoVentana();
+                var Alto = Tam.height - 300;
+                $('#<%=GvDatos.ClientID%>').gridviewScroll({
+                    width: 995,
+                    height: Alto
+                });
+            });
+        }
+    </script>--%>
+
+    <script type="text/javascript">
+        function GetSelectedRow(lnk, txtf, txtoi) {
+
+
+            //var row = lnk.parentNode.parentNode;
+            //var txtoi = row.cells[10].getElementsByTagName("input")[1];
+            if (lnk.checked) {
+                debugger;
+                if (txtf) { txtf.style.display = ""; }
+                if (txtoi) { txtoi.style.display = ""; }
+                //    try {
+                //        row.cells[10].getElementsByTagName("input")[0].style.display = "";
+                //        if (txtoi) { txtoi.style.display = ""; }
+                //    }
+                //    catch (err) {
+                //        row = row.parentNode;
+                //        row.cells[10].getElementsByTagName("input")[0].style.display = "";
+                //    }
+            } else {
+                if (txtf) { txtf.style.display = "none"; }
+                if (txtoi) { txtoi.style.display = "none"; }
+                //    try {
+                //        row.cells[10].getElementsByTagName("input")[0].style.display = "none";
+                //    }
+                //    catch (err) {
+                //        row = row.parentNode;
+                //        row.cells[10].getElementsByTagName("input")[0].style.display = "none";
+                //    }
+            }
+            return false;
+        }
+
+        function FechaGeneral(lnk, FechaDocumento) {
+            debugger;
+            var row = lnk.parentNode.parentNode;
+
+            var parts = FechaDocumento.split("/");
+            var F1 = new Date(parts[2], parts[1], parts[0]);
+
+
+            if (lnk.checked) {
+                try {
+                    parts = $get("TxtFechaAplicadoHeader").value.split("/");
+                    var F2 = new Date(parts[2], parts[1], parts[0]);
+
+                    if (F1 < F2) {
+                        row.cells[10].getElementsByTagName("input")[0].value = $get("TxtFechaAplicadoHeader").value;
+                    } else {
+                        row.cells[10].getElementsByTagName("input")[0].value = FechaDocumento;
+                    }
+                }
+                catch (err) {
+                    row = row.parentNode;
+                    row.cells[10].getElementsByTagName("input")[0].value = $get("TxtFechaAplicadoHeader").value;
+                }
+            }
+            return false;
+        }
+    </script>
+
+    <script type="text/javascript">
+        function OnClientShown(sender, args) {
+            sender._popupBehavior._element.style.zIndex = 10005;
+            sender._popupBehavior._element.style.position = "absolute";
+            sender._popupBehavior._element.style.top = "0px";
+            document.getElementById("C_GvDatosPanelItem").style.overflow = "initial";
+        }
+    </script>
+    <script src="/Metronic/assets/global/scripts/datatable.js"></script>
+    <script src="/Metronic/assets/global/plugins/datatables/all.min.js"></script>
+    <script type="text/javascript">
+
+        //function OrdenarGV() {
+        //    var Tam = TamañoVentana();
+        //    var Alto = Tam.height - 270;
+        //    if (Alto < 100) {
+        //        Alto = 100;
+        //    }
+        //    $('#C_GvDatos').DataTable({
+        //        scrollY: Alto + 'px',
+        //        scrollCollapse: true,
+        //        paging: false,
+        //        searching: false,
+        //        info: false
+        //    });
+        //    $('#C_GvDatos').parent().parent().children().first().css("position", "static");
+        //}
+    </script>
+</asp:Content>

Inventarios/RepTraspasoAlmacen.aspx.vb

@@ -0,0 +1,176 @@
+Option Explicit On
+Option Strict On
+
+Imports System.Data
+Imports Microsoft.Reporting.WebForms
+Imports Extensiones
+Partial Class RepTraspasoAlmacen
+    Inherits ClsPaginas
+    Private Shared missing As Object = System.Reflection.Missing.Value
+
+#Region "PROPIEDADES"
+    Private Property FechaI As String
+        Get
+            Return ViewState("FechaI").ToString
+        End Get
+        Set(value As String)
+            ViewState("FechaI") = value
+        End Set
+    End Property
+    Private Property FechaF As String
+        Get
+            Return ViewState("FechaF").ToString
+        End Get
+        Set(value As String)
+            ViewState("FechaF") = value
+        End Set
+    End Property
+    'Private Property CveCliente As Integer
+    '    Get
+    '        Return ViewState("CveCliente").ToString.ToEntero
+    '    End Get
+    '    Set(value As Integer)
+    '        ViewState("CveCliente") = value
+    '    End Set
+    'End Property
+    'Private Property Sucursales As String
+    '    Get
+    '        Return ViewState("Sucursales").ToString
+    '    End Get
+    '    Set(value As String)
+    '        ViewState("Sucursales") = value
+    '    End Set
+    'End Property
+    Private Property DtInventarios As DataTable
+        Get
+            Return DirectCast(ViewState("DtInventarios"), DataTable)
+        End Get
+        Set(value As DataTable)
+            ViewState("DtInventarios") = value
+        End Set
+    End Property
+
+#End Region
+    Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
+        If Not Page.IsPostBack Then
+            txtFechaI.Text = Now.Day.ToString + "/" + (Now.Month - 6).ToString + "/" + Now.Year.ToString
+            txtFechaF.Text = Now.ToShortDateString
+
+            CargaAlmacenOrigen()
+            CargaAlmacenDestino()
+            CargaDatos()
+            OrdenaDatos()
+
+        End If
+    End Sub
+
+#Region " C A R G A - D A T O S "
+    Public Sub CargaDatos()
+        Dim ObjInventarios As New ClsInventarios
+
+        FechaI = If(IsDate(txtFechaI.Text.Trim()), txtFechaI.Text.Trim(), "-1")
+        FechaF = If(IsDate(txtFechaF.Text.Trim()), txtFechaF.Text.Trim(), "-1")
+        'CveCliente = If(DdlClientes.SelectedValue.ToEntero > 0, DdlClientes.SelectedValue.ToEntero, -1)
+
+        'Sucursales = IIf(DdlSubProyectos.GetSelectedValuesM = "", "-1", DdlSubProyectos.GetSelectedValuesM).ToString
+
+        If ObjInventarios.RepTraspasoAlmacen(FechaI, FechaF, DdlAlmacenOrigen.SelectedValue.ToEntero, DdlAlmacenDestino.SelectedValue.ToEntero, ChkRecibido.Checked, UsuarioActual.CveEmpresa) Then
+            GvDatos.DataSource = ObjInventarios.DtResultados
+            DtInventarios = ObjInventarios.DtResultados
+            GvDatos.DataBind()
+            UPDatos.Update()
+        End If
+
+        ObjInventarios.Dispose()
+    End Sub
+#End Region
+
+#Region "O R D E N A M I E N T O"
+    Private Sub OrdenaDatos()
+        'If (GvDatos.Rows.Count > 0) Then
+        '    GvDatos.UseAccessibleHeader = True
+        '    GvDatos.HeaderRow.TableSection = TableRowSection.TableHeader
+        '    RegistraScript("OrdenarGV();")
+        'End If
+    End Sub
+#End Region
+
+#Region "G V - D A T O S "
+    Protected Sub GvDatos_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GvDatos.RowDataBound
+        If e.Row.RowType = DataControlRowType.DataRow Then
+
+            'Cuando es titulo
+            If e.Row.DBCampo("PS").ToString.Trim = "" Then
+                e.Row.CssClass = "Totales"
+
+                e.Row.Cells(0).Text = String.Format("Folio: <a class=""texto"" style=""color:white;"" target='_blank' href='/Inventarios/EntradasSalidas.aspx?CveMovimiento={1}'>{0}</a> ", e.Row.DBCampo("FolioSalida"), e.Row.DBCampo("CveMovimientoSalida"))
+                e.Row.Cells(1).Text = String.Format("{0}", e.Row.DBCampo("FechaMovto").ToString.ToDate.ToShortDateString)
+                e.Row.Cells(3).Text = String.Format("Almacen Destino: {0} &nbsp;&nbsp;&nbsp;&nbsp;&nbsp; Responsable: {1}", e.Row.DBCampo("AlmacenDestino"), e.Row.DBCampo("Recibio"))
+            End If
+
+        End If
+    End Sub
+#End Region
+
+#Region "CARGA COMBOS FILTRO"
+    Private Sub CargaAlmacenOrigen()
+        DdlAlmacenOrigen.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen NOT IN (3,4,9,10,11,21)")
+        DdlAlmacenOrigen.Items.Insert(0, New ListItem(" Todos ", "-1"))
+        DdlAlmacenOrigen.SelectedValue = "-1"
+        DdlAlmacenOrigen.DataBind()
+        DdlAlmacenOrigen.SelectedValueExist(UsuarioActual.CveAlmacen)
+    End Sub
+    Private Sub CargaAlmacenDestino()
+        DdlAlmacenDestino.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1).FiltraParametros("CveTipoAlmacen NOT IN (3,4,9,10,11,21)")
+        DdlAlmacenDestino.DataBind()
+        DdlAlmacenDestino.Items.Insert(0, New ListItem("Todos", "-1"))
+        DdlAlmacenDestino.SelectedValue = "-1"
+    End Sub
+#End Region
+
+#Region "IMPRESION"
+    Private Sub LnkPdf_Click(sender As Object, e As EventArgs) Handles LnkPdf.Click
+        Imprime("PDF")
+    End Sub
+    Private Sub Imprime(Formato As String)
+        If DtInventarios IsNot Nothing Then
+            Dim StrFiltro As New StringBuilder
+            If txtFechaI.Text <> "" Then StrFiltro.AppendFormat("&emsp;<b>Fecha Inicio:</b> {0}", txtFechaI.Text.ToDate.ToShortDateString)
+            If txtFechaF.Text <> "" Then StrFiltro.AppendFormat("&emsp;<b>Fecha Fin:</b> {0}", txtFechaF.Text.ToDate.ToShortDateString)
+
+            If DdlAlmacenOrigen.SelectedValue <> "-1" Then StrFiltro.AppendFormat("&emsp;<b>Almacén Origen:</b> {0}", DdlAlmacenOrigen.SelectedItem.Text)
+            If DdlAlmacenDestino.SelectedValue <> "-1" Then StrFiltro.AppendFormat("&emsp;<b>Almacén Destino:</b> {0}", DdlAlmacenDestino.SelectedItem.Text)
+            If ChkRecibido.Checked Then StrFiltro.AppendFormat("&emsp;<b>Recibidos: </b>Si") Else StrFiltro.AppendFormat("&emsp;<b>Recibidos: </b>No")
+
+            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)
+
+            Dim params As New List(Of ReportParameter)
+            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("Filtros", StrFiltro.ToString))
+            If Imagen.Exists Then
+                params.Add(New ReportParameter("LogoPath", logouri))
+            Else
+                params.Add(New ReportParameter("LogoPath", ""))
+            End If
+            ImprimirPDF("Empresas/Grales/Formatos/RepTraspasoAlmacen.rdlc", DtInventarios, params, String.Format("RepTraspasoAlmacen-{0}", Now.ToDateTime.ToShortDateString), Formato)
+        Else
+            Alert("No hay datos consultados", TipoMensaje.MsgAdvertencia)
+        End If
+    End Sub
+#End Region
+    Private Sub BtnConsultar_Click(sender As Object, e As EventArgs) Handles BtnConsultar.Click
+        CargaDatos()
+    End Sub
+
+    Private Sub ImgExcel_Click(sender As Object, e As EventArgs) Handles ImgExcel.Click
+        Imprime("Excel")
+    End Sub
+End Class

Nomina/ReportePTU.aspx.vb

@@ -155,7 +155,7 @@ Partial Class Nomina_ReportePTU
                 If Not IsNothing(rowc) Then
                     CveConcepto = rowc("CveConcepto").ToString().ToEntero()
                 Else
-                    CveConcepto = objNomina.AddConcepto("PTU", "Utilidades", "P", "", True, True, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, False, -1, -1, -1, 0, -1)
+                    CveConcepto = objNomina.AddConcepto("PTU", "Utilidades", "P", "", True, True, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, False, -1, -1, -1, 0, -1, 0, 0, 0, 0)
                 End If
                 If CveConcepto < 1 Then
                     continuar = False

OS/CatEstatusOrdenServicio.aspx

@@ -78,7 +78,7 @@
     <asp:UpdatePanel ID="UPAcciones" runat="server">
         <ContentTemplate>
             <li>
-                <asp:LinkButton ID="BtnAgregarEstatus" runat="server" data-toggle="tooltip" data-placement="left" title="Agregar Estado de Orden de Servicio" Text="<i class='fa fa-plus'></i> Agregar"></asp:LinkButton>
+                <asp:LinkButton ID="BtnAgregarEstatus" runat="server" data-toggle="tooltip" data-placement="left" title="Agregar Estado de Orden de Servicio" Text="<i class='fa fa-plus'></i> Agregar Estatus"></asp:LinkButton>
             </li>
 
         </ContentTemplate>
@@ -88,6 +88,11 @@
     <ajax:TabContainer runat="server" ActiveTabIndex="0" Width="100%" CssClass="tabBodyOverride">
         <ajax:TabPanel runat="server" ID="TabCatalogo" HeaderText="Estatus">
             <ContentTemplate>
+                <div class="row" style="margin-right: 10px; margin-top: 18px;" align="right">
+                    <label for="TxtBusquedaEstatus">Buscar: </label>
+                    <input type="text" id="TxtBusquedaEstatus" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
+                    <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", Prueba.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
+                </div>
                 <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
                     <ContentTemplate>
                         <asp:HiddenField ClientIDMode="Static" runat="server" ID="HdnCveEstatus" Value="-1" />
@@ -114,192 +119,29 @@
             </ContentTemplate>
         </ajax:TabPanel>
 
-        <ajax:TabPanel runat="server" ID="TabConfiguracion" HeaderText="Configuracion">
+        <ajax:TabPanel runat="server" ID="TabPanel3" HeaderText="Configuración">
             <ContentTemplate>
-
+                <div class="row" style="margin-right: 10px; margin-top: 18px;" align="right">
-                <asp:UpdatePanel ID="UPPEmp" runat="server" UpdateMode="Conditional">
+                    <label for="TxtBusqueda">Buscar: </label>
+                    <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", Prueba.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
+                    <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", Prueba.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
+                </div>
+                <asp:UpdatePanel ID="UpPrueba" runat="server" UpdateMode="Conditional">
                     <ContentTemplate>
-                        <asp:GridView ID="GvEstatusUsuarios" GridLines="None" CssClass="table table-striped table-advance table-hover" Width="100%" runat="server" AutoGenerateColumns="False" DataKeyNames="CveUsuario" EmptyDataText="No se encontraron Usuarios Registrados" ToolTip="Listado de Usuarios">
+                        <asp:GridView ID="Prueba" GridLines="None" CssClass="table table-striped table-advance table-hover" Width="100%" runat="server" AutoGenerateColumns="false" DataKeyNames="CveUsuario" EmptyDataText="No se encontraron Usuarios Registrados" ToolTip="Listado de Usuarios" Style="text-align: center">
                             <HeaderStyle VerticalAlign="Middle" />
                             <Columns>
                                 <asp:TemplateField>
                                     <HeaderTemplate>Estatus</HeaderTemplate>
                                     <ItemStyle Width="150px" BorderStyle="None" />
                                     <ItemTemplate>
-                                        <asp:Label Font-Bold="true" Width="250px" ID="LblUsuario" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
+                                        <asp:Label Font-Bold="true" Style="text-align: left" Width="250px" ID="LblUsuario" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
-                                    </ItemTemplate>
-                                </asp:TemplateField>
-                                <asp:TemplateField>
-                                    <ItemStyle HorizontalAlign="Center" />
-                                    <ItemTemplate>
-                                        <table style="text-align: center; width: 100%">
-                                            <tr>
-                                                <td style="width: 50%; text-align: right">
-                                                    <asp:CheckBox ID="chkEstatus1" runat="server" /><asp:HiddenField runat="server" ID="hdnCveEstatusUsuarios1" />
-                                                </td>
-                                                <td style="width: 50%; text-align: left">
-                                                    <asp:Label ID="lblSuperior1" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                    <asp:Label ID="lblLimites1" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                </td>
-                                        </table>
-                                    </ItemTemplate>
-                                </asp:TemplateField>
-                                <asp:TemplateField>
-                                    <ItemStyle HorizontalAlign="Center" />
-                                    <ItemTemplate>
-                                        <table style="text-align: center; width: 100%">
-                                            <tr>
-                                                <td style="width: 50%; text-align: right">
-                                                    <asp:CheckBox ID="chkEstatus2" runat="server" /><asp:HiddenField runat="server" ID="hdnCveEstatusUsuarios2" />
-                                                </td>
-                                                <td style="width: 50%; text-align: left">
-                                                    <asp:Label ID="lblSuperior2" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                    <asp:Label ID="lblLimites2" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                </td>
-                                            </tr>
-                                        </table>
-                                    </ItemTemplate>
-                                </asp:TemplateField>
-
-                                <asp:TemplateField>
-                                    <ItemStyle HorizontalAlign="Center" />
-                                    <ItemTemplate>
-                                        <table style="text-align: center; width: 100%">
-                                            <tr>
-                                                <td style="width: 50%; text-align: right">
-                                                    <asp:CheckBox ID="chkEstatus3" runat="server" /><asp:HiddenField runat="server" ID="hdnCveEstatusUsuarios3" />
-                                                </td>
-                                                <td style="width: 50%; text-align: left">
-                                                    <asp:Label ID="lblSuperior3" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                    <asp:Label ID="lblLimites3" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                </td>
-                                            </tr>
-                                        </table>
-                                    </ItemTemplate>
-                                </asp:TemplateField>
-
-                                <asp:TemplateField>
-                                    <ItemStyle HorizontalAlign="Center" />
-                                    <ItemTemplate>
-                                        <table style="text-align: center; width: 100%">
-                                            <tr>
-                                                <td style="width: 50%; text-align: right">
-                                                    <asp:CheckBox ID="chkEstatus4" runat="server" /><asp:HiddenField runat="server" ID="hdnCveEstatusUsuarios4" />
-                                                </td>
-                                                <td style="width: 50%; text-align: left">
-                                                    <asp:Label ID="lblSuperior4" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                    <asp:Label ID="lblLimites4" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                </td>
-                                            </tr>
-                                        </table>
-                                    </ItemTemplate>
-                                </asp:TemplateField>
-
-                                <asp:TemplateField>
-                                    <ItemStyle HorizontalAlign="Center" />
-                                    <ItemTemplate>
-                                        <table style="text-align: center; width: 100%">
-                                            <tr>
-                                                <td style="width: 50%; text-align: right">
-                                                    <asp:CheckBox ID="chkEstatus5" runat="server" /><asp:HiddenField runat="server" ID="hdnCveEstatusUsuarios5" />
-                                                </td>
-                                                <td style="width: 50%; text-align: left">
-                                                    <asp:Label ID="lblSuperior5" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                    <asp:Label ID="lblLimites5" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                </td>
-                                            </tr>
-                                        </table>
-                                    </ItemTemplate>
-                                </asp:TemplateField>
-
-                                <asp:TemplateField>
-                                    <ItemStyle HorizontalAlign="Center" />
-                                    <ItemTemplate>
-                                        <table style="text-align: center; width: 100%">
-                                            <tr>
-                                                <td style="width: 50%; text-align: right">
-                                                    <asp:CheckBox ID="chkEstatus6" runat="server" /><asp:HiddenField runat="server" ID="hdnCveEstatusUsuarios6" />
-                                                </td>
-                                                <td style="width: 50%; text-align: left">
-                                                    <asp:Label ID="lblSuperior6" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                    <asp:Label ID="lblLimites6" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                </td>
-                                            </tr>
-                                        </table>
-                                    </ItemTemplate>
-                                </asp:TemplateField>
-
-                                <asp:TemplateField>
-                                    <ItemStyle HorizontalAlign="Center" />
-                                    <ItemTemplate>
-                                        <table style="text-align: center; width: 100%">
-                                            <tr>
-                                                <td style="width: 50%; text-align: right">
-                                                    <asp:CheckBox ID="chkEstatus7" runat="server" /><asp:HiddenField runat="server" ID="hdnCveEstatusUsuarios7" />
-                                                </td>
-                                                <td style="width: 50%; text-align: left">
-                                                    <asp:Label ID="lblSuperior7" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                    <asp:Label ID="lblLimites7" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                </td>
-                                            </tr>
-                                        </table>
-                                    </ItemTemplate>
-                                </asp:TemplateField>
-
-                                <asp:TemplateField>
-                                    <ItemStyle HorizontalAlign="Center" />
-                                    <ItemTemplate>
-                                        <table style="text-align: center; width: 100%">
-                                            <tr>
-                                                <td style="width: 50%; text-align: right">
-                                                    <asp:CheckBox ID="chkEstatus8" runat="server" /><asp:HiddenField runat="server" ID="hdnCveEstatusUsuarios8" />
-                                                </td>
-                                                <td style="width: 50%; text-align: left">
-                                                    <asp:Label ID="lblSuperior8" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                    <asp:Label ID="lblLimites8" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                </td>
-                                            </tr>
-                                        </table>
-                                    </ItemTemplate>
-                                </asp:TemplateField>
-
-                                <asp:TemplateField>
-                                    <ItemStyle HorizontalAlign="Center" />
-                                    <ItemTemplate>
-                                        <table style="text-align: center; width: 100%">
-                                            <tr>
-                                                <td style="width: 50%; text-align: right">
-                                                    <asp:CheckBox ID="chkEstatus9" runat="server" /><asp:HiddenField runat="server" ID="hdnCveEstatusUsuarios9" />
-                                                </td>
-                                                <td style="width: 50%; text-align: left">
-                                                    <asp:Label ID="lblSuperior9" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                    <asp:Label ID="lblLimites9" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                </td>
-                                            </tr>
-                                        </table>
-                                    </ItemTemplate>
-                                </asp:TemplateField>
-
-                                <asp:TemplateField>
-                                    <ItemStyle HorizontalAlign="Center" />
-                                    <ItemTemplate>
-                                        <table style="text-align: center; width: 100%">
-                                            <tr>
-                                                <td style="width: 50%; text-align: right">
-                                                    <asp:CheckBox ID="chkEstatus10" runat="server" /><asp:HiddenField runat="server" ID="hdnCveEstatusUsuarios10" />
-                                                </td>
-                                                <td style="width: 50%; text-align: left">
-                                                    <asp:Label ID="lblSuperior10" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                    <asp:Label ID="lblLimites10" Font-Size="7" Font-Italic="true" runat="server"></asp:Label>
-                                                </td>
-                                            </tr>
-                                        </table>
                                     </ItemTemplate>
                                 </asp:TemplateField>
                             </Columns>
                         </asp:GridView>
-                        <div style="width:100%;text-align:center">
+                        <div style="width: 100%; text-align: center">
-                            <asp:Button ID="btnGuardarEstatusUsuariosREQ" Text="Guardar" runat="server" Visible="true" CssClass="btn btn-primary" />
+                            <asp:Button ID="BtnGuardarPruebas" Text="Guardar" runat="server" Visible="true" CssClass="btn btn-primary" />
                         </div>
                     </ContentTemplate>
                 </asp:UpdatePanel>
@@ -311,7 +153,7 @@
     <%--POPUP AGREGAR--%>
     <div id="divAddEstatusOS" class="modal ADS fade" role="dialog">
         <div class="modal-dialog">
-            <asp:UpdatePanel ID="UpAddEstatus" class="modal-content rowpadding" tabindex="-1" runat="server" UpdateMode="Conditional">
+            <asp:UpdatePanel ID="UpAddEstatus" class="modal-content" tabindex="-1" runat="server" UpdateMode="Conditional">
                 <ContentTemplate>
                     <div class="modal-header">
                         <button type="button" class="close" data-dismiss="modal" aria-label="Close">
@@ -338,7 +180,7 @@
                                     <label for="<%= DdlTipoEstatus.ClientID.ToString()%>">Tipo Estatus:</label>
                                 </div>
                                 <br />
-                                <div class="form-group form-md-line-input input-iconright">
+                                <div runat="server" id="divChkEstatus" class="form-group form-md-line-input input-iconright">
                                     <asp:CheckBox ID="ChkEstatus" runat="server" CssClass="form-control" />
                                     <label for="<%= ChkEstatus.ClientID.ToString()%>">Estatus:</label>
                                 </div>
@@ -347,7 +189,8 @@
                         <div class="modal-footer">
                             <asp:UpdatePanel ID="UpFooter" runat="server" UpdateMode="Conditional">
                                 <ContentTemplate>
-                                    <asp:LinkButton ID="BtnAgregarEstatusOS" runat="server" CssClass="btn btn-primary" ValidationGroup="GrpObligatorio"> <i class='material-icons'>done_all</i> Agregar</asp:LinkButton>
+                                    <asp:Button ID="BtnAgregarEstatusOS" runat="server" class="btn btn-success" Text="Agregar" />
+                                    <%--<asp:LinkButton ID="BtnAgregarEstatusOS" runat="server" CssClass="btn btn-primary" ValidationGroup="GrpObligatorio"> <i class='material-icons'>done_all</i> Agregar</asp:LinkButton>--%>
                                     <button type="button" class="btn btn-default" data-dismiss="modal">Cancelar</button>
                                 </ContentTemplate>
                             </asp:UpdatePanel>

OS/CatEstatusOrdenServicio.aspx.vb

@@ -42,22 +42,37 @@ Partial Class OS_CatEstatusOrdenServicio
             ViewState("DTEstatusUsuarios") = value
         End Set
     End Property
+    Private Property DTUsuarios As DataTable
+        Get
+            Return CType(ViewState("DTUsuarios"), DataTable)
+        End Get
+        Set(value As Data.DataTable)
+            ViewState("DTUsuarios") = value
+        End Set
+    End Property
+    Private Property DtEstatusUsuariosAsociados As DataTable
+        Get
+            Return CType(ViewState("DtEstatusUsuariosAsociados"), DataTable)
+        End Get
+        Set(value As Data.DataTable)
+            ViewState("DtEstatusUsuariosAsociados") = value
+        End Set
+    End Property
 #End Region
 
 
     Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
         If Not Page.IsPostBack Then
+            'DTUsuarios = GlobalDTUsuarios(CveEmpresa:=UsuarioActual.CveEmpresa)
             CargaDatos()
-            CreaGrid("Req")
+            AsociarEstatusUsuarios()
-            CargaGridEstatusUsuarios()
+            CargarUsuarioConEstatus()
-            ViewState("Orden") = ""
-
             CveEstatuOS = -1
-
         End If
     End Sub
 
     Public Sub CargaDatos()
+        DTUsuarios = GlobalDTUsuarios(CveEmpresa:=UsuarioActual.CveEmpresa)
         Using ObjEstatusOrdenServicios As New ClsOS
             If ObjEstatusOrdenServicios.GetEstatusOrdenServicio() Then
 
@@ -79,10 +94,12 @@ Partial Class OS_CatEstatusOrdenServicio
 
     Private Sub BtnAgregarEstatus_Click(sender As Object, e As EventArgs) Handles BtnAgregarEstatus.Click
         BtnAgregarEstatusOS.Text = "Agregar"
+        divChkEstatus.Visible = False
+        UpBodyEstatus.Update()
         UpFooter.Update()
         RegistraScript("$('#divAddEstatusOS').modal();LimpiaModal()")
     End Sub
-    Private Sub BtnAgregarEstatusOS_Click(sender As Object, e As EventArgs) Handles BtnAgregarEstatusOS.Click
+    Protected Sub BtnAgregarEstatusOS_Click(sender As Object, e As EventArgs) Handles BtnAgregarEstatusOS.Click
         Dim ObjEstatusOrdenServicios As New ClsOS
         Dim TieneError = False
 
@@ -105,11 +122,15 @@ Partial Class OS_CatEstatusOrdenServicio
             End If
         End If
 
-
         ObjEstatusOrdenServicios.Dispose()
-        CargaDatos()
+        'CargaDatos()
-        UpDatos.Update()
+        'AsociarEstatusUsuarios()
-        RegistraScript("$('#divAddEstatusOS').modal('hide');")
+        'CargarUsuarioConEstatus()
+        'UpDatos.Update()
+        'UpPrueba.Update()
+        Alert("Estatus agregado")
+        RegistraScript(String.Format("$('#{0}').modal('hide');", "divAddEstatusOS"))
+        Response.Redirect(HttpContext.Current.Request.Url.ToString(), True)
     End Sub
     Public Sub Edit_Click(sender As Object, e As EventArgs)
         Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
@@ -118,6 +139,8 @@ Partial Class OS_CatEstatusOrdenServicio
         ChkEstatus.Checked = If(GvRow.DataKey("Estado").ToString = "Activo", True, False)
         CveEstatuOS = GvRow.DataKey("CveEstatusOrdenServicio").ToEntero
         BtnAgregarEstatusOS.Text = "Actualizar"
+        divChkEstatus.Visible = True
+        UpBodyEstatus.Update()
         UpAddEstatus.Update()
         RegistraScript(String.Format("$('#{0}').modal();", "divAddEstatusOS"))
     End Sub
@@ -145,8 +168,9 @@ Partial Class OS_CatEstatusOrdenServicio
         End If
 
         ObjEstatusOrdenServicios.Dispose()
-        CargaDatos()
+        'CargaDatos()
-        UpDatos.Update()
+        'UpDatos.Update()
+        Response.Redirect(HttpContext.Current.Request.Url.ToString(), True)
     End Sub
     Protected Sub GvDatos_RowUpdating(sender As Object, e As System.Web.UI.WebControls.GridViewUpdateEventArgs) Handles GvDatos.RowUpdating
         Dim ObjEstatusOrdenServicios As New ClsOS
@@ -171,79 +195,68 @@ Partial Class OS_CatEstatusOrdenServicio
 #End Region
 
 #Region "Configuracion"
-    Private Sub CreaGrid(Tipo As String)
+    Private Sub AsociarEstatusUsuarios()
-        Dim i As Integer = 1
+        Dim tableResultado As DataTable = DTUsuarios
-
+        For Each Estatus As DataRow In DtEstatusOS.Rows
-        For Each Row As DataRow In GlobalDTEstatusOrdenServicios(UsuarioActual.CveEmpresa).Rows
+            Dim CveColumnaEstatus As String = Estatus.Item("CveEstatusOrdenServicio").ToString
-
+            tableResultado.Columns.Add(CveColumnaEstatus, Type.GetType("System.Boolean"))
-            GvEstatusUsuarios.Columns(i).HeaderText = Row("EstatusOrdenServicio").ToString.ToUpper
+            For Each Usuario As DataRow In tableResultado.Rows
-            GvEstatusUsuarios.Columns(i).FooterText = Row("CveEstatusOrdenServicio").ToString
+                Usuario.Item(CveColumnaEstatus) = Not IsNothing(DTEstatusUsuarios.FiltroPrimero(String.Format("CveUsuario = {0} and CveEstatusOrdenServicio = {1}", Usuario.Item("CveUsuario"), CveColumnaEstatus)))
-
-            i += 1
             Next
-
+        Next
-        While i <= 10
+        DtEstatusUsuariosAsociados = tableResultado
-            GvEstatusUsuarios.Columns(i).Visible = False
-            i += 1
-        End While
     End Sub
 
-    Protected Sub CargaGridEstatusUsuarios()
+    Private Sub CargarUsuarioConEstatus()
-        GvEstatusUsuarios.DataSource = GlobalDTUsuarios(CveEmpresa:=UsuarioActual.CveEmpresa)
+        'For Contador As Integer = (Prueba.Columns.Count - 1) To 1 Step -1
-        GvEstatusUsuarios.DataBind()
+        '    Prueba.Columns.RemoveAt(Contador)
-        'UPPEmp.Update()
+        'Next
+        For Each Estatus As DataRow In DtEstatusOS.Rows
+            Dim test As New CheckBoxField
+            test.HeaderText = Estatus.Item("EstatusOrdenServicio").ToString
+            test.DataField = Estatus.Item("CveEstatusOrdenServicio").ToString
+            Prueba.Columns.Add(test)
+        Next
+        Prueba.DataSource = DtEstatusUsuariosAsociados
+        Prueba.DataBind()
     End Sub
 
-    Protected Sub btnGuardarEstatusUsuariosREQ_Click(sender As Object, e As EventArgs) Handles btnGuardarEstatusUsuariosREQ.Click
+    Private Sub Prueba_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles Prueba.RowDataBound
+        If e.Row.RowType = DataControlRowType.DataRow Then
+            Dim PermisosDeUsuario As DataTable = DTEstatusUsuarios.FiltraParametros(String.Format("CveUsuario = {0}", e.Row.DBCampo("CveUsuario").ToString))
+            For i As Integer = 1 To e.Row.Cells.Count - 1
+                If e.Row.RowType = DataControlRowType.DataRow Then
+                    Dim checkBox As CheckBox = TryCast(e.Row.Cells(i).Controls(0), CheckBox)
+                    checkBox.Enabled = True
+                End If
+            Next
+        End If
+    End Sub
+
+    Private Sub GuardarDatosPrueba(sender As Object, e As EventArgs) Handles BtnGuardarPruebas.Click
         Dim objEstatusOC As New ClsOS
         objEstatusOC.IniciaTransacSQL()
         Dim HuboErrores As Boolean = False
         Dim CveSubProyecto = 59
 
-        For Each Row As GridViewRow In GvEstatusUsuarios.Rows
+        For Each Row As GridViewRow In Prueba.Rows
-            Dim r As Integer = 1
+            Dim controles As Integer = Row.Controls.Count
-            For i = 0 To Row.Cells.Count - 1
+            For i = 1 To Row.Cells.Count - 1
-
+                Dim chk As CheckBox = CType(Row.Cells(i).Controls(0), CheckBox)
-                Dim CveEstatus As Integer = If(IsNumeric(GvEstatusUsuarios.Columns(i).FooterText), GvEstatusUsuarios.Columns(i).FooterText.ToEntero, 0)
+                Dim CveEstatus As Integer = DtEstatusOS.FiltroPrimeroValor("CveEstatusOrdenServicio", String.Format("EstatusOrdenServicio = '{0}'", Prueba.Columns(i).HeaderText)).ToEntero
-
+                If Not chk.Checked Then
-                If CveEstatus > 0 Then
-
-                    If Row.FCCheckBox("chkEstatus" + r.ToString).Checked = False Then
-                        'Eliminar el registro existente
                     If Not objEstatusOC.RemoveEstatusUsuarios(CveEstatus, Row.DataKey("CveUsuario").ToString.ToEntero) Then
                         HuboErrores = True
                         Exit For
                     End If
-                    ElseIf Row.FCCheckBox("chkEstatus" + r.ToString).Checked = True Then
+                ElseIf chk.Checked Then
                     'Guardado masivo cuando sea SubProyecto "Todos"
-                        If CveSubProyecto = -2 Then
-                            For Each dr As DataRow In GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa).Rows
-                                If Not objEstatusOC.AddEstatusUsuarios(CveEstatus, Row.DataKey("CveUsuario").ToString.ToEntero, CveSubProyecto) Then
-                                    HuboErrores = True
-                                    Exit For
-                                End If
-                            Next
-                            If HuboErrores Then
-                                Exit For
-                            End If
-
-                            'Insertar el nuevo registro
-                        Else
                     If Not objEstatusOC.AddEstatusUsuarios(CveEstatus, Row.DataKey("CveUsuario").ToString.ToEntero, CveSubProyecto) Then
                         HuboErrores = True
                         Exit For
                     End If
                 End If
-
-                    End If
-                    r += 1
-                End If
             Next
-
-            'Si tubo algun error terminamos el proceso (FOR)
-            If HuboErrores Then
-                Exit For
-            End If
         Next
 
         If Not HuboErrores Then
@@ -253,27 +266,7 @@ Partial Class OS_CatEstatusOrdenServicio
             objEstatusOC.RollBack()
             Alert("Ocurrió un error al guardar los cambios. Por favor vuelva a intentar", TipoMensaje.MsgError)
         End If
-
         objEstatusOC.Dispose()
-        CargaDatos()
-        CargaGridEstatusUsuarios()
-    End Sub
-
-    Protected Sub GvEstatusUsuarios_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvEstatusUsuarios.RowDataBound
-        If e.Row.RowType = DataControlRowType.DataRow Then
-            Dim PermisosDeUsuario As DataTable = DTEstatusUsuarios.FiltraParametros(String.Format("CveUsuario = {0}", e.Row.DBCampo("CveUsuario").ToString))
-            Dim CveUsuario As String = e.Row.DBCampo("CveUsuario").ToString
-            For i As Integer = 1 To 10
-                Dim CveEstatus As Integer = GvEstatusUsuarios.Columns(i).FooterText.ToEntero
-                If CveEstatus > 0 Then
-                    Dim auxiliarBandera As DataRow = PermisosDeUsuario.FiltroPrimero(String.Format("CveEstatusOrdenServicio = {0}", CveEstatus.ToString))
-                    If auxiliarBandera IsNot Nothing Then
-                        Dim chkEstatus As CheckBox = e.Row.FCCheckBox(String.Format("chkEstatus{0}", i))
-                        chkEstatus.Checked = True
-                    End If
-                End If
-            Next
-        End If
     End Sub
 #End Region
 End Class

RH/Asistencias.aspx.vb

@@ -11,7 +11,7 @@ Partial Class RH_Asistencias
             CargaProyecto()
             CargaTurnos()
             TxtFechaAsistencia.Text = Now.ToShortDateString
-            If UsuarioActual.CveRol = 1 Then
+            If UsuarioActual.CveRol = 1 OrElse UsuarioActual.CveUsuario = 2343 Then
                 PnlMasivo.Visible = True
                 CargaTiposPeriodo()
             End If

Ventas/RepCotizacionesxFacturar.aspx

@@ -0,0 +1,438 @@
+<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepCotizacionesxFacturar.aspx.vb" Inherits="RepCotizacionesxFacturar" %>
+
+<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
+</asp:Content>
+<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
+    <style>
+        .Widthall {
+            width: 100% !important;
+        }
+
+        .dataTables_scrollHeadInner {
+            width: 100% !important;
+            background-color: #dddddd;
+            padding-left: 0px !important;
+        }
+
+        .dataTables_scrollFoot {
+            display: none;
+            position: static;
+        }
+
+        .table-scrollable {
+            margin: 0px !important;
+        }
+
+        .dataTables_scroll {
+            margin-bottom: 0px;
+        }
+
+        .table.dataTable {
+            margin-top: 0px !important;
+        }
+
+        .dataTables_scrollBody table th {
+            padding: 0px !important;
+            padding-right: 4px !important;
+            padding-left: 4px !important;
+        }
+
+        .sinlink td a {
+            pointer-events: none;
+            cursor: default;
+            color: black;
+            font-size: small;
+        }
+
+        .white a {
+            color: white !important;
+        }
+
+        .select2 .select2-selection__rendered {
+            line-height: 1;
+            color: #111;
+        }
+
+        .select2 .select2-selection--multiple {
+            box-sizing: border-box;
+            cursor: pointer;
+            display: block;
+            min-height: 20px;
+            user-select: none;
+            -webkit-user-select: none;
+        }
+
+        .select2-container--default .select2-selection--multiple .select2-selection__choice {
+            margin-top: 10px;
+        }
+
+        .select2-selection__rendered {
+            margin-top: 0px;
+            height: 25px;
+        }
+
+        .select2-selection {
+            margin-top: 0px;
+            height: 31px;
+        }
+
+        .select2-container--default.select2-container--focus .select2-selection--multiple {
+            border: none;
+            outline: 0;
+        }
+    </style>
+</asp:Content>
+<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
+    <%--    <li>
+        <asp:LinkButton ID="LnkPdf" runat="server"> <i class="fa fa-file-pdf-o" style="font-weight:bold;"></i> PDF</asp:LinkButton>
+    </li>
+    <li>
+        <asp:LinkButton ID="ImgExcel" runat="server"><i class="fa fa-file-excel-o" style="font-weight:bold;"></i> Excel</asp:LinkButton>
+    </li>--%>
+</asp:Content>
+<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
+    <asp:Label ID="LblTitulo" runat="server" Text="Reporte de Cotizaciones por Facturar"></asp:Label>
+</asp:Content>
+<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
+</asp:Content>
+
+<asp:Content ID="Content8" ContentPlaceHolderID="HA" runat="Server">
+
+    <%-- <asp:UpdatePanel ID="UpdatePanel1" runat="server" RenderMode="Inline" UpdateMode="Conditional">
+        <ContentTemplate> 
+            <div class="btn-group pull-right btn-separete">
+                        
+            </div>
+        </ContentTemplate>
+    </asp:UpdatePanel>--%>
+</asp:Content>
+
+<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server" defaultbutton="BtnConsultar">
+    <asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+            <div class="portlet solid grey-cascade portlet-filter" style="">
+                <div class="portlet-title portlet-filterT smalltitle" style="min-height: 49px; position: relative;">
+                    <div class="tools">
+                        <asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" />
+                        <a href="javascript:;" data-idchekbox="<%= chkexpand.ClientID%>" class=" <%= IIf(chkexpand.Checked = True, "collapse", "expand")%>"></a>
+                        <asp:CheckBox ID="chkexpand" CssClass="hidden" runat="server" />
+                    </div>
+                    <div class="portlet-body">
+                        <div class="row">
+
+
+                            <label class="col-md-1 truncate">F.I.:</label>
+                            <div class="col-md-2">
+                                <div class="input-group input-sm input-small date date-picker" data-date-format="dd/mm/yyyy" style="width: 140px !important; padding: 0px; margin-top:10px;">
+                                    <asp:TextBox 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>
+                                    <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>
+                            <label class="col-md-1 truncate">F.F.:</label>
+                            <div class="col-md-2">
+                                <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 140px !important; padding: 0px; margin-top:10px;">
+                                    <asp:TextBox 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>
+                                    <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>
+
+                            <label class="col-md-1">Sucursal: </label>
+                            <div class="col-md-2" style="margin-top:5px;">
+                                <asp:ListBox ID="DdlSubProyectos" SelectionMode="Multiple" data-text="Todas" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" CssClass="ddlFiltros input-sm select2me Widthall" Style="width: 100%;" runat="server"></asp:ListBox>
+                                <%--<asp:DropDownList CssClass="table-group-action-input form-control input-inline input-small input-sm select2me" ID="DdlSubProyectos" DataTextField="SubProyecto" DataValueField="CveSubProyecto" runat="server"></asp:DropDownList>--%>
+                            </div>
+
+
+                        </div>
+                    </div>
+                </div>
+
+                <div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style=""display:none;""")%>>
+                    <div class="row">
+
+
+                        <label class="col-md-1">Cliente: </label>
+                        <div class="col-md-2">
+                            <ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClientes" Width="100%" data-metodo="getcliente" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%;" selectedindexchange="DdlClientes_SelectedIndexChanged"></ADS:Dropdownlost>
+                        </div>
+
+
+                        <%--                        <label class="col-md-1 ">F. Venc. al:</label>
+                        <div class="col-md-2">
+                            <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 140px !important; padding: 0px;">
+                                <asp:TextBox ID="TxtFechaVencimiento" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10"></asp:TextBox>
+                                <span class="input-group-btn ">
+                                    <asp:LinkButton ID="imgCalendarioV" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
+                                </span>
+                                <ajax:MaskedEditExtender ID="MaskedEditExtender1" runat="server" TargetControlID="TxtFechaVencimiento" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
+                                <ajax:CalendarExtender runat="server" ID="CalendarExtender1" TargetControlID="TxtFechaVencimiento" PopupButtonID="imgCalendarioV" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
+                                <asp:RequiredFieldValidator ID="RFVFechaVencimiento" runat="server" ControlToValidate="TxtFechaVencimiento" Display="None" ErrorMessage="El campo <b>''Fecha Vencimiento''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
+                                <asp:CompareValidator ID="CVOFechaVencimiento" runat="server" ControlToValidate="TxtFechaVencimiento" Display="None" ErrorMessage="El campo <b>''Fecha Vencimiento''</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="ValidatorCalloutExtender1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaVencimiento" Width="350px"></ajax:ValidatorCalloutExtender>
+                                <ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender2" runat="server" HighlightCssClass="vco" TargetControlID="CVOFechaVencimiento" Width="350px"></ajax:ValidatorCalloutExtender>
+                            </div>
+                        </div>
+
+                        <label class="col-md-1 ">Vendedor:</label>
+                        <div class="col-md-2">
+                            <asp:ListBox ID="DdlVendedor" SelectionMode="Multiple" data-text="Todos" AppendDataBoundItems="true" DataTextField="Vendedor" DataValueField="CveVendedor" CssClass="ddlFiltros input-sm select2me Widthall" Style="width: 100%;" runat="server"></asp:ListBox>
+                        </div>--%>
+                    </div>
+                </div>
+            </div>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+    <br />
+    <div class="row">
+        <div align="right">
+            <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="display: inline-block; width: 150px;" />
+            <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
+        </div>
+    </div>
+    <asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+            <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontró ningun corte" DataKeyNames="CveVenta"
+                ToolTip="Remisiones sin Facturar"
+                CssClass="table table-striped table-advance table-hover Widthall ScrollAD"
+                data-sort="true" Style="text-align: center;" GridLines="None">
+                <Columns>
+                    <asp:TemplateField>
+                        <HeaderTemplate>
+                            <asp:Label Text="Folio" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlFolio" runat="server" Text='<%# Eval("Folio") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField>
+                        <HeaderTemplate>
+                            <asp:Label Text="Fecha" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("Fecha", "{0:d}") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField>
+                        <HeaderTemplate>
+                            <asp:Label Text="Fecha Vencimiento" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlFechaVencimiento" runat="server" Text='<%# Eval("FechaVencimiento", "{0:d}") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField ItemStyle-HorizontalAlign="Left">
+                        <HeaderTemplate>
+                            <asp:Label Text="Cliente" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlCliente" runat="server" Text='<%# Eval("Cliente") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField>
+                        <HeaderTemplate>
+                            <asp:Label Text="Contrato" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlContrato" runat="server" Text='<%# Eval("TieneContrato") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:BoundField DataField="PorcentajeAvance" HeaderText="Facturado" DataFormatString="{0:F}" HtmlEncode="false" />
+                    <%-- <asp:TemplateField>
+                        <HeaderTemplate>
+                            <asp:Label Text="Facturado" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlAvance"   runat="server" Text='<%# String.Concat(Eval("PorcentajeAvance"), "%") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>--%>
+                    <asp:TemplateField ItemStyle-HorizontalAlign="Right">
+                        <HeaderTemplate>
+                            <asp:Label Text="SubTotal" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlSubTotal" runat="server" Text='<%# Eval("SubTotal", "{0:N2}") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField ItemStyle-HorizontalAlign="Right">
+                        <HeaderTemplate>
+                            <asp:Label Text="IVA" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlIVA" runat="server" Text='<%# Eval("IVA", "{0:N2}") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField ItemStyle-HorizontalAlign="Right">
+                        <HeaderTemplate>
+                            <asp:Label Text="Total" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlTotal" runat="server" Text='<%# Eval("Total", "{0:N2}") & " " & Eval("Abreviatura").ToString %>'></asp:Literal>
+                            <%--<asp:Literal ID="LtlMon" runat="server" Text='<%# Eval("Abreviatura") %>'></asp:Literal>--%>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                </Columns>
+                <HeaderStyle CssClass="Titulos" />
+                <RowStyle CssClass="Texto" />
+                <AlternatingRowStyle CssClass="TextoAlterno" />
+            </asp:GridView>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+
+    <asp:UpdatePanel runat="server" ID="UPPersonalizar" UpdateMode="Conditional">
+        <ContentTemplate>
+            <div id="DivPersonalizar" class="modal fade" role="dialog">
+                <div class="modal-dialog">
+
+                    <!-- Modal content-->
+                    <div class="modal-content">
+                        <div class="modal-header">
+                            <button type="button" class="close" data-dismiss="modal">&times;</button>
+                            <h4 class="modal-title">
+                                <asp:Label ID="Label1" runat="server" ClientIDMode="Static" Text="Personalizar Columnas"></asp:Label></h4>
+                        </div>
+                        <div class="modal-body">
+                            <table class="table table-striped table-advance table-hover Widthall">
+                                <tbody>
+                                    <tr>
+                                        <td style="text-align: left;">
+                                            <asp:CheckBox ID="ChkUsuarioCancelacion" runat="server" Text="Usuario Cancelación" /></td>
+                                    </tr>
+                                    <tr>
+                                        <td style="text-align: left;">
+                                            <asp:CheckBox ID="ChkTipo" runat="server" Text="Cargo/Abono" /></td>
+                                    </tr>
+
+                                </tbody>
+                            </table>
+                        </div>
+                        <div class="modal-footer">
+                            <asp:Button ID="BtnPersonalizar" runat="server" Text="Personalizar" class="btn btn-success" />
+                            <button type="button" class="btn btn-default" data-dismiss="modal">Cancelar</button>
+                        </div>
+                    </div>
+
+                </div>
+            </div>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+</asp:Content>
+<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
+    <%--<script type="text/javascript">
+
+        function Scroll() {
+            $(document).ready(function () {
+                var Tam = TamañoVentana();
+                var Alto = Tam.height - 300;
+                $('#<%=GvDatos.ClientID%>').gridviewScroll({
+                    width: 995,
+                    height: Alto
+                });
+            });
+        }
+    </script>--%>
+
+    <script type="text/javascript">
+        function GetSelectedRow(lnk, txtf, txtoi) {
+
+
+            //var row = lnk.parentNode.parentNode;
+            //var txtoi = row.cells[10].getElementsByTagName("input")[1];
+            if (lnk.checked) {
+                debugger;
+                if (txtf) { txtf.style.display = ""; }
+                if (txtoi) { txtoi.style.display = ""; }
+                //    try {
+                //        row.cells[10].getElementsByTagName("input")[0].style.display = "";
+                //        if (txtoi) { txtoi.style.display = ""; }
+                //    }
+                //    catch (err) {
+                //        row = row.parentNode;
+                //        row.cells[10].getElementsByTagName("input")[0].style.display = "";
+                //    }
+            } else {
+                if (txtf) { txtf.style.display = "none"; }
+                if (txtoi) { txtoi.style.display = "none"; }
+                //    try {
+                //        row.cells[10].getElementsByTagName("input")[0].style.display = "none";
+                //    }
+                //    catch (err) {
+                //        row = row.parentNode;
+                //        row.cells[10].getElementsByTagName("input")[0].style.display = "none";
+                //    }
+            }
+            return false;
+        }
+
+        function FechaGeneral(lnk, FechaDocumento) {
+            debugger;
+            var row = lnk.parentNode.parentNode;
+
+            var parts = FechaDocumento.split("/");
+            var F1 = new Date(parts[2], parts[1], parts[0]);
+
+
+            if (lnk.checked) {
+                try {
+                    parts = $get("TxtFechaAplicadoHeader").value.split("/");
+                    var F2 = new Date(parts[2], parts[1], parts[0]);
+
+                    if (F1 < F2) {
+                        row.cells[10].getElementsByTagName("input")[0].value = $get("TxtFechaAplicadoHeader").value;
+                    } else {
+                        row.cells[10].getElementsByTagName("input")[0].value = FechaDocumento;
+                    }
+                }
+                catch (err) {
+                    row = row.parentNode;
+                    row.cells[10].getElementsByTagName("input")[0].value = $get("TxtFechaAplicadoHeader").value;
+                }
+            }
+            return false;
+        }
+    </script>
+
+    <script type="text/javascript">
+        function OnClientShown(sender, args) {
+            sender._popupBehavior._element.style.zIndex = 10005;
+            sender._popupBehavior._element.style.position = "absolute";
+            sender._popupBehavior._element.style.top = "0px";
+            document.getElementById("C_GvDatosPanelItem").style.overflow = "initial";
+        }
+    </script>
+    <script src="/Metronic/assets/global/scripts/datatable.js"></script>
+    <script src="/Metronic/assets/global/plugins/datatables/all.min.js"></script>
+    <script type="text/javascript">
+
+        //function OrdenarGV() {
+        //    var Tam = TamañoVentana();
+        //    var Alto = Tam.height - 270;
+        //    if (Alto < 100) {
+        //        Alto = 100;
+        //    }
+        //    $('#C_GvDatos').DataTable({
+        //        scrollY: Alto + 'px',
+        //        scrollCollapse: true,
+        //        paging: false,
+        //        searching: false,
+        //        info: false
+        //    });
+        //    $('#C_GvDatos').parent().parent().children().first().css("position", "static");
+        //}
+    </script>
+</asp:Content>

Ventas/RepCotizacionesxFacturar.aspx.vb

@@ -0,0 +1,188 @@
+Option Explicit On
+Option Strict On
+
+Imports System.Data
+Imports Microsoft.Reporting.WebForms
+Imports Extensiones
+Partial Class RepCotizacionesxFacturar
+    Inherits ClsPaginas
+    Private Shared missing As Object = System.Reflection.Missing.Value
+
+#Region "PROPIEDADES"
+    Private Property FechaI As String
+        Get
+            Return ViewState("FechaI").ToString
+        End Get
+        Set(value As String)
+            ViewState("FechaI") = value
+        End Set
+    End Property
+    Private Property FechaF As String
+        Get
+            Return ViewState("FechaF").ToString
+        End Get
+        Set(value As String)
+            ViewState("FechaF") = value
+        End Set
+    End Property
+    Private Property CveCliente As Integer
+        Get
+            Return ViewState("CveCliente").ToString.ToEntero
+        End Get
+        Set(value As Integer)
+            ViewState("CveCliente") = value
+        End Set
+    End Property
+    Private Property Sucursales As String
+        Get
+            Return ViewState("Sucursales").ToString
+        End Get
+        Set(value As String)
+            ViewState("Sucursales") = value
+        End Set
+    End Property
+    Private Property DtVentas As DataTable
+        Get
+            Return DirectCast(ViewState("DtVentas"), DataTable)
+        End Get
+        Set(value As DataTable)
+            ViewState("DtVentas") = value
+        End Set
+    End Property
+
+#End Region
+    Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
+        If Not Page.IsPostBack Then
+            txtFechaI.Text = Now.Day.ToString + "/" + (Now.Month - 6).ToString + "/" + Now.Year.ToString
+            txtFechaF.Text = Now.ToShortDateString
+
+            CargaSucursales()
+            CargaCliente()
+            CargaDatos()
+            OrdenaDatos()
+
+        End If
+    End Sub
+
+#Region " C A R G A - D A T O S "
+    Public Sub CargaDatos()
+        Dim ObjVentas As New ClsVentas
+
+        FechaI = If(IsDate(txtFechaI.Text.Trim()), txtFechaI.Text.Trim(), "-1")
+        FechaF = If(IsDate(txtFechaF.Text.Trim()), txtFechaF.Text.Trim(), "-1")
+        CveCliente = If(DdlClientes.SelectedValue.ToEntero > 0, DdlClientes.SelectedValue.ToEntero, -1)
+
+        Sucursales = IIf(DdlSubProyectos.GetSelectedValuesM = "", "-1", DdlSubProyectos.GetSelectedValuesM).ToString
+
+        If ObjVentas.GetRepCotizacionesSinFacturar(FechaI, FechaF, Sucursales, CveCliente, UsuarioActual.CveEmpresa, CveUsuarioConsulta:=UsuarioActual.CveUsuario) Then
+            GvDatos.DataSource = ObjVentas.DtResultados
+            DtVentas = ObjVentas.DtResultados
+            GvDatos.DataBind()
+            UPDatos.Update()
+        End If
+
+        ObjVentas.Dispose()
+    End Sub
+#End Region
+
+#Region "O R D E N A M I E N T O"
+    Private Sub OrdenaDatos()
+        'If (GvDatos.Rows.Count > 0) Then
+        '    GvDatos.UseAccessibleHeader = True
+        '    GvDatos.HeaderRow.TableSection = TableRowSection.TableHeader
+        '    RegistraScript("OrdenarGV();")
+        'End If
+    End Sub
+#End Region
+
+#Region "G V - D A T O S "
+    Protected Sub GvDatos_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GvDatos.RowDataBound
+        If e.Row.RowType = DataControlRowType.DataRow Then
+
+            If e.Row.DBCampo("CveCliente") = "" Then
+                e.Row.CssClass = "Totales"
+            ElseIf e.Row.DBCampo("CveVenta") = "" Then
+                e.Row.CssClass = "SubTotales2"
+                e.Row.Font.Bold = True
+                e.Row.Attributes.Add("style", "background:#CCCCCC !important")
+            Else
+                e.Row.FCLiteral("LtlFolio").Text = "<a class=""Texto"" target=""_blank"" href=""/Ventas/Ventas.aspx?CveVenta=" & e.Row.DBCampo("CveVenta") & """>" & e.Row.FCLiteral("LtlFolio").Text & "</a>"
+
+                If e.Row.DBCampo("FechaVencimiento").ToDate < Now Then
+                    ' e.Row.Cells(2).CssClass = "danger"
+                    e.Row.Cells(2).ForeColor = Drawing.Color.Red
+                End If
+
+                e.Row.Cells(5).Text = e.Row.Cells(5).Text + "%"
+            End If
+
+        End If
+    End Sub
+#End Region
+
+#Region "CARGA COMBOS FILTRO"
+    Private Sub CargaCliente()
+        'CargaClientes
+        Dim EsWS = If(UsuarioActual.Empresa.Funcionalidad(105) = "1" Or UsuarioActual.Empresa.Funcionalidad(141) = "1", True, False)
+        If EsWS Then
+            DdlClientes.setEsWebService(True)
+        Else
+            DdlClientes.setEsWebService(False)
+            DdlClientes.DataSource = GlobalDTCliente(UsuarioActual.CveEmpresa, -1)
+            DdlClientes.DataBind()
+            DdlClientes.ddl.Items.Insert(0, New ListItem("Todos", "-1"))
+        End If
+
+    End Sub
+    Private Sub CargaSucursales()
+
+        DdlSubProyectos.DataSource() = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1)
+        DdlSubProyectos.DataBind()
+        'DdlSubProyectos.Items.Insert(0, New ListItem("Todos", "-1"))
+    End Sub
+#End Region
+
+#Region "PDF"
+    'Private Sub LnkPdf_Click(sender As Object, e As EventArgs) Handles LnkPdf.Click
+    '    If DtVentas IsNot Nothing Then
+    '        Dim StrFiltro As New StringBuilder
+    '        If DdlSubProyectos.GetSelectedText <> "" Then StrFiltro.AppendFormat("&emsp;<b>Sucursal</b>: {0}", DdlSubProyectos.GetSelectedText)
+    '        If DdlClientes.SelectedValue <> "-1" Then StrFiltro.AppendFormat("&emsp;<b>Cliente</b>: {0}", DdlClientes.SelectedText)
+    '        'If DdlContrato.SelectedValue <> "-1" Then StrFiltro.AppendFormat("&emsp;<b>Contrato</b>: {0}", DdlContrato.SelectedItem.Text)
+
+    '        If txtFechaI.Text <> "" Then StrFiltro.AppendFormat("&emsp;<b>Fecha Inicio </b>: {0}", txtFechaI.Text.ToDate.ToShortDateString)
+    '        If txtFechaF.Text <> "" Then StrFiltro.AppendFormat("&emsp;<b>Fecha Fin </b>: {0}", txtFechaF.Text.ToDate.ToShortDateString)
+
+    '        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)
+
+    '        Dim params As New List(Of ReportParameter)
+    '        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))
+    '        params.Add(New ReportParameter("Filtros", StrFiltro.ToString))
+    '        If Imagen.Exists Then
+    '            params.Add(New ReportParameter("LogoPath", logouri))
+    '        Else
+    '            params.Add(New ReportParameter("LogoPath", ""))
+    '        End If
+    '        ImprimirPDF("Empresas/Grales/Formatos/RepRemisiones.rdlc", DtVentas, params, String.Format("ReporteRemisiones-{0}", Now.ToDateTime.ToShortDateString))
+    '    Else
+    '        Alert("No hay datos consultados", TipoMensaje.MsgAdvertencia)
+    '    End If
+    'End Sub
+#End Region
+    Private Sub BtnConsultar_Click(sender As Object, e As EventArgs) Handles BtnConsultar.Click
+        CargaDatos()
+    End Sub
+
+    'Private Sub ImgExcel_Click(sender As Object, e As EventArgs) Handles ImgExcel.Click
+    '    GvDatos.ExportToExcel("Reporte de Remisiones por Facturar" & Now.ToShortDateString)
+    'End Sub
+End Class

Ventas/RepRemisiones.aspx.vb

@@ -125,6 +125,7 @@ Partial Class RepRemisiones
                 e.Row.Attributes.Add("style", "background:#CCCCCC !important")
             Else
                 e.Row.FCLiteral("LtlFolio").Text = "<a class=""Texto"" target=""_blank"" href=""/Ventas/RepRemisionesDetalle.aspx?CveVenta=" & e.Row.DBCampo("CveVenta") & """>" & e.Row.FCLiteral("LtlFolio").Text & "</a>"
+                e.Row.FCLiteral("LtlFecha").Text = "<a class=""Texto"" target=""_blank"" href=""/Ventas/Ventas.aspx?CveVenta=" & e.Row.DBCampo("CveVenta") & """>" & e.Row.FCLiteral("LtlFecha").Text & "</a>"
 
                 If e.Row.DBCampo("FechaVencimiento").ToDate < Now Then
                     ' e.Row.Cells(2).CssClass = "danger"

Ventas/RepRemisionesNC.aspx

@@ -0,0 +1,438 @@
+<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepRemisionesNC.aspx.vb" Inherits="RepRemisionesNC" %>
+
+<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
+</asp:Content>
+<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
+    <style>
+        .Widthall {
+            width: 100% !important;
+        }
+
+        .dataTables_scrollHeadInner {
+            width: 100% !important;
+            background-color: #dddddd;
+            padding-left: 0px !important;
+        }
+
+        .dataTables_scrollFoot {
+            display: none;
+            position: static;
+        }
+
+        .table-scrollable {
+            margin: 0px !important;
+        }
+
+        .dataTables_scroll {
+            margin-bottom: 0px;
+        }
+
+        .table.dataTable {
+            margin-top: 0px !important;
+        }
+
+        .dataTables_scrollBody table th {
+            padding: 0px !important;
+            padding-right: 4px !important;
+            padding-left: 4px !important;
+        }
+
+        .sinlink td a {
+            pointer-events: none;
+            cursor: default;
+            color: black;
+            font-size: small;
+        }
+
+        .white a {
+            color: white !important;
+        }
+
+        .select2 .select2-selection__rendered {
+            line-height: 1;
+            color: #111;
+        }
+
+        .select2 .select2-selection--multiple {
+            box-sizing: border-box;
+            cursor: pointer;
+            display: block;
+            min-height: 20px;
+            user-select: none;
+            -webkit-user-select: none;
+        }
+
+        .select2-container--default .select2-selection--multiple .select2-selection__choice {
+            margin-top: 10px;
+        }
+
+        .select2-selection__rendered {
+            margin-top: 0px;
+            height: 25px;
+        }
+
+        .select2-selection {
+            margin-top: 0px;
+            height: 31px;
+        }
+
+        .select2-container--default.select2-container--focus .select2-selection--multiple {
+            border: none;
+            outline: 0;
+        }
+    </style>
+</asp:Content>
+<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
+    <%--    <li>
+        <asp:LinkButton ID="LnkPdf" runat="server"> <i class="fa fa-file-pdf-o" style="font-weight:bold;"></i> PDF</asp:LinkButton>
+    </li>
+    <li>
+        <asp:LinkButton ID="ImgExcel" runat="server"><i class="fa fa-file-excel-o" style="font-weight:bold;"></i> Excel</asp:LinkButton>
+    </li>--%>
+</asp:Content>
+<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
+    <asp:Label ID="LblTitulo" runat="server" Text="Reporte de Remisiones de NC Sin Aplicar"></asp:Label>
+</asp:Content>
+<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
+</asp:Content>
+
+<asp:Content ID="Content8" ContentPlaceHolderID="HA" runat="Server">
+
+    <%-- <asp:UpdatePanel ID="UpdatePanel1" runat="server" RenderMode="Inline" UpdateMode="Conditional">
+        <ContentTemplate> 
+            <div class="btn-group pull-right btn-separete">
+                        
+            </div>
+        </ContentTemplate>
+    </asp:UpdatePanel>--%>
+</asp:Content>
+
+<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server" defaultbutton="BtnConsultar">
+    <asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+            <div class="portlet solid grey-cascade portlet-filter" style="">
+                <div class="portlet-title portlet-filterT smalltitle" style="min-height: 49px; position: relative;">
+                    <div class="tools">
+                        <asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" />
+                        <a href="javascript:;" data-idchekbox="<%= chkexpand.ClientID%>" class=" <%= IIf(chkexpand.Checked = True, "collapse", "expand")%>"></a>
+                        <asp:CheckBox ID="chkexpand" CssClass="hidden" runat="server" />
+                    </div>
+                    <div class="portlet-body">
+                        <div class="row">
+
+
+                            <label class="col-md-1 truncate">F.I.:</label>
+                            <div class="col-md-2">
+                                <div class="input-group input-sm input-small date date-picker" data-date-format="dd/mm/yyyy" style="width: 140px !important; padding: 0px; margin-top:10px;">
+                                    <asp:TextBox 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>
+                                    <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>
+                            <label class="col-md-1 truncate">F.F.:</label>
+                            <div class="col-md-2">
+                                <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 140px !important; padding: 0px; margin-top:10px;">
+                                    <asp:TextBox 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>
+                                    <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>
+
+                            <label class="col-md-1">Sucursal: </label>
+                            <div class="col-md-2" style="margin-top:5px;">
+                                <asp:ListBox ID="DdlSubProyectos" SelectionMode="Multiple" data-text="Todas" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" CssClass="ddlFiltros input-sm select2me Widthall" Style="width: 100%;" runat="server"></asp:ListBox>
+                                <%--<asp:DropDownList CssClass="table-group-action-input form-control input-inline input-small input-sm select2me" ID="DdlSubProyectos" DataTextField="SubProyecto" DataValueField="CveSubProyecto" runat="server"></asp:DropDownList>--%>
+                            </div>
+
+
+                        </div>
+                    </div>
+                </div>
+
+                <div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style=""display:none;""")%>>
+                    <div class="row">
+
+
+                        <label class="col-md-1">Cliente: </label>
+                        <div class="col-md-2">
+                            <ADS:Dropdownlost CssClassDdl="select2me" ID="DdlClientes" Width="100%" data-metodo="getcliente" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%;" selectedindexchange="DdlClientes_SelectedIndexChanged"></ADS:Dropdownlost>
+                        </div>
+
+
+                        <%--                        <label class="col-md-1 ">F. Venc. al:</label>
+                        <div class="col-md-2">
+                            <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 140px !important; padding: 0px;">
+                                <asp:TextBox ID="TxtFechaVencimiento" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10"></asp:TextBox>
+                                <span class="input-group-btn ">
+                                    <asp:LinkButton ID="imgCalendarioV" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
+                                </span>
+                                <ajax:MaskedEditExtender ID="MaskedEditExtender1" runat="server" TargetControlID="TxtFechaVencimiento" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
+                                <ajax:CalendarExtender runat="server" ID="CalendarExtender1" TargetControlID="TxtFechaVencimiento" PopupButtonID="imgCalendarioV" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
+                                <asp:RequiredFieldValidator ID="RFVFechaVencimiento" runat="server" ControlToValidate="TxtFechaVencimiento" Display="None" ErrorMessage="El campo <b>''Fecha Vencimiento''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
+                                <asp:CompareValidator ID="CVOFechaVencimiento" runat="server" ControlToValidate="TxtFechaVencimiento" Display="None" ErrorMessage="El campo <b>''Fecha Vencimiento''</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="ValidatorCalloutExtender1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaVencimiento" Width="350px"></ajax:ValidatorCalloutExtender>
+                                <ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender2" runat="server" HighlightCssClass="vco" TargetControlID="CVOFechaVencimiento" Width="350px"></ajax:ValidatorCalloutExtender>
+                            </div>
+                        </div>
+
+                        <label class="col-md-1 ">Vendedor:</label>
+                        <div class="col-md-2">
+                            <asp:ListBox ID="DdlVendedor" SelectionMode="Multiple" data-text="Todos" AppendDataBoundItems="true" DataTextField="Vendedor" DataValueField="CveVendedor" CssClass="ddlFiltros input-sm select2me Widthall" Style="width: 100%;" runat="server"></asp:ListBox>
+                        </div>--%>
+                    </div>
+                </div>
+            </div>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+    <br />
+    <div class="row">
+        <div align="right">
+            <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="display: inline-block; width: 150px;" />
+            <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
+        </div>
+    </div>
+    <asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional">
+        <ContentTemplate>
+            <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontró ningun corte" DataKeyNames="CveVenta"
+                ToolTip="Remisiones sin Facturar"
+                CssClass="table table-striped table-advance table-hover Widthall ScrollAD"
+                data-sort="true" Style="text-align: center;" GridLines="None">
+                <Columns>
+                    <asp:TemplateField>
+                        <HeaderTemplate>
+                            <asp:Label Text="Folio" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlFolio" runat="server" Text='<%# Eval("Folio") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField>
+                        <HeaderTemplate>
+                            <asp:Label Text="Fecha" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlFecha" runat="server" Text='<%# Eval("Fecha", "{0:d}") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField>
+                        <HeaderTemplate>
+                            <asp:Label Text="Fecha Vencimiento" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlFechaVencimiento" runat="server" Text='<%# Eval("FechaVencimiento", "{0:d}") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField ItemStyle-HorizontalAlign="Left">
+                        <HeaderTemplate>
+                            <asp:Label Text="Cliente" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlCliente" runat="server" Text='<%# Eval("Cliente") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField>
+                        <HeaderTemplate>
+                            <asp:Label Text="Contrato" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlContrato" runat="server" Text='<%# Eval("TieneContrato") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+<%--                    <asp:BoundField DataField="PorcentajeAvance" HeaderText="Facturado" DataFormatString="{0:F}" HtmlEncode="false" />--%>
+                    <%-- <asp:TemplateField>
+                        <HeaderTemplate>
+                            <asp:Label Text="Facturado" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlAvance"   runat="server" Text='<%# String.Concat(Eval("PorcentajeAvance"), "%") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>--%>
+                    <asp:TemplateField ItemStyle-HorizontalAlign="Right">
+                        <HeaderTemplate>
+                            <asp:Label Text="SubTotal" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlSubTotal" runat="server" Text='<%# Eval("SubTotal", "{0:N2}") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField ItemStyle-HorizontalAlign="Right">
+                        <HeaderTemplate>
+                            <asp:Label Text="IVA" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlIVA" runat="server" Text='<%# Eval("IVA", "{0:N2}") %>'></asp:Literal>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                    <asp:TemplateField ItemStyle-HorizontalAlign="Right">
+                        <HeaderTemplate>
+                            <asp:Label Text="Total" runat="server" CausesValidation="false"> </asp:Label>
+                        </HeaderTemplate>
+                        <ItemTemplate>
+                            <asp:Literal ID="LtlTotal" runat="server" Text='<%# Eval("Total", "{0:N2}") & " " & Eval("Abreviatura").ToString %>'></asp:Literal>
+                            <%--<asp:Literal ID="LtlMon" runat="server" Text='<%# Eval("Abreviatura") %>'></asp:Literal>--%>
+                        </ItemTemplate>
+                    </asp:TemplateField>
+                </Columns>
+                <HeaderStyle CssClass="Titulos" />
+                <RowStyle CssClass="Texto" />
+                <AlternatingRowStyle CssClass="TextoAlterno" />
+            </asp:GridView>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+
+    <asp:UpdatePanel runat="server" ID="UPPersonalizar" UpdateMode="Conditional">
+        <ContentTemplate>
+            <div id="DivPersonalizar" class="modal fade" role="dialog">
+                <div class="modal-dialog">
+
+                    <!-- Modal content-->
+                    <div class="modal-content">
+                        <div class="modal-header">
+                            <button type="button" class="close" data-dismiss="modal">&times;</button>
+                            <h4 class="modal-title">
+                                <asp:Label ID="Label1" runat="server" ClientIDMode="Static" Text="Personalizar Columnas"></asp:Label></h4>
+                        </div>
+                        <div class="modal-body">
+                            <table class="table table-striped table-advance table-hover Widthall">
+                                <tbody>
+                                    <tr>
+                                        <td style="text-align: left;">
+                                            <asp:CheckBox ID="ChkUsuarioCancelacion" runat="server" Text="Usuario Cancelación" /></td>
+                                    </tr>
+                                    <tr>
+                                        <td style="text-align: left;">
+                                            <asp:CheckBox ID="ChkTipo" runat="server" Text="Cargo/Abono" /></td>
+                                    </tr>
+
+                                </tbody>
+                            </table>
+                        </div>
+                        <div class="modal-footer">
+                            <asp:Button ID="BtnPersonalizar" runat="server" Text="Personalizar" class="btn btn-success" />
+                            <button type="button" class="btn btn-default" data-dismiss="modal">Cancelar</button>
+                        </div>
+                    </div>
+
+                </div>
+            </div>
+        </ContentTemplate>
+    </asp:UpdatePanel>
+</asp:Content>
+<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
+    <%--<script type="text/javascript">
+
+        function Scroll() {
+            $(document).ready(function () {
+                var Tam = TamañoVentana();
+                var Alto = Tam.height - 300;
+                $('#<%=GvDatos.ClientID%>').gridviewScroll({
+                    width: 995,
+                    height: Alto
+                });
+            });
+        }
+    </script>--%>
+
+    <script type="text/javascript">
+        function GetSelectedRow(lnk, txtf, txtoi) {
+
+
+            //var row = lnk.parentNode.parentNode;
+            //var txtoi = row.cells[10].getElementsByTagName("input")[1];
+            if (lnk.checked) {
+                debugger;
+                if (txtf) { txtf.style.display = ""; }
+                if (txtoi) { txtoi.style.display = ""; }
+                //    try {
+                //        row.cells[10].getElementsByTagName("input")[0].style.display = "";
+                //        if (txtoi) { txtoi.style.display = ""; }
+                //    }
+                //    catch (err) {
+                //        row = row.parentNode;
+                //        row.cells[10].getElementsByTagName("input")[0].style.display = "";
+                //    }
+            } else {
+                if (txtf) { txtf.style.display = "none"; }
+                if (txtoi) { txtoi.style.display = "none"; }
+                //    try {
+                //        row.cells[10].getElementsByTagName("input")[0].style.display = "none";
+                //    }
+                //    catch (err) {
+                //        row = row.parentNode;
+                //        row.cells[10].getElementsByTagName("input")[0].style.display = "none";
+                //    }
+            }
+            return false;
+        }
+
+        function FechaGeneral(lnk, FechaDocumento) {
+            debugger;
+            var row = lnk.parentNode.parentNode;
+
+            var parts = FechaDocumento.split("/");
+            var F1 = new Date(parts[2], parts[1], parts[0]);
+
+
+            if (lnk.checked) {
+                try {
+                    parts = $get("TxtFechaAplicadoHeader").value.split("/");
+                    var F2 = new Date(parts[2], parts[1], parts[0]);
+
+                    if (F1 < F2) {
+                        row.cells[10].getElementsByTagName("input")[0].value = $get("TxtFechaAplicadoHeader").value;
+                    } else {
+                        row.cells[10].getElementsByTagName("input")[0].value = FechaDocumento;
+                    }
+                }
+                catch (err) {
+                    row = row.parentNode;
+                    row.cells[10].getElementsByTagName("input")[0].value = $get("TxtFechaAplicadoHeader").value;
+                }
+            }
+            return false;
+        }
+    </script>
+
+    <script type="text/javascript">
+        function OnClientShown(sender, args) {
+            sender._popupBehavior._element.style.zIndex = 10005;
+            sender._popupBehavior._element.style.position = "absolute";
+            sender._popupBehavior._element.style.top = "0px";
+            document.getElementById("C_GvDatosPanelItem").style.overflow = "initial";
+        }
+    </script>
+    <script src="/Metronic/assets/global/scripts/datatable.js"></script>
+    <script src="/Metronic/assets/global/plugins/datatables/all.min.js"></script>
+    <script type="text/javascript">
+
+        //function OrdenarGV() {
+        //    var Tam = TamañoVentana();
+        //    var Alto = Tam.height - 270;
+        //    if (Alto < 100) {
+        //        Alto = 100;
+        //    }
+        //    $('#C_GvDatos').DataTable({
+        //        scrollY: Alto + 'px',
+        //        scrollCollapse: true,
+        //        paging: false,
+        //        searching: false,
+        //        info: false
+        //    });
+        //    $('#C_GvDatos').parent().parent().children().first().css("position", "static");
+        //}
+    </script>
+</asp:Content>

Ventas/RepRemisionesNC.aspx.vb

@@ -0,0 +1,188 @@
+Option Explicit On
+Option Strict On
+
+Imports System.Data
+Imports Microsoft.Reporting.WebForms
+Imports Extensiones
+Partial Class RepRemisionesNC
+    Inherits ClsPaginas
+    Private Shared missing As Object = System.Reflection.Missing.Value
+
+#Region "PROPIEDADES"
+    Private Property FechaI As String
+        Get
+            Return ViewState("FechaI").ToString
+        End Get
+        Set(value As String)
+            ViewState("FechaI") = value
+        End Set
+    End Property
+    Private Property FechaF As String
+        Get
+            Return ViewState("FechaF").ToString
+        End Get
+        Set(value As String)
+            ViewState("FechaF") = value
+        End Set
+    End Property
+    Private Property CveCliente As Integer
+        Get
+            Return ViewState("CveCliente").ToString.ToEntero
+        End Get
+        Set(value As Integer)
+            ViewState("CveCliente") = value
+        End Set
+    End Property
+    Private Property Sucursales As String
+        Get
+            Return ViewState("Sucursales").ToString
+        End Get
+        Set(value As String)
+            ViewState("Sucursales") = value
+        End Set
+    End Property
+    Private Property DtVentas As DataTable
+        Get
+            Return DirectCast(ViewState("DtVentas"), DataTable)
+        End Get
+        Set(value As DataTable)
+            ViewState("DtVentas") = value
+        End Set
+    End Property
+
+#End Region
+    Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
+        If Not Page.IsPostBack Then
+            txtFechaI.Text = Now.Day.ToString + "/" + (Now.Month - 6).ToString + "/" + Now.Year.ToString
+            txtFechaF.Text = Now.ToShortDateString
+
+            CargaSucursales()
+            CargaCliente()
+            CargaDatos()
+            OrdenaDatos()
+
+        End If
+    End Sub
+
+#Region " C A R G A - D A T O S "
+    Public Sub CargaDatos()
+        Dim ObjVentas As New ClsVentas
+
+        FechaI = If(IsDate(txtFechaI.Text.Trim()), txtFechaI.Text.Trim(), "-1")
+        FechaF = If(IsDate(txtFechaF.Text.Trim()), txtFechaF.Text.Trim(), "-1")
+        CveCliente = If(DdlClientes.SelectedValue.ToEntero > 0, DdlClientes.SelectedValue.ToEntero, -1)
+
+        Sucursales = IIf(DdlSubProyectos.GetSelectedValuesM = "", "-1", DdlSubProyectos.GetSelectedValuesM).ToString
+
+        If ObjVentas.GetRepRemisionesNCSinFacturar(FechaI, FechaF, Sucursales, CveCliente, UsuarioActual.CveEmpresa, CveUsuarioConsulta:=UsuarioActual.CveUsuario) Then
+            GvDatos.DataSource = ObjVentas.DtResultados
+            DtVentas = ObjVentas.DtResultados
+            GvDatos.DataBind()
+            UPDatos.Update()
+        End If
+
+        ObjVentas.Dispose()
+    End Sub
+#End Region
+
+#Region "O R D E N A M I E N T O"
+    Private Sub OrdenaDatos()
+        'If (GvDatos.Rows.Count > 0) Then
+        '    GvDatos.UseAccessibleHeader = True
+        '    GvDatos.HeaderRow.TableSection = TableRowSection.TableHeader
+        '    RegistraScript("OrdenarGV();")
+        'End If
+    End Sub
+#End Region
+
+#Region "G V - D A T O S "
+    Protected Sub GvDatos_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GvDatos.RowDataBound
+        If e.Row.RowType = DataControlRowType.DataRow Then
+
+            If e.Row.DBCampo("CveCliente") = "" Then
+                e.Row.CssClass = "Totales"
+            ElseIf e.Row.DBCampo("CveVenta") = "" Then
+                e.Row.CssClass = "SubTotales2"
+                e.Row.Font.Bold = True
+                e.Row.Attributes.Add("style", "background:#CCCCCC !important")
+            Else
+                e.Row.FCLiteral("LtlFolio").Text = "<a class=""Texto"" target=""_blank"" href=""/Ventas/Ventas.aspx?CveVenta=" & e.Row.DBCampo("CveVenta") & """>" & e.Row.FCLiteral("LtlFolio").Text & "</a>"
+
+                If e.Row.DBCampo("FechaVencimiento").ToDate < Now Then
+                    ' e.Row.Cells(2).CssClass = "danger"
+                    e.Row.Cells(2).ForeColor = Drawing.Color.Red
+                End If
+
+                'e.Row.Cells(5).Text = e.Row.Cells(5).Text + "%"
+            End If
+
+        End If
+    End Sub
+#End Region
+
+#Region "CARGA COMBOS FILTRO"
+    Private Sub CargaCliente()
+        'CargaClientes
+        Dim EsWS = If(UsuarioActual.Empresa.Funcionalidad(105) = "1" Or UsuarioActual.Empresa.Funcionalidad(141) = "1", True, False)
+        If EsWS Then
+            DdlClientes.setEsWebService(True)
+        Else
+            DdlClientes.setEsWebService(False)
+            DdlClientes.DataSource = GlobalDTCliente(UsuarioActual.CveEmpresa, -1)
+            DdlClientes.DataBind()
+            DdlClientes.ddl.Items.Insert(0, New ListItem("Todos", "-1"))
+        End If
+
+    End Sub
+    Private Sub CargaSucursales()
+
+        DdlSubProyectos.DataSource() = GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1)
+        DdlSubProyectos.DataBind()
+        'DdlSubProyectos.Items.Insert(0, New ListItem("Todos", "-1"))
+    End Sub
+#End Region
+
+#Region "PDF"
+    'Private Sub LnkPdf_Click(sender As Object, e As EventArgs) Handles LnkPdf.Click
+    '    If DtVentas IsNot Nothing Then
+    '        Dim StrFiltro As New StringBuilder
+    '        If DdlSubProyectos.GetSelectedText <> "" Then StrFiltro.AppendFormat("&emsp;<b>Sucursal</b>: {0}", DdlSubProyectos.GetSelectedText)
+    '        If DdlClientes.SelectedValue <> "-1" Then StrFiltro.AppendFormat("&emsp;<b>Cliente</b>: {0}", DdlClientes.SelectedText)
+    '        'If DdlContrato.SelectedValue <> "-1" Then StrFiltro.AppendFormat("&emsp;<b>Contrato</b>: {0}", DdlContrato.SelectedItem.Text)
+
+    '        If txtFechaI.Text <> "" Then StrFiltro.AppendFormat("&emsp;<b>Fecha Inicio </b>: {0}", txtFechaI.Text.ToDate.ToShortDateString)
+    '        If txtFechaF.Text <> "" Then StrFiltro.AppendFormat("&emsp;<b>Fecha Fin </b>: {0}", txtFechaF.Text.ToDate.ToShortDateString)
+
+    '        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)
+
+    '        Dim params As New List(Of ReportParameter)
+    '        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))
+    '        params.Add(New ReportParameter("Filtros", StrFiltro.ToString))
+    '        If Imagen.Exists Then
+    '            params.Add(New ReportParameter("LogoPath", logouri))
+    '        Else
+    '            params.Add(New ReportParameter("LogoPath", ""))
+    '        End If
+    '        ImprimirPDF("Empresas/Grales/Formatos/RepRemisiones.rdlc", DtVentas, params, String.Format("ReporteRemisiones-{0}", Now.ToDateTime.ToShortDateString))
+    '    Else
+    '        Alert("No hay datos consultados", TipoMensaje.MsgAdvertencia)
+    '    End If
+    'End Sub
+#End Region
+    Private Sub BtnConsultar_Click(sender As Object, e As EventArgs) Handles BtnConsultar.Click
+        CargaDatos()
+    End Sub
+
+    'Private Sub ImgExcel_Click(sender As Object, e As EventArgs) Handles ImgExcel.Click
+    '    GvDatos.ExportToExcel("Reporte de Remisiones por Facturar" & Now.ToShortDateString)
+    'End Sub
+End Class