c

App_Code/ClsContabilidad.vb

@@ -4062,6 +4062,29 @@ Public Class ClsContabilidad
         Dim Retorno As Boolean = False
 
         DataAdapter("PA_Sis_InconsistenciasGet")
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error al obtener inconsistencias.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        End Try
+
+        Return Retorno
+    End Function
+
+
+    Public Function GetPolizasDescuadre(Optional Ejercicio As Integer = -1, Optional Periodo As Integer = -1, Optional CveEmpresa As Integer = -1) As Boolean
+        Dim Retorno As Boolean = False
+
+        DataAdapter("PA_Sis_PolizasConDescuadreGet")
+
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@Ejercicio", SqlDbType.Int).Value = Ejercicio
+            .Add("@Periodo", SqlDbType.Int).Value = Periodo
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+        End With
+
 
         Try
             SqlAdapter.Fill(Data)
@@ -6685,6 +6708,53 @@ Public Class ClsContabilidad
     End Function
 
 
+
+
+    Public Function GetLibroMayorSIG(CveCuentaPadre As Integer, FechaInicio As Date, FechaFin As Date, CveMoneda As Integer, CveEmpresa As Integer) As Boolean
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_LibroMayorSIGGet")
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveCuentaPadre ", SqlDbType.Int).Value = CveCuentaPadre
+            .Add("@FechaI", SqlDbType.Date).Value = FechaInicio
+            .Add("@FechaF", SqlDbType.Date).Value = FechaFin
+            .Add("@CveMoneda", SqlDbType.Int).Value = CveMoneda
+            .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 Libro Mayor.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+
+        Return Retorno
+    End Function
+
+
+    Public Function GetLibroDiarioSIG(FechaInicio As Date, FechaFin As Date, CveEmpresa As Integer) As Boolean
+
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_LibroDiarioSIGGet")
+
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@FechaI", SqlDbType.Date).Value = FechaInicio
+            .Add("@FechaF", SqlDbType.Date).Value = FechaFin
+            .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 Libro Diario.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+
+        Return Retorno
+    End Function
+
+
 #Region "IDisposable Support"
     ' IDisposable
     Protected Overridable Sub Dispose(disposing As Boolean)

App_Code/ClsInventarios.vb

@@ -5176,7 +5176,7 @@ Public Class ClsInventarios
 
 #Region "INVENTARIOS - REPORTE DE MOVIMIENTOS DE PROVEEDOR"
 
-    Public Function GetRepMovimientosProveedor(CveEmpresa As Integer, CveConcepto As Integer, CveProveedor As Integer, FechaI As Date, FechaF As Date) As Boolean
+    Public Function GetRepMovimientosProveedor(CveEmpresa As Integer, CveConcepto As Integer, CveProveedor As Integer, CvePS As Integer, CveAlmacenOrigen As Integer, CveAlmacenDestino As Integer, FechaI As Date, FechaF As Date) As Boolean
         Dim Retorno As Boolean = False
         DataAdapter("PA_Inv_ProductosProveedor")
 
@@ -5184,6 +5184,9 @@ Public Class ClsInventarios
             .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
             .Add("@CveConcepto", SqlDbType.Int).Value = CveConcepto
             .Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor
+            .Add("@CvePS", SqlDbType.Int).Value = CvePS
+            .Add("@CveAlmacenOrigen", SqlDbType.Int).Value = CveAlmacenOrigen
+            .Add("@CveAlmacenDestino", SqlDbType.Int).Value = CveAlmacenDestino
             .Add("@FechaI", SqlDbType.Date).Value = FechaI
             .Add("@FechaF", SqlDbType.Date).Value = FechaF
         End With

App_Code/ClsPV.vb

@@ -152,53 +152,53 @@ Public Class ClsPV
     End Function
 
     'Reporte de Compras
-    Public Function GetRepPVCompras(FechaI As String, FechaF As String, CveProveedor As Integer, CveUsuario As Integer, CveMoneda As Integer, CveEmpresa As Integer, Gpo As Integer) As Boolean
+    'Public Function GetRepPVCompras(FechaI As String, FechaF As String, CveProveedor As Integer, CveUsuario As Integer, CveMoneda As Integer, CveEmpresa As Integer, Gpo As Integer) As Boolean
-        Dim Retorno As Boolean = False
+    '    Dim Retorno As Boolean = False
-        DataAdapter("PA_PV_ComprasGetRep")
+    '    DataAdapter("PA_PV_ComprasGetRep")
 
-        With SqlAdapter.SelectCommand.Parameters
+    '    With SqlAdapter.SelectCommand.Parameters
-            .Add("@FechaI", SqlDbType.VarChar).Value = FechaI
+    '        .Add("@FechaI", SqlDbType.VarChar).Value = FechaI
-            .Add("@FechaF", SqlDbType.VarChar).Value = FechaF
+    '        .Add("@FechaF", SqlDbType.VarChar).Value = FechaF
-            .Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor
+    '        .Add("@CveProveedor", SqlDbType.Int).Value = CveProveedor
-            .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
+    '        .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
-            .Add("@CveMoneda", SqlDbType.Int).Value = CveMoneda
+    '        .Add("@CveMoneda", SqlDbType.Int).Value = CveMoneda
-            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+    '        .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
-            .Add("@GPO", SqlDbType.Int).Value = Gpo
+    '        .Add("@GPO", SqlDbType.Int).Value = Gpo
-        End With
+    '    End With
 
-        Try
+    '    Try
-            SqlAdapter.Fill(Data)
+    '        SqlAdapter.Fill(Data)
-            Retorno = True
+    '        Retorno = True
-        Catch ex As Exception
+    '    Catch ex As Exception
-            OnError("Ocurrió un error al obtener el Reporte de Compra.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+    '        OnError("Ocurrió un error al obtener el Reporte de Compra.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
-        End Try
+    '    End Try
 
-        Return Retorno
+    '    Return Retorno
-    End Function
+    'End Function
 
     'Reporte de Ventas VS Compras
-    Public Function GetRepPVVentasCompras(FechaI As String, FechaF As String, CveSubProyecto As Integer, CveEmpresa As Integer, Gpo As Integer) As Boolean
+    'Public Function GetRepPVVentasCompras(FechaI As String, FechaF As String, CveSubProyecto As Integer, CveEmpresa As Integer, Gpo As Integer) As Boolean
-        Dim Retorno As Boolean = False
+    '    Dim Retorno As Boolean = False
-        DataAdapter("PA_PV_VentasComprasGetRep")
+    '    DataAdapter("PA_PV_VentasComprasGetRep")
 
-        With SqlAdapter.SelectCommand.Parameters
+    '    With SqlAdapter.SelectCommand.Parameters
-            '.Add("@CveVenta", SqlDbType.Int).Value = CveVenta
+    '        '.Add("@CveVenta", SqlDbType.Int).Value = CveVenta
-            .Add("@FechaI", SqlDbType.VarChar).Value = FechaI
+    '        .Add("@FechaI", SqlDbType.VarChar).Value = FechaI
-            .Add("@FechaF", SqlDbType.VarChar).Value = FechaF
+    '        .Add("@FechaF", SqlDbType.VarChar).Value = FechaF
-            .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
+    '        .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
-            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+    '        .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
-            .Add("@GPO", SqlDbType.Int).Value = Gpo
+    '        .Add("@GPO", SqlDbType.Int).Value = Gpo
-        End With
+    '    End With
 
-        Try
+    '    Try
-            SqlAdapter.Fill(Data)
+    '        SqlAdapter.Fill(Data)
-            Retorno = True
+    '        Retorno = True
-        Catch ex As Exception
+    '    Catch ex As Exception
-            OnError("Ocurrió un error al obtener el Reporte de Ventas y Compras.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+    '        OnError("Ocurrió un error al obtener el Reporte de Ventas y Compras.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
-        End Try
+    '    End Try
 
-        Return Retorno
+    '    Return Retorno
-    End Function
+    'End Function
 
 #Region "IDisposable Support"
 

App_Code/ClsPaginas.vb

@@ -5538,9 +5538,9 @@ Public Class ClsPaginas
             PaginaDict.Add("/Proveedores/LogInProveedores.aspx".ToUpper(), -1)
 
             'Punto de Venta
-            PaginaDict.Add("/PV/PVRepVentas.aspx".ToUpper(), 270)
+            'PaginaDict.Add("/PV/PVRepVentas.aspx".ToUpper(), 270)
-            PaginaDict.Add("/PV/PVRepCompras.aspx".ToUpper(), 272)
+            'PaginaDict.Add("/PV/PVRepCompras.aspx".ToUpper(), 272)
-            PaginaDict.Add("/PV/PVRepVentasCompras.aspx".ToUpper(), 273)
+            'PaginaDict.Add("/PV/PVRepVentasCompras.aspx".ToUpper(), 273)
 
             PaginaDict.Add("/Contratos/ContratoObra.aspx".ToUpper(), 911)
             PaginaDict.Add("/Contratos/RepContratosObraAvances.aspx".ToUpper(), 914)
@@ -5999,7 +5999,7 @@ Public Class ClsPaginas
         Dim bdir As String = If(RutaReporte.Contains("Empresas"), ModExtensiones.DirectorioBaseEmpresas, AppDomain.CurrentDomain.BaseDirectory)
 
         'TOMAR LA RUTA BASE PARA EL DIRECTORIO DE LA EMPRESA
-        If Not String.IsNullOrEmpty(RutaEmpresa) AndAlso Not RutaReporte.Contains("Grales") AndAlso Not RutaReporte.Contains("Contabilidad/Reportes/") Then
+        If Not String.IsNullOrEmpty(RutaEmpresa) AndAlso Not RutaReporte.Contains("Grales") AndAlso Not RutaReporte.Contains("Contabilidad/Reportes/") AndAlso Not RutaReporte.Contains("AC/Reportes/") Then
             bdir = RutaEmpresa.Replace($"{CveEmpresa}/", "")
         End If
 

App_Code/Modelos.vb

@@ -5215,15 +5215,18 @@ Namespace Modelos
                                         Dim CveMovimientoDevolucion As Integer = 0
                                         Dim Folio As Integer = 0
 
+                                        Dim CveMovimientoSalida As Integer = -1
+
                                         Select Case RowMovimiento("CveConcepto").ToString().ToEntero()
                                             Case 3
                                                 CveConceptoMovimiento = 18 'DEVOLUCION DEL CLIENTE
                                                 CveAlmacenMovimiento = RowMovimiento("CveAlmacen").ToString().ToEntero()
+                                                CveMovimientoSalida = RowMovimiento("CveMovimiento").ToString().ToEntero()
                                             Case 40
                                                 CveConceptoMovimiento = 41 'DEVOLUCIÓN DEL CLIENTE DIRECTA
                                                 CveAlmacenMovimiento = RowMovimiento("CveAlmacen").ToString().ToEntero()
                                             Case 18
-                                                CveConceptoMovimiento = 3 'DEVOLUCIÓN DEL CLIENTE DIRECTA
+                                                CveConceptoMovimiento = 3 'SALIDA DE ALMACEN
                                                 CveAlmacenMovimiento = RowMovimiento("CveAlmacen").ToString().ToEntero()
                                                 ''SI TIENE REMISIONES RELACIONADAS
                                                 'If DtRemisionesFacturadas.Rows.Count > 0 Then
@@ -5248,7 +5251,7 @@ Namespace Modelos
                                         'SI TIENE SALDO PENDIENTE POR DEVOLVER GENERA UN MOVIMIENTO DE DEVOLUCION
                                         If ObjFactura.SaldoAlmacen <> 0 Then
                                             'SALIDA DE ALMACEN - SALIDA POR TRASPASO CUANDO ES REMISION - DEVOLUCION (SI ES TRASPASO Y TIENE CONTRATO NO HACE DEVOLUCIóN)
-                                            CveMovimientoDevolucion = ObjInventario.AddMovimiento(CveAlmacenMovimiento, CveConceptoMovimiento, 1, Now, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, CveVenta, -1, -1, Observaciones:="", Guia:="", CveContrato:=CveContrato, CveAlmacenDestino:=-1, Modulo:="Mod/CV1")
+                                            CveMovimientoDevolucion = ObjInventario.AddMovimiento(CveAlmacenMovimiento, CveConceptoMovimiento, 1, Now, -1, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1, CveVenta, -1, -1, Observaciones:="", Guia:="", CveContrato:=CveContrato, CveAlmacenDestino:=-1, CveMovimientoRelacionado:=CveMovimientoSalida, Modulo:="Mod/CV1")
                                             Folio = ObjInventario.Folio
 
                                             If CveMovimientoDevolucion > 0 Then

App_Code/Timbrado.vb

@@ -3479,9 +3479,17 @@ Public Class Timbrado
 
                         Try
                             Dim RutaCBB As String = $"{UsuarioActual.Empresa.Ruta}CBB\{ObjCFDITimbre.Comprobante.SerieFolio}.jpg"
-                            Dim CBB As New ClbNegBICFDv3_2.ClsNegCBBGenerar()
+                            'Dim CBB As New ClbNegBICFDv3_2.ClsNegCBBGenerar()
-                            CBB.GenerarCBB(UsuarioActual.Empresa.RFC, ObjCFDITimbre.Receptor.RFC, ObjCFDITimbre.Comprobante.Total, FolioFiscal, RutaCBB)
+                            'CBB.GenerarCBB(UsuarioActual.Empresa.RFC, ObjCFDITimbre.Receptor.RFC, ObjCFDITimbre.Comprobante.Total, FolioFiscal, RutaCBB)
-                            CBB = Nothing
+                            'CBB = Nothing
+
+                            Dim qrCode As New GoFac.QrCode()
+                            'String cadenaqrCode = qrCode.GenerarCadenaQrCode(txtXml.Text) 
+
+                            Dim bCBB As Byte() = qrCode.GenerarQrCode($"{LigaVerificacionSAT}?re={UsuarioActual.Empresa.RFC}&rr={ObjCFDITimbre.Receptor.RFC}&tt={String.Format("{0,12:F6}", ObjCFDITimbre.Comprobante.Total).Trim()}&id={FolioFiscal}&fe=ELleDg==")
+                            File.WriteAllBytes(RutaCBB, bCBB)
+                            bCBB = Nothing
+
                         Catch ex As Exception
                             OnError("Ocurrió un error al generar el QR", ex)
                         End Try

Bancos/CuentasBancariasDetalle.aspx.vb

@@ -106,7 +106,7 @@ Partial Class Bancos_CuentasBancariasDetalle
                     DDlCuentaContable.DataSource = ObjContabilidad.DtResultados
                     DDlCuentaContable.DataBind()
                     DDlCuentaContable.Items.Insert(0, New ListItem("Selecione", "-1"))
-                    DDlCuentaContable.DataTextField = "Cuenta"
+                    DDlCuentaContable.DataTextField = "CtaCodigo"
                     DDlCuentaContable.DataValueField = "CveCuenta"
                 End If
             End Using

Bancos/PrestamoPersonal.aspx.cs

@@ -106,15 +106,15 @@ public partial class Bancos_PrestamoPersonal : ClsPaginas
             txtFechaF.Text = DateTime.Now.ToShortDateString();
             TxtImporte.Attributes.Add("disabled", "disabled");
 
-            if (UsuarioActual.Empresa.Funcionalidad(281).ToEntero() == 1)
+            //if (UsuarioActual.Empresa.Funcionalidad(281).ToEntero() == 1)
-            {
+            //{
-                TxtFechaPrestamo.Enabled = false;
+            //    TxtFechaPrestamo.Enabled = false;
-                ImgCalendarioPrestamo.Visible = false;
+            //    ImgCalendarioPrestamo.Visible = false;
 
-                TxtFechaDocumento.Enabled = false;
+            //    TxtFechaDocumento.Enabled = false;
-                ImgCalendario.Visible = false;
+            //    ImgCalendario.Visible = false;
 
-            }
+            //}
 
 
         }

Compras/Compras.aspx.vb

@@ -20229,6 +20229,8 @@ Partial Class Compras_Compras
         If FleteImportacionOpcion > 0 Then RblFleteImportacionOpcion.SelectedValue = FleteImportacionOpcion.ToString
         RegistraScript("$('#ModalFletesImportaciones').modal()")
         UpModalFletesImportaciones.Update()
+
+
     End Sub
     Protected Sub RblTipo_SelectedIndexChanged(sender As Object, e As EventArgs)
         CambiaTipo()

Contabilidad/LibroDiario.aspx.vb

@@ -80,13 +80,29 @@ Partial Class Contabilidad_LibroDiario
         'FechaInicio = New Date(2016, 1, 1)
         'FechaFin = New Date(2016, 1, 31)
 
-        Dim ObjConta As New ClsContPAQi(UsuarioActual.Empresa)
+
-        If ObjConta.GetLibroDiario(FechaInicio, FechaFin) Then
+        If UsuarioActual.Empresa.TipoContabilidad = 1 Then
-            DtDatos = ObjConta.DtResultados
+
+            Dim ObjConta As New ClsContabilidad
+            If ObjConta.GetLibroDiarioSIG(FechaInicio, FechaFin, UsuarioActual.CveEmpresa) Then
+                DtDatos = ObjConta.DtResultados
+            Else
+                DtDatos = Nothing
+            End If
+            ObjConta.Dispose()
+
         Else
-            DtDatos = Nothing
+            Dim ObjConta As New ClsContPAQi(UsuarioActual.Empresa)
+            If ObjConta.GetLibroDiario(FechaInicio, FechaFin) Then
+                DtDatos = ObjConta.DtResultados
+            Else
+                DtDatos = Nothing
+            End If
+            ObjConta.Dispose()
         End If
-        ObjConta.Dispose()
+
+
+
 
         If DtDatos IsNot Nothing Then
             ImgExcel.Visible = True

Contabilidad/LibroMayor.aspx.vb

@@ -44,9 +44,17 @@ Partial Class Contabilidad_LibroMayor
             If UsuarioActual.Empresa.UsaAC Then
                 BtnConsultar.Enabled = True
             Else
-                Alert("La empresa no usa Armonización Contable", TipoMensaje.MsgError)
+
+                If UsuarioActual.Empresa.TipoContabilidad = 1 Then
+                    BtnConsultar.Enabled = True
+                Else
+                    Alert("La empresa no usa Armonización Contable", TipoMensaje.MsgError)
+                End If
+
             End If
 
+
+
         End If
     End Sub
 
@@ -70,13 +78,32 @@ Partial Class Contabilidad_LibroMayor
         FechaInicio = If(IsDate(TxtFechaDel.Text), TxtFechaDel.Text.ToDate, MinFecha)
         FechaFin = If(IsDate(TxtFechaAl.Text), TxtFechaAl.Text.ToDate, MaxFecha)
 
-        Dim ObjConta As New ClsContPAQi(UsuarioActual.Empresa)
+        '140
-        If ObjConta.GetLibroMayor(1, FechaInicio, FechaFin, 1) Then
+        Dim CvecuentaPadre As Integer = 57416 '140
-            DtDatos = ObjConta.DtResultados
+
+        If UsuarioActual.Empresa.TipoContabilidad = 1 Then
+
+
+            Dim ObjConta As New ClsContabilidad
+            If ObjConta.GetLibroMayorSIG(CvecuentaPadre, FechaInicio, FechaFin, 1, UsuarioActual.CveEmpresa) Then
+                DtDatos = ObjConta.DtResultados
+            Else
+                DtDatos = Nothing
+            End If
+            ObjConta.Dispose()
+
+
         Else
-            DtDatos = Nothing
+            Dim ObjConta As New ClsContPAQi(UsuarioActual.Empresa)
+            If ObjConta.GetLibroMayor(1, FechaInicio, FechaFin, 1) Then
+                DtDatos = ObjConta.DtResultados
+            Else
+                DtDatos = Nothing
+            End If
+            ObjConta.Dispose()
         End If
-        ObjConta.Dispose()
+
+
 
         If DtDatos IsNot Nothing Then
             ImgExcel.Visible = True
@@ -159,6 +186,7 @@ Partial Class Contabilidad_LibroMayor
 #Region "  IMPRIMIR  "
 
 #End Region
+
     Protected Sub Imprimir_click(sender As Object, e As EventArgs) Handles Imprimir.Click
         FechaInicio = If(TxtFechaDel.Text = "" Or TxtFechaDel.Text = "__/__/____", Date.Now, TxtFechaDel.Text.ToDate)
         FechaFin = If(TxtFechaAl.Text = "" Or TxtFechaAl.Text = "__/__/____", Date.Now, TxtFechaAl.Text.ToDate)

Contabilidad/RegPrePolizaS.aspx

@@ -1,13 +1,9 @@
-<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RegPrePolizaS.aspx.vb" Inherits="ContabilidadC_RegPrePolizaS" EnableEventValidation="false" %>
+<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RegPrePolizaS.aspx.vb" Inherits="ContabilidadC_RegPrePolizaS"  EnableEventValidation="false"  %>
 
 <asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
 </asp:Content>
 <asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
     <style>
-        tr.Titulos {
-            display: table-row !important;
-        }
-
         .GvMov input, .GvMov td {
             height: 20px !important;
         }
@@ -72,15 +68,15 @@
 </asp:Content>
 <asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
 
-    <li>
+            <li>
-        <asp:LinkButton ID="LnkExcel" runat="server" Visible="true" data-target="#DivCargaExcel"><i class="fa fa-file-excel-o" style="font-weight:bold;"></i> Cargar Excel</asp:LinkButton>
+                <asp:LinkButton ID="LnkExcel" runat="server" Visible="true" data-target="#DivCargaExcel"><i class="fa fa-file-excel-o" style="font-weight:bold;"></i> Cargar Excel</asp:LinkButton>
-    </li>
+            </li>
-    <li>
+            <li>
-        <asp:LinkButton ID="LnkComplementoPago" runat="server" Visible="false" OnClick="LnkComplementoPago_Click" Style="color: #686868;"><i class="fa fa-money" style="color:#686868;"></i> Crear Complemento de Pago</asp:LinkButton>
+                <asp:LinkButton ID="LnkComplementoPago" runat="server" Visible="false" OnClick="LnkComplementoPago_Click" Style="color: #686868;"><i class="fa fa-money" style="color:#686868;"></i> Crear Complemento de Pago</asp:LinkButton>
-    </li>
+            </li>
-    <li>
+            <li>
-        <asp:LinkButton ID="LnkImprimirPDF" runat="server" Visible="true" OnClick="LnkImprimirPDF_Click" Style="color: #686868;"><i class="fa fa-file-pdf-o" style="color:#686868;"></i> Imprimir Poliza</asp:LinkButton>
+                <asp:LinkButton ID="LnkImprimirPDF" runat="server" Visible="true" OnClick="LnkImprimirPDF_Click" Style="color: #686868;"><i class="fa fa-file-pdf-o" style="color:#686868;"></i> Imprimir Poliza</asp:LinkButton>
-    </li>
+            </li>
 
 
     <asp:UpdatePanel runat="server">
@@ -89,9 +85,9 @@
 
                 <asp:LinkButton ID="LnkAddConcepto" runat="server" OnClick="LnkAddConcepto_Click" Visible="true"><i class="fa fa-plus" ></i> Agregar Concepto</asp:LinkButton>
             </li>
-            <li>
+             <li>
-                <asp:LinkButton ID="LnkCrearAPartirDe" runat="server" Visible="false" OnClick="LnkCrearAPartirDe_Click" Style="color: #686868;"><i class="fa fa-plus" style="color:#686868;" ></i>Crear a partir de</asp:LinkButton>
+                    <asp:LinkButton ID="LnkCrearAPartirDe" runat="server" Visible="false" OnClick="LnkCrearAPartirDe_Click" Style="color: #686868;"><i class="fa fa-plus" style="color:#686868;" ></i>Crear a partir de</asp:LinkButton>
-            </li>
+                </li>
         </ContentTemplate>
     </asp:UpdatePanel>
 </asp:Content>
@@ -502,9 +498,8 @@
                                 <asp:TemplateField>
                                     <HeaderTemplate>Cargo</HeaderTemplate>
                                     <ItemTemplate>
-                                        <asp:TextBox ID="TxtCargo" CssClass="txtcargo" runat="server" Style="text-align: right" Width="65px" Visible="False"></asp:TextBox>
+                                        <asp:TextBox ID="TxtCargo" CssClass="txtcargo" runat="server" Style="text-align: right" Width="65px" Visible="False" Text='<%# If(String.IsNullOrEmpty(Eval("Cargo").ToString), "", Eval("Cargo", "{0:0.00}")) %>'></asp:TextBox>
-                                        <div id="divCargoME" runat="server" visible="False">
+                                        <div id="divCargoME" runat="server" Visible="False">ME:<asp:TextBox ID="TxtCargoME" CssClass="" runat="server" Style="text-align: right" Width="55px"></asp:TextBox>
-                                            ME:<asp:TextBox ID="TxtCargoME" CssClass="" runat="server" Style="text-align: right" Width="55px"></asp:TextBox>
                                             TC:<asp:TextBox ID="TxtTC" CssClass="" runat="server" Style="text-align: right" Width="45px"></asp:TextBox>
                                         </div>
                                     </ItemTemplate>
@@ -513,8 +508,8 @@
                                 <asp:TemplateField>
                                     <HeaderTemplate>Abono</HeaderTemplate>
                                     <ItemTemplate>
-                                        <asp:TextBox ID="TxtAbono" CssClass="txtabono" runat="server" Style="text-align: right" Width="65px" Visible="False"></asp:TextBox>
+                                        <asp:TextBox ID="TxtAbono" CssClass="txtabono" runat="server" Style="text-align: right" Width="65px" Visible="False"     Text='<%# If(String.IsNullOrEmpty(Eval("Abono").ToString), "", Eval("Abono", "{0:0.00}")) %>' ></asp:TextBox>
-                                        <div id="divAbonoME" runat="server" visible="False">ME:<asp:TextBox ID="TxtAbonoME" CssClass="" runat="server" Style="text-align: right" Width="55px"></asp:TextBox></div>
+                                        <div id="divAbonoME" runat="server" Visible="False">ME:<asp:TextBox ID="TxtAbonoME" CssClass="" runat="server" Style="text-align: right" Width="55px" ></asp:TextBox></div>
                                     </ItemTemplate>
                                     <ItemStyle HorizontalAlign="Right" />
                                 </asp:TemplateField>
@@ -522,7 +517,7 @@
                                 <asp:TemplateField HeaderText="Eliminar">
                                     <ItemTemplate>
                                         <asp:LinkButton ID="LnkE" runat="server" AlternateText="Editar" CausesValidation="False" CommandName="Edit" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
-                                        <asp:LinkButton Visible="false" ID="imgD" runat="server" AlternateText="Eliminar" CausesValidation="False" CommandName="Delete" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" OnClientClick="javascript:return C();" />
+                                        <asp:LinkButton Visible="false" ID="imgD" runat="server" AlternateText="Eliminar" CausesValidation="False" CommandName="Delete" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>"  OnClientClick="javascript:return C();" />
 
                                     </ItemTemplate>
                                 </asp:TemplateField>
@@ -547,7 +542,7 @@
 
     <asp:UpdatePanel ID="UpPrePoliza" runat="server" UpdateMode="Conditional">
         <ContentTemplate>
-            <div style="width: 100%; min-height: 200px; overflow-scrolling: auto;">
+            <div style="width: 100%; min-height: 200px;overflow-scrolling:auto;">
                 <div class="portlet light  xspadding bordered " id="pnldl">
                     <div class="portlet-title">
                         <div class="caption ">
@@ -571,7 +566,7 @@
                     <div class="portlet-body nomarginleftright form-horizontal form-row-sepe formnombottom ">
 
                         <asp:GridView ID="GvPrePoliza" runat="server" AutoGenerateColumns="False" CssClass="table table-striped table-advance table-hover mysmallbtn GvPrePoliza" GridLines="None"
-                            DataKeyNames="CvePrePolizaDetalle, CveConceptoContable, IdCtaContable, CveSubProyecto, CveTipoGasto,Referencia,CveVenta,CveCompra, CveProveedor, CveCliente, CvePersonal, CveCuenta, PorcentajeImpuesto,TipoMovto,EsComplementaria,Concepto,CveClasificacion,ContadoCuenta,ContadoTipoTransaccion,ContadoNumeroFolio,ContadoBeneficiario,ContadoObservaciones,ContadoImporte,TC" Width="100%">
+                            DataKeyNames="CvePrePolizaDetalle, CveConceptoContable, IdCtaContable, CveSubProyecto, CveTipoGasto,Referencia,CveVenta,CveCompra, CveProveedor, CveCliente, CvePersonal, CveCuenta, PorcentajeImpuesto,TipoMovto,EsComplementaria,Concepto,CveClasificacion,ContadoCuenta,ContadoTipoTransaccion,ContadoNumeroFolio,ContadoBeneficiario,ContadoObservaciones,ContadoImporte,TC" Width="100%" >
                             <Columns>
                                 <asp:TemplateField>
                                     <HeaderTemplate>Movimiento</HeaderTemplate>
@@ -655,18 +650,18 @@
                                     </ItemTemplate>
                                 </asp:TemplateField>
 
-                                <asp:TemplateField>
+                                <asp:TemplateField  >
                                     <ItemTemplate>
                                         <asp:LinkButton ID="LnkEdit" runat="server" AlternateText="Actualizar" CausesValidation="True" CommandName="Update" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
-                                        <asp:LinkButton ID="LnkGvPrePolizaEliminar" OnClick="LnkGvPrePolizaEliminar_Click" runat="server" AlternateText="Eliminar" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>"
+                                        <asp:LinkButton ID="LnkGvPrePolizaEliminar" OnClick="LnkGvPrePolizaEliminar_Click" runat="server" AlternateText="Eliminar"  CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>"
-                                            data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si" />
+                                             data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si"   />
                                     </ItemTemplate>
-                                    <ItemStyle Width="120px" />
+                                   <ItemStyle   Width="120px" />
                                 </asp:TemplateField>
 
-                                <asp:TemplateField>
+                                <asp:TemplateField >
                                     <ItemTemplate>
-                                        <asp:CheckBox runat="server" ID="chkModificado" Checked="false" Visible="false" />
+                                        <asp:CheckBox runat="server" ID="chkModificado" Checked="false" Visible="false"/>
                                     </ItemTemplate>
                                     <ItemStyle HorizontalAlign="Right" Width="5px" />
                                 </asp:TemplateField>
@@ -711,7 +706,7 @@
                         <asp:Button ID="BtnIEGuardar" runat="server" Text="Guardar" ValidationGroup="GrpGuardar" CssClass="btn btn-primary" />
                         <asp:ValidationSummary ID="VS" runat="server" DisplayMode="BulletList" ShowSummary="true" ValidationGroup="GrpGuardar" />
                         <asp:Button ID="BtnEliminar" runat="server" Text="Eliminar" class="btn btn-danger" />
-                        <asp:Button ID="BtnContabilizar" runat="server" Text="Contabilizar" CssClass="btn btn-primary green" Visible="false" />
+                         <asp:Button ID="BtnContabilizar" runat="server" Text="Contabilizar" CssClass="btn btn-primary green" Visible="false" /> 
                     </ContentTemplate>
                 </asp:UpdatePanel>
             </td>
@@ -817,271 +812,271 @@
     <div id="DivEditConcepto" align="center" class="modal ADS fade" role="dialog">
  
 
-        <div class="modal-dialog" style="width: 450px;" id="DvMoldalConceptoAncho">
+                <div class="modal-dialog" style="width: 450px;"  id="DvMoldalConceptoAncho" >
 
-            <asp:UpdatePanel ID="UpModalConcepto" runat="server" class="modal-content" UpdateMode="Conditional">
+                    <asp:UpdatePanel ID="UpModalConcepto" runat="server" class="modal-content" UpdateMode="Conditional">
-                <ContentTemplate>
+                        <ContentTemplate>
-
-                    <div class="modal-header ">
-                        <button type="button" class="close" data-dismiss="modal">×</button>
-                        <h4 class="modal-title">
-                            <asp:Literal ID="LtlTitulo" runat="server" Text="Editar Concepto" />
-                        </h4>
-                    </div>
-
-                    <div class="modal-body" style="margin-left: 20px">
-
-                        <div class="row">
-                            <div class="col-md-12" runat="server" id="DvMoldalConceptoSeccion1">
-
-
-                                <br />
-                                <div class="row">
-                                    <div class="col-xs-2" style="text-align: left">Concepto:</div>
-                                    <div class="col-xs-4" style="text-align: left">
-                                        <asp:DropDownList ID="DdlConceptosContablesE" CssClass="form-control input-sm select2me" Width="405px" runat="server" DataTextField="ConceptoContable" DataValueField="CveConceptoContable" AutoPostBack="true">
-                                        </asp:DropDownList>
-
-                                    </div>
-                                </div>
-
-                                <div class="row" runat="server" id="DvmodalconceptoProveddor" visible="false">
-                                    <div class="col-xs-2" style="text-align: left">Proveedor:</div>
-                                    <div class="col-xs-4" style="text-align: left">
-                                        <asp:DropDownList ID="DdlProveedoresE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="RazonSocial" DataValueField="CveProveedor" Width="405px" AutoPostBack="true"></asp:DropDownList>
-                                        <asp:RequiredFieldValidator ID="RfvDdlProveedoresE" InitialValue="-1" runat="server" ControlToValidate="DdlProveedoresE" Display="None" ErrorMessage="El campo <b>''Proveedor''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
-                                        <ajax:ValidatorCalloutExtender ID="CeRfvDdlProveedoresE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlProveedoresE" Width="350px"></ajax:ValidatorCalloutExtender>
-                                        <i></i>
-                                    </div>
-                                </div>
-
-
-
-                                <div class="row" runat="server" id="DvModalconceptoCompra" visible="false">
-                                    <div class="col-xs-2" style="text-align: left">Compra:</div>
-                                    <div class="col-xs-4" style="text-align: left">
-                                        <asp:DropDownList ID="DdlComprasE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="SerieFolio" DataValueField="CveCompra" Width="405px"></asp:DropDownList>
-                                        <asp:RequiredFieldValidator ID="RfvDdlComprasE" InitialValue="-1" runat="server" ControlToValidate="DdlComprasE" Display="None" ErrorMessage="El campo <b>''Compra''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
-                                        <ajax:ValidatorCalloutExtender ID="CeRfvDdlComprasE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlComprasE" Width="350px"></ajax:ValidatorCalloutExtender>
-                                        <i></i>
-                                    </div>
-                                </div>
-
-                                <div class="row " runat="server" id="DvModalconceptoPersonal" visible="false">
-                                    <div class="col-xs-2" style="text-align: left">Personal:</div>
-                                    <div class="col-xs-4" style="text-align: left">
-                                        <asp:DropDownList ID="DdlPersonalE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="NombreCompleto" DataValueField="CvePersonal" Width="405px"></asp:DropDownList>
-                                        <asp:RequiredFieldValidator ID="RfvDdlPersonalE" InitialValue="-1" runat="server" ControlToValidate="DdlPersonalE" Display="None" ErrorMessage="El campo <b>''Personal''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
-                                        <ajax:ValidatorCalloutExtender ID="CrRfvDdlPersonalE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlPersonalE" Width="350px"></ajax:ValidatorCalloutExtender>
-                                        <i></i>
-                                    </div>
-                                </div>
-
-                                <div class="row" runat="server" id="DvModalconceptoCliente" visible="false">
-                                    <div class="col-xs-2" style="text-align: left">Cliente:</div>
-                                    <div class="col-xs-4" style="text-align: left">
-                                        <ADS:Dropdownlost ID="DdlClientesE" CssStyle="width: 100%;" CssClassDdl="select2me" runat="server" AppendDataBoundItems="true" DataTextField="NombreComercial" DataValueField="CveCliente" Width="405px" AutoPostBack="true"></ADS:Dropdownlost>
-                                        <asp:RequiredFieldValidator ID="RfvDdlClientesE" InitialValue="-1" runat="server" ControlToValidate="DdlClientesE" Display="None" ErrorMessage="El campo <b>''Cliente''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
-                                        <ajax:ValidatorCalloutExtender ID="CeRfvDdlClientesE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlClientesE" Width="350px"></ajax:ValidatorCalloutExtender>
-                                        <i></i>
-                                    </div>
-                                </div>
-
-
-                                <div class="row" runat="server" id="DvModalconceptoVenta" visible="false">
-                                    <div class="col-xs-2" style="text-align: left">Venta:</div>
-                                    <div class="col-xs-4" style="text-align: left">
-                                        <asp:DropDownList ID="DdlVentasE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Folio" DataValueField="CveVenta" Width="405px"></asp:DropDownList>
-                                        <asp:RequiredFieldValidator ID="RfvDdlVentasE" InitialValue="-1" runat="server" ControlToValidate="DdlVentasE" Display="None" ErrorMessage="El campo <b>''Venta''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
-                                        <ajax:ValidatorCalloutExtender ID="CeRfvDdlVentasE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlVentasE" Width="350px"></ajax:ValidatorCalloutExtender>
-                                        <i></i>
-
-                                    </div>
-                                </div>
-
-
-                                <div class="row" runat="server" id="DvModalconceptoClasificacion" visible="false">
-                                    <div class="col-xs-2" style="text-align: left">Clasificación:</div>
-                                    <div class="col-xs-4" style="text-align: left">
-                                        <asp:DropDownList ID="DdlClasificacionesE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Width="405px"></asp:DropDownList>
-                                        <asp:RequiredFieldValidator ID="RfvDdlClasificacionesE" InitialValue="-1" runat="server" ControlToValidate="DdlClasificacionesE" Display="None" ErrorMessage="El campo <b>''Venta''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
-                                        <ajax:ValidatorCalloutExtender ID="CeRfvDdlClasificacionesE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlClasificacionesE" Width="350px"></ajax:ValidatorCalloutExtender>
-                                        <i></i>
-
-                                    </div>
-                                </div>
-
-                                <div class="row" runat="server" id="DvModalconceptoProcentajeIVA" visible="false">
-
-                                    <div class="col-xs-2" style="text-align: left">Procentaje IVA:</div>
-                                    <div class="col-xs-4" style="text-align: left">
-
-                                        <asp:DropDownList ID="DdlPorcentajeIVAE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" Visible="false" Width="160px">
-                                            <asp:ListItem Text="16%" Value="0.16"></asp:ListItem>
-                                            <asp:ListItem Text="8%" Value="0.08"></asp:ListItem>
-                                        </asp:DropDownList>
-
-                                        <asp:RequiredFieldValidator ID="RfvDdlPorcentajeIVAE" InitialValue="-1" runat="server" ControlToValidate="DdlPorcentajeIVAE" Display="None" ErrorMessage="El campo <b>''Porcentaje IVA''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
-                                        <ajax:ValidatorCalloutExtender ID="CeRfvDdlPorcentajeIVAE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlPorcentajeIVAE" Width="350px"></ajax:ValidatorCalloutExtender>
-                                        <i></i>
-
-                                    </div>
-                                </div>
-
-                                <br />
-                                <div class="row">
-                                    <div class="col-xs-2" style="text-align: left">
-                                        Cuenta:
-                                    </div>
-                                    <div class="col-xs-4">
-                                        <asp:DropDownList ID="DdlCuentaContableE" runat="server" Width="405px" CssClass="form-control input-sm select2me" DataValueField="CveCuenta" DataTextField="CtaCodigo"></asp:DropDownList><br />
-                                        <asp:RequiredFieldValidator ID="RfvDdlCuentaContableE" InitialValue="-1" runat="server" ControlToValidate="DdlCuentaContableE" Display="None" ErrorMessage="El campo <b>''Porcentaje IVA''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
-                                        <ajax:ValidatorCalloutExtender ID="CeRfvDdlCuentaContableE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlCuentaContableE" Width="350px"></ajax:ValidatorCalloutExtender>
-                                        <i></i>
-                                    </div>
-                                </div>
-                                <br />
-                                <div class="row">
-                                    <div class="col-xs-2" style="text-align: left">Referencia:</div>
-                                    <div class="col-xs-4">
-                                        <asp:TextBox ID="TxtReferenciaE" runat="server" Width="405px" MaxLength="100" CssClass="form-control" ClientIDMode="Static"></asp:TextBox>
-                                        <asp:RequiredFieldValidator ID="RfvTxtReferenciaE" runat="server" ControlToValidate="TxtReferenciaE" Display="None" ErrorMessage="El campo <b>''Referebcia''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
-                                        <ajax:ValidatorCalloutExtender ID="CeRfvTxtReferenciaE" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtReferenciaE" Width="350px"></ajax:ValidatorCalloutExtender>
-                                        <i></i>
-                                    </div>
-                                </div>
-                                <br />
-                                <div class="row">
-                                    <div class="col-xs-2" style="text-align: left">Descripción:</div>
-                                    <div class="col-xs-4">
-                                        <asp:TextBox ID="TxtConceptoE" runat="server" Width="405px" MaxLength="100" CssClass="form-control" ClientIDMode="Static"></asp:TextBox>
-
-                                        <asp:RequiredFieldValidator ID="RfvTxtConceptoE" runat="server" ControlToValidate="TxtConceptoE" Display="None" ErrorMessage="El campo <b>''Referebcia''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
-                                        <ajax:ValidatorCalloutExtender ID="CeRfvTxtConceptoE" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtConceptoE" Width="350px"></ajax:ValidatorCalloutExtender>
-                                        <i></i>
-
-                                    </div>
-                                </div>
-                                <br />
-                                <div class="row">
-                                    <div class="col-xs-2" style="text-align: left">
-                                        SubProyecto:
-                                    </div>
-                                    <div class="col-xs-3">
-                                        <asp:DropDownList ID="DdlSubProyectoE" runat="server" Width="220px" CssClass="form-control input-sm select2me" DataValueField="CveSubProyecto" DataTextField="SubProyecto"></asp:DropDownList><br />
-                                    </div>
-                                </div>
-                                <br />
-                                <div id="DivTG" runat="server">
-                                    <div class="row">
-                                        <div class="col-xs-2" style="text-align: left">Tipo Gasto:</div>
-                                        <div class="col-xs-3">
-                                            <asp:DropDownList ID="DdlTipoGastoE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="TipoGasto" DataValueField="CveTipoGasto" Width="150px"></asp:DropDownList>
-                                            <asp:RequiredFieldValidator ID="RfvDdlTipoGastoE" InitialValue="-1" runat="server" ControlToValidate="DdlTipoGastoE" Display="None" ErrorMessage="El campo <b>''Porcentaje IVA''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
-                                            <ajax:ValidatorCalloutExtender ID="CeRfvDdlTipoGastoE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlTipoGastoE" Width="350px"></ajax:ValidatorCalloutExtender>
-                                            <i></i>
-                                        </div>
-                                    </div>
-                                    <br />
-                                </div>
-                                <div class="row">
-                                    <div class="col-xs-2" style="text-align: left">
-                                        Cargo:
-                                    </div>
-                                    <div class="col-xs-3">
-                                        <asp:TextBox ID="TxtCargoE" runat="server" CssClass=" form-control input-sm" Style="text-align: right"></asp:TextBox><br />
-                                        <asp:CompareValidator ID="CVCargo" runat="server" ControlToValidate="TxtCargo" Display="None" ErrorMessage="El campo <b>''Cargo''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpMocalConceptoGuardar"></asp:CompareValidator>
-                                        <ajax:ValidatorCalloutExtender ID="VCCCargo" runat="server" HighlightCssClass="vco" TargetControlID="CVCargo" Width="300px"></ajax:ValidatorCalloutExtender>
-                                    </div>
-                                    <div class="col-xs-1" style="text-align: left">
-                                        Abono:
-                                    </div>
-                                    <div class="col-xs-3">
-                                        <asp:TextBox ID="TxtAbonoE" runat="server" CssClass=" form-control input-sm" Style="text-align: right"></asp:TextBox><br />
-                                        <asp:CompareValidator ID="CVAbono" runat="server" ControlToValidate="TxtAbono" Display="None" ErrorMessage="El campo <b>''Abono''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpMocalConceptoGuardar"></asp:CompareValidator>
-                                        <ajax:ValidatorCalloutExtender ID="VCCAbono" runat="server" HighlightCssClass="vco" TargetControlID="CVAbono" Width="300px"></ajax:ValidatorCalloutExtender>
-                                    </div>
-                                </div>
-
-                                <div class="row" runat="server" visible="false" id="DVmodalConceptoTipoCambio">
-                                    <div class="col-xs-2" style="text-align: left">
-                                        Tipo de Cambio:
-                                    </div>
-                                    <div class="col-xs-3">
-                                        <asp:TextBox ID="TxtModalConceptoTipoCambio" runat="server" CssClass=" form-control input-sm" Style="text-align: right"></asp:TextBox><br />
-                                        <asp:CompareValidator ID="RfvTxtModalConceptoTipoCambio" runat="server" ControlToValidate="TxtCargo" Display="None" ErrorMessage="El campo <b>''Tipo de Cambio''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpMocalConceptoGuardar"></asp:CompareValidator>
-                                        <ajax:ValidatorCalloutExtender ID="VceRfvTxtModalConceptoTipoCambio" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtModalConceptoTipoCambio" Width="300px"></ajax:ValidatorCalloutExtender>
-                                    </div>
-                                </div>
 
+                            <div class="modal-header ">
+                                <button type="button" class="close" data-dismiss="modal">×</button>
+                                <h4 class="modal-title">
+                                    <asp:Literal ID="LtlTitulo" runat="server" Text="Editar Concepto" />
+                                </h4>
                             </div>
-                            <div class="col-md-6" runat="server" id="DvMoldalConceptoSeccion2" visible="false">
 
-                                <div runat="server" id="Div1">
+                            <div class="modal-body" style="margin-left: 20px">
+
+                                <div class="row">
+                                    <div class="col-md-12" runat="server" id="DvMoldalConceptoSeccion1">
+
+
+                                        <br />
+                                        <div class="row">
+                                            <div class="col-xs-2" style="text-align: left">Concepto:</div>
+                                            <div class="col-xs-4" style="text-align: left">
+                                                <asp:DropDownList ID="DdlConceptosContablesE" CssClass="form-control input-sm select2me" Width="405px" runat="server" DataTextField="ConceptoContable" DataValueField="CveConceptoContable" AutoPostBack="true">
+                                                </asp:DropDownList>                                               
 
-                                    <asp:Panel ID="Panel1" CssClass="chequesie text-small" runat="server" Width="400px" Visible="true">
-                                        <div class="chequesie1">
-                                            <div class="row">
-                                                <label class="col-md-2">Movimiento:</label>
-                                                <div class="col-md-6">
-                                                    <asp:DropDownList ID="DdlModalConceptoTipoTransaccion" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="TipoTransaccion" DataValueField="CveTipoTransaccion" Width="156px" ValidationGroup="GrpMocalConceptoGuardar"></asp:DropDownList>
-                                                    <asp:RequiredFieldValidator ID="RfvDdlModalConceptoTipoTransaccion" runat="server" ControlToValidate="DdlModalConceptoTipoTransaccion" InitialValue="-1" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo Movimiento''</b> es necesario, por favor seleccione uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
-                                                    <ajax:ValidatorCalloutExtender ID="VceDdlModalConceptoTipoTransaccion" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlModalConceptoTipoTransaccion" Width="300px"></ajax:ValidatorCalloutExtender>
-                                                </div>
-                                            </div>
-                                            <div class="row">
-                                                <label class="col-md-2">Cuenta:</label>
-                                                <div class="col-md-6">
-                                                    <asp:DropDownList ID="DdlModalConceptoCuenta" runat="server" CssClass="form-control input-sm select2me" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="NumCuentaMoneda" DataValueField="CveCuenta" Width="200px" ValidationGroup="GrpMocalConceptoGuardar"></asp:DropDownList>
-                                                    <asp:RequiredFieldValidator ID="RfvDdlModalConceptoCuenta" runat="server" ControlToValidate="DdlModalConceptoCuenta" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cuenta''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
-                                                    <ajax:ValidatorCalloutExtender ID="VceDdlModalConceptoCuenta" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlModalConceptoCuenta" Width="300px"></ajax:ValidatorCalloutExtender>
-                                                </div>
                                             </div>
                                         </div>
-                                        <div class="chequesie2">
-                                            <div class="row">
-                                                <asp:Label ID="Label1" runat="server" Text="Número:" class="col-md-2"></asp:Label>
-                                                <div class="col-md-4">
-                                                    <asp:TextBox ID="TxtModalConceptoDocumentoFolio" CssClass="form-control input-sm" runat="server" MaxLength="12"></asp:TextBox>
-                                                    <asp:RequiredFieldValidator ID="RfvTxtModalConceptoDocumentoFolio" runat="server" ControlToValidate="TxtModalConceptoDocumentoFolio" Display="None" ErrorMessage="El campo <b>''Folio''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
-                                                    <ajax:ValidatorCalloutExtender ID="VceTxtModalConceptoDocumentoFolio" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtModalConceptoDocumentoFolio" Width="350px"></ajax:ValidatorCalloutExtender>
-                                                </div>
-                                                <label class="col-md-2" style="display: none">Importe</label>
-                                                <div class="col-md-4 input-icon" style="display: none">
-                                                    <i style="margin: 0px;">$</i>
-                                                    <asp:TextBox ID="TxtModalConceptoDocumentoImporte" CssClass="form-control input-sm " Enabled="False" runat="server" MaxLength="12" Width="80px" ClientIDMode="Static" Style="text-align: right;"></asp:TextBox>
-                                                    <ajax:FilteredTextBoxExtender ID="FilTxtModalConceptoDocumentoImporte" runat="server" TargetControlID="TxtModalConceptoDocumentoImporte" FilterType="Custom, Numbers" ValidChars=".," />
-                                                </div>
-                                            </div>
 
-                                            <div class="row">
+                                        <div class="row" runat="server" id="DvmodalconceptoProveddor" visible="false">
-                                                <asp:Label ID="Label2" runat="server" Text="Beneficiario:" class="col-md-2"></asp:Label>
+                                            <div class="col-xs-2" style="text-align: left">Proveedor:</div>
-                                                <div class="col-md-8">
+                                            <div class="col-xs-4" style="text-align: left">
-                                                    <asp:TextBox ID="TxtModalConceptoDocumentoBeneficiario" runat="server" CssClass="form-control input-sm"></asp:TextBox>
+                                                <asp:DropDownList ID="DdlProveedoresE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="RazonSocial" DataValueField="CveProveedor" Width="405px" AutoPostBack="true"></asp:DropDownList>
-                                                </div>
+                                                <asp:RequiredFieldValidator ID="RfvDdlProveedoresE" InitialValue="-1" runat="server" ControlToValidate="DdlProveedoresE" Display="None" ErrorMessage="El campo <b>''Proveedor''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
-                                            </div>
+                                                <ajax:ValidatorCalloutExtender ID="CeRfvDdlProveedoresE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlProveedoresE" Width="350px"></ajax:ValidatorCalloutExtender>
-
+                                                <i></i>
-                                            <div class="row">
-                                                <label class="col-md-2">Observaciones:</label>
-                                                <div class="col-md-8">
-                                                    <asp:TextBox ID="TxtModalConceptoDocumentoObservaciones" CssClass="form-control input-sm" runat="server" MaxLength="500" Rows="3" TextMode="MultiLine"></asp:TextBox>
-                                                </div>
                                             </div>
                                         </div>
-                                    </asp:Panel>
+
+
+
+                                        <div class="row" runat="server" id="DvModalconceptoCompra" visible="false">
+                                            <div class="col-xs-2" style="text-align: left">Compra:</div>
+                                            <div class="col-xs-4" style="text-align: left">
+                                                <asp:DropDownList ID="DdlComprasE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="SerieFolio" DataValueField="CveCompra" Width="405px"></asp:DropDownList>
+                                                <asp:RequiredFieldValidator ID="RfvDdlComprasE" InitialValue="-1" runat="server" ControlToValidate="DdlComprasE" Display="None" ErrorMessage="El campo <b>''Compra''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
+                                                <ajax:ValidatorCalloutExtender ID="CeRfvDdlComprasE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlComprasE" Width="350px"></ajax:ValidatorCalloutExtender>
+                                                <i></i>
+                                            </div>
+                                        </div>
+
+                                        <div class="row " runat="server" id="DvModalconceptoPersonal" visible="false">
+                                            <div class="col-xs-2" style="text-align: left">Personal:</div>
+                                            <div class="col-xs-4" style="text-align: left">
+                                                <asp:DropDownList ID="DdlPersonalE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="NombreCompleto" DataValueField="CvePersonal" Width="405px"></asp:DropDownList>
+                                                <asp:RequiredFieldValidator ID="RfvDdlPersonalE" InitialValue="-1" runat="server" ControlToValidate="DdlPersonalE" Display="None" ErrorMessage="El campo <b>''Personal''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
+                                                <ajax:ValidatorCalloutExtender ID="CrRfvDdlPersonalE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlPersonalE" Width="350px"></ajax:ValidatorCalloutExtender>
+                                                 <i></i>
+                                            </div>
+                                        </div>
+
+                                        <div class="row" runat="server" id="DvModalconceptoCliente" visible="false">
+                                            <div class="col-xs-2" style="text-align: left">Cliente:</div>
+                                            <div class="col-xs-4" style="text-align: left">
+                                                <ADS:Dropdownlost ID="DdlClientesE" CssStyle="width: 100%;" CssClassDdl="select2me" runat="server" AppendDataBoundItems="true" DataTextField="NombreComercial" DataValueField="CveCliente" Width="405px" AutoPostBack="true"></ADS:Dropdownlost>
+                                                <asp:RequiredFieldValidator ID="RfvDdlClientesE" InitialValue="-1" runat="server" ControlToValidate="DdlClientesE" Display="None" ErrorMessage="El campo <b>''Cliente''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
+                                                <ajax:ValidatorCalloutExtender ID="CeRfvDdlClientesE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlClientesE" Width="350px"></ajax:ValidatorCalloutExtender>
+                                                <i></i>
+                                            </div>
+                                        </div>
+
+
+                                        <div class="row" runat="server" id="DvModalconceptoVenta" visible="false">
+                                            <div class="col-xs-2" style="text-align: left">Venta:</div>
+                                            <div class="col-xs-4" style="text-align: left">
+                                                <asp:DropDownList ID="DdlVentasE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Folio" DataValueField="CveVenta" Width="405px"></asp:DropDownList>
+                                                <asp:RequiredFieldValidator ID="RfvDdlVentasE" InitialValue="-1" runat="server" ControlToValidate="DdlVentasE" Display="None" ErrorMessage="El campo <b>''Venta''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
+                                                <ajax:ValidatorCalloutExtender ID="CeRfvDdlVentasE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlVentasE" Width="350px"></ajax:ValidatorCalloutExtender>
+                                                <i></i>
+
+                                            </div>
+                                        </div>
+
+
+                                        <div class="row" runat="server" id="DvModalconceptoClasificacion" visible="false">
+                                            <div class="col-xs-2" style="text-align: left">Clasificación:</div>
+                                            <div class="col-xs-4" style="text-align: left">
+                                                <asp:DropDownList ID="DdlClasificacionesE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Width="405px"></asp:DropDownList>
+                                                 <asp:RequiredFieldValidator ID="RfvDdlClasificacionesE" InitialValue="-1" runat="server" ControlToValidate="DdlClasificacionesE" Display="None" ErrorMessage="El campo <b>''Venta''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
+                                                <ajax:ValidatorCalloutExtender ID="CeRfvDdlClasificacionesE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlClasificacionesE" Width="350px"></ajax:ValidatorCalloutExtender>
+                                                <i></i>
+
+                                            </div>
+                                        </div>
+
+                                        <div class="row" runat="server" id="DvModalconceptoProcentajeIVA" visible="false">
+
+                                            <div class="col-xs-2" style="text-align: left">Procentaje IVA:</div>
+                                            <div class="col-xs-4" style="text-align: left">
+
+                                                <asp:DropDownList ID="DdlPorcentajeIVAE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" Visible="false" Width="160px">
+                                                    <asp:ListItem Text="16%" Value="0.16"></asp:ListItem>
+                                                    <asp:ListItem Text="8%" Value="0.08"></asp:ListItem>
+                                                </asp:DropDownList>
+
+                                                <asp:RequiredFieldValidator ID="RfvDdlPorcentajeIVAE" InitialValue="-1" runat="server" ControlToValidate="DdlPorcentajeIVAE" Display="None" ErrorMessage="El campo <b>''Porcentaje IVA''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
+                                                <ajax:ValidatorCalloutExtender ID="CeRfvDdlPorcentajeIVAE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlPorcentajeIVAE" Width="350px"></ajax:ValidatorCalloutExtender>
+                                                <i></i>
+
+                                            </div>
+                                        </div>
+
+                                        <br />
+                                        <div class="row">
+                                            <div class="col-xs-2" style="text-align: left">
+                                                Cuenta:
+                                            </div>
+                                            <div class="col-xs-4">
+                                                <asp:DropDownList ID="DdlCuentaContableE" runat="server" Width="405px" CssClass="form-control input-sm select2me" DataValueField="CveCuenta" DataTextField="CtaCodigo"></asp:DropDownList><br />
+                                                 <asp:RequiredFieldValidator ID="RfvDdlCuentaContableE" InitialValue="-1" runat="server" ControlToValidate="DdlCuentaContableE" Display="None" ErrorMessage="El campo <b>''Porcentaje IVA''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
+                                                <ajax:ValidatorCalloutExtender ID="CeRfvDdlCuentaContableE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlCuentaContableE" Width="350px"></ajax:ValidatorCalloutExtender>
+                                                <i></i>
+                                            </div>
+                                        </div>
+                                        <br />
+                                        <div class="row">
+                                            <div class="col-xs-2" style="text-align: left">Referencia:</div>
+                                            <div class="col-xs-4">
+                                                <asp:TextBox ID="TxtReferenciaE" runat="server" Width="405px" MaxLength="100" CssClass="form-control" ClientIDMode="Static"></asp:TextBox>
+                                                  <asp:RequiredFieldValidator ID="RfvTxtReferenciaE"   runat="server" ControlToValidate="TxtReferenciaE" Display="None" ErrorMessage="El campo <b>''Referebcia''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
+                                                <ajax:ValidatorCalloutExtender ID="CeRfvTxtReferenciaE" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtReferenciaE" Width="350px"></ajax:ValidatorCalloutExtender>
+                                                <i></i>
+                                            </div>
+                                        </div>
+                                        <br />
+                                        <div class="row">
+                                            <div class="col-xs-2" style="text-align: left">Descripción:</div>
+                                            <div class="col-xs-4">
+                                                <asp:TextBox ID="TxtConceptoE" runat="server" Width="405px" MaxLength="100" CssClass="form-control" ClientIDMode="Static"></asp:TextBox>
+
+                                                 <asp:RequiredFieldValidator ID="RfvTxtConceptoE"   runat="server" ControlToValidate="TxtConceptoE" Display="None" ErrorMessage="El campo <b>''Referebcia''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
+                                                <ajax:ValidatorCalloutExtender ID="CeRfvTxtConceptoE" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtConceptoE" Width="350px"></ajax:ValidatorCalloutExtender>
+                                                <i></i>
+
+                                            </div>
+                                        </div>
+                                        <br />
+                                        <div class="row">
+                                            <div class="col-xs-2" style="text-align: left">
+                                                SubProyecto:
+                                            </div>
+                                            <div class="col-xs-3">
+                                                <asp:DropDownList ID="DdlSubProyectoE" runat="server" Width="220px" CssClass="form-control input-sm select2me" DataValueField="CveSubProyecto" DataTextField="SubProyecto"></asp:DropDownList><br />
+                                            </div>
+                                        </div>
+                                        <br />
+                                        <div id="DivTG" runat="server">
+                                            <div class="row">
+                                                <div class="col-xs-2" style="text-align: left">Tipo Gasto:</div>
+                                                <div class="col-xs-3">
+                                                    <asp:DropDownList ID="DdlTipoGastoE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="TipoGasto" DataValueField="CveTipoGasto" Width="150px"></asp:DropDownList>
+                                                    <asp:RequiredFieldValidator ID="RfvDdlTipoGastoE" InitialValue="-1" runat="server" ControlToValidate="DdlTipoGastoE" Display="None" ErrorMessage="El campo <b>''Porcentaje IVA''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
+                                                <ajax:ValidatorCalloutExtender ID="CeRfvDdlTipoGastoE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlTipoGastoE" Width="350px"></ajax:ValidatorCalloutExtender>
+                                                <i></i>
+                                                </div>
+                                            </div>
+                                            <br />
+                                        </div>
+                                        <div class="row">
+                                            <div class="col-xs-2" style="text-align: left">
+                                                Cargo:
+                                            </div>
+                                            <div class="col-xs-3">
+                                                <asp:TextBox ID="TxtCargoE" runat="server" CssClass=" form-control input-sm" Style="text-align: right"></asp:TextBox><br />
+                                                <asp:CompareValidator ID="CVCargo" runat="server" ControlToValidate="TxtCargo" Display="None" ErrorMessage="El campo <b>''Cargo''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpMocalConceptoGuardar"></asp:CompareValidator>
+                                                <ajax:ValidatorCalloutExtender ID="VCCCargo" runat="server" HighlightCssClass="vco" TargetControlID="CVCargo" Width="300px"></ajax:ValidatorCalloutExtender>
+                                            </div>
+                                            <div class="col-xs-1" style="text-align: left">
+                                                Abono:
+                                            </div>
+                                            <div class="col-xs-3">
+                                                <asp:TextBox ID="TxtAbonoE" runat="server" CssClass=" form-control input-sm" Style="text-align: right"></asp:TextBox><br />
+                                                <asp:CompareValidator ID="CVAbono" runat="server" ControlToValidate="TxtAbono" Display="None" ErrorMessage="El campo <b>''Abono''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpMocalConceptoGuardar"></asp:CompareValidator>
+                                                <ajax:ValidatorCalloutExtender ID="VCCAbono" runat="server" HighlightCssClass="vco" TargetControlID="CVAbono" Width="300px"></ajax:ValidatorCalloutExtender>
+                                            </div>
+                                        </div>
+
+                                        <div class="row" runat="server" visible="false" id="DVmodalConceptoTipoCambio">
+                                            <div class="col-xs-2" style="text-align: left">
+                                                Tipo de Cambio:
+                                            </div>
+                                            <div class="col-xs-3">
+                                                <asp:TextBox ID="TxtModalConceptoTipoCambio" runat="server" CssClass=" form-control input-sm" Style="text-align: right"></asp:TextBox><br />
+                                                <asp:CompareValidator ID="RfvTxtModalConceptoTipoCambio" runat="server" ControlToValidate="TxtCargo" Display="None" ErrorMessage="El campo <b>''Tipo de Cambio''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpMocalConceptoGuardar"></asp:CompareValidator>
+                                                <ajax:ValidatorCalloutExtender ID="VceRfvTxtModalConceptoTipoCambio" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtModalConceptoTipoCambio" Width="300px"></ajax:ValidatorCalloutExtender>
+                                            </div>
+                                        </div>
+
+                                    </div>
+                                    <div class="col-md-6" runat="server" id="DvMoldalConceptoSeccion2" visible="false">
+
+                                        <div runat="server" id="Div1">
+
+                                            <asp:Panel ID="Panel1" CssClass="chequesie text-small" runat="server" Width="400px" Visible="true">
+                                                <div class="chequesie1">
+                                                    <div class="row">
+                                                        <label class="col-md-2">Movimiento:</label>
+                                                        <div class="col-md-6">
+                                                            <asp:DropDownList ID="DdlModalConceptoTipoTransaccion" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="TipoTransaccion" DataValueField="CveTipoTransaccion" Width="156px" ValidationGroup="GrpMocalConceptoGuardar"></asp:DropDownList>
+                                                            <asp:RequiredFieldValidator ID="RfvDdlModalConceptoTipoTransaccion" runat="server" ControlToValidate="DdlModalConceptoTipoTransaccion" InitialValue="-1" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo Movimiento''</b> es necesario, por favor seleccione uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
+                                                            <ajax:ValidatorCalloutExtender ID="VceDdlModalConceptoTipoTransaccion" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlModalConceptoTipoTransaccion" Width="300px"></ajax:ValidatorCalloutExtender>
+                                                        </div>
+                                                    </div>
+                                                    <div class="row">
+                                                        <label class="col-md-2">Cuenta:</label>
+                                                        <div class="col-md-6">
+                                                            <asp:DropDownList ID="DdlModalConceptoCuenta" runat="server" CssClass="form-control input-sm select2me" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="NumCuentaMoneda" DataValueField="CveCuenta" Width="200px" ValidationGroup="GrpMocalConceptoGuardar"></asp:DropDownList>
+                                                            <asp:RequiredFieldValidator ID="RfvDdlModalConceptoCuenta" runat="server" ControlToValidate="DdlModalConceptoCuenta" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cuenta''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
+                                                            <ajax:ValidatorCalloutExtender ID="VceDdlModalConceptoCuenta" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlModalConceptoCuenta" Width="300px"></ajax:ValidatorCalloutExtender>
+                                                        </div>
+                                                    </div>
+                                                </div>
+                                                <div class="chequesie2">
+                                                    <div class="row">
+                                                        <asp:Label ID="Label1" runat="server" Text="Número:" class="col-md-2"></asp:Label>
+                                                        <div class="col-md-4">
+                                                            <asp:TextBox ID="TxtModalConceptoDocumentoFolio" CssClass="form-control input-sm" runat="server" MaxLength="12"></asp:TextBox>
+                                                            <asp:RequiredFieldValidator ID="RfvTxtModalConceptoDocumentoFolio" runat="server" ControlToValidate="TxtModalConceptoDocumentoFolio" Display="None" ErrorMessage="El campo <b>''Folio''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
+                                                            <ajax:ValidatorCalloutExtender ID="VceTxtModalConceptoDocumentoFolio" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtModalConceptoDocumentoFolio" Width="350px"></ajax:ValidatorCalloutExtender>
+                                                        </div>
+                                                        <label class="col-md-2" style="display: none">Importe</label>
+                                                        <div class="col-md-4 input-icon" style="display: none">
+                                                            <i style="margin: 0px;">$</i>
+                                                            <asp:TextBox ID="TxtModalConceptoDocumentoImporte" CssClass="form-control input-sm " Enabled="False" runat="server" MaxLength="12" Width="80px" ClientIDMode="Static" Style="text-align: right;"></asp:TextBox>
+                                                            <ajax:FilteredTextBoxExtender ID="FilTxtModalConceptoDocumentoImporte" runat="server" TargetControlID="TxtModalConceptoDocumentoImporte" FilterType="Custom, Numbers" ValidChars=".," />
+                                                        </div>
+                                                    </div>
+
+                                                    <div class="row">
+                                                        <asp:Label ID="Label2" runat="server" Text="Beneficiario:" class="col-md-2"></asp:Label>
+                                                        <div class="col-md-8">
+                                                            <asp:TextBox ID="TxtModalConceptoDocumentoBeneficiario" runat="server" CssClass="form-control input-sm"></asp:TextBox>
+                                                        </div>
+                                                    </div>
+
+                                                    <div class="row">
+                                                        <label class="col-md-2">Observaciones:</label>
+                                                        <div class="col-md-8">
+                                                            <asp:TextBox ID="TxtModalConceptoDocumentoObservaciones" CssClass="form-control input-sm" runat="server" MaxLength="500" Rows="3" TextMode="MultiLine"></asp:TextBox>
+                                                        </div>
+                                                    </div>
+                                                </div>
+                                            </asp:Panel>
+                                        </div>
+                                    </div>
                                 </div>
                             </div>
-                        </div>
-                    </div>
 
-                    <div class="modal-footer">
+                            <div class="modal-footer">
-                        <asp:Button ID="BtnAceptar" runat="server" class="btn btn-success" Text="Aceptar" ValidationGroup="GrpMocalConceptoGuardar" />
+                                <asp:Button ID="BtnAceptar" runat="server" class="btn btn-success" Text="Aceptar" ValidationGroup="GrpMocalConceptoGuardar" />
-                        <button id="BtnCancelar" runat="server" type="button" class="btn default" data-dismiss="modal">Cancelar</button>
+                                <button id="BtnCancelar" runat="server" type="button" class="btn default" data-dismiss="modal">Cancelar</button>
-                    </div>
+                            </div>
 
-                </ContentTemplate>
+                        </ContentTemplate>
-            </asp:UpdatePanel>
+                    </asp:UpdatePanel>
-        </div>
+                </div>
           
     </div>
  

Contabilidad/RegPrePolizaS.aspx.vb

@@ -381,9 +381,17 @@ Partial Class ContabilidadC_RegPrePolizaS
             .Add("EsComplementaria", Type.GetType("System.Boolean"))
             .Add("TC", Type.GetType("System.Decimal"))
 
-
-
         End With
+
+
+        If Not DtMovimientos.Columns.Contains("Cargo") Then
+            DtMovimientos.Columns.Add("Cargo", Type.GetType("System.Decimal"))
+            DtMovimientos.Columns.Add("Abono", Type.GetType("System.Decimal"))
+        End If
+
+
+        DtMovimientos.AcceptChanges()
+
     End Sub
 
     'Private Sub CargaNomina()
@@ -517,9 +525,16 @@ Partial Class ContabilidadC_RegPrePolizaS
                     DtMovimientos.Columns.Add("ContadoObservaciones", GetType(String))
                     DtMovimientos.Columns.Add("ContadoImporte", GetType(Decimal))
 
-
                 End If
 
+                If Not DtMovimientos.Columns.Contains("Cargo") Then
+                    DtMovimientos.Columns.Add("Cargo", GetType(Decimal))
+                    DtMovimientos.Columns.Add("Abono", GetType(Decimal))
+                End If
+
+
+
+
                 GvPrePoliza.DataBind()
 
                 If UsuarioActual.CveRol = 1 AndAlso DtMovimientos.COUNT("TC", "TC > 1") > 0 Then
@@ -1015,6 +1030,11 @@ Partial Class ContabilidadC_RegPrePolizaS
             Dim MsgError As String = ""
             Dim CveIE As Integer
             Dim FolioIE As String = ""
+            Dim ContRegInsertados As Integer = 0
+
+            Dim TmpCargo As Decimal = 0D
+            Dim TmpAbono As Decimal = 0D
+            Dim DifCargoAbono As Decimal = 0D
 
             Try
 
@@ -1032,7 +1052,6 @@ Partial Class ContabilidadC_RegPrePolizaS
 
                     FolioPoliza = ObjMov.FolioPoliza
 
-
                     'inserto las compras que voy a pagarDdlSaldos
                     For Each gvr As GridViewRow In GvMov.Rows
                         'If gvr.DataKey("IDCuenta").ToEntero > 0 Then
@@ -1056,20 +1075,28 @@ Partial Class ContabilidadC_RegPrePolizaS
 
                         ImporteME = 0
                         TipoCambio = 1
+
                         If gvr.DataKey("TipoMovto").ToDouble > 0 Then
                             Importe = gvr.FCTextBox("TxtAbono").Text.ToDouble
+                            TmpAbono = TmpAbono + Importe
                             TipoMovto = True
+
                             If gvr.DataKey("EsComplementaria") = "True" Then
                                 ImporteME = gvr.FCTextBox("TxtAbonoME").Text.ToDecimal
                                 TipoCambio = gvr.FCTextBox("TipoCambio").Text.ToDecimal
                             End If
+
                         Else
+
                             Importe = gvr.FCTextBox("TxtCargo").Text.ToDouble
+                            TmpCargo = TmpCargo + Importe
                             TipoMovto = False
+
                             If gvr.DataKey("EsComplementaria") = "True" Then
                                 ImporteME = gvr.FCTextBox("TxtCargoME").Text.ToDecimal
                                 TipoCambio = gvr.FCTextBox("TxtTC").Text.ToDecimal
                             End If
+
                         End If
 
                         If gvr.DataKey("CveConcepto").ToEntero <> 30 Then
@@ -1100,6 +1127,8 @@ Partial Class ContabilidadC_RegPrePolizaS
                                                             ImporteMX:=Importe, ImporteME:=ImporteME, TipoCambio:=TipoCambio,
                                                             CveTipoGasto:=gvr.FCDropDownList("DdlTipoGasto").SelectedValue.ToEntero,
                                                             CveCliente:=gvr.DataKey("CveCliente").ToEntero, CveVenta:=gvr.DataKey("CveVenta").ToEntero, CveCuenta:=tCveCuenta) Then
+                                ContRegInsertados = ContRegInsertados + 1
+
                             Else
                                 MsgError = "No se pudo insertar el detalle de la póliza2"
                                 Exit For
@@ -1108,6 +1137,7 @@ Partial Class ContabilidadC_RegPrePolizaS
                         If CveIE > 0 AndAlso gvr.DataKey("CveConcepto").ToEntero = 30 Then
                             MensajeAlert.AppendFormat("<br/><br/>Folio Bancario: <b><a href = ""/Bancos/IE.aspx?CveIE={0}"" class=""Texto"" target=""_blank"" >{1}</a></b>", CveIE, FolioIE)
                         End If
+
                     Next
 
                     If MsgError = "" AndAlso ObjMov.ValidacionPrePolizaCuadre(CvePrePolizaInsertada, 1) Then
@@ -1124,40 +1154,48 @@ Partial Class ContabilidadC_RegPrePolizaS
                     MsgError = "No se pudo insertar la póliza"
                 End If
             Catch ex As Exception
-                MsgError = "Error"
+                MsgError = $"Error {ex.Message}"
             End Try
 
-            If MsgError = "" Then
-                'MENSAJE IE
 
-                'If CveIE Then
+            If ContRegInsertados = 0 Then
-                '    Alert(MensajeAlert.ToString, ModExtensiones.TipoMensaje.MsgInformacion, "window.location.reload()")
+                MsgError = $"No se insertaron  registros  (Revise que los importes de los registros contengan valores)"
-                'Else
-                '    Alert(If(MensajeAlert.ToString = "", "Se registro con exito.", MensajeAlert.ToString), TipoMensaje.MsgInformacion, "window.location.reload()")
-                'End If
-
-                Alert(If(MensajeAlert.ToString = "", $"Se registro con exito <b>{If(FolioPoliza > 0, " Folio " & FolioPoliza & ".", "")}</b>", $"Se registro con exito <b>{If(FolioPoliza > 0, " Folio " & FolioPoliza & ".", "")} </b><br>" & MensajeAlert.ToString), TipoMensaje.MsgInformacion, $"window.location.href=""./RegPrePolizaS.aspx?CvePrePoliza={CvePrePolizaInsertada}""")
-
-
-                ObjIE.Commit()
-                If Conta IsNot Nothing Then Conta.Commit()
-
-                UPPDocumento.Update()
-
-                TxtConcepto.Text = ""
-                GvMov.DataBind()
-                TxtFechaDocumento.Text = ""
-
-            Else
-                Alert(MsgError.ToString, ModExtensiones.TipoMensaje.MsgError)
-                ObjIE.RollBack()
-                If Conta IsNot Nothing Then Conta.RollBack()
             End If
 
-            ObjIE.Dispose()
+
-            ObjMov.Dispose()
+            If MsgError = "" Then
-            If Conta IsNot Nothing Then Conta.Dispose()
+                    'MENSAJE IE
-        End If
+
+                    'If CveIE Then
+                    '    Alert(MensajeAlert.ToString, ModExtensiones.TipoMensaje.MsgInformacion, "window.location.reload()")
+                    'Else
+                    '    Alert(If(MensajeAlert.ToString = "", "Se registro con exito.", MensajeAlert.ToString), TipoMensaje.MsgInformacion, "window.location.reload()")
+                    'End If
+
+                    Alert(If(MensajeAlert.ToString = "", $"Se registro con exito <b>{If(FolioPoliza > 0, " Folio " & FolioPoliza & ".", "")}</b>", $"Se registro con exito <b>{If(FolioPoliza > 0, " Folio " & FolioPoliza & ".", "")} </b><br>" & MensajeAlert.ToString), TipoMensaje.MsgInformacion, $"window.location.href=""./RegPrePolizaS.aspx?CvePrePoliza={CvePrePolizaInsertada}""")
+
+
+                    ObjIE.Commit()
+                    If Conta IsNot Nothing Then Conta.Commit()
+
+                    UPPDocumento.Update()
+
+                    TxtConcepto.Text = ""
+                    'GvMov.DataBind()
+                    DdlPlantilla_SelectedIndexChanged(Nothing, Nothing)
+
+                    TxtFechaDocumento.Text = ""
+
+                Else
+                    Alert(MsgError.ToString, ModExtensiones.TipoMensaje.MsgError)
+                    ObjIE.RollBack()
+                    If Conta IsNot Nothing Then Conta.RollBack()
+                End If
+
+                ObjIE.Dispose()
+                ObjMov.Dispose()
+                If Conta IsNot Nothing Then Conta.Dispose()
+            End If
     End Sub
 
     Private Sub ActualizarPrePoliza()
@@ -1963,10 +2001,10 @@ Partial Class ContabilidadC_RegPrePolizaS
         Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
         RowIndex = GvRow.RowIndex
 
-        If GvRow.FCTextBox("TxtAbono").Text = "" Then
+        If GvRow.FCTextBox("TxtAbono").Visible Then
-            CargaTipoTransaccion("Ing")
-        Else
             CargaTipoTransaccion("Egs")
+        Else
+            CargaTipoTransaccion("Ing")
         End If
 
         Dim IdMov As Integer = GvRow.DataKey("IdMov").ToString.ToEntero
@@ -2004,7 +2042,6 @@ Partial Class ContabilidadC_RegPrePolizaS
         If Rows.Count > 0 Then
             Dim dr As DataRow = Rows(0)
 
-
             dr("ContadoTipoTransaccion") = DdlTipoTransaccion.SelectedValue.ToEntero
             dr("ContadoCuenta") = DdlCuenta.SelectedValue.ToEntero
             dr("ContadoNumeroFolio") = TxtDocumentoFolio.Text
@@ -2012,9 +2049,33 @@ Partial Class ContabilidadC_RegPrePolizaS
             dr("ContadoBeneficiario") = TxtDocumentoBeneficiario.Text
             dr("ContadoObservaciones") = TxtDocumentoObservaciones.Text
         End If
+
         DtMovimientos.AcceptChanges()
+
+        If Not DtMovimientos.Columns.Contains("Cargo") Then
+            DtMovimientos.Columns.Add("Cargo", GetType(Decimal))
+            DtMovimientos.Columns.Add("Abono", GetType(Decimal))
+        End If
+
+        Dim IndexX As Integer = 0
+        For Each PGvRow As GridViewRow In GvMov.Rows
+
+            If PGvRow.RowType = DataControlRowType.DataRow Then
+
+                DtMovimientos.Rows(IndexX)("Cargo") = PGvRow.FCTextBox("TxtCargo").Text.ToDecimal
+                DtMovimientos.Rows(IndexX)("Abono") = PGvRow.FCTextBox("TxtAbono").Text.ToDecimal
+
+                IndexX = IndexX + 1
+            End If
+        Next
+
         GvMov.DataSource = DtMovimientos
         GvMov.DataBind()
+
+
+
+
+
         'CveTipoTransaccion = DdlTipoTransaccion.SelectedValue.ToEntero
         'CveCuenta = DdlCuenta.SelectedValue.ToEntero
         'Folio = TxtDocumentoFolio.Text
@@ -2793,6 +2854,12 @@ Partial Class ContabilidadC_RegPrePolizaS
 
                 End If
 
+
+                If Not DtMovimientos.Columns.Contains("Cargo") Then
+                    DtMovimientos.Columns.Add("Cargo", GetType(Decimal))
+                    DtMovimientos.Columns.Add("Abono", GetType(Decimal))
+                End If
+
                 GvPrePoliza.DataSource = DtMovimientos
                 GvPrePoliza.DataBind()
 

Contabilidad/RepOrigenAplicacion.aspx

@@ -235,6 +235,8 @@
                         <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
                             <ContentTemplate>
 
+
+
                                 <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" GridLines="None" DataKeyNames="CveCuenta"> 
                                     <Columns>
                                         <asp:TemplateField HeaderText="Concepto">
@@ -275,6 +277,52 @@
                                     <RowStyle CssClass="Texto" />
                                 </asp:GridView>
 
+
+
+                                 <asp:GridView ID="GvOrigenAplicacionSIG" runat="server" AutoGenerateColumns="False" GridLines="None" DataKeyNames="CveCuenta" Visible="false"> 
+                                    <Columns>
+                                        <asp:TemplateField HeaderText="Concepto">
+                                            <ItemTemplate>
+                                                <asp:Label ID="LbNombre" runat="server" Text='<%# Eval("Nombre")%>'></asp:Label>
+                                            </ItemTemplate>
+                                            <ItemStyle Width="400" HorizontalAlign="Left" />
+                                        </asp:TemplateField>
+
+                                         <asp:TemplateField HeaderText="" Visible="false">
+                                            <ItemTemplate>
+                                                <asp:HyperLink ID="HLlImporteBase" runat="server" Text='<%# Eval("ImporteBase", "{0:N2}")%>' CssClass="Texto" Target="_blank" ></asp:HyperLink>
+                                            </ItemTemplate>
+                                            <ItemStyle Width="100" HorizontalAlign="Right" />
+                                        </asp:TemplateField>
+
+                                         <asp:TemplateField HeaderText="" Visible="false">
+                                            <ItemTemplate>
+                                                <asp:HyperLink ID="HLImporteActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' CssClass="Texto" Target="_blank"  ></asp:HyperLink>
+                                            </ItemTemplate>
+                                            <ItemStyle Width="100" HorizontalAlign="Right" />
+                                        </asp:TemplateField>
+
+
+                                        <asp:TemplateField HeaderText="Origen">
+                                            <ItemTemplate>
+                                                <asp:HyperLink ID="HLOrigen" runat="server" Text='<%# Eval("Origen", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
+                                            </ItemTemplate>
+                                            <ItemStyle Width="100" HorizontalAlign="Right" />
+                                        </asp:TemplateField>
+                                        <asp:TemplateField HeaderText="Aplicación">
+                                            <ItemTemplate>
+                                                <asp:HyperLink ID="HLAplicacion" runat="server" Text='<%# Eval("Aplicacion", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
+                                            </ItemTemplate>
+                                            <ItemStyle Width="100" HorizontalAlign="Right" />
+                                        </asp:TemplateField>
+                                    </Columns>
+                                    <RowStyle CssClass="Texto" />
+                                </asp:GridView>
+
+
+
+
+
                             </ContentTemplate>
                         </asp:UpdatePanel>
 

Contabilidad/RepOrigenAplicacion.aspx.vb

@@ -84,11 +84,14 @@ Partial Class Contabilidad_RepOrigenAplicacion
 
             If UsuarioActual.Empresa.TipoContabilidad = 1 Then
 
-                TabMensual.Enabled = False
+                TabMensual.Visible = False
-                TabAnual.Enabled = False
+                TabAnual.Visible = False
                 TdFI.Visible = False
                 tdTipoReporte.Visible = False
 
+                GvOrigenAplicacionSIG.Visible = True
+                GvDatos.Visible = False
+
             End If
 
         End If
@@ -162,25 +165,26 @@ Partial Class Contabilidad_RepOrigenAplicacion
             Dim AnioAnteior As Integer = AnioActual - 1
 
 
-            GvDatos.Columns(1).Visible = True
+            GvOrigenAplicacionSIG.Columns(1).Visible = True
-            GvDatos.Columns(2).Visible = True
+            GvOrigenAplicacionSIG.Columns(2).Visible = True
 
-            GvDatos.Columns(1).HeaderText = AnioAnteior.ToString
+            GvOrigenAplicacionSIG.Columns(1).HeaderText = AnioAnteior.ToString
-            GvDatos.Columns(2).HeaderText = AnioActual.ToString
+            GvOrigenAplicacionSIG.Columns(2).HeaderText = AnioActual.ToString
 
             Dim ObjConta As New ClsContabilidad
-
+            'GvOrigenAplicacionSIG
             If ObjConta.GetRepOrigenAplicacion(TxtFechaAl.Text.ToDate, UsuarioActual.CveEmpresa) Then
-                GvDatos.DataSource = ObjConta.DtResultados
+                GvOrigenAplicacionSIG.DataSource = ObjConta.DtResultados
 
                 If ObjConta.DtResultados.Rows.Count > 0 Then
                     LnkExcel.Visible = True
                 End If
             Else
-                GvDatos.DataSource = Nothing
+                GvOrigenAplicacionSIG.DataSource = Nothing
             End If
             ObjConta.Dispose()
-            GvDatos.DataBind()
+            GvOrigenAplicacionSIG.DataBind()
+
 
         Else
 
@@ -214,6 +218,31 @@ Partial Class Contabilidad_RepOrigenAplicacion
     End Sub
 
     Protected Sub GvDatos_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvDatos.RowDataBound
+        If e.Row.RowType = DataControlRowType.DataRow Then
+
+            'Titulo y Sumatoria de cambios
+            If e.Row.DBCampo("Orden3").ToString.ToEntero = 10 Or e.Row.DBCampo("Orden3").ToString.ToEntero = 30 Then
+                e.Row.FCLabel("LbNombre").Font.Bold = True
+            End If
+
+            'CUENTAS
+            If e.Row.DBCampo("Orden3").ToString.ToEntero = 20 Then
+                e.Row.FCLabel("LbNombre").Attributes.Add("style", "padding-left: 20px;")
+            End If
+
+            'TOTAL
+            If e.Row.DBCampo("Nombre").ToString.Trim = "" Then
+                e.Row.Attributes.Add("style", "border-top: 1px solid; margin-top:10px;")
+                e.Row.FCLabel("LbNombre").Font.Bold = True
+                e.Row.FCLabel("LbNombre").Font.Italic = True
+                e.Row.FCLabel("LbNombre").Text = "TOTAL"
+            End If
+
+        End If
+    End Sub
+
+
+    Protected Sub GvOrigenAplicacionSIG_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvOrigenAplicacionSIG.RowDataBound
         If e.Row.RowType = DataControlRowType.DataRow Then
 
             'Titulo y Sumatoria de cambios
@@ -251,6 +280,12 @@ Partial Class Contabilidad_RepOrigenAplicacion
 
         End If
     End Sub
+
+
+
+
+
+
 #End Region
 
 

Contabilidad/RepPolizasCuadre.aspx

@@ -12,22 +12,53 @@
 <asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
 </asp:Content>
 <asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
-    <div class="portlet solid  grey-cascade portlet-filter">
+    
-        <div class="portlet-title portlet-filterT smalltitle">
+
-            <div class="tools">
+    <asp:UpdatePanel ID="UpFiltros" UpdateMode="Conditional" runat="server" >
-                <%--<asp:Button ID="BtnConsultar" Text="Consultar" CssClass="btn btn-default" runat="server" />--%>
+        <ContentTemplate>
-            </div>
+                <div class="portlet solid  grey-cascade portlet-filter">
-            <div class="titlefiltros  caption">
+                <div class="portlet-title portlet-filterT smalltitle">
-                <%--<div class="row">
+                    <div class="tools">
-                    <label class="col-md-1 " style="width: 80px;">Ejercicio:</label>
+                        <asp:Button ID="BtnConsultar" Text="Consultar" CssClass="btn btn-default" OnClick="BtnConsultar_Click" runat="server" Visible="false" />
-                    <div class="col-md-2">
                     </div>
-                </div>--%>
+                    <div class="titlefiltros  caption">
+                        <div class="row" runat="server" visible ="false"  id="DvRowFiltrosContanSig1" > 
+                               <label class="col-md-1 truncate" style="width: 90px;">Ejercicio:</label>
+                                    <div class="col-md-2" style="width: 125px;">
+                                        <asp:DropDownList ID="DdlEjercicio" runat="server" CssClass="select2me" DataTextField="Ejercicio" DataValueField="Ejercicio" Width="100px">
+                                        </asp:DropDownList>
+                                    </div>
+                                    <label class="col-md-1 truncate" style="width: 90px;">Periodo:</label>
+                                    <div class="col-md-2" style="width: 130px;">
+                                        <asp:DropDownList ID="DdlPeriodo" runat="server" Width="100px" CssClass="select2me">
+                                            <asp:ListItem Text="Enero" Value="1"></asp:ListItem>
+                                            <asp:ListItem Text="Febrero" Value="2"></asp:ListItem>
+                                            <asp:ListItem Text="Marzo" Value="3"></asp:ListItem>
+                                            <asp:ListItem Text="Abril" Value="4"></asp:ListItem>
+                                            <asp:ListItem Text="Mayo" Value="5"></asp:ListItem>
+                                            <asp:ListItem Text="Junio" Value="6"></asp:ListItem>
+                                            <asp:ListItem Text="Julio" Value="7"></asp:ListItem>
+                                            <asp:ListItem Text="Agosto" Value="8"></asp:ListItem>
+                                            <asp:ListItem Text="Septiembre" Value="9"></asp:ListItem>
+                                            <asp:ListItem Text="Octubre" Value="10"></asp:ListItem>
+                                            <asp:ListItem Text="Noviembre" Value="11"></asp:ListItem>
+                                            <asp:ListItem Text="Diciembre" Value="12"></asp:ListItem>
+                                        </asp:DropDownList>
+                                    </div>
+                        </div>              
+                    </div>
+                </div>
             </div>
-        </div>
+        </ContentTemplate>
-    </div>
+    </asp:UpdatePanel>
+
+    
+
+
+
     <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
         <ContentTemplate>
+
             <asp:GridView ID="GvDatos" CssClass="table table-advance table-striped table-hover Widthall" runat="server" AutoGenerateColumns="False" GridLines="None" >
                 <Columns>
                      <asp:TemplateField HeaderText="Ejercicio">
@@ -57,6 +88,44 @@
                      </asp:TemplateField>
                 </Columns>
             </asp:GridView>
+
+
+<%--            FechaMovto	Mensaje	CveIE	CveCompra	CveVenta	CvePrePoliza	FolioPoliza--%>
+
+
+            <asp:GridView ID="GvDatosSIG" CssClass="table table-advance table-striped table-hover Widthall" runat="server" AutoGenerateColumns="False" GridLines="None" Visible="false"
+                EmptyDataText="No se encontraron descuadres" ToolTip="Listado de descuadres"
+                 >
+                <Columns>
+
+                     <asp:TemplateField HeaderText="Fecha">
+                         <ItemTemplate>
+                            <asp:Literal ID="LtEjercicio" runat="server" Text='<%# Eval("Fecha", "{0:d}")%>'></asp:Literal>
+                        </ItemTemplate>
+                     </asp:TemplateField>
+
+                    <asp:TemplateField HeaderText="Folio">
+                         <ItemTemplate>                           
+
+                             <asp:HyperLink  CssClass="Texto" runat="server" 
+                                 Text='<%# If(Not IsDBNull(Eval("FolioPoliza")), Eval("FolioPoliza"), "ND") %>'
+                                 NavigateUrl='<%#  String.Concat("~/Contabilidad/RegPrePolizaS.aspx?CvePrePoliza=", Eval("CvePrePoliza"))   %>'
+                                 target="_blank" >
+                             </asp:HyperLink>                             
+
+                        </ItemTemplate>
+                     </asp:TemplateField>
+
+                    <asp:TemplateField HeaderText="Concepto">
+                         <ItemTemplate>
+                            <asp:Literal ID="LtlMensaje" runat="server" Text='<%# Eval("Concepto")%>'></asp:Literal>
+                        </ItemTemplate>
+                     </asp:TemplateField>
+                    
+                </Columns>
+            </asp:GridView>
+
+
         </ContentTemplate>
     </asp:UpdatePanel>
 </asp:Content>

Contabilidad/RepPolizasCuadre.aspx.vb

@@ -4,12 +4,21 @@ Option Strict On
 Imports System.Data
 Imports System.Linq
 Imports Extensiones
+
 Partial Class Contabilidad_RepPolizasCuadre
     Inherits ClsPaginas
 
     Private Sub Contabilidad_RepPolizasCuadre_Load(sender As Object, e As EventArgs) Handles Me.Load
         If Not IsPostBack Then
-            CargaGrid()
+
+            If UsuarioActual.Empresa.TipoContabilidad = 1 Then
+                CargaEjercicios()
+                MuestraControlesContabilidadSIG()
+                CargaDatosContabilidaSIG()
+            Else
+                CargaGrid()
+            End If
+
         End If
     End Sub
 
@@ -25,6 +34,7 @@ Partial Class Contabilidad_RepPolizasCuadre
         UpDatos.Update()
     End Sub
 
+
     Private Sub GvDatos_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvDatos.RowDataBound
         If e.Row.RowType = DataControlRowType.DataRow Then
             Dim Liga1 As String = String.Format("/Contabilidad/RegPoliza.aspx?IdPoliza={0}", e.Row.DBCampo("IdPoliza"))
@@ -32,4 +42,72 @@ Partial Class Contabilidad_RepPolizasCuadre
 
         End If
     End Sub
+
+
+#Region " C O N T A B L I D A D  S I G"
+    Private Sub MuestraControlesContabilidadSIG()
+
+        GvDatos.Visible = False
+
+        GvDatosSIG.Visible = True
+
+        BtnConsultar.Visible = True
+        DvRowFiltrosContanSig1.Visible = True
+
+    End Sub
+
+    Private Sub CargaDatosContabilidaSIG()
+
+
+        Dim ObjP As New ClsContabilidad
+
+        If ObjP.GetPolizasDescuadre(DdlEjercicio.SelectedValue.ToEntero, DdlPeriodo.SelectedValue.ToEntero, UsuarioActual.CveEmpresa) Then
+
+            If ObjP.DtResultados.Rows.Count > 0 Then
+                GvDatosSIG.DataSource = ObjP.DtResultados.FiltraParametros($"CveEmpresa = {UsuarioActual.CveEmpresa}")
+            Else
+                GvDatosSIG.DataSource = Nothing
+            End If
+        Else
+            GvDatosSIG.DataSource = Nothing
+        End If
+
+        ObjP.Dispose()
+
+        GvDatosSIG.DataBind()
+        UpDatos.Update()
+
+
+
+    End Sub
+
+
+    Private Sub CargaEjercicios()
+
+        Dim Clsconta As New ClsContabilidad
+        If Clsconta.GetEjercicios(UsuarioActual.CveEmpresa) Then
+            DdlEjercicio.DataSource = Clsconta.DtResultados
+        Else
+            DdlEjercicio.DataSource = Nothing
+        End If
+        Clsconta.Dispose()
+
+        DdlEjercicio.DataBind()
+        DdlEjercicio.SelectedValue = Now.Year.ToString
+
+        DdlPeriodo.SelectedValue = Now.Month.ToString
+
+    End Sub
+
+
+    Protected Sub BtnConsultar_Click(sender As Object, e As EventArgs)
+        CargaDatosContabilidaSIG()
+    End Sub
+
+
+#End Region
+
+
+
+
 End Class

Contabilidad2/RepEstadoResultadosHorizontal.aspx.vb

@@ -1836,7 +1836,7 @@ Partial Class Contabilidad_RepEstadoResultadosHorizontal
             Next
 
             Row.Item("Nombre") = "TOTAL INGRESOS "
-            Row.Item("ImporteActual") = DtIngresosSubProyectoH.SUM("ImporteActual", "NOT CtaMayor in (3,4)")  'TotalActual.ToString
+            Row.Item("ImporteActual") = DtIngresosSubProyectoH.SUM("ImporteActual", "NOT CtaMayor in (3,4)")   'TotalActual.ToString
             Row.Item("PorcentajeActual") = "100.00"
             Row.Item("ImporteAcumulado") = DtIngresosSubProyectoH.SUM("ImporteAcumulado", "NOT CtaMayor in (3,4)") 'TotalAnterior.ToString
             Row.Item("PorcentajeAcumulado") = "100.00"

Contabilidad2/RepSituacionFinanciera.aspx.vb

@@ -587,18 +587,30 @@ Partial Class AC2_SituacionFinanciera
     Private Sub ImprimirReporte(Optional Formato As String = "PDF")
         Dim FechaI = String.Format("01/{0}/{1}", DdlPeriodo.SelectedValue.PadLeft(2, CChar("0")), DdlEjercicio.SelectedValue)
         Dim FechaF = DateAdd(DateInterval.Day, -1, DateAdd(DateInterval.Month, 1, CDate(FechaI))).ToString("dd/MM/yyyy")
-        'nombre del archivo a generar
+
         Dim fileName As String = "EdoSituacionFinanciera"
-        'ubicacion del rdlc
+
         Dim reportpath As String = "Contabilidad2/Reportes/RepSituacionFinanciera.rdlc"
 
-        'parametros a enviar al reporte                     
+
         Dim params As New List(Of ReportParameter)
         params.Add(New ReportParameter("pEmp", UsuarioActual.Empresa.Empresa))
-        params.Add(New ReportParameter("pImg", New Uri(Server.MapPath(String.Format("~/Empresas/{0}/Logo.png", UsuarioActual.CveEmpresa))).AbsoluteUri))
+
+
+        Dim ImgLogoInfo As New IO.FileInfo($"{UsuarioActual.Empresa.Ruta}\Logo.png")
+
+
+        If ImgLogoInfo.Exists Then
+            params.Add(New ReportParameter("pImg", $"file://{ImgLogoInfo.FullName}"))
+        Else
+            params.Add(New ReportParameter("pImg", ""))
+        End If
+
+
         params.Add(New ReportParameter("pFirma1", If(ChkFirma.Checked, String.Format("{0}", vbCrLf), "")))
         params.Add(New ReportParameter("pFirma2", If(ChkFirma.Checked, String.Format("{0}l", vbCrLf), "")))
         params.Add(New ReportParameter("pFechaFin", FechaF))
+
         params.Add(New ReportParameter("periodo", String.Format("de {0} {1}", DdlPeriodo.SelectedItem.ToString, DdlEjercicio.SelectedItem.ToString)))
         ImprimirPDF(reportpath, DtDatos, params, fileName, Formato)
     End Sub

Contabilidad2/Reportes/RepSituacionFinanciera.rdlc

@@ -3048,16 +3048,17 @@
       <Value>=Sum(Microsoft.VisualBasic.Interaction.iif(Fields!Sup.Value = "CAPITAL"  , Fields!ImporteActual.Value, 0),"DataSet1")</Value>
     </Variable>
     <Variable Name="TotalPatrimonioHActual">
-      <Value>=Sum(Microsoft.VisualBasic.Interaction.iif(Fields!Sup.Value = "CAPITAL CONTABLE"  , Fields!ImporteActual.Value, 0),"DataSet1")</Value>
+      <Value>=Sum(Microsoft.VisualBasic.Interaction.iif(Fields!Sup.Value = "CAPITAL"  , Fields!ImporteActual.Value, 0),"DataSet1")</Value>
     </Variable>
     <Variable Name="TotalPatrimonioCAnterior">
-      <Value>=Sum(Microsoft.VisualBasic.Interaction.iif(Fields!Sup.Value = "CAPITAL CONTABLE"  , Fields!ImporteAnterior.Value, 0),"DataSet1")</Value>
+      <Value>=Sum(Microsoft.VisualBasic.Interaction.iif(Fields!Sup.Value = "CAPITAL"  , Fields!ImporteAnterior.Value, 0),"DataSet1")</Value>
     </Variable>
     <Variable Name="TotalPatrimonioHAnterior">
-      <Value>=Sum(Microsoft.VisualBasic.Interaction.iif(Fields!Sup.Value = "CAPITAL CONTABLE"  , Fields!ImporteActual.Value, 0),"DataSet1")</Value>
+      <Value>=Sum(Microsoft.VisualBasic.Interaction.iif(Fields!Sup.Value = "CAPITAL"  , Fields!ImporteActual.Value, 0),"DataSet1")</Value>
     </Variable>
     <Variable Name="TotalpasivoYHaciendaActual">
       <Value>=Variables!TotalPasivoActual.Value+Variables!TotalPatrimonioHActual.Value</Value>
+      <Writable>true</Writable>
     </Variable>
     <Variable Name="TotalpasivoYHaciendaAnterior">
       <Value>=Variables!TotalPatrimonioHAnterior.Value+ Variables!TotalPasivoAnterior.Value</Value>

CxC/RepCxC.aspx.vb

@@ -105,7 +105,7 @@ Partial Class RepCxC
             CargaCombos()
             CargaGvPersonalizarRaqngoColumnas()
             CargaDatos()
-            If UsuarioActual.CveEmpresa.Contiene(72, 80, 146) Then ChkAnticipos.visible = True
+            If UsuarioActual.CveEmpresa.Contiene(72, 80, 146, 119) Then ChkAnticipos.Visible = True
             ActivaEnviarEstadoCuenta()
             If UsuarioActual.CveRol = 1 Or UsuarioActual.TienePermisoProceso(243) Then LnkDescargarSegmentos.Visible = True
             CreaDataTableColor()
@@ -382,53 +382,55 @@ Partial Class RepCxC
                 End If
             End If
 
-            Dim Liga1 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=C1&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&CveMoneda={25}&EstatusCliente={26}",
+            Dim AplicaAnticipos As Integer = If(ChkAnticipos.Checked, 1, 0)
-                                               DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveCliente"), e.Row.DBCampo("CveSubProyecto"), e.Row.DBCampo("CveVendedor"),
-                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero)
 
-            Dim Liga2 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=C2&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&EstatusCliente={26}",
+            Dim Liga1 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=C1&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&CveMoneda={25}&EstatusCliente={26}&AplicaAnticiposPagados={27}",
                                                DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveCliente"), e.Row.DBCampo("CveSubProyecto"), e.Row.DBCampo("CveVendedor"),
-                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero)
+                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero, AplicaAnticipos)
 
-            Dim Liga3 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=C3&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&EstatusCliente={26}",
+            Dim Liga2 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=C2&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&CveMoneda={25}&EstatusCliente={26}&AplicaAnticiposPagados={27}",
                                                DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveCliente"), e.Row.DBCampo("CveSubProyecto"), e.Row.DBCampo("CveVendedor"),
-                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero)
+                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero, AplicaAnticipos)
 
-            Dim Liga4 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=C4&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&EstatusCliente={26}",
+            Dim Liga3 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=C3&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&CveMoneda={25}&EstatusCliente={26}&AplicaAnticiposPagados={27}",
                                                DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveCliente"), e.Row.DBCampo("CveSubProyecto"), e.Row.DBCampo("CveVendedor"),
-                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero)
+                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero, AplicaAnticipos)
 
-            Dim Liga5 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=C5&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&EstatusCliente{26}",
+            Dim Liga4 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=C4&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&CveMoneda={25}&EstatusCliente={26}&AplicaAnticiposPagados={27}",
                                                DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveCliente"), e.Row.DBCampo("CveSubProyecto"), e.Row.DBCampo("CveVendedor"),
-                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero)
+                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero, AplicaAnticipos)
 
-            Dim Liga6 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=C6&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&EstatusCliente={26}",
+            Dim Liga5 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=C5&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&CveMoneda={25}&EstatusCliente{26}&AplicaAnticiposPagados={27}",
                                                DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveCliente"), e.Row.DBCampo("CveSubProyecto"), e.Row.DBCampo("CveVendedor"),
-                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero)
+                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero, AplicaAnticipos)
 
-            Dim Liga7 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=C7&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&EstatusCliente={26}",
+            Dim Liga6 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=C6&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&CveMoneda={25}&EstatusCliente={26}&AplicaAnticiposPagados={27}",
                                                DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveCliente"), e.Row.DBCampo("CveSubProyecto"), e.Row.DBCampo("CveVendedor"),
-                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero)
+                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero, AplicaAnticipos)
 
-            Dim Liga8 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=C8&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&EstatusCliente={26}",
+            Dim Liga7 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=C7&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&CveMoneda={25}&EstatusCliente={26}&AplicaAnticiposPagados={27}",
                                                DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveCliente"), e.Row.DBCampo("CveSubProyecto"), e.Row.DBCampo("CveVendedor"),
-                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero)
+                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero, AplicaAnticipos)
 
-            Dim Liga9 As String = String.Format("/CxC/RepCxCDetalle.aspx.aspx?Op=S&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&EstatusCliente={26}",
+            Dim Liga8 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=C8&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&CveMoneda={25}&EstatusCliente={26}&AplicaAnticiposPagados={27}",
                                                DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveCliente"), e.Row.DBCampo("CveSubProyecto"), e.Row.DBCampo("CveVendedor"),
-                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero)
+                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero, AplicaAnticipos)
 
-            Dim Liga10 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=TV&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&EstatusCliente={26}",
+            Dim Liga9 As String = String.Format("/CxC/RepCxCDetalle.aspx.aspx?Op=S&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&CveMoneda={25}&EstatusCliente={26}&AplicaAnticiposPagados={27}",
                                                DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveCliente"), e.Row.DBCampo("CveSubProyecto"), e.Row.DBCampo("CveVendedor"),
-                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero)
+                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero, AplicaAnticipos)
 
-            Dim Liga11 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=TPV&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&EstatusCliente={26}",
+            Dim Liga10 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=TV&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&CveMoneda={25}&EstatusCliente={26}&AplicaAnticiposPagados={27}",
                                                DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveCliente"), e.Row.DBCampo("CveSubProyecto"), e.Row.DBCampo("CveVendedor"),
-                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero)
+                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero, AplicaAnticipos)
 
-            Dim LigaTot As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=S&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&EstatusCliente={26}",
+            Dim Liga11 As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=TPV&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&CveMoneda={25}&EstatusCliente={26}&AplicaAnticiposPagados={27}",
                                                DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveCliente"), e.Row.DBCampo("CveSubProyecto"), e.Row.DBCampo("CveVendedor"),
-                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero)
+                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero, AplicaAnticipos)
+
+            Dim LigaTot As String = String.Format("/CxC/RepCxCDetalle.aspx?Op=S&GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSubProyecto={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&IVA={10}&FechaI={11}&FechaF={12}&CveResponsable={13}&TipoDocto={14}&TipoCambio={15}&TCEspecifico={16}&FechaVI={17}&FechaVF={18}&CveClienteSucursal={19}&FechaCorte={20}&CveCobranzaEstatus={21}&CveClienteClasificacion={22}&LimiteCredito={23}&TipoCliente={24}&CveMoneda={25}&EstatusCliente={26}&AplicaAnticiposPagados={27}",
+                                               DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveCliente"), e.Row.DBCampo("CveSubProyecto"), e.Row.DBCampo("CveVendedor"),
+                                               e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), e.Row.DBCampo("GPO_IVA"), FechaI, FechaF, DdlResponsable.SelectedValue, e.Row.DBCampo("TipoDocto"), e.Row.DBCampo("TipoCambio"), e.Row.DBCampo("TCEspecifico"), FechaVI, FechaVF, CveClienteSucursal, txtCorteA.Text, CveCobranzaEstatus, CveClienteClasificacion, e.Row.DBCampo("LimiteCredito"), If(DdlGrupo.SelectedValue.ToEntero = 12, e.Row.DBCampo("TipoCliente"), DdlTipoCliente.SelectedValue), e.Row.DBCampo("CveMoneda"), DdlEstatusCliente.SelectedValue.ToEntero, AplicaAnticipos)
 
             e.Row.FCHyperLink("HplSaldo").NavigateUrl = LigaTot
 

CxC/RepCxCDetalle.aspx

@@ -312,6 +312,10 @@
                             </asp:DropDownList>
                         </div>
 
+                        <div class="col-md-2">
+                            <asp:CheckBox ID="ChkAnticipos" runat="server" Text="Incluye Anticipos" TextAlign="Left" Checked="true" Visible="false" />
+                           </div>
+
                       </div>
 
                    
@@ -324,11 +328,11 @@
     <asp:UpdatePanel ID="UpCobranza" UpdateMode="Conditional" runat="server">
         <ContentTemplate>
             <div class="row">
-                <div class="col-md-6">
+                <div class="col-md-12" style="text-align:right">
-                    <div class="text-left">
+                    
                         <input type="text" id="TxtBusqueda" 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}')", GvDatos.ClientID) %>" style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
-                    </div>
+                    
                 </div>
                 <div class="col-md-offset-8" style="width: 300px;">
                     <div class="portlet light bordered xspadding" id="DivCobranza" runat="server" visible="false">

CxC/RepCxCDetalle.aspx.vb

@@ -348,6 +348,11 @@ Partial Class RepCxCDetalle
 
         DdlSubProyecto.SelectedValueExist(CveSubProyecto)
 
+
+        If Request("AplicaAnticiposPagados") IsNot Nothing Then
+            ChkAnticipos.Checked = If(Request("AplicaAnticiposPagados").ToEntero = 1, True, False)
+        End If
+
         DdlClienteClasificacion.SelectedValueExist(CveClienteClasificacion)
         CargaClientes()
         If CveCliente > 0 Then
@@ -410,7 +415,7 @@ Partial Class RepCxCDetalle
             DdlClientesWS.Attributes.Add("style", "!important width: 100%;")
         End If
 
-
+        If UsuarioActual.CveEmpresa.Contiene(72, 80, 146, 119) Then ChkAnticipos.Visible = True
     End Sub
     Private Function CargaDatos() As DataTable
         Dim dt As DataTable = Nothing
@@ -427,6 +432,7 @@ Partial Class RepCxCDetalle
         FechaF = If(IsDate(txtFechaF.Text.Trim()), txtFechaF.Text.Trim(), "-1")
         FechaVI = If(IsDate(txtFechaVI.Text.Trim()), txtFechaVI.Text.Trim(), "-1")
         FechaVF = If(IsDate(txtFechaVF.Text.Trim()), txtFechaVF.Text.Trim(), "-1")
+
         'FechaI, FechaF, -1, UsuarioActual.CveEmpresa, DdlGrupo.SelectedValue.ToEntero
         Dim CveCliente = If(DdlClientesWS.SelectedValue.ToEntero > 0, DdlClientesWS.SelectedValue.ToEntero, -1)
         If ObjMovtos.GetCxCDetalle(FechaI, FechaF, CveCliente, DdlSubProyecto.SelectedValue.ToEntero, DdlVendedor.SelectedValue.ToEntero, DdlUsuario.SelectedValue.ToEntero,
@@ -435,7 +441,7 @@ Partial Class RepCxCDetalle
                                    RblTipoCambio.SelectedValue.ToEntero, TCEspecifico, If(DdlTipoDocto.GetSelectedValuesM = "", "-1", DdlTipoDocto.GetSelectedValuesM), FechaVI, FechaVF,
                                    FechaCorte:=txtCorteA.Text.ToDate, CveUsuarioConsulta:=UsuarioActual.CveUsuario, CveCobranzaEstatus:=DdlCobranzaEstatusFiltro.SelectedValue.ToEntero,
                                    CveClienteClasificacion:=DdlClienteClasificacion.SelectedValue.ToEntero, LimiteCredito:=LimiteCredito, TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero,
-                                   CveMoneda:=CveMoneda, EstatusCliente:=DdlEstatusCliente.SelectedValue.ToEntero) Then
+                                   CveMoneda:=CveMoneda, EstatusCliente:=DdlEstatusCliente.SelectedValue.ToEntero, AplicaAnticiposPagados:=If(ChkAnticipos.Checked, 1, 0)) Then
 
             GvDatos.DataSource = ObjMovtos.DtResultados
             dt = ObjMovtos.DtResultados

Empresas/141/Formatos/Factura.rdlc

@@ -931,7 +931,7 @@
                                     <FontFamily>calibri</FontFamily>
                                     <FontSize>8pt</FontSize>
                                     <FontWeight>Normal</FontWeight>
-                                    <Format>#,0.00;(#,0.00);'-'</Format>
+                                    <Format>#,0.00;(#,0.00)</Format>
                                   </Style>
                                 </TextRun>
                               </TextRuns>
@@ -951,7 +951,6 @@
                             <PaddingBottom>2pt</PaddingBottom>
                           </Style>
                         </Textbox>
-                        <rd:Selected>true</rd:Selected>
                       </CellContents>
                     </TablixCell>
                     <TablixCell>
@@ -1811,31 +1810,28 @@
                       <FontWeight>Normal</FontWeight>
                     </Style>
                   </TextRun>
+                </TextRuns>
+                <Style />
+              </Paragraph>
+              <Paragraph>
+                <TextRuns>
                   <TextRun>
-                    <Value xml:space="preserve">  </Value>
+                    <Value>Régimen:Régimen General de Ley Personas Morales</Value>
                     <Style>
                       <FontFamily>Calibri</FontFamily>
                       <FontSize>8pt</FontSize>
                       <FontWeight>Normal</FontWeight>
                     </Style>
                   </TextRun>
-                  <TextRun>
-                    <Value>=Parameters!Fecha.Value</Value>
-                    <Style>
-                      <FontFamily>Calibri</FontFamily>
-                      <FontSize>9pt</FontSize>
-                      <FontWeight>Normal</FontWeight>
-                    </Style>
-                  </TextRun>
                 </TextRuns>
                 <Style />
               </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox4</rd:DefaultName>
             <Top>2.86594cm</Top>
-            <Left>10.06268cm</Left>
+            <Left>10.09281cm</Left>
-            <Height>0.7927cm</Height>
+            <Height>1.12078cm</Height>
-            <Width>9.71199cm</Width>
+            <Width>10.9783cm</Width>
             <ZIndex>11</ZIndex>
             <Style>
               <Border>
@@ -2046,7 +2042,7 @@
               </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox32</rd:DefaultName>
-            <Top>3.98996cm</Top>
+            <Top>4.05346cm</Top>
             <Left>14.07729cm</Left>
             <Height>0.57354cm</Height>
             <Width>2.90753cm</Width>
@@ -2300,7 +2296,7 @@
             <Source>Embedded</Source>
             <Value>ID3</Value>
             <Sizing>FitProportional</Sizing>
-            <Top>26.4128cm</Top>
+            <Top>26.3493cm</Top>
             <Left>0.28014cm</Left>
             <Height>0.93046cm</Height>
             <Width>5.37042cm</Width>
@@ -2332,7 +2328,7 @@
               </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox60</rd:DefaultName>
-            <Top>24.07802cm</Top>
+            <Top>24.01452cm</Top>
             <Left>0.28014cm</Left>
             <Height>0.6882cm</Height>
             <Width>20.71217cm</Width>
@@ -2385,7 +2381,7 @@
               </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox32</rd:DefaultName>
-            <Top>3.92322cm</Top>
+            <Top>3.98672cm</Top>
             <Left>17.11694cm</Left>
             <Height>0.64028cm</Height>
             <Width>3.90165cm</Width>
@@ -3081,7 +3077,7 @@
             <Value>=System.Convert.FromBase64String(Parameters!QRDescarga.Value)</Value>
             <MIMEType>image/png</MIMEType>
             <Sizing>FitProportional</Sizing>
-            <Top>10.0185in</Top>
+            <Top>9.9935in</Top>
             <Left>6.67743in</Left>
             <Height>0.6035in</Height>
             <Width>0.78275in</Width>
@@ -3134,7 +3130,7 @@
               </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox60</rd:DefaultName>
-            <Top>24.5228cm</Top>
+            <Top>24.4593cm</Top>
             <Left>0.28014cm</Left>
             <Height>1.49135cm</Height>
             <Width>5.37042cm</Width>
@@ -3289,7 +3285,7 @@
               </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox60</rd:DefaultName>
-            <Top>24.5228cm</Top>
+            <Top>24.4593cm</Top>
             <Left>7.45145cm</Left>
             <Height>2.45709cm</Height>
             <Width>6.56105cm</Width>
@@ -3328,7 +3324,7 @@
               </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox60</rd:DefaultName>
-            <Top>24.51302cm</Top>
+            <Top>24.44952cm</Top>
             <Left>14.67145cm</Left>
             <Height>1.46939cm</Height>
             <Width>6.32076cm</Width>
@@ -3834,47 +3830,11 @@
                   </Border>
                 </Style>
               </Tablix>
-              <Textbox Name="Textbox26">
-                <CanGrow>true</CanGrow>
-                <KeepTogether>true</KeepTogether>
-                <Paragraphs>
-                  <Paragraph>
-                    <TextRuns>
-                      <TextRun>
-                        <Value>VERSION 3.3</Value>
-                        <Style>
-                          <FontFamily>MYRiad Pro</FontFamily>
-                          <FontSize>9.16pt</FontSize>
-                          <FontWeight>Bold</FontWeight>
-                        </Style>
-                      </TextRun>
-                    </TextRuns>
-                    <Style>
-                      <TextAlign>Center</TextAlign>
-                    </Style>
-                  </Paragraph>
-                </Paragraphs>
-                <rd:DefaultName>Textbox5</rd:DefaultName>
-                <Top>2.32303cm</Top>
-                <Left>17.39754cm</Left>
-                <Height>0.6cm</Height>
-                <Width>3.32021cm</Width>
-                <ZIndex>4</ZIndex>
-                <Style>
-                  <Border>
-                    <Style>None</Style>
-                  </Border>
-                  <PaddingLeft>2pt</PaddingLeft>
-                  <PaddingRight>2pt</PaddingRight>
-                  <PaddingTop>2pt</PaddingTop>
-                  <PaddingBottom>2pt</PaddingBottom>
-                </Style>
-              </Textbox>
             </ReportItems>
             <KeepTogether>true</KeepTogether>
             <Top>20.92547cm</Top>
             <Left>0.13424cm</Left>
-            <Height>2.97096cm</Height>
+            <Height>2.25247cm</Height>
             <Width>20.89818cm</Width>
             <ZIndex>42</ZIndex>
             <Visibility>
@@ -3945,8 +3905,44 @@
               </Border>
             </Style>
           </Image>
+          <Textbox Name="Textbox26">
+            <CanGrow>true</CanGrow>
+            <KeepTogether>true</KeepTogether>
+            <Paragraphs>
+              <Paragraph>
+                <TextRuns>
+                  <TextRun>
+                    <Value>VERSION 3.3</Value>
+                    <Style>
+                      <FontFamily>MYRiad Pro</FontFamily>
+                      <FontSize>9.16pt</FontSize>
+                      <FontWeight>Bold</FontWeight>
+                    </Style>
+                  </TextRun>
+                </TextRuns>
+                <Style>
+                  <TextAlign>Center</TextAlign>
+                </Style>
+              </Paragraph>
+            </Paragraphs>
+            <rd:DefaultName>Textbox5</rd:DefaultName>
+            <Top>23.28377cm</Top>
+            <Left>17.70088cm</Left>
+            <Height>0.6cm</Height>
+            <Width>3.32021cm</Width>
+            <ZIndex>45</ZIndex>
+            <Style>
+              <Border>
+                <Style>None</Style>
+              </Border>
+              <PaddingLeft>2pt</PaddingLeft>
+              <PaddingRight>2pt</PaddingRight>
+              <PaddingTop>2pt</PaddingTop>
+              <PaddingBottom>2pt</PaddingBottom>
+            </Style>
+          </Textbox>
         </ReportItems>
-        <Height>27.70336cm</Height>
+        <Height>27.49699cm</Height>
         <Style />
       </Body>
       <Width>21.16666cm</Width>

Inventarios/CartaPorteManual.aspx

@@ -217,19 +217,25 @@
                                             </div>
                                             <div class="row rowpadding">
                                                 <label class="col-md-3">Chofer:</label>
-                                                <div class="col-md-9">
+                                                <div class="col-md-8">
                                                     <asp:DropDownList ID="DdlChofer" runat="server" DataTextField="ChoferLicencia" DataValueField="CveChofer" OnSelectedIndexChanged="DldChofer_SelectedIndexChanged" AutoPostBack="true" CssClass="form-control input-sm select2me" Width="100%"></asp:DropDownList>
                                                     <asp:RequiredFieldValidator ID="RfvDdlChofer" runat="server" Enabled="false" ControlToValidate="DdlChofer" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Chofer''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                     <ajax:ValidatorCalloutExtender ID="VceDdlChofer" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlChofer" Width="350px"></ajax:ValidatorCalloutExtender>
                                                 </div>
+                                                <div class="col-md-1">
+                                                    <asp:LinkButton ID="LnkAgregarChofer" runat="server" CssClass="btn btn-primary btn-sm" Text="+" CommandArgument="Agregar Chofer"   />
+                                                </div>
                                             </div>
                                             <div class="row rowpadding">
                                                 <label class="col-md-3">Unidad:</label>
-                                                <div class="col-md-9">
+                                                <div class="col-md-8">
                                                     <asp:DropDownList runat="server" ID="DdlUnidadCamion" AutoPostBack="true" Width="100%" AppendDataBoundItems="true" CssClass="form-control input-sm select2me" DataValueField="CveCamion" DataTextField="CamionPlaca" OnSelectedIndexChanged="DdlUnidadCamionActivoFijo_SelectedIndexChanged" ></asp:DropDownList>
                                                     <asp:RequiredFieldValidator ID="RfvDdlUnidadCamion" runat="server" Enabled="false" ControlToValidate="DdlUnidadCamion" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Unidad''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                     <ajax:ValidatorCalloutExtender ID="VceDdlUnidadCamion" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlUnidadCamion" Width="350px"></ajax:ValidatorCalloutExtender>
                                                 </div>
+                                                  <div class="col-md-1">
+                                                    <asp:LinkButton ID="LnkAgregarUnidad" runat="server" CssClass="btn btn-primary btn-sm" Text="+" CommandArgument="Agregar Unidad"   />
+                                                </div>
                                             </div>
 
 

Inventarios/EntradasSalidas.aspx.vb

@@ -5071,7 +5071,7 @@ Partial Class Inventarios_EntradasSalidas
         If EsConsumoInterno And UsuarioActual.Empresa.Funcionalidad(590) = "1" Then
 
             If DdlSubProyecto.SelectedValue.ToEntero <= 0 Then
-                Alert("Debe seleccionar un Centro de Constos.", TipoMensaje.MsgAdvertencia)
+                Alert("Debe seleccionar un Centro de Costos.", TipoMensaje.MsgAdvertencia)
                 Exit Sub
             Else
                 CargaCultivos()

Inventarios/EntregaAlmacen.aspx.vb

@@ -2351,7 +2351,7 @@ Partial Class Inventarios_EntregaAlmacen
                             ErrorMovInv = True
                         End If
 
-                        If Not ErrorMovInv AndAlso Not ObjConta.AddPrePolizasDetalle(CvePrePolizaTraspaso, True, TotalGarantia, TxtObservaciones.Text, 95, TxtObservaciones.Text, TxtFecha.Text.ToDate, -1, -1, CveMovimientoAlmacen:=CveMovimientoGarantia, Contabilizable:=True, ImporteMX:=TotalGarantia) Then
+                        If Not ErrorMovInv AndAlso Not ObjConta.AddPrePolizasDetalle(CvePrePolizaTraspaso, True, TotalGarantia, TxtObservaciones.Text, 331, TxtObservaciones.Text, TxtFecha.Text.ToDate, -1, -1, CveMovimientoAlmacen:=CveMovimientoGarantia, Contabilizable:=True, ImporteMX:=TotalGarantia) Then
                             ErrorMovInv = True
                         End If
                     Else

Inventarios/RepMovimientosProveedor.aspx

@@ -32,10 +32,7 @@
                         <div class="row">
                             <label class="col-md-1 ">Proveedor:</label>
                             <div class="col-md-3"> 
-                                <asp:DropDownList ID="DdlProveedor" runat="server" AppendDataBoundItems="true" DataTextField="RazonSocial" DataValueField="CveProveedor" Class="table-group-action-input form-control input-inline input-sm select2me" Width="100%">
+                                <ADS:Dropdownlost ID="DdlProveedor" runat="server" CssStyle="width: 100%;" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor"></ADS:Dropdownlost>
-                                </asp:DropDownList>
-                                <asp:RequiredFieldValidator ID="RFVProveedor" runat="server" ControlToValidate="DdlProveedor" Display="None" InitialValue="-1" ErrorMessage="El campo <b>''Proveedor''</b> es requerido por la aplicación, por favor seleccione uno." ValidationGroup="Valida"></asp:RequiredFieldValidator>
-                                <ajax:ValidatorCalloutExtender ID="VCEProveedor" runat="server" HighlightCssClass="vco" TargetControlID="RFVProveedor" Width="350px"></ajax:ValidatorCalloutExtender>
                             </div>
                             <label class="col-md-1 ">Fecha Inicial:</label>
                             <div class="col-md-1">
@@ -72,11 +69,25 @@
                 </div>
                 <div class="portlet-body" style="display:none">
                     <div class="row">
+                        <label class="col-md-1 truncate">P. S.</label>
+                        <div class="col-md-2">
+                            <ADS:Dropdownlost runat="server" ID="DdlPS" CssStyle="width: 100%;" CssClass="DdlPS" CssClassDdl="select2me " DataTextField="PSCodigo" DataValueField="CvePS" />
+                        </div>
                         <label class="col-md-1 ">Concepto:</label>
                         <div class="col-md-2">
                             <asp:DropDownList ID="DdlConcepto" runat="server" AppendDataBoundItems="true" DataTextField="Concepto" DataValueField="CveConcepto" Class="table-group-action-input form-control input-inline input-sm select2me" Width="100%">
                             </asp:DropDownList>
                         </div>
+                        <label class="col-md-1 ">Origen:</label>
+                        <div class="col-md-2">
+                            <asp:DropDownList ID="DdlAlmacenOrigen" runat="server" AppendDataBoundItems="true" DataTextField="Almacen" DataValueField="CveAlmacen" Class="table-group-action-input form-control input-inline input-sm select2me" Width="100%">
+                            </asp:DropDownList>
+                        </div>
+                         <label class="col-md-1 ">Destino:</label>
+                        <div class="col-md-2">
+                            <asp:DropDownList ID="DdlAlmacenDestino" runat="server" AppendDataBoundItems="true" DataTextField="Almacen" DataValueField="CveAlmacen" Class="table-group-action-input form-control input-inline input-sm select2me" Width="100%">
+                            </asp:DropDownList>
+                        </div>
                     </div>
                 </div>
             </div>

Inventarios/RepMovimientosProveedor.aspx.cs

@@ -38,19 +38,39 @@ public partial class Inventarios_RepMovimientosProveedor : ClsPaginas
 
     public void CargaCombos()
     {
-        DdlProveedor.DataSource = get_GlobalDTCompProveedores(UsuarioActual.CveEmpresa);
+        //DdlProveedor.DataSource = get_GlobalDTCompProveedores(UsuarioActual.CveEmpresa);
-        DdlProveedor.Items.Insert(0, new ListItem("Seleccione", "-1"));
+        //DdlProveedor.Items.Insert(0, new ListItem("Seleccione", "-1"));
-        DdlProveedor.DataBind();
+        //DdlProveedor.DataBind();
+        DdlProveedor.setEsWebService(true);
+        DdlProveedor.Attributes.Add("data-metodo", "getproveedores");
+        DdlProveedor.SelectedText = "Todos";
+        DdlProveedor.SelectedValue = "-1";
+
 
         DdlConcepto.DataSource = GlobalDTInvConceptos;
         DdlConcepto.Items.Insert(0, new ListItem("Todos", "-1"));
         DdlConcepto.DataBind();
+
+        DdlAlmacenOrigen.DataSource = get_GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa);
+                DdlAlmacenOrigen.DataBind();
+        DdlAlmacenOrigen.Items.Insert(0, new ListItem("Todos", "-1")); 
+
+        DdlAlmacenDestino.DataSource = get_GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa);
+        DdlAlmacenDestino.DataBind();
+        DdlAlmacenDestino.Items.Insert(0, new ListItem("Todos", "-1"));
+
+        DdlPS.setEsWebService(true);
+        DdlPS.SelectedText = "Todos";
+        DdlPS.SelectedValue = "-1";
     }
 
     public void CargaDatos()
     {
+        int CvePS = DdlPS.SelectedValue.ToEntero();
         ClsInventarios ObjInv = new ClsInventarios();
-        if (ObjInv.GetRepMovimientosProveedor(UsuarioActual.CveEmpresa, DdlConcepto.SelectedValue.ToEntero(), DdlProveedor.SelectedValue.ToEntero(), txtFechaI.Text.ToDate(), txtFechaF.Text.ToDate()))
+        if (ObjInv.GetRepMovimientosProveedor(UsuarioActual.CveEmpresa, DdlConcepto.SelectedValue.ToEntero(), DdlProveedor.SelectedValue.ToEntero(),
+                CvePS, DdlAlmacenOrigen.SelectedValue.ToEntero(), DdlAlmacenDestino.SelectedValue.ToEntero(),
+                txtFechaI.Text.ToDate(), txtFechaF.Text.ToDate()))
         {
             DtDatos = ObjInv.DtResultados;
             GvDatos.DataSource = DtDatos;
@@ -74,7 +94,7 @@ public partial class Inventarios_RepMovimientosProveedor : ClsPaginas
             String FechaI;
             if (txtFechaI.Text == "" || txtFechaI.Text == "__/__/____") { FechaI = "-1"; } else { FechaI = $"&emsp;<b>Fecha Inicial:</b> {txtFechaI.Text}"; }
             String Proveedor;
-            if (DdlProveedor.SelectedValue != "-1") { Proveedor = $"&emsp;<b>Proveedor:</b> {DdlProveedor.SelectedItem.Text}"; } else { Proveedor = ""; }
+            if (DdlProveedor.SelectedValue != "-1") { Proveedor = $"&emsp;<b>Proveedor:</b> {DdlProveedor.SelectedText}"; } else { Proveedor = ""; }
             String Concepto;
             if (DdlConcepto.SelectedValue != "-1") { Concepto = $"&emsp;<b>Concepto:</b> {DdlConcepto.SelectedItem.Text}"; } else { Concepto = ""; }
             System.IO.FileInfo Imagen = new System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta));

Inventarios/ResguardoMaterial.aspx

@@ -493,13 +493,13 @@
                                 <asp:BoundField HeaderText="Serie" DataField="Serie" ItemStyle-Width="20%"  Visible="false"/>
                                 <asp:TemplateField HeaderText="Lote" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="7.5%" Visible="false">
                                 <ItemTemplate>
-                                        <asp:TextBox ID="TxtLote" Width="80px" class="form-control input-sm" runat="server" Visible="false"></asp:TextBox>
+                                        <asp:TextBox ID="TxtLote" Width="85px" class="form-control input-sm" Text='<%# Eval("Lote") %>' runat="server" Visible="false"></asp:TextBox>
                                 </ItemTemplate>
                                 </asp:TemplateField>
                                 <asp:TemplateField HeaderText="Fecha Caducidad" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="5%" Visible="false">
                                     <ItemTemplate>
                                         <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 120px !important; padding: 0px;">
-                                            <asp:TextBox ID="TxtCaducidad" CssClass="form-control input-sm ADSMaskDate" Style="width: 80px" runat="server" Visible="false"></asp:TextBox>
+                                            <asp:TextBox ID="TxtCaducidad" CssClass="form-control input-sm ADSMaskDate"  Text='<%# Eval("FechaCaducidad") %>' Style="width: 80px" runat="server" Visible="false"></asp:TextBox>
                                             <span class="input-group-btn ">
                                                 <asp:LinkButton runat="server" ID="LnkCaducidad" class="btn default" Visible="false"> <i class="fa fa-calendar"></i>  </asp:LinkButton>
                                             </span>

Inventarios/ResguardoMaterial.aspx.vb

@@ -986,7 +986,7 @@ Partial Class Inventarios_ResguardoMaterial
                             Cont = 0
                             Importe = ObjInventario.DtResultados.SUMD("Total").RoundAD
                             For Each Dr As DataRow In ObjInventario.DtResultados.Rows
-                                Dim CveSeccionAlmacen As Integer = DiccionarioSecciones(Dr("CveMovimientoDetalle").ToString.ToEntero).ToString.ToEntero
+                                Dim CveSeccionAlmacen As Integer = -1 'DiccionarioSecciones(Dr("CveMovimientoDetalle").ToString.ToEntero).ToString.ToEntero
                                 Dim Lote As String = "-1"
                                 Dim FechaCaducidad As Date = MinFecha
                                 If DiccionarioLote(Dr("CveMovimientoDetalle").ToString.ToEntero).ToString <> "" Then Lote = DiccionarioLote(Dr("CveMovimientoDetalle").ToString.ToEntero).ToString
@@ -1013,6 +1013,7 @@ Partial Class Inventarios_ResguardoMaterial
         End If
 
         If Not TieneError Then
+            ObjInventario.Commit()
             Dim Msg As New StringBuilder
             If Concepto = 23 Then
                 'FolioEntrada
@@ -1035,7 +1036,6 @@ Partial Class Inventarios_ResguardoMaterial
                 DdlSubProyecto.SelectedValueExist("-1")
             End If
 
-            ObjInventario.Commit()
 
             If Concepto = 23 Then
                 LimpiarMovimiento()

Nomina/ReportePTU.aspx

@@ -4,18 +4,15 @@
 </asp:Content>
 <asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
     <style>
-        .GVCalcularUtilidades tr td:nth-child(2) {
-            text-align: center;
-        }
        
-        .GVCalcularUtilidades tr td:nth-child(n+3) {
+        .GVCalcularUtilidades tr td:nth-child(n+4) {
             text-align: right;
         }
     </style>
 </asp:Content>
 <asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
     <script>$('body').removeClass('rhumanosbody').addClass('rhumanosbody')</script>
-    Reparto de Utilidades
+    PTU
 </asp:Content>
 <asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
 </asp:Content>
@@ -88,11 +85,22 @@
             <asp:GridView ID="GVCalcularUtilidades" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD Widthall GVCalcularUtilidades" AutoGenerateColumns="False"
                 DataKeyNames="Nombre,CvePersonal,DiasLaborados,SueldoTotal,Importe">
                 <Columns>
+                     <asp:TemplateField HeaderText="Código ">
+                        <ItemTemplate>
+                            <asp:Label ID="lblC" runat="server" Text='<%# Eval("Codigo")%>'> </asp:Label>
+                        </ItemTemplate>
+                           </asp:TemplateField>
                     <asp:TemplateField HeaderText="Nombre ">
                         <ItemTemplate>
                             <asp:Label ID="lblnombreCompleto" runat="server" Text='<%# Eval("Nombre")%>'> </asp:Label>
                         </ItemTemplate>
                     </asp:TemplateField>
+                    
+                    <asp:TemplateField HeaderText="Centro Costo">
+                        <ItemTemplate>
+                            <asp:Label ID="lblsub" runat="server" Text='<%# Eval("SubProyecto")%>'> </asp:Label>
+                        </ItemTemplate>
+                    </asp:TemplateField>
                     <asp:TemplateField HeaderText="Días Laborados">
                         <ItemTemplate>
                             <asp:Label ID="lbldiasLaborados" runat="server" Text='<%# Eval("DiasLaborados")%>'> </asp:Label>

OC/OC.aspx

@@ -890,6 +890,8 @@
                                     <asp:GridView ID="GvD" runat="server" AutoGenerateColumns="False" GridLines=" none" BorderColor="Transparent" CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn"
                                         DataKeyNames="SubProyecto, Cantidad, Importe, Descuento, CveOrdenCompra, CveUnidadMedida, CvePresupuestoEgreso, PS,CveClasificacion, CvePS, CveSubProyecto, CveActivoFijo, CodigoAF, TipoDato, Observacion, CveOrdenCompraDetalle,CveCompra,IVAPorcentaje,RetIVAPorcentaje,RetISRPorcentaje,IEPSPSPorcentaje,IEPSPSIVAPorcentaje,CantidadNoEditable,CveCultivoCuadroDetalle" data-tableheader=".GVDHeader" ShowHeader="false" data-rows="0">
                                         <Columns>
+                                            
+                                             <%-- 0 --%>
                                             <asp:TemplateField>
                                                 <EditItemTemplate>
                                                     <asp:TextBox ID="TxtCantEdit" runat="server" Text='<%# Eval("Cantidad", "{0:#,###.######}")%>' Width="45px" Height="24px"></asp:TextBox>
@@ -904,6 +906,7 @@
                                                     <asp:Label ID="LtlCantidad" runat="server" Text='<%# Eval("Cantidad", "{0:#,###.######}")%>' Style="width: 100%"></asp:Label>
                                                 </ItemTemplate>
                                             </asp:TemplateField>
+                                            <%-- 1 --%>
                                             <asp:TemplateField>
                                                 <ItemTemplate>
                                                     <span style="border-bottom: 1px solid gray;">
@@ -924,6 +927,7 @@
                                                     <ajax:ValidatorCalloutExtender ID="VCOPSEdit" runat="server" HighlightCssClass="vco" TargetControlID="RFVPSEdit" Width="300px"></ajax:ValidatorCalloutExtender>
                                                 </EditItemTemplate>
                                             </asp:TemplateField>
+                                            <%-- 2 --%>
                                             <asp:TemplateField>
                                                 <EditItemTemplate>
                                                     <%--DataTextField--%>
@@ -935,6 +939,7 @@
                                                     <asp:Literal ID="LA" runat="server" Text='<%# Bind("UM") %>'></asp:Literal>
                                                 </ItemTemplate>
                                             </asp:TemplateField>
+                                            <%-- 3 --%>
                                             <asp:TemplateField>
                                                 <ItemTemplate>
                                                     <asp:Literal ID="LtlObsPS" runat="server" Text='<%# Eval("Observacion")%>'></asp:Literal>
@@ -943,6 +948,7 @@
                                                     <asp:TextBox ID="TxtObsPS" CssClass="txtobs" runat="server" Rows="2" Text='<%# Eval("Observacion") %>' TextMode="MultiLine" MaxLength="750" Style=""></asp:TextBox>
                                                 </EditItemTemplate>
                                             </asp:TemplateField>
+                                            <%-- 4 --%>
                                             <asp:TemplateField>
                                                 <ItemTemplate>
 
@@ -972,6 +978,7 @@
 
                                                 </EditItemTemplate>
                                             </asp:TemplateField>
+                                            <%-- 5 --%>
                                             <asp:TemplateField>
                                                 <EditItemTemplate>
                                                     <asp:HiddenField ID="HdnCveActivoFijo" Value="-1" runat="server" />
@@ -979,21 +986,14 @@
 
                                                     <asp:TextBox ID="LblEditCodigo" runat="server" Text='<%# Bind("CodigoAF")%>' Width="40px"></asp:TextBox>
                                                     <asp:HyperLink ID="HplMaq" runat="server" ClientIDMode="Static">                                                        
-                                                        <%--<img runat="server" id="ImgAF" alt="Activo Fijo" width="20" height="20" src="/Imagenes/Maquinaria.jpg" style="cursor:pointer;"/>--%>
                                                         <asp:Image runat="server" ID="ImgAF" AlternateText="Activo Fijo" Width="20" Height="20" ImageUrl="/Imagenes/Maquinaria.jpg" Style="cursor: pointer;" />
                                                     </asp:HyperLink>                                                    
-                                                    <%--<asp:HyperLink ID="HplMaq" runat="server" ClientIDMode="Static"><img alt="Maquinaria" width="20px" height="20px" src="/Imagenes/Maquinaria.jpg" style="cursor:pointer;" onclick="$get('divActivosFijos').style.display='';PosicionaObjeto('HplMaq','divActivosFijos');"/></asp:HyperLink>--%>
                                                 </EditItemTemplate>
                                                 <ItemTemplate>
                                                     <asp:Literal ID="LitMaq" runat="server" Text='<%# Bind("CodigoAF")%>'></asp:Literal>
                                                 </ItemTemplate>
                                             </asp:TemplateField>
-                                            <%-- <asp:TemplateField Visible="False">
+                                            <%-- 6 --%>                                         
-                                                        <ItemTemplate>
-                                                            <asp:LinkButton ID="CvePOA2" ClientIDMode="Static" runat="server" CssClass="Texto" Text='<%# Bind("CvePresupuestoEgreso")%>' ToolTip="Error al cargar los datos del Programa Operativo"></asp:LinkButton>
-                                                        </ItemTemplate>
-                                                        <ItemStyle Width="45px" />
-                                                    </asp:TemplateField>--%>
                                             <asp:TemplateField>
                                                 <ItemTemplate>
                                                     <asp:Label ToolTip='<%# If(Not IsDBNull(Eval("Importe")) AndAlso CDbl(Eval("Importe").ToString) <> -1, Eval("Importe"), "")%>' ID="LtlImporte" runat="server" Text='<%# If(Not IsDBNull(Eval("Importe")) AndAlso CDbl(Eval("Importe").ToString) <> -1, Eval("Importe", "{0:#,##0.00####}"), "")%>'></asp:Label>
@@ -1007,6 +1007,8 @@
                                                 </EditItemTemplate>
                                                 <ItemStyle HorizontalAlign="Right" />
                                             </asp:TemplateField>
+
+                                            <%-- 7 --%>
                                             <asp:TemplateField Visible="false">
                                                 <ItemTemplate>
                                                     <asp:Literal ID="LtlDescuento" runat="server" Text='<%# Eval("Descuento", "{0:N2}")%>'></asp:Literal>
@@ -1020,7 +1022,7 @@
                                                 <ItemStyle HorizontalAlign="Right" />
                                             </asp:TemplateField>
 
-
+                                            <%-- 8 --%>
                                             <asp:TemplateField>
                                                 <ItemTemplate>
                                                     <asp:Literal ID="LtlIva" runat="server" Text='<%#  If(Not IsDBNull(Eval("IVA")), If(Eval("IVA").ToString <> "0", String.Concat(Eval("IVA", "{0:#,##0.00####}"), "<br>", Eval("IVAPorcentaje", "{0:0.### %}")), ""), "")  %>'></asp:Literal>
@@ -1028,18 +1030,18 @@
                                                 <ItemStyle HorizontalAlign="Right" />
                                             </asp:TemplateField>
                                         
-
+                                            <%-- 9 --%>
                                             <asp:TemplateField>
                                                 <ItemTemplate>
                                                     <asp:Literal ID="LtlTotal" runat="server" Text='<%# If(Not IsDBNull(Eval("Importe")) AndAlso CDbl(Eval("Importe").ToString) <> -1, Eval("Total", "{0:#,##0.00####}"), "") %>'></asp:Literal>
                                                 </ItemTemplate>
                                                 <ItemStyle HorizontalAlign="Right" />
                                             </asp:TemplateField>
+                                            <%-- 10 --%>
                                             <asp:TemplateField>
 
 
                                                 <EditItemTemplate>                                                    
-                                                    <%--<asp:ImageButton ID="ImgUpdate" runat="server" CausesValidation="True" CommandName="Update" ImageUrl="/Imagenes/Btn_Update.png" Text="Update" />&nbsp;<asp:ImageButton ID="ImgCancel" runat="server" CausesValidation="False" CommandName="Cancel" ImageUrl="/Imagenes/Btn_Cancel.png" Text="Cancel" />--%>
                                                     <div>
                                                         <asp:LinkButton ID="imgU" runat="server" AlternateText="Actualizar" CausesValidation="false" CommandName="Update"
                                                             ValidationGroup="grpEditar" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-check'></i>" />
@@ -1054,27 +1056,30 @@
                                                         <asp:LinkButton ID="imgD" runat="server" AlternateText="Eliminar" CausesValidation="False" CommandName="Delete"
                                                             CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>" data-toggle="confirmation" data-popout="true" data-original-title="confirmar" data-btn-ok-label="si" />
                                                     </div>
-                                                    <%-- <asp:ImageButton ID="ImgEdit" runat="server" CausesValidation="False" CommandName="Edit" ImageUrl="/Imagenes/Btn_Edit.png" Text="Edit" />
+                                                   
-                                                                <asp:ImageButton ID="ImgDelete" runat="server" CausesValidation="False" OnClientClick="return confirm('Está seguro que desea eliminar el movimiento?')" CommandName="Delete" ImageUrl="/Imagenes/Btn_Delete.png" Text="Edit" />--%>
                                                 </ItemTemplate>
                                             </asp:TemplateField>
+                                            <%-- 11 --%>
                                             <asp:TemplateField Visible="false">
                                                 <ItemTemplate>                                                    
-                                                    <%--<asp:HyperLink ID="HLLiga" runat="server" Text="" CssClass="Texto" />--%>
                                                     <asp:Literal ID="LtlLiga" runat="server"></asp:Literal>
                                                 </ItemTemplate>
                                             </asp:TemplateField>
+                                            <%-- 12  --%>
                                             <asp:TemplateField Visible="false">
                                                 <ItemTemplate>
                                                     <asp:Literal ID="LtlCompra" runat="server" Visible='<%# Eval("CveCompra").ToString <> "" %>'></asp:Literal>
                                                     <asp:LinkButton OnClick="LnkCompra_Click" ID="LnkCompra" Visible="false" runat="server">   Ver</asp:LinkButton>
                                                 </ItemTemplate>
                                             </asp:TemplateField>
+                                            <%-- 13 --%>
                                             <asp:TemplateField HeaderText="Clasificación" Visible="False" ShowHeader="true">
                                                 <ItemTemplate>
                                                     <asp:DropDownList runat="server" ID="DdlAC5" CssClass="form-control input-sm select2me" AutoPostBack="true" DataTextField="CodigoClasificacion" DataValueField="CveClasificacion" Width="150px" OnSelectedIndexChanged="CompruebaSaldoAC"></asp:DropDownList>
                                                 </ItemTemplate>
                                             </asp:TemplateField>
+
+                                            <%-- 14 --%>
                                             <asp:TemplateField HeaderText="Programa Operativo" Visible="False" ShowHeader="true">
                                                 <ItemTemplate>
                                                     <asp:HiddenField runat="server" ID="HdnCvePresupuestoEgreso" Value="-1" />
@@ -1085,27 +1090,29 @@
                                                     <asp:DropDownList runat="server" ID="DdlAC1" CssClass="form-control input-sm select2me" AutoPostBack="true" DataTextField="ProgramaOperativo" DataValueField="CveProgramaOperativo" Width="150px" OnSelectedIndexChanged="CompruebaSaldoAC"></asp:DropDownList>
                                                 </ItemTemplate>
                                             </asp:TemplateField>
+
+                                            <%-- 15 --%>
                                             <asp:TemplateField HeaderText="Unidad Administrativa" Visible="False" ShowHeader="true">
                                                 <ItemTemplate>
                                                     <asp:DropDownList runat="server" ID="DdlAC2" CssClass="form-control input-sm select2me" AutoPostBack="true" DataTextField="UnidadAdministrativa" DataValueField="CveUnidadAdministrativa" Width="150px" OnSelectedIndexChanged="CompruebaSaldoAC"></asp:DropDownList>
                                                 </ItemTemplate>
                                             </asp:TemplateField>
+                                            <%-- 16 --%>
                                             <asp:TemplateField HeaderText="Fuente Financiamiento" Visible="False" ShowHeader="true">
                                                 <ItemTemplate>
                                                     <asp:DropDownList runat="server" ID="DdlAC3" CssClass="form-control input-sm select2me" AutoPostBack="true" DataTextField="FuenteFinanciamiento" DataValueField="CveFuenteFinanciamiento" Width="150px" OnSelectedIndexChanged="CompruebaSaldoAC"></asp:DropDownList>
                                                 </ItemTemplate>
                                             </asp:TemplateField>
+                                            <%-- 17 --%>
                                             <asp:TemplateField HeaderText="Tipo Gasto" Visible="False" ShowHeader="true">
                                                 <ItemTemplate>
                                                     <asp:DropDownList runat="server" ID="DdlAC4" CssClass="form-control input-sm select2me" AutoPostBack="true" DataTextField="TipoGasto" DataValueField="CveTipoGasto" Width="100px" OnSelectedIndexChanged="CompruebaSaldoAC"></asp:DropDownList>
                                                 </ItemTemplate>
                                             </asp:TemplateField>
-                                            <%--<asp:TemplateField></asp:TemplateField>
+                                             
-                                            <asp:TemplateField></asp:TemplateField>--%>
                                         </Columns>
                                         <HeaderStyle HorizontalAlign="Center"></HeaderStyle>
-                                        <%--<RowStyle CssClass="Texto" />
+                                      
-                                                    <AlternatingRowStyle CssClass="TextoAlterno" />--%>
                                     </asp:GridView>
 
                                     <asp:UpdatePanel ID="UpIvas" runat="server" class="text-right" UpdateMode="Conditional">

OC/OC.aspx.vb

@@ -862,7 +862,7 @@ Partial Class OC
                 If (UsuarioActual.TienePermisoProceso(203)) AndAlso Dr("TipoTermino").ToString.ToEntero = 3 AndAlso Dr("Tipo").ToString = "OC" Then
                     CargaClasificaciones()
                     If Not UsuarioActual.TienePermisoProceso(131) Then DesHabilitar()
-                    GvD.Columns(9).Visible = True
+                    GvD.Columns(10).Visible = True
                     LbAgregar.Enabled = True
                     txtPrecioUnitario.Enabled = True
                     DdlProyecto.Enabled = True
@@ -1599,7 +1599,7 @@ Partial Class OC
                             SubProyectosNoAutorizados.Add(Row("SubProyecto").ToString)
                             CboE.BackColor = Drawing.Color.Silver
                             CboE.Enabled = False
-                            GvD.Columns(9).Visible = False 'No permitir la edicion
+                            GvD.Columns(10).Visible = False 'No permitir la edicion
                             'GvD.Columns(9).Visible = True
                             ChkCotizacion.Enabled = False
                             TxtDescrip.Enabled = False
@@ -1635,7 +1635,7 @@ Partial Class OC
             'EDICION
             'CUANDO EL LA REGISRO Y TIENE ACCESO A ESE ESTATUS
             If objOC.CveUsuario = UsuarioActual.CveUsuario AndAlso (DtEstatusUsuarios.FiltraParametros(String.Format(" CveEstatus = {0}", CveEstatus)).Rows.Count >= 1 Or CveEstatus = 0) Then
-                GvD.Columns(9).Visible = True 'No permitir la edicion
+                GvD.Columns(10).Visible = True 'No permitir la edicion
                 If ChkCotizacion.Checked AndAlso UsuarioActual.Empresa.Funcionalidad(565) = "1" Then
                     ChkCotizacion.Enabled = False
                 Else
@@ -1720,7 +1720,7 @@ Partial Class OC
 
             If EditarOC Then
                 CboE.Enabled = True
-                GvD.Columns(9).Visible = True 'Permitir la edicion               
+                GvD.Columns(10).Visible = True 'Permitir la edicion               
                 ChkCotizacion.Enabled = True
                 TxtDescrip.Enabled = True
                 TxtJustificacion.Enabled = True
@@ -3684,11 +3684,11 @@ Partial Class OC
                 'If DtEstatusUsuarios.FiltraParametros(String.Format("CveSubProyecto = {0}", e.Row.DBCampo("CveSubProyecto"))).Rows.Count = 0 Then e.Row.FCImageButton("ImgEdit").Visible = False : e.Row.FCImageButton("ImgDelete").Visible = False
 
                 If TipoOC = "OC" AndAlso Not IsDBNull(e.Row.DBCampo("CveOrdenCompraPadre")) AndAlso IsNumeric(e.Row.DBCampo("CveOrdenCompraPadre")) Then
-                    GvD.Columns(10).Visible = True
+                    GvD.Columns(11).Visible = True
                     lblTipoPadreHijo.Visible = True
                     e.Row.FCLiteral("LtlLiga").Text = String.Format("<a class='Texto'  href='/OC/OC.aspx?OC={0}'>{1}</a>", e.Row.DBCampo("CveOrdenCompraPadre"), e.Row.DBCampo("FolioOrdenCompraPadre"))
                 ElseIf TipoOC = "REQ" AndAlso Not IsDBNull(e.Row.DBCampo("CveOrdenCompraHija")) AndAlso IsNumeric(e.Row.DBCampo("CveOrdenCompraHija")) Then
-                    GvD.Columns(10).Visible = True
+                    GvD.Columns(11).Visible = True
                     lblTipoPadreHijo.Visible = True
                     e.Row.FCLiteral("LtlLiga").Text = String.Format("<a class='Texto' href='/OC/OC.aspx?OC={0}'>{1}</a>", e.Row.DBCampo("CveOrdenCompraHija"), e.Row.DBCampo("FolioOrdenCompraHija"))
                 End If
@@ -3702,7 +3702,7 @@ Partial Class OC
                     If ObjOC.DtResultados.Rows.Count = 1 Then
                         e.Row.FCLiteral("LtlCompra").Text = String.Format("<a class='Texto' target='_blank' href='../Compras/Compras.aspx?CveCompra={0}'>{1}</a>", ObjOC.DtResultados.FiltroPrimeroValor("CveCompra"), e.Row.DBCampo("FolioCompra"))
                         LblCompra.Visible = True
-                        GvD.Columns(11).Visible = True
+                        GvD.Columns(12).Visible = True
                     ElseIf ObjOC.DtResultados.Rows.Count > 1 Then
                         LblCompra.Visible = True
                         e.Row.FCLiteral("LtlCompra").Visible = False
@@ -3711,7 +3711,7 @@ Partial Class OC
                         'e.Row.FCLinkButton("LnkCompra").CausesValidation = False
                         'e.Row.FCLinkButton("LnkCompra").OnClientClick = "return true;"  'return true;
                         e.Row.FCLinkButton("LnkCompra").CommandArgument = e.Row.DBCampo("CveOrdenCompraDetalle")
-                        GvD.Columns(11).Visible = True
+                        GvD.Columns(12).Visible = True
                     Else
                         e.Row.FCLiteral("LtlCompra").Text = ""
                         LblCompra.Visible = True
@@ -4134,8 +4134,8 @@ Partial Class OC
         DdlProveedorSucursal.Enabled = False
         DdlProveedorContacto.Enabled = False
 
-        GvD.Columns(9).Visible = False
+        GvD.Columns(10).Visible = False
-        GvD.Columns(10).Visible = True
+        GvD.Columns(11).Visible = True
 
         If Not (BtnCancelarPrevio.Enabled And (CveEstatus <> CveEstatusFinalError OrElse CveEstatus <> CveEstatusFinalOK OrElse UsuarioActual.TienePermisoProceso(148).ToEntero > 0)) Then
             BtnCancelarPrevio.Enabled = False
@@ -4299,11 +4299,11 @@ Partial Class OC
         'Seccion Grid
         If VerificaPresupuesto Then
             GvD.Width = 1750
-            GvD.Columns(12).Visible = True
             GvD.Columns(13).Visible = True
             GvD.Columns(14).Visible = True
             GvD.Columns(15).Visible = True
             GvD.Columns(16).Visible = True
+            GvD.Columns(17).Visible = True
 
             'Panel General
             UpPresupuestosAC.Visible = True
@@ -4330,11 +4330,11 @@ Partial Class OC
 
         Else
             'GvD.Width = Width.ToEntero
-            GvD.Columns(12).Visible = False
             GvD.Columns(13).Visible = False
             GvD.Columns(14).Visible = False
             GvD.Columns(15).Visible = False
             GvD.Columns(16).Visible = False
+            GvD.Columns(17).Visible = False
 
             UpPresupuestosAC.Visible = False
         End If
@@ -6685,11 +6685,11 @@ Partial Class OC
         CboE_SelectedIndexChanged(CboE, EventArgs.Empty)
 
 
-        GvD.Columns(9).Visible = True 'Permitir la edicion    
+        GvD.Columns(10).Visible = True 'Permitir la edicion    
         lblTipoPadreHijo.Visible = False
-        GvD.Columns(10).Visible = False
-        LblCompra.Visible = False
         GvD.Columns(11).Visible = False
+        LblCompra.Visible = False
+        GvD.Columns(12).Visible = False
 
         ChkCotizacion.Visible = True
         ChkCotizacion.Enabled = True
@@ -6818,7 +6818,7 @@ Partial Class OC
         ScriptManager.RegisterStartupScript(Me, GetType(Page), "anioactual", script, True)
         VerificaPresupuesto = False
         RVSubProyecto.Enabled = If(RequiereSubProyecto = True, True, False)
-        GvD.Columns(10).Visible = False
+        GvD.Columns(11).Visible = False
         CargaComboCFDI()
         CargaMonedas()
         'CargaClasificaciones()

PV/PVRepCompras.aspx

@@ -1,180 +0,0 @@
-<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="PVRepCompras.aspx.vb" Inherits="PV_PVRepCompras" %>
-
-<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
-</asp:Content>
-<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
-</asp:Content>
-<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
-    <asp:UpdatePanel runat="server">
-        <ContentTemplate>      
-            <li>
-                <asp:LinkButton ID="ImgImprimir"  runat="server"  Enabled="false"> <i class="fa fa-print"></i> Imprimir</asp:LinkButton>
-                <%--<asp:ImageButton ID="ImgImprimir" runat="server" ImageUrl="/Imagenes/btnImprimir.gif" Width="17px" Height="17px" Enabled="false" />--%>
-            </li>
-            <li>
-                <asp:LinkButton ID="ImgExcel" runat="server" > <i class="fa fa-ad-excel"></i> Generar</asp:LinkButton>
-                <%--<asp:ImageButton ID="ImgExcel" runat="server" ImageUrl="/Imagenes/IconoExcel.gif" Width="17px" Height="17px" />--%>
-            </li>
-            <li>
-                <asp:HyperLink NavigateUrl ="#"  data-toggle="modal" data-target="#DivPersonalizar" ID="ImgPersonalizar" runat="server"  > <i class="fa fa-pencil"></i>  Personalizar</asp:HyperLink>
-                <%--<asp:Image ID="ImgPersonalizar" runat="server" ImageUrl="/Imagenes/Table-icon.png" Width="17px" Height="17px" Style="cursor: pointer;" />--%>        
-            </li>
-        </ContentTemplate>
-    </asp:UpdatePanel>
-    <%--<asp:ImageButton ID="ImgImprimir" runat="server" ImageUrl="/Imagenes/btnImprimir.gif" Width="17px" Height="17px" Enabled="false" />
-    <asp:ImageButton ID="ImgExcel" runat="server" ImageUrl="/Imagenes/IconoExcel.gif" Width="17px" Height="17px" />
-    <asp:Image ID="ImgPersonalizar" runat="server" ImageUrl="/Imagenes/Table-icon.png" Width="17px" Height="17px" Style="cursor: pointer;" />--%>
-</asp:Content>
-<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
-    Reporte de Compras
-</asp:Content>
-<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
-</asp:Content>
-<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
-    <asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional">
-        <ContentTemplate>
-            <div class="portlet solid grey-cascade portlet-filter" style="">
-                <div class="portlet-title portlet-filterT" style="">
-                    <div class="titlefiltros caption ">
-                        <ul class="list-inline">
-                            <li>Proveedor:
-                        <asp:DropDownList ID="DdlProveedores" runat="server" AppendDataBoundItems="true" DataTextField="RazonSocial" DataValueField="CveProveedor" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 250px !important;">
-                            <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
-                        </asp:DropDownList>
-                            </li>
-                            <li>Responsable:
-                         <asp:DropDownList ID="DdlUsuario" runat="server" AppendDataBoundItems="true" DataTextField="Usuario" DataValueField="CveUsuario" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;">
-                             <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
-                         </asp:DropDownList>
-                            </li>
-                            <li>Moneda:
-                        <asp:DropDownList ID="DdlMonedas" runat="server" AppendDataBoundItems="true" DataTextField="Moneda" DataValueField="CveMoneda" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;">
-                            <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
-                        </asp:DropDownList>
-                            </li>
-                        </ul>
-                    </div>
-                    <div class="tools">
-                        <asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" />
-                        <a href="javascript:;" class="expand"></a>
-                        <a onclick="document.getElementById('C_BtnConsultar').click();" class="reload"></a>
-                    </div>
-                </div>
-                <div class="portlet-body" style="display: none;">
-                    <ul class="list-inline">
-                        <li>F.I.:
-                        <asp:TextBox ID="txtFechaI" runat="server" Width="70px"></asp:TextBox>
-                            &nbsp;<asp:ImageButton runat="server" ID="imgCalendario" ImageUrl="/Imagenes/calendar.png" ImageAlign="AbsMiddle" Width="16px" Height="16px" AlternateText="Click para ver el Calendario" />
-                            <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>
-                        </li>
-                        <li style="width: 233px;">F.F.:
-                         <asp:TextBox ID="txtFechaF" runat="server" Width="70px"></asp:TextBox>
-                            &nbsp;<asp:ImageButton runat="server" ID="imgCalendarioF" ImageUrl="/Imagenes/calendar.png" ImageAlign="AbsMiddle" Width="16px" Height="16px" AlternateText="Click para ver el Calendario" />
-                            <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>
-                        </li>
-                        <li>Grupo:
-                        <asp:DropDownList ID="DdlGrupo" runat="server" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 140px !important;">
-                            <asp:ListItem Text="Año" Value="1"></asp:ListItem>
-                            <asp:ListItem Text="Mes" Value="2"></asp:ListItem>
-                            <asp:ListItem Selected="True" Text="Año/Mes" Value="3"></asp:ListItem>
-                            <asp:ListItem Text="Fecha" Value="4"></asp:ListItem>
-                            <asp:ListItem Text="Proveedor" Value="5"></asp:ListItem>
-                            <asp:ListItem Text="Tipo Documento" Value="6"></asp:ListItem>
-                            <asp:ListItem Text="Clasificación Prov" Value="7"></asp:ListItem>
-                            <asp:ListItem Text="Responsable" Value="8"></asp:ListItem>
-                        </asp:DropDownList>
-                        </li>
-                    </ul>
-                </div>
-            </div>
-        </ContentTemplate>
-    </asp:UpdatePanel>
-    <br />
-    <asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional">
-        <ContentTemplate>
-            <table border="0" cellpadding="0" cellspacing="0" id="tblSucursales" runat="server" visible="false">
-                <tr>
-                    <td style="width: 150px">&nbsp;</td>
-                </tr>
-            </table>
-            <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Compras con los filtros especificados" ToolTip="Listado de Compras" CssClass="table table-striped table-advance table-hover" Style="margin-top: -10px; text-align: center;" GridLines="None">
-                <Columns>
-                    <asp:TemplateField>
-                        <HeaderTemplate>
-                            Grupo
-                        </HeaderTemplate>
-                        <ItemTemplate>
-                            <asp:Literal ID="LtlGrupo" runat="server" Text='<%# Eval("GPO") %>'></asp:Literal>
-                        </ItemTemplate>
-                    </asp:TemplateField>
-                </Columns>
-                <RowStyle CssClass="Texto" />
-                <HeaderStyle CssClass="Titulos" />
-            </asp:GridView>
-        </ContentTemplate>
-    </asp:UpdatePanel>
-    <asp:UpdatePanel runat="server" ID="UPPersonalizar" UpdateMode="Conditional">
-        <ContentTemplate>
-            <div id="DivPersonalizar" style="width: 315px; background-color: White; border: solid 1px black; color: Black; display: none; position: absolute;">
-                <table class="table table-striped table-advance table-hover" width="315px">
-                    <tr class="Titulos">
-                        <th style="width: 310px">
-                            <asp:Label ID="LblTitulo1" runat="server" ClientIDMode="Static" Text="Personalizar Columnas"></asp:Label>
-                        </th>
-                        <th style="padding-right: 4px; padding-top: 4px" valign="top">
-                            <img alt="" src="/Imagenes/close.gif" style="cursor: pointer;" onclick="$('#DivPersonalizar').hide(1000);" /></th>
-                    </tr>
-                    <tr align="left">
-                        <td colspan="2">
-                            <table class="table table-striped table-advance table-hover">
-                                <thead>
-                                    <tr>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkRetIVA" runat="server" Text="Ret. IVA" /></th>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkMinSub" runat="server" Text="SubTotal Mínimo" /></th>
-                                    </tr>
-                                    <tr>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkRetISR" runat="server" Text="Ret. ISR" /></th>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkMaxTot" runat="server" Text="Total Máximo" /></th>
-                                    </tr>
-                                    <tr>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkMaxSub" runat="server" Text="SubTotal Máximo" /></th>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkAvgTot" runat="server" Text="Total Promedio" /></th>
-                                    </tr>
-                                    <tr>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkAVGSub" runat="server" Text="SubTotal Promedio" /></th>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkMinTot" runat="server" Text="Total Mínimo" /></th>
-                                    </tr>
-                                </thead>
-
-                            </table>
-                        </td>
-                    </tr>
-                    <tr style="height: 25px">
-                        <td style="text-align: center;" colspan="2">
-                            <asp:Button ID="BtnPersonalizar" runat="server" Text="Personalizar" class="btn btn-primary" /><input type="button" value="Cancelar" onclick="$('#DivPersonalizar').hide(1000);" class="btn btn-danger" /></td>
-                    </tr>
-                </table>
-            </div>
-        </ContentTemplate>
-    </asp:UpdatePanel>
-</asp:Content>
-<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
-</asp:Content>

PV/PVRepCompras.aspx.vb

@@ -1,307 +0,0 @@
-Option Explicit On
-Option Strict On
-
-Imports Extensiones
-Imports System.Data
-
-Partial Class PV_PVRepCompras
-    Inherits ClsPaginas
-
-#Region "Propiedades"
-    'Local
-    Private Property TmpDT As DataTable
-        Get
-            Return CType(ViewState("TmpDT"), DataTable)
-        End Get
-        Set(value As DataTable)
-            ViewState("TmpDT") = value
-        End Set
-    End Property
-#End Region
-
-    Protected Sub Page_Init(sender As Object, e As EventArgs) Handles Me.Init
-        CreaGrid()
-    End Sub
-
-    Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
-        If Not IsPostBack Then
-            CargaCombos()
-            'ImgPersonalizar.Attributes.Add("onclick", "javascript:$('#DivPersonalizar').show(1000); PosicionaObjeto(this.id,'DivPersonalizar');")
-        End If
-    End Sub
-
-    Private Sub CargaCombos()
-        'CargaProveedores
-        'Dim ObjProveedores As New ClsCompProveedores
-        'If ObjProveedores.GetProveedores(ClsCompProveedores.TipoConsulta.ParaUsoEnEmpresa, -1, "-1", "-1", "-1", "-1", "-1", "-1", "-1", UsuarioActual.CveEmpresa) Then
-        '    DdlProveedores.DataSource = ObjProveedores.DtResultados
-        'Else
-        '    DdlProveedores.DataSource = Nothing
-        'End If
-        'ObjProveedores.Dispose()
-        DdlProveedores.DataSource = GlobalDTCompProveedores(UsuarioActual.CveEmpresa)
-        DdlProveedores.DataBind()
-
-        'CargaUsuarios
-        DdlUsuario.DataSource = GlobalDTUsuarioResponsable.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
-        DdlUsuario.DataBind()
-
-        DdlMonedas.DataSource = GlobalDTMonedas()
-        DdlMonedas.DataBind()
-
-    End Sub
-
-    Protected Sub BtnConsultar_Click(sender As Object, e As System.EventArgs) Handles BtnConsultar.Click
-        CargaDatos()
-        UPDatos.Update()
-    End Sub
-
-    Private Sub CreaGrid()
-        Dim TotalAncho As Integer = 150
-        Dim TotalAnchoSucursal As Integer = 0
-        Dim SucursalTitulo As String = ""
-
-        TmpDT = New DataTable
-        TmpDT.Columns.Add("GPO", GetType(String))
-
-        Dim ObjCompras As New ClsPV()
-
-        Dim FechaI, FechaF As String
-        FechaI = If(IsDate(txtFechaI.Text.Trim()), txtFechaI.Text.Trim(), "-1")
-        FechaF = If(IsDate(txtFechaF.Text.Trim()), txtFechaF.Text.Trim(), "-1")
-        If ObjCompras.GetRepPVCompras(FechaI, FechaF, DdlProveedores.SelectedValue.ToEntero, DdlUsuario.SelectedValue.ToEntero, DdlMonedas.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, DdlGrupo.SelectedValue.ToEntero) Then
-            Dim gv As New GridView
-
-            For Each Col As DataColumn In ObjCompras.DtResultados.Columns
-                If Col.ColumnName.Split(CChar("_")).Length = 3 AndAlso Col.ColumnName.Substring(0, 2).ToUpper = "T_" Then
-                    Dim Sucursal As String = Col.ColumnName.Split(CChar("_"))(1).ToUpper()
-                    Dim Categoria As String = Col.ColumnName.Split(CChar("_"))(2).ToUpper()
-
-
-                    Dim bfield As New TemplateField
-                    ' Dim iTemplate As System.Web.UI.ITemplate
-                    bfield.HeaderText = Categoria
-                    'bfield.FooterText = Row("CveEstatus").ToString
-                    bfield.ItemStyle.HorizontalAlign = HorizontalAlign.Right
-
-                    If Sucursal = "TOTAL" Or Categoria = "TOTAL" Then
-                        bfield.ItemStyle.Width = 97
-                        TotalAnchoSucursal = TotalAnchoSucursal + 100
-                        TotalAncho = TotalAncho + 100
-                    Else
-                        bfield.ItemStyle.Width = 87
-                        TotalAnchoSucursal = TotalAnchoSucursal + 90
-                        TotalAncho = TotalAncho + 90
-                    End If
-
-                    bfield.ItemTemplate = New GridViewTemplate(ListItemType.Item, Col.ColumnName)
-                    gv.Columns.Add(bfield)
-
-                    TmpDT.Columns.Add(Col.ColumnName, GetType(Integer))
-
-                    If SucursalTitulo <> Sucursal And Categoria.ToUpper = "TOTAL" Then
-                        SucursalTitulo = Sucursal
-                        Dim Celda As New HtmlTableCell()
-                        Celda.InnerText = SucursalTitulo
-                        Celda.Attributes.Add("class", "Titulos")
-                        Celda.Attributes.Add("style", "border-width: 1px;border-right-style: solid;")
-                        Celda.Width = TotalAnchoSucursal.ToString
-                        tblSucursales.Rows(0).Cells.Add(Celda)
-                        TotalAnchoSucursal = 0
-                    End If
-                End If
-            Next
-
-            For Each Columna In gv.Columns
-                GvDatos.Columns.Add(CType(Columna, DataControlField))
-            Next
-            GvDatos.Width = TotalAncho
-        Else
-            GvDatos.DataSource = Nothing
-        End If
-        ObjCompras.Dispose()
-        UPDatos.Update()
-    End Sub
-
-    Private Sub CargaDatos()
-        Dim ObjCompras As New ClsPV()
-
-        Dim FechaI, FechaF As String
-        FechaI = If(IsDate(txtFechaI.Text.Trim()), txtFechaI.Text.Trim(), "-1")
-        FechaF = If(IsDate(txtFechaF.Text.Trim()), txtFechaF.Text.Trim(), "-1")
-        'FechaI, FechaF, -1, UsuarioActual.CveEmpresa, DdlGrupo.SelectedValue.ToEntero
-        If ObjCompras.GetRepPVCompras(FechaI, FechaF, DdlProveedores.SelectedValue.ToEntero, DdlUsuario.SelectedValue.ToEntero, DdlMonedas.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, DdlGrupo.SelectedValue.ToEntero) Then
-            GvDatos.DataSource = ObjCompras.DtResultados
-            tblSucursales.Visible = True
-        Else
-            GvDatos.DataSource = Nothing
-        End If
-        ObjCompras.Dispose()
-        GvDatos.DataBind()
-
-    End Sub
-
-    Public Class GridViewTemplate
-        Implements ITemplate
-        'A variable to hold the type of ListItemType.
-        Private _templateType As ListItemType
-
-        'A variable to hold the column name.
-        Private _columnName As String
-
-        'Constructor where we define the template type and column name.
-        Public Sub New(type As ListItemType, colname As String)
-            'Stores the template type.
-            _templateType = type
-
-            'Stores the column name.
-            _columnName = colname
-        End Sub
-
-        Private Sub ITemplate_InstantiateIn(container As System.Web.UI.Control) Implements ITemplate.InstantiateIn
-            Select Case _templateType
-                Case ListItemType.Header
-                    'Creates a new label control and add it to the container.
-                    Dim lbl As New Label()
-                    'Allocates the new label object.
-                    lbl.Text = _columnName
-                    'Assigns the name of the column in the lable.
-                    container.Controls.Add(lbl)
-                    'Adds the newly created label control to the container.
-                    Exit Select
-
-                Case ListItemType.Item
-                    'Creates a new text box control and add it to the container.
-                    Dim ltl1 As New Literal
-
-                    ltl1.ID = String.Format("ltl{0}", _columnName)
-                    AddHandler ltl1.DataBinding, AddressOf ltl_DataBinding
-
-                    'Creates a column with size 4.
-                    container.Controls.Add(ltl1)
-                    'Adds the newly created textbox to the container.
-                    Exit Select
-
-                Case ListItemType.EditItem
-                    'As, I am not using any EditItem, I didnot added any code here.
-                    Exit Select
-
-                Case ListItemType.Footer
-                    Dim chkColumn As New CheckBox()
-                    chkColumn.ID = Convert.ToString("Chk") & _columnName
-                    container.Controls.Add(chkColumn)
-                    Exit Select
-            End Select
-        End Sub
-
-        Private Sub hdn_DataBinding(sender As Object, e As EventArgs)
-            Dim hidden As HiddenField = DirectCast(sender, HiddenField)
-            Dim row As GridViewRow = DirectCast(hidden.NamingContainer, GridViewRow)
-            Dim value As String = DataBinder.Eval(row.DataItem, _columnName).ToString()
-            hidden.Value = If(value Is Nothing OrElse value = String.Empty, "-1", value)
-        End Sub
-
-        Private Sub ltl_DataBinding(sender As Object, e As EventArgs)
-            Dim ltl As Literal = DirectCast(sender, Literal)
-            Dim row As GridViewRow = DirectCast(ltl.NamingContainer, GridViewRow)
-            Dim celda As DataControlFieldCell = DirectCast(ltl.Parent, DataControlFieldCell)
-            Dim value As String = DataBinder.Eval(row.DataItem, _columnName).ToString()
-            ltl.Text = value.FormatoNumero
-        End Sub
-
-        ''' <summary>
-        ''' This is the event, which will be raised when the binding happens.
-        ''' </summary>
-        ''' <param name="sender"></param>
-        ''' <param name="e"></param>
-        Private Sub tb1_DataBinding(sender As Object, e As EventArgs)
-            Dim txtdata As TextBox = DirectCast(sender, TextBox)
-            Dim container As GridViewRow = DirectCast(txtdata.NamingContainer, GridViewRow)
-            Dim dataValue As Object = DataBinder.Eval(container.DataItem, _columnName)
-            If dataValue Is DBNull.Value Then
-                txtdata.Text = dataValue.ToString()
-            End If
-        End Sub
-    End Class
-
-    Protected Sub GvDatos_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GvDatos.RowDataBound
-        If e.Row.RowType = DataControlRowType.DataRow Then
-            Dim Css As String = "Texto"
-            If e.Row.RowIndex = 0 Then
-                e.Row.Cells(0).HorizontalAlign = HorizontalAlign.Center
-                e.Row.CssClass = "Totales"
-                Css = "Totales"
-            End If
-
-            'If e.Row.DBCampo("Orden") = "" Then
-            '    e.Row.BackColor = Drawing.Color.LightGray
-            'End If
-
-            Dim FechaI, FechaF As String
-            FechaI = If(IsDate(txtFechaI.Text.Trim()), txtFechaI.Text.Trim(), "-1")
-            FechaF = If(IsDate(txtFechaF.Text.Trim()), txtFechaF.Text.Trim(), "-1")
-
-            Dim Liga As String = String.Format("/Compras/RepComprasDetalle.aspx?GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveProveedor={5}&CveUsuario={6}&FechaI={7}&FechaF={8}&CveMoneda={9}",
-                                               DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveProveedor"), e.Row.DBCampo("CveUsuario"), FechaI, FechaF, e.Row.DBCampo("CveMoneda"))
-
-            e.Row.FCLiteral("LtlGrupo").Text = String.Format("<a class='{0}' href='{1}'>{2}</a>", Css, Liga, e.Row.FCLiteral("LtlGrupo").Text)
-        End If
-    End Sub
-
-    Protected Sub BtnPersonalizar_Click(sender As Object, e As System.EventArgs) Handles BtnPersonalizar.Click
-        If ChkRetIVA.Checked Then
-            GvDatos.Columns(6).Visible = True
-        Else
-            GvDatos.Columns(6).Visible = False
-        End If
-
-        If ChkRetISR.Checked Then
-            GvDatos.Columns(7).Visible = True
-        Else
-            GvDatos.Columns(7).Visible = False
-        End If
-
-        If ChkMinSub.Checked Then
-            GvDatos.Columns(9).Visible = True
-        Else
-            GvDatos.Columns(9).Visible = False
-        End If
-
-        If ChkAVGSub.Checked Then
-            GvDatos.Columns(10).Visible = True
-        Else
-            GvDatos.Columns(10).Visible = False
-        End If
-
-        If ChkMaxSub.Checked Then
-            GvDatos.Columns(11).Visible = True
-        Else
-            GvDatos.Columns(11).Visible = False
-        End If
-
-        If ChkMinTot.Checked Then
-            GvDatos.Columns(12).Visible = True
-        Else
-            GvDatos.Columns(12).Visible = False
-        End If
-
-        If ChkAvgTot.Checked Then
-            GvDatos.Columns(13).Visible = True
-        Else
-            GvDatos.Columns(13).Visible = False
-        End If
-
-        If ChkMaxTot.Checked Then
-            GvDatos.Columns(14).Visible = True
-        Else
-            GvDatos.Columns(14).Visible = False
-        End If
-
-        UPDatos.Update()
-    End Sub
-
-    Protected Sub ImgExcel_Click(sender As Object, e As System.EventArgs) Handles ImgExcel.Click
-        GvDatos.ExportToExcel("ReporteCompras" & Now.ToShortDateString)
-    End Sub
-
-End Class

PV/PVRepVentas.aspx

@@ -1,229 +0,0 @@
-<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="PVRepVentas.aspx.vb" Inherits="PV_PVRepVentas" %>
-
-<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
-</asp:Content>
-<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
-</asp:Content>
-<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
-    <asp:UpdatePanel runat="server">
-        <ContentTemplate>      
-            <li>
-                <asp:LinkButton ID="ImgImprimir"  runat="server"  Enabled="false"> <i class="fa fa-print"></i> Imprimir</asp:LinkButton>
-                <%--<asp:ImageButton ID="ImgImprimir" runat="server" ImageUrl="/Imagenes/btnImprimir.gif" Width="17px" Height="17px" Enabled="false" />--%>
-            </li>
-            <li>
-                <asp:LinkButton ID="ImgExcel" runat="server" > <i class="fa fa-ad-excel"></i> Generar</asp:LinkButton>
-                <%--<asp:ImageButton ID="ImgExcel" runat="server" ImageUrl="/Imagenes/IconoExcel.gif" Width="17px" Height="17px" />--%>
-            </li>
-            <li>
-                <asp:HyperLink NavigateUrl ="#"  data-toggle="modal" data-target="#DivPersonalizar" ID="ImgPersonalizar" runat="server"  > <i class="fa fa-pencil"></i>  Personalizar</asp:HyperLink>
-                <%--<asp:Image ID="ImgPersonalizar" runat="server" ImageUrl="/Imagenes/Table-icon.png" Width="17px" Height="17px" Style="cursor: pointer;" />--%>        
-            </li>
-        </ContentTemplate>
-    </asp:UpdatePanel>
-   <%-- <asp:ImageButton ID="ImgImprimir" runat="server" ImageUrl="/Imagenes/btnImprimir.gif" Width="17px" Height="17px" Enabled="false" />
-    <asp:ImageButton ID="ImgExcel" runat="server" ImageUrl="/Imagenes/IconoExcel.gif" Width="17px" Height="17px" />
-    <asp:Image ID="ImgPersonalizar" runat="server" ImageUrl="/Imagenes/Table-icon.png" Width="17px" Height="17px" Style="cursor: pointer;" />--%>
-</asp:Content>
-<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
-    Reporte de Ventas
-</asp:Content>
-<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
-</asp:Content>
-<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
-    <asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional">
-        <ContentTemplate>
-            <div class="portlet solid grey-cascade portlet-filter" style="">
-                <div class="portlet-title portlet-filterT" style="">
-                    <div class="titlefiltros caption ">
-                        <ul class="list-inline">
-                            <li>Cliente:
-                        <asp:DropDownList ID="DdlClientes" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 200px !important;">
-                            <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
-                        </asp:DropDownList>
-                            </li>
-                            <li>Sucursal:
-                         <asp:DropDownList ID="DdlSubProyecto" runat="server" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 150px !important;">
-                             <asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
-                         </asp:DropDownList>
-                            </li>
-                            <li>Vendedor:
-                        <asp:DropDownList ID="DdlVendedor" runat="server" AppendDataBoundItems="true" DataTextField="Vendedor" DataValueField="Vendedor" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 150px !important;">
-                            <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
-                        </asp:DropDownList>
-                            </li>
-                            <li>Usuario:
-                         <asp:DropDownList ID="DdlUsuario" runat="server" AppendDataBoundItems="true" DataTextField="Usuario" DataValueField="CveUsuario" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 110px !important;">
-                             <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
-                         </asp:DropDownList>
-                            </li>
-                        </ul>
-                    </div>
-                    <div class="tools">
-                        <asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" />
-                        <a href="javascript:;" class="expand"></a>
-                        <a onclick="document.getElementById('C_BtnConsultar').click();" class="reload"></a>
-                    </div>
-                </div>
-                <div class="portlet-body" style="display: none;">
-                    <ul class="list-inline">
-                        <li style="width: 384px;">Estatus:
-                        <asp:DropDownList ID="DdlEstatus" runat="server" AppendDataBoundItems="true" DataTextField="EstatusFactura" DataValueField="CveEstatusFactura" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 120px !important;">
-                            <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
-                        </asp:DropDownList>
-                        </li>
-                        <li>F.I.:
-                         <asp:TextBox ID="txtFechaI" runat="server" Width="70px"></asp:TextBox>
-                            &nbsp;<asp:ImageButton runat="server" ID="imgCalendario" ImageUrl="/Imagenes/calendar.png" ImageAlign="AbsMiddle" Width="16px" Height="16px" AlternateText="Click para ver el Calendario" />
-                            <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>
-                        </li>
-                        <li style="width: 191px;">&nbsp;&nbsp;&nbsp;&nbsp;F.F.:
-                        <asp:TextBox ID="txtFechaF" runat="server" Width="70px"></asp:TextBox>
-                            &nbsp;<asp:ImageButton runat="server" ID="imgCalendarioF" ImageUrl="/Imagenes/calendar.png" ImageAlign="AbsMiddle" Width="16px" Height="16px" AlternateText="Click para ver el Calendario" />
-                            <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>
-                        </li>
-                        <li>Grupo:
-                         <asp:DropDownList ID="DdlGrupo" runat="server" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 120px !important;">
-                             <asp:ListItem Text="Año" Value="1"></asp:ListItem>
-                             <asp:ListItem Text="Mes" Value="2"></asp:ListItem>
-                             <asp:ListItem Selected="True" Text="Año/Mes" Value="3"></asp:ListItem>
-                             <asp:ListItem Text="Fecha" Value="4"></asp:ListItem>
-                             <asp:ListItem Text="Cliente" Value="5"></asp:ListItem>
-                             <asp:ListItem Text="Sucursal" Value="6"></asp:ListItem>
-                             <asp:ListItem Text="Corte" Value="16"></asp:ListItem>
-                             <asp:ListItem Text="Vendedor" Value="7"></asp:ListItem>
-                             <asp:ListItem Text="Usuario" Value="8"></asp:ListItem>
-                             <asp:ListItem Text="Estatus Fact." Value="9"></asp:ListItem>
-                             <asp:ListItem Text="% IVA" Value="10"></asp:ListItem>
-                             <asp:ListItem Text="Año Ejec" Value="11"></asp:ListItem>
-                             <asp:ListItem Text="Mes Ejec" Value="12"></asp:ListItem>
-                             <asp:ListItem Text="Año/Mes Ejec" Value="13"></asp:ListItem>
-                             <asp:ListItem Text="Fecha Ejec" Value="14"></asp:ListItem>
-                             <asp:ListItem Text="Sucursal Ejec" Value="15"></asp:ListItem>
-                         </asp:DropDownList>
-                        </li>
-                    </ul>
-                    <ul class="list-inline">
-                        <li>Sucursal Ejecución:
-                        <asp:DropDownList ID="DdlSubProyectoEjecucion" runat="server" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 250px !important;">
-                            <asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
-                        </asp:DropDownList>
-                        </li>
-                        <li>F.I. E.:
-                         <asp:TextBox ID="TxtFechaIEjec" runat="server" Width="70px"></asp:TextBox>
-                            &nbsp;<asp:ImageButton ID="ImgCalFechaIEjec" runat="server" ImageUrl="/Imagenes/calendar.png" ImageAlign="AbsMiddle" Width="16px" Height="16px" AlternateText="Click para ver el Calendario" />
-                            <ajax:MaskedEditExtender ID="MEEFechaIEjec" runat="server" TargetControlID="TxtFechaIEjec" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
-                            <ajax:CalendarExtender ID="CalFechaIEjec" runat="server" TargetControlID="TxtFechaIEjec" PopupButtonID="ImgCalFechaIEjec" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
-                            <asp:RequiredFieldValidator ID="RFVFechaIEjec" runat="server" ControlToValidate="TxtFechaIEjec" Display="None" ErrorMessage="El campo <b>''Fecha Inicial Ejecución''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
-                            <asp:CompareValidator ID="CVFechaIEjec" runat="server" ControlToValidate="TxtFechaIEjec" Display="None" ErrorMessage="El campo <b>''Fecha Inicial Ejecución''</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="VCOFechaIEjec1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaIEjec" Width="350px"></ajax:ValidatorCalloutExtender>
-                            <ajax:ValidatorCalloutExtender ID="VCOFechaIEjec2" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaIEjec" Width="350px"></ajax:ValidatorCalloutExtender>
-                        </li>
-                        <li>F.F. E.:
-                        <asp:TextBox ID="TxtFechaFEjec" runat="server" Width="70px"></asp:TextBox>
-                            &nbsp;<asp:ImageButton ID="ImgCalFechaFEjec" runat="server" ImageUrl="/Imagenes/calendar.png" ImageAlign="AbsMiddle" Width="16px" Height="16px" AlternateText="Click para ver el Calendario" />
-                            <ajax:MaskedEditExtender ID="MEEFechaFEjec" runat="server" TargetControlID="TxtFechaFEjec" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
-                            <ajax:CalendarExtender ID="CalFechaFEjec" runat="server" TargetControlID="TxtFechaFEjec" PopupButtonID="ImgCalFechaFEjec" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
-                            <asp:RequiredFieldValidator ID="RFVFechaFEjec" runat="server" ControlToValidate="TxtFechaFEjec" Display="None" ErrorMessage="El campo <b>''Fecha Final Ejecución''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
-                            <asp:CompareValidator ID="CVFechaFEjec" runat="server" ControlToValidate="TxtFechaFEjec" Display="None" ErrorMessage="El campo <b>''Fecha Final Ejecución''</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="VCOFechaFEjec1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaFEjec" Width="350px"></ajax:ValidatorCalloutExtender>
-                            <ajax:ValidatorCalloutExtender ID="VCOFechaFEjec2" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaFEjec" Width="350px"></ajax:ValidatorCalloutExtender>
-                        </li>
-                    </ul>
-                </div>
-            </div>
-        </ContentTemplate>
-    </asp:UpdatePanel>
-    <br />
-    <div class="row">
-        <div class="col-md-12">
-    <asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional">
-        <ContentTemplate>
-            <table border="0" cellpadding="0" cellspacing="0" id="tblSucursales" runat="server" visible="false">
-                <tr>
-                    <td style="width: 150px">&nbsp;</td>
-                </tr>
-            </table>
-            <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Ventas con los filtros especificados" ToolTip="Listado de Ventas" CssClass="table table-striped table-advance table-hover" Style=" text-align: center;" GridLines="None">
-                <Columns>
-                    <asp:TemplateField>
-                        <HeaderTemplate>
-                            Grupo
-                        </HeaderTemplate>
-                        <ItemTemplate>
-                            <asp:Literal ID="LtlGrupo" runat="server" Text='<%# Eval("GPO") %>'></asp:Literal>
-                        </ItemTemplate>
-                    </asp:TemplateField>
-                </Columns>
-                <RowStyle CssClass="Texto" />
-                <HeaderStyle CssClass="Titulos" />
-            </asp:GridView>
-        </ContentTemplate>
-    </asp:UpdatePanel>
-    <asp:UpdatePanel runat="server" ID="UPPersonalizar" UpdateMode="Conditional">
-        <ContentTemplate>
-            <div id="DivPersonalizar" style="width: 330px; background-color: White; border: solid 1px black; color: Black; display: none; position: absolute;">
-                <table class="table table-striped table-advance table-hover" width="330px">
-                    <tr class="Titulos">
-                        <th style="width: 325px">
-                            <asp:Label ID="LblTitulo1" runat="server" ClientIDMode="Static" Text="Personalizar Columnas"></asp:Label>
-                        </th>
-                        <th style="padding-right: 4px; padding-top: 4px" valign="top">
-                            <img alt="" src="/Imagenes/close.gif" style="cursor: pointer;" onclick="$('#DivPersonalizar').hide(1000);" /></th>
-                    </tr>
-                    <tr align="left">
-                        <td colspan="2">
-                            <table class="table table-striped table-advance table-hover">
-                                <thead>
-                                    <tr>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkRetIVA" runat="server" Text="Ret. IVA" /></th>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkMinSub" runat="server" Text="SubTotal Mínimo" /></th>
-                                    </tr>
-                                    <tr>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkRetISR" runat="server" Text="Ret. ISR" /></th>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkMaxTot" runat="server" Text="Total Máximo" /></th>
-                                    </tr>
-                                    <tr>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkMaxSub" runat="server" Text="SubTotal Máximo" /></th>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkAvgTot" runat="server" Text="Total Promedio" /></th>
-                                    </tr>
-                                    <tr>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkAVGSub" runat="server" Text="SubTotal Promedio" /></th>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkMinTot" runat="server" Text="Total Mínimo" /></th>
-                                    </tr>
-                                </thead>
-
-                            </table>
-                        </td>
-                    </tr>
-                    <tr style="height: 25px">
-                        <td style="text-align: center;" colspan="2">
-                            <asp:Button ID="BtnPersonalizar" runat="server" Text="Personalizar" class="btn btn-primary" /><input type="button" value="Cancelar" onclick="$('#DivPersonalizar').hide(1000);" class="btn btn-danger" /></td>
-                    </tr>
-                </table>
-            </div>
-        </ContentTemplate>
-    </asp:UpdatePanel>
-            </div>
-        </div>
-</asp:Content>
-<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
-</asp:Content>

PV/PVRepVentas.aspx.vb

@@ -1,365 +0,0 @@
-Option Explicit On
-Option Strict On
-
-Imports System.Data
-Imports Extensiones
-
-Partial Class PV_PVRepVentas
-    Inherits ClsPaginas
-
-#Region "Propiedades"
-    'Local
-    Private Property TmpDT As DataTable
-        Get
-            Return CType(ViewState("TmpDT"), DataTable)
-        End Get
-        Set(value As DataTable)
-            ViewState("TmpDT") = value
-        End Set
-    End Property
-#End Region
-
-    Protected Sub Page_Init(sender As Object, e As EventArgs) Handles Me.Init
-        CreaGrid()
-    End Sub
-
-    Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
-        If Not IsPostBack Then
-            ' If UsuarioActual.CveEmpresa = 2 AndAlso UsuarioActual.CveUsuario.Contiene(77, 21) Then Response.Redirect("/Inicio.aspx")
-            CargaCombos()
-            'ImgPersonalizar.Attributes.Add("onclick", "javascript:$('#DivPersonalizar').show(1000); PosicionaObjeto(this.id,'DivPersonalizar');")
-        End If
-    End Sub
-
-    Private Sub CargaCombos()
-        'CargaClientes
-        Dim ObjClientes As New ClsClientes
-        If ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa) Then
-            DdlClientes.DataSource = ObjClientes.DtResultados
-        Else
-            DdlClientes.DataSource = Nothing
-        End If
-        ObjClientes.Dispose()
-        DdlClientes.DataBind()
-
-        'CargaSucursales
-        DdlSubProyecto.DataSource = GlobalDTSubProyectos(-1).FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
-        DdlSubProyecto.DataBind()
-        DdlSubProyectoEjecucion.DataSource = GlobalDTSubProyectos(-1).FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
-        DdlSubProyectoEjecucion.DataBind()
-
-        'Vendedor
-
-        'CargaUsuarios
-        DdlUsuario.DataSource = GlobalDTUsuarios.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
-        DdlUsuario.DataBind()
-
-        'CargaEstatus
-        DdlEstatus.DataSource = GlobalDTEstatusFactura.FiltraParametros(" CveEstatusFactura NOT IN (1, 4, 5) ")
-        DdlEstatus.DataBind()
-        DdlEstatus.Items.Add(New ListItem("Canceladas", "4"))
-        'If UsuarioActual.Empresa.TipoFacturacion = "CFDi" Then
-        '    DdlEstatus.SelectedIndex = 2
-        'Else
-        DdlEstatus.SelectedIndex = 1
-        'End If
-    End Sub
-
-    Protected Sub BtnConsultar_Click(sender As Object, e As System.EventArgs) Handles BtnConsultar.Click
-        CargaDatos()
-        ConfiguraEmpresa()
-        UPDatos.Update()
-    End Sub
-
-    Private Sub CreaGrid()
-        Dim TotalAncho As Integer = 150
-        Dim TotalAnchoSucursal As Integer = 0
-        Dim SucursalTitulo As String = ""
-
-        TmpDT = New DataTable
-        TmpDT.Columns.Add("GPO", GetType(String))
-
-        Dim ObjVentas As New ClsPV()
-
-        Dim FechaI, FechaF, FechaIEjec, FechaFEjec As String
-        FechaI = If(IsDate(txtFechaI.Text.Trim()), txtFechaI.Text.Trim(), "-1")
-        FechaF = If(IsDate(txtFechaF.Text.Trim()), txtFechaF.Text.Trim(), "-1")
-        FechaIEjec = If(IsDate(TxtFechaIEjec.Text.Trim()), TxtFechaIEjec.Text.Trim(), "-1")
-        FechaFEjec = If(IsDate(TxtFechaFEjec.Text.Trim()), TxtFechaFEjec.Text.Trim(), "-1")
-        If ObjVentas.GetRepPVVentas(FechaI, FechaF, FechaIEjec, FechaFEjec, DdlClientes.SelectedValue.ToEntero, DdlSubProyecto.SelectedValue.ToEntero, DdlSubProyectoEjecucion.SelectedValue.ToEntero, DdlVendedor.SelectedValue,
-                                  DdlUsuario.SelectedValue.ToEntero, DdlEstatus.SelectedValue.ToEntero, "-1", UsuarioActual.CveEmpresa, DdlGrupo.SelectedValue.ToEntero) Then
-            Dim gv As New GridView
-
-            For Each Col As DataColumn In ObjVentas.DtResultados.Columns
-                If Col.ColumnName.Split(CChar("_")).Length >= 3 AndAlso Col.ColumnName.Substring(0, 2).ToUpper = "T_" Then
-                    Dim Sucursal As String = Col.ColumnName.Split(CChar("_"))(1).ToUpper()
-                    Dim Categoria As String = Col.ColumnName.Split(CChar("_"))(2).ToUpper()
-                    ' Dim CveSucursal As Integer = Col.ColumnName.Split(CChar("_"))(3).ToEntero
-
-
-                    Dim bfield As New TemplateField
-                    ' Dim iTemplate As System.Web.UI.ITemplate
-                    bfield.HeaderText = Categoria
-                    'bfield.FooterText = Row("CveEstatus").ToString
-                    bfield.ItemStyle.HorizontalAlign = HorizontalAlign.Right
-
-                    If Sucursal = "TOTAL" Or Categoria = "TOTAL" Then
-                        bfield.ItemStyle.Width = 97
-                        TotalAnchoSucursal = TotalAnchoSucursal + 100
-                        TotalAncho = TotalAncho + 100
-                    Else
-                        bfield.ItemStyle.Width = 87
-                        TotalAnchoSucursal = TotalAnchoSucursal + 90
-                        TotalAncho = TotalAncho + 90
-                    End If
-
-                    bfield.ItemTemplate = New GridViewTemplate(ListItemType.Item, Col.ColumnName)
-                    '  bfield.ItemTemplate
-                    gv.Columns.Add(bfield)
-
-                    TmpDT.Columns.Add(Col.ColumnName, GetType(Integer))
-
-                    If SucursalTitulo <> Sucursal And Categoria.ToUpper = "TOTAL" Then
-                        SucursalTitulo = Sucursal
-                        Dim Celda As New HtmlTableCell()
-                        'Celda.InnerHtml = String.Format("<font color='White'>{0}</font>", SucursalTitulo)
-                        Celda.InnerText = SucursalTitulo
-                        'Celda.BorderColor = "White"
-                        'Celda.BgColor = "Gray"
-                        Celda.Attributes.Add("class", "Titulos")
-                        Celda.Attributes.Add("style", "border-width: 1px;border-right-style: solid;")
-                        Celda.Width = TotalAnchoSucursal.ToString
-                        tblSucursales.Rows(0).Cells.Add(Celda)
-                        TotalAnchoSucursal = 0
-                    End If
-                End If
-            Next
-
-            For Each Columna In gv.Columns
-                GvDatos.Columns.Add(CType(Columna, DataControlField))
-            Next
-            GvDatos.Width = TotalAncho
-        Else
-            GvDatos.DataSource = Nothing
-        End If
-        ObjVentas.Dispose()
-        UPDatos.Update()
-    End Sub
-
-    Private Sub CargaDatos()
-        Dim ObjVentas As New ClsPV()
-
-        Dim FechaI, FechaF, FechaIEjec, FechaFEjec As String
-        FechaI = If(IsDate(txtFechaI.Text.Trim()), txtFechaI.Text.Trim(), "-1")
-        FechaF = If(IsDate(txtFechaF.Text.Trim()), txtFechaF.Text.Trim(), "-1")
-        FechaIEjec = If(IsDate(TxtFechaIEjec.Text.Trim()), TxtFechaIEjec.Text.Trim(), "-1")
-        FechaFEjec = If(IsDate(TxtFechaFEjec.Text.Trim()), TxtFechaFEjec.Text.Trim(), "-1")
-        If ObjVentas.GetRepPVVentas(FechaI, FechaF, FechaIEjec, FechaFEjec, DdlClientes.SelectedValue.ToEntero, DdlSubProyecto.SelectedValue.ToEntero, DdlSubProyectoEjecucion.SelectedValue.ToEntero, DdlVendedor.SelectedValue,
-                                  DdlUsuario.SelectedValue.ToEntero, DdlEstatus.SelectedValue.ToEntero, "-1", UsuarioActual.CveEmpresa, DdlGrupo.SelectedValue.ToEntero) Then
-            GvDatos.DataSource = ObjVentas.DtResultados
-            tblSucursales.Visible = True
-        Else
-            GvDatos.DataSource = Nothing
-        End If
-        ObjVentas.Dispose()
-        GvDatos.DataBind()
-
-    End Sub
-
-    Private Sub ConfiguraEmpresa()
-        'If Not UsuarioActual.Empresa.MostrarRetIVA Then GvDatos.Columns(6).Visible = False
-        'If Not UsuarioActual.Empresa.MostrarRetISR Then GvDatos.Columns(7).Visible = False
-    End Sub
-
-    Protected Sub BtnPersonalizar_Click(sender As Object, e As System.EventArgs) Handles BtnPersonalizar.Click
-        If ChkRetIVA.Checked Then
-            GvDatos.Columns(6).Visible = True
-        Else
-            GvDatos.Columns(6).Visible = False
-        End If
-
-        If ChkRetISR.Checked Then
-            GvDatos.Columns(7).Visible = True
-        Else
-            GvDatos.Columns(7).Visible = False
-        End If
-
-        If ChkMinSub.Checked Then
-            GvDatos.Columns(9).Visible = True
-        Else
-            GvDatos.Columns(9).Visible = False
-        End If
-
-        If ChkAVGSub.Checked Then
-            GvDatos.Columns(10).Visible = True
-        Else
-            GvDatos.Columns(10).Visible = False
-        End If
-
-        If ChkMaxSub.Checked Then
-            GvDatos.Columns(11).Visible = True
-        Else
-            GvDatos.Columns(11).Visible = False
-        End If
-
-        If ChkMinTot.Checked Then
-            GvDatos.Columns(12).Visible = True
-        Else
-            GvDatos.Columns(12).Visible = False
-        End If
-
-        If ChkAvgTot.Checked Then
-            GvDatos.Columns(13).Visible = True
-        Else
-            GvDatos.Columns(13).Visible = False
-        End If
-
-        If ChkMaxTot.Checked Then
-            GvDatos.Columns(14).Visible = True
-        Else
-            GvDatos.Columns(14).Visible = False
-        End If
-
-        UPDatos.Update()
-    End Sub
-
-    Protected Sub ImgExcel_Click(sender As Object, e As System.EventArgs) Handles ImgExcel.Click
-        GvDatos.ExportToExcel("ReporteVentas" & Now.ToShortDateString)
-    End Sub
-
-
-    'Region "TEMPLATE"
-    Public Class GridViewTemplate
-        Implements ITemplate
-        'A variable to hold the type of ListItemType.
-        Private _templateType As ListItemType
-
-        'A variable to hold the column name.
-        Private _columnName As String
-
-     
-        'Constructor where we define the template type and column name.
-        Public Sub New(type As ListItemType, colname As String)
-            'Stores the template type.
-            _templateType = type
-
-            'Stores the column name.
-            _columnName = colname
-
-        End Sub
-
-        Private Sub ITemplate_InstantiateIn(container As System.Web.UI.Control) Implements ITemplate.InstantiateIn
-            Select Case _templateType
-                Case ListItemType.Header
-                    'Creates a new label control and add it to the container.
-                    Dim lbl As New Label()
-                    'Allocates the new label object.
-                    lbl.Text = _columnName
-                    'Assigns the name of the column in the lable.
-                    container.Controls.Add(lbl)
-                    'Adds the newly created label control to the container.
-                    Exit Select
-
-                Case ListItemType.Item
-                    'Creates a new text box control and add it to the container.
-                    Dim ltl1 As New Literal
-                    ltl1.ID = String.Format("ltl{0}", _columnName)
-                    AddHandler ltl1.DataBinding, AddressOf ltl_DataBinding
-
-                    'AddHandler hdn1.DataBinding, AddressOf hdn_DataBinding
-
-                    'Creates a column with size 4.
-                    container.Controls.Add(ltl1)
-                    'Adds the newly created textbox to the container.
-                    Exit Select
-
-                Case ListItemType.EditItem
-                    'As, I am not using any EditItem, I didnot added any code here.
-                    Exit Select
-
-                Case ListItemType.Footer
-                    Dim chkColumn As New CheckBox()
-                    chkColumn.ID = Convert.ToString("Chk") & _columnName
-                    container.Controls.Add(chkColumn)
-                    Exit Select
-            End Select
-        End Sub
-
-        Private Sub hdn_DataBinding(sender As Object, e As EventArgs)
-            Dim hidden As HiddenField = DirectCast(sender, HiddenField)
-            Dim row As GridViewRow = DirectCast(hidden.NamingContainer, GridViewRow)
-            Dim value As String = DataBinder.Eval(row.DataItem, _columnName).ToString()
-            hidden.Value = If(value Is Nothing OrElse value = String.Empty, "-1", value)
-        End Sub
-
-        Private Sub ltl_DataBinding(sender As Object, e As EventArgs)
-            Dim ltl As Literal = DirectCast(sender, Literal)
-            Dim row As GridViewRow = DirectCast(ltl.NamingContainer, GridViewRow)
-            Dim celda As DataControlFieldCell = DirectCast(ltl.Parent, DataControlFieldCell)
-            Dim value As String = DataBinder.Eval(row.DataItem, _columnName).ToString()
-            ltl.Text = value.FormatoNumero
-        End Sub
-
-        ''' <summary>
-        ''' This is the event, which will be raised when the binding happens.
-        ''' </summary>
-        ''' <param name="sender"></param>
-        ''' <param name="e"></param>
-        Private Sub tb1_DataBinding(sender As Object, e As EventArgs)
-            Dim txtdata As TextBox = DirectCast(sender, TextBox)
-            Dim container As GridViewRow = DirectCast(txtdata.NamingContainer, GridViewRow)
-            Dim dataValue As Object = DataBinder.Eval(container.DataItem, _columnName)
-            If dataValue Is DBNull.Value Then
-                txtdata.Text = dataValue.ToString()
-            End If
-        End Sub
-    End Class
-
-    Protected Sub GvDatos_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvDatos.RowDataBound
-        If e.Row.RowType = DataControlRowType.DataRow Then
-            Dim Css As String = "Texto"
-            If e.Row.RowIndex = 0 Then
-                e.Row.Cells(0).HorizontalAlign = HorizontalAlign.Center
-                '   e.Row.Cells(0).Width = Unit.Pixel(150)
-                e.Row.CssClass = "Totales"
-                Css = "Totales"
-            End If
-
-            Dim FechaI, FechaF As String
-            FechaI = If(IsDate(txtFechaI.Text.Trim()), txtFechaI.Text.Trim(), "-1")
-            FechaF = If(IsDate(txtFechaF.Text.Trim()), txtFechaF.Text.Trim(), "-1")
-
-            Dim Liga As String = String.Format("/Ventas/RepVentaDetalle.aspx?GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSucursal={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&FechaI={10}&FechaF={11}&IVA={12}&CveCorte={13}",
-                                               DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveCliente"), e.Row.DBCampo("CveSubProyecto"),
-                                               e.Row.DBCampo("Vendedor"), e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), FechaI, FechaF, e.Row.DBCampo("GPO_IVA"), e.Row.DBCampo("CveCorte"))
-
-            e.Row.FCLiteral("LtlGrupo").Text = "<a class=""" & Css & """ href=""" & Liga & """>" & e.Row.FCLiteral("LtlGrupo").Text & "</a>"
-            'e.Row.FCLiteral("LtlCantidad").Text = "<a class=""" & Css & """ href=""" & Liga & """>" & e.Row.FCLiteral("LtlCantidad").Text & "</a>"
-
-            For Each Col As DataColumn In DirectCast(e.Row.DataItem, System.Data.DataRowView).Row.Table.Columns
-                If Col.ColumnName.Split(CChar("_")).Count = 4 Then
-                    Dim CveSubProyecto As Integer = Col.ColumnName.Split(CChar("_"))(3).ToEntero
-                    Liga = String.Format("/Ventas/RepVentaDetalle.aspx?GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente={5}&CveSucursal={6}&Vendedor={7}&CveUsuario={8}&CveEstatusFactura={9}&FechaI={10}&FechaF={11}&IVA={12}&CveCorte={13}",
-                                             DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveCliente"), CveSubProyecto,
-                                             e.Row.DBCampo("Vendedor"), e.Row.DBCampo("CveUsuario"), e.Row.DBCampo("CveEstatusFactura"), FechaI, FechaF, e.Row.DBCampo("GPO_IVA"), e.Row.DBCampo("CveCorte"))
-
-                    e.Row.FCLiteral(String.Format("ltl{0}", Col.ColumnName)).Text = "<a class=""" & Css & """ href=""" & Liga & """>" & e.Row.FCLiteral(String.Format("ltl{0}", Col.ColumnName)).Text & "</a>"
-                End If
-            Next
-
-            'If e.Row.DBCampo("SubTotal").ToDouble = 0 Then e.Row.FCLiteral("LtlSubTotal").Text = ""
-            'If e.Row.DBCampo("Descuento").ToDouble = 0 Then e.Row.FCLiteral("LtlDescuento").Text = ""
-            'If e.Row.DBCampo("Amortizacion").ToDouble = 0 Then e.Row.FCLiteral("LtlAmortizacion").Text = ""
-            'If e.Row.DBCampo("IVA").ToDouble = 0 Then e.Row.FCLiteral("LtlIVA").Text = ""
-            'If e.Row.DBCampo("RetIVA").ToDouble = 0 Then e.Row.FCLiteral("LtlRetIVA").Text = ""
-            'If e.Row.DBCampo("RetISR").ToDouble = 0 Then e.Row.FCLiteral("LtlRetISR").Text = ""
-            'If e.Row.DBCampo("Total").ToDouble = 0 Then e.Row.FCLiteral("LtlTotal").Text = ""
-            'If e.Row.DBCampo("MAX_SubTotal").ToDouble = 0 Then e.Row.FCLiteral("LtlMaxSubTotal").Text = ""
-            'If e.Row.DBCampo("AVG_SubTotal").ToDouble = 0 Then e.Row.FCLiteral("LtlAVGSubTotal").Text = ""
-            'If e.Row.DBCampo("MIN_SubTotal").ToDouble = 0 Then e.Row.FCLiteral("LtlMinSubTotal").Text = ""
-            'If e.Row.DBCampo("MAX_Total").ToDouble = 0 Then e.Row.FCLiteral("LtlMaxTotal").Text = ""
-            'If e.Row.DBCampo("AVG_Total").ToDouble = 0 Then e.Row.FCLiteral("LtlAVGTotal").Text = ""
-            'If e.Row.DBCampo("MIN_Total").ToDouble = 0 Then e.Row.FCLiteral("LtlMinTotal").Text = ""
-        End If
-    End Sub
-End Class

PV/PVRepVentasCompras.aspx

@@ -1,164 +0,0 @@
-<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="PVRepVentasCompras.aspx.vb" Inherits="PV_PVRepVentasCompras" %>
-
-<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
-</asp:Content>
-<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
-</asp:Content>
-<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
-    <asp:ImageButton ID="ImgImprimir" runat="server" ImageUrl="/Imagenes/btnImprimir.gif" Width="17px" Height="17px" Enabled="false" />
-    <asp:ImageButton ID="ImgExcel" runat="server" ImageUrl="/Imagenes/IconoExcel.gif" Width="17px" Height="17px" />
-    <asp:Image ID="ImgPersonalizar" runat="server" ImageUrl="/Imagenes/Table-icon.png" Width="17px" Height="17px" Style="cursor: pointer;" />
-</asp:Content>
-<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
-    Reporte de Ventas y Compras
-</asp:Content>
-<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
-</asp:Content>
-<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
-    <asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional">
-        <ContentTemplate>
-            <div class="portlet solid grey-cascade portlet-filter" style="">
-                <div class="portlet-title portlet-filterT" style="">
-                    <div class="titlefiltros caption ">
-                        <ul class="list-inline">
-                            <li>Sucursal
-                        <asp:DropDownList ID="DdlSubProyecto" runat="server" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 200px !important;">
-                            <asp:ListItem Selected="True" Text="Todas" Value="-1"></asp:ListItem>
-                        </asp:DropDownList>
-                            </li>
-                            <li>Fecha Inicial:
-                         <asp:TextBox ID="txtFechaI" runat="server" Width="70px"></asp:TextBox>
-                                &nbsp;<asp:ImageButton runat="server" ID="imgCalendario" ImageUrl="/Imagenes/calendar.png" ImageAlign="AbsMiddle" Width="16px" Height="16px" AlternateText="Click para ver el Calendario" />
-                                <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>
-                            </li>
-                            <li>Fecha Final:
-                        <asp:TextBox ID="txtFechaF" runat="server" Width="70px"></asp:TextBox>
-                                &nbsp;<asp:ImageButton runat="server" ID="imgCalendarioF" ImageUrl="/Imagenes/calendar.png" ImageAlign="AbsMiddle" Width="16px" Height="16px" AlternateText="Click para ver el Calendario" />
-                                <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>
-                            </li>
-                            <li>Grupo:
-                        <asp:DropDownList ID="DdlGrupo" runat="server" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;">
-                            <asp:ListItem Text="Año" Value="1"></asp:ListItem>
-                            <asp:ListItem Text="Mes" Value="2"></asp:ListItem>
-                            <asp:ListItem Text="Año/Mes" Value="3"></asp:ListItem>
-                            <asp:ListItem Text="Fecha" Value="4"></asp:ListItem>
-                            <asp:ListItem Text="Cliente" Value="5"></asp:ListItem>
-                            <asp:ListItem Selected="True" Text="Sucursal" Value="6"></asp:ListItem>
-                        </asp:DropDownList>
-                            </li>
-                        </ul>
-                    </div>
-                    <div class="tools">
-                        <asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" />
-                    </div>
-                </div>
-            </div>
-        </ContentTemplate>
-    </asp:UpdatePanel>
-    <br />
-    <asp:UpdatePanel ID="UPDatos" runat="server" UpdateMode="Conditional">
-        <ContentTemplate>
-            <table border="0" cellpadding="0" cellspacing="0" id="tblSucursales" runat="server" visible="false">
-                <tr>
-                    <td style="width: 150px">&nbsp;</td>
-                </tr>
-            </table>
-            <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Ventas con los filtros especificados" ToolTip="Listado de Ventas" CssClass="table table-striped table-advance table-hover" Style="margin-top: -10px; text-align: center;" GridLines="None">
-                <Columns>
-                    <asp:TemplateField>
-                        <HeaderTemplate>
-                            Grupo
-                        </HeaderTemplate>
-                        <ItemTemplate>
-                            <asp:Literal ID="LtlGrupo" runat="server" Text='<%# Eval("GPO") %>'></asp:Literal>
-                        </ItemTemplate>
-                    </asp:TemplateField>
-                    <asp:TemplateField>
-                        <HeaderTemplate>
-                            Ventas
-                        </HeaderTemplate>
-                        <ItemTemplate>
-                            <asp:Literal ID="LtlVentas" runat="server" Text='<%# Eval("Ventas", "{0:N2}")%>'></asp:Literal>
-                        </ItemTemplate>
-                        <ItemStyle HorizontalAlign="Right" />
-                    </asp:TemplateField>
-                    <asp:TemplateField>
-                        <HeaderTemplate>
-                            Compras
-                        </HeaderTemplate>
-                        <ItemTemplate>
-                            <asp:Literal ID="LtlCompras" runat="server" Text='<%# Eval("Compras", "{0:N2}")%>'></asp:Literal>
-                        </ItemTemplate>
-                        <ItemStyle HorizontalAlign="Right" />
-                    </asp:TemplateField>
-                </Columns>
-                <RowStyle CssClass="Texto" />
-                <HeaderStyle CssClass="Titulos" />
-            </asp:GridView>
-        </ContentTemplate>
-    </asp:UpdatePanel>
-    <asp:UpdatePanel runat="server" ID="UPPersonalizar" UpdateMode="Conditional">
-        <ContentTemplate>
-            <div id="DivPersonalizar" style="width: 315px; background-color: White; border: solid 1px black; color: Black; display: none; position: absolute;">
-                <table class="table table-striped table-advance table-hover" width="315px">
-                    <tr class="Titulos">
-                        <th style="width: 310px">
-                            <asp:Label ID="LblTitulo1" runat="server" ClientIDMode="Static" Text="Personalizar Columnas"></asp:Label>
-                        </th>
-                        <th style="padding-right: 4px; padding-top: 4px" valign="top">
-                            <img alt="" src="/Imagenes/close.gif" style="cursor: pointer;" onclick="$('#DivPersonalizar').hide(1000);" /></th>
-                    </tr>
-                    <tr align="left">
-                        <td colspan="2">
-                            <table class="table table-striped table-advance table-hover">
-                                <thead>
-                                    <tr>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkRetIVA" runat="server" Text="Ret. IVA" /></th>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkMinSub" runat="server" Text="SubTotal Mínimo" /></th>
-                                    </tr>
-                                    <tr>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkRetISR" runat="server" Text="Ret. ISR" /></th>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkMaxTot" runat="server" Text="Total Máximo" /></th>
-                                    </tr>
-                                    <tr>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkMaxSub" runat="server" Text="SubTotal Máximo" /></th>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkAvgTot" runat="server" Text="Total Promedio" /></th>
-                                    </tr>
-                                    <tr>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkAVGSub" runat="server" Text="SubTotal Promedio" /></th>
-                                        <th style="text-align: left;">
-                                            <asp:CheckBox ID="ChkMinTot" runat="server" Text="Total Mínimo" /></th>
-                                    </tr>
-                                </thead>
-
-                            </table>
-                        </td>
-                    </tr>
-                    <tr style="height: 25px">
-                        <td style="text-align: center;" colspan="2">
-                            <asp:Button ID="BtnPersonalizar" runat="server" Text="Personalizar" class="btn btn-primary" /><input type="button" value="Cancelar" onclick="$('#DivPersonalizar').hide(1000);" class="btn btn-danger" /></td>
-                    </tr>
-                </table>
-            </div>
-        </ContentTemplate>
-    </asp:UpdatePanel>
-</asp:Content>
-<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
-</asp:Content>

PV/PVRepVentasCompras.aspx.vb

@@ -1,238 +0,0 @@
-Option Explicit On
-Option Strict On
-
-Imports System.Data
-Imports Extensiones
-
-Partial Class PV_PVRepVentasCompras
-    Inherits ClsPaginas
-
-#Region "Propiedades"
-    'Local
-    Private Property TmpDT As DataTable
-        Get
-            Return CType(ViewState("TmpDT"), DataTable)
-        End Get
-        Set(value As DataTable)
-            ViewState("TmpDT") = value
-        End Set
-    End Property
-#End Region
-
-    Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
-        If Not IsPostBack Then
-            ' If UsuarioActual.CveEmpresa = 2 AndAlso UsuarioActual.CveUsuario.Contiene(77, 21) Then Response.Redirect("/Inicio.aspx")
-            CargaCombos()
-            ImgPersonalizar.Attributes.Add("onclick", "javascript:$('#DivPersonalizar').show(1000); PosicionaObjeto(this.id,'DivPersonalizar');")
-        End If
-    End Sub
-
-    Private Sub CargaCombos()
-        'CargaSucursales
-        DdlSubProyecto.DataSource = GlobalDTSubProyectos(-1).FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
-        DdlSubProyecto.DataBind()
-    End Sub
-
-    Protected Sub BtnConsultar_Click(sender As Object, e As System.EventArgs) Handles BtnConsultar.Click
-        CargaDatos()
-        ConfiguraEmpresa()
-        UPDatos.Update()
-    End Sub
-
-    Private Sub CargaDatos()
-        Dim ObjVentas As New ClsPV()
-
-        Dim FechaI, FechaF As String
-        FechaI = If(IsDate(txtFechaI.Text.Trim()), txtFechaI.Text.Trim(), "-1")
-        FechaF = If(IsDate(txtFechaF.Text.Trim()), txtFechaF.Text.Trim(), "-1")
-
-        If ObjVentas.GetRepPVVentasCompras(FechaI, FechaF, DdlSubProyecto.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, DdlGrupo.SelectedValue.ToEntero) Then
-            GvDatos.DataSource = ObjVentas.DtResultados
-            tblSucursales.Visible = True
-        Else
-            GvDatos.DataSource = Nothing
-        End If
-        ObjVentas.Dispose()
-        GvDatos.DataBind()
-
-    End Sub
-
-    Private Sub ConfiguraEmpresa()
-        'If Not UsuarioActual.Empresa.MostrarRetIVA Then GvDatos.Columns(6).Visible = False
-        'If Not UsuarioActual.Empresa.MostrarRetISR Then GvDatos.Columns(7).Visible = False
-    End Sub
-
-    Protected Sub BtnPersonalizar_Click(sender As Object, e As System.EventArgs) Handles BtnPersonalizar.Click
-        If ChkRetIVA.Checked Then
-            GvDatos.Columns(6).Visible = True
-        Else
-            GvDatos.Columns(6).Visible = False
-        End If
-
-        If ChkRetISR.Checked Then
-            GvDatos.Columns(7).Visible = True
-        Else
-            GvDatos.Columns(7).Visible = False
-        End If
-
-        If ChkMinSub.Checked Then
-            GvDatos.Columns(9).Visible = True
-        Else
-            GvDatos.Columns(9).Visible = False
-        End If
-
-        If ChkAVGSub.Checked Then
-            GvDatos.Columns(10).Visible = True
-        Else
-            GvDatos.Columns(10).Visible = False
-        End If
-
-        If ChkMaxSub.Checked Then
-            GvDatos.Columns(11).Visible = True
-        Else
-            GvDatos.Columns(11).Visible = False
-        End If
-
-        If ChkMinTot.Checked Then
-            GvDatos.Columns(12).Visible = True
-        Else
-            GvDatos.Columns(12).Visible = False
-        End If
-
-        If ChkAvgTot.Checked Then
-            GvDatos.Columns(13).Visible = True
-        Else
-            GvDatos.Columns(13).Visible = False
-        End If
-
-        If ChkMaxTot.Checked Then
-            GvDatos.Columns(14).Visible = True
-        Else
-            GvDatos.Columns(14).Visible = False
-        End If
-
-        UPDatos.Update()
-    End Sub
-
-    Protected Sub ImgExcel_Click(sender As Object, e As System.Web.UI.ImageClickEventArgs) Handles ImgExcel.Click
-        GvDatos.ExportToExcel("ReporteVentas" & Now.ToShortDateString)
-    End Sub
-
-
-    'Region "TEMPLATE"
-    Public Class GridViewTemplate
-        Implements ITemplate
-        'A variable to hold the type of ListItemType.
-        Private _templateType As ListItemType
-
-        'A variable to hold the column name.
-        Private _columnName As String
-
-
-        'Constructor where we define the template type and column name.
-        Public Sub New(type As ListItemType, colname As String)
-            'Stores the template type.
-            _templateType = type
-
-            'Stores the column name.
-            _columnName = colname
-
-        End Sub
-
-        Private Sub ITemplate_InstantiateIn(container As System.Web.UI.Control) Implements ITemplate.InstantiateIn
-            Select Case _templateType
-                Case ListItemType.Header
-                    'Creates a new label control and add it to the container.
-                    Dim lbl As New Label()
-                    'Allocates the new label object.
-                    lbl.Text = _columnName
-                    'Assigns the name of the column in the lable.
-                    container.Controls.Add(lbl)
-                    'Adds the newly created label control to the container.
-                    Exit Select
-
-                Case ListItemType.Item
-                    'Creates a new text box control and add it to the container.
-                    Dim ltl1 As New Literal
-                    ltl1.ID = String.Format("ltl{0}", _columnName)
-                    AddHandler ltl1.DataBinding, AddressOf ltl_DataBinding
-
-                    'AddHandler hdn1.DataBinding, AddressOf hdn_DataBinding
-
-                    'Creates a column with size 4.
-                    container.Controls.Add(ltl1)
-                    'Adds the newly created textbox to the container.
-                    Exit Select
-
-                Case ListItemType.EditItem
-                    'As, I am not using any EditItem, I didnot added any code here.
-                    Exit Select
-
-                Case ListItemType.Footer
-                    Dim chkColumn As New CheckBox()
-                    chkColumn.ID = Convert.ToString("Chk") & _columnName
-                    container.Controls.Add(chkColumn)
-                    Exit Select
-            End Select
-        End Sub
-
-        Private Sub hdn_DataBinding(sender As Object, e As EventArgs)
-            Dim hidden As HiddenField = DirectCast(sender, HiddenField)
-            Dim row As GridViewRow = DirectCast(hidden.NamingContainer, GridViewRow)
-            Dim value As String = DataBinder.Eval(row.DataItem, _columnName).ToString()
-            hidden.Value = If(value Is Nothing OrElse value = String.Empty, "-1", value)
-        End Sub
-
-        Private Sub ltl_DataBinding(sender As Object, e As EventArgs)
-            Dim ltl As Literal = DirectCast(sender, Literal)
-            Dim row As GridViewRow = DirectCast(ltl.NamingContainer, GridViewRow)
-            Dim celda As DataControlFieldCell = DirectCast(ltl.Parent, DataControlFieldCell)
-            Dim value As String = DataBinder.Eval(row.DataItem, _columnName).ToString()
-            ltl.Text = value.FormatoNumero
-        End Sub
-
-        ''' <summary>
-        ''' This is the event, which will be raised when the binding happens.
-        ''' </summary>
-        ''' <param name="sender"></param>
-        ''' <param name="e"></param>
-        Private Sub tb1_DataBinding(sender As Object, e As EventArgs)
-            Dim txtdata As TextBox = DirectCast(sender, TextBox)
-            Dim container As GridViewRow = DirectCast(txtdata.NamingContainer, GridViewRow)
-            Dim dataValue As Object = DataBinder.Eval(container.DataItem, _columnName)
-            If dataValue Is DBNull.Value Then
-                txtdata.Text = dataValue.ToString()
-            End If
-        End Sub
-    End Class
-
-    Protected Sub GvDatos_RowDataBound(sender As Object, e As GridViewRowEventArgs) Handles GvDatos.RowDataBound
-        If e.Row.RowType = DataControlRowType.DataRow Then
-            Dim Css As String = "Texto"
-            If e.Row.RowIndex = 0 Then
-                e.Row.Cells(0).HorizontalAlign = HorizontalAlign.Center
-                e.Row.Cells(0).Width = Unit.Pixel(150)
-                e.Row.Cells(1).Width = Unit.Pixel(100)
-                e.Row.Cells(2).Width = Unit.Pixel(100)
-              
-                e.Row.CssClass = "Totales"
-
-
-                Css = "Totales"
-            End If
-
-            Dim FechaI, FechaF As String
-            FechaI = If(IsDate(txtFechaI.Text.Trim()), txtFechaI.Text.Trim(), "-1")
-            FechaF = If(IsDate(txtFechaF.Text.Trim()), txtFechaF.Text.Trim(), "-1")
-
-            Dim LigaV As String = String.Format("/Ventas/RepVentaDetalle.aspx?GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveCliente=-1&CveSucursal={5}&Vendedor=-1&CveUsuario=-1&CveEstatusFactura=-1&FechaI={6}&FechaF={7}&IVA=-1&CveCorte=-1",
-                                               DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), e.Row.DBCampo("CveSucursal"), FechaI, FechaF)
-            Dim LigaC As String = String.Format("/Compras/RepComprasDetalle.aspx?GPO={0}&Anio={1}&Mes={2}&AnioMes={3}&Fecha={4}&CveProveedor=-1&CveUsuario=-1&FechaI={5}&FechaF={6}",
-                                             DdlGrupo.SelectedValue, e.Row.DBCampo("Anio"), e.Row.DBCampo("Mes"), e.Row.DBCampo("AnioMes"), e.Row.DBCampo("Fecha"), FechaI, FechaF)
-
-            e.Row.FCLiteral("LtlVentas").Text = "<a class=""" & Css & """ href=""" & LigaV & """>" & e.Row.FCLiteral("LtlVentas").Text & "</a>"
-            e.Row.FCLiteral("LtlCompras").Text = String.Format("<a class='{0}' href='{1}'>{2}</a>", Css, LigaC, e.Row.FCLiteral("LtlCompras").Text)
-        End If
-    End Sub
-End Class
-

Site.master

@@ -257,6 +257,15 @@
                                             Buscar Acercamientos
                                         </a>
                                     </li>
+
+                                     <li id="TdBuscaActivoFijo" runat="server" visible="False">
+                                        <a onclick="javascript:AbrirVentana('/AF/PopUpBuscarAF.aspx',800,600,'N');">
+                                            <i class="fa fa-building"></i>
+                                            Buscar Activo Fijo
+                                        </a>
+                                    </li>
+
+
                                 </ul>
                             </li>
                             <li class="dropdown dropdown-user">

Site.master.vb

@@ -276,6 +276,9 @@ Partial Class Site
         'BUSCAR ACERCAMIENTO CRM'
         If UsuarioActual.TienePermisoProceso(251) Then TdCRMAcercamientos.Visible = True
 
+        'Busca Activo Fijo
+        If UsuarioActual.TienePermisoPagina(62) Then TdBuscaActivoFijo.Visible = True
+
     End Sub
 
     Protected Sub CerrarSesion_Click(sender As Object, e As EventArgs) Handles BtnCerrarSesion.ServerClick

Ventas/ClientesAbonar.aspx

@@ -199,6 +199,19 @@
                                     <asp:CheckBox ID="ChkLiquidacion" OnCheckedChanged="ChkLiquidacion_CheckedChanged" runat="server" AutoPostBack="true" />
                                 </div>
 
+                            </div>
+                            <div class="row" id="divAnticipo" runat="server" visible="false"  >
+                                <div class="col-md-2" >Anticipo:</div>
+                                <div class="col-md-3">
+                                    <asp:TextBox ID="TxtAnticipo" runat="server"  Width ="100px" ClientIDMode="Static" />
+                                </div>
+
+
+                                 <div class="col-md-2"   runat="server" id="Div3" visible="false">Liquidación:</div>
+                                <div class="col-md-3"  runat="server" id="Div4" visible="false">
+                                    <asp:CheckBox ID="CheckBox2" OnCheckedChanged="ChkLiquidacion_CheckedChanged" runat="server" AutoPostBack="true" />
+                                </div>
+
                             </div>
 
                             <asp:UpdatePanel ID="UpCuentaDeposito" UpdateMode="Conditional" runat="server">
@@ -239,37 +252,35 @@
     <br />
     <asp:UpdatePanel ID="UpGuardar" runat="server" UpdateMode="Conditional">
         <ContentTemplate>
-            <table class="Widthall">
+            <table class="Widthall" >
                 <tr>
                     <td style="text-align: right; width: 20%">
                         <asp:CheckBox Text=" Seguir Registrando Pagos" ID="ChkSeguirRegistrando" CssClass="md-checksd" runat="server" />
                     </td>
-                    <td style="text-align: left; width: 12%">
+                    <td style="text-align: left; width: 16%">
                         <asp:CheckBox Text=" Emitir complemento de pago" ID="ChkComplementoPago" Visible="true" CssClass="md-checksd" runat="server" />
                         <br />
                         <asp:Label ID="LblValidaCeuntaTipoTransaccion" runat="server" Visible="false" ForeColor="Red"></asp:Label>
                     </td>
-                    <td style="text-align: left; width: 30%">
+                    <td style="text-align: left; ">
                         <asp:Button ID="BtnIEGuardar" runat="server" Text="Guardar" ValidationGroup="GrpGuardar" class="btn btn-primary" />
                     </td>
+                    <td style="text-align: right; width: 18%">
+                            <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvCxC.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 125px;" />
+                            <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvCxC.ClientID) %>" style="margin-top: -3px; margin-right: 20px" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
+        
+                    </td>
                 </tr>
             </table>
         </ContentTemplate>
     </asp:UpdatePanel>
-    <br />
   
-    <div class="row">
-        <div class="Widthall" style="text-align: right!important; margin-top: 20px!important; margin-bottom: 2px!important">
-            <input type="text" id="TxtBusqueda" class="form-control input-sm" onkeyup="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvCxC.ClientID) %>" style="display: inline-block; margin-right: -20px; width: 150px;" />
-            <a href="javascript:;" onclick="<%= String.Format("FiltrarTabla('TxtBusqueda','{0}')", GvCxC.ClientID) %>" style="margin-top: -3px; margin-right: 20px" class="btn btn-circle btn-sm label-info"><i class="icon-magnifier"></i></a>
-        </div>
-    </div>
 
     <asp:UpdatePanel ID="UPVentas" runat="server" UpdateMode="Conditional">
         <ContentTemplate>
             <asp:GridView ID="GvCxC" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Cuentas por Cobrar Pendientes"
                 DataKeyNames="TipoDocto,CveVenta,CveCliente,SerieFolio,Original,SubTotal,IVA,IEPS,RetIVA,RetISR,Num3,CveSubProyecto,CveMoneda,Saldo,TipoCambio, RFC,UUID,Fecha,PorcentajeIVA,DescuentoProntoPago,CveTipoRetencion,Descuento,ClaveMetodoPagoSAT"
-                CssClass="table table-striped table-advance table-hover Widthall" Style="text-align: center;" GridLines="None">
+                CssClass="table table-striped table-advance table-hover Widthall" Style="text-align: center;" GridLines="None" HeaderStyle-CssClass="ADtr">
                 <Columns>
                     
                     <%--0--%>
@@ -338,7 +349,7 @@
                         </ItemTemplate>
                     </asp:TemplateField>
                     <%--9--%>
-                    <asp:TemplateField ItemStyle-HorizontalAlign="Center"  ItemStyle-width="35px">
+                    <asp:TemplateField ItemStyle-HorizontalAlign="Center"  ItemStyle-width="25px">
                         <HeaderTemplate></HeaderTemplate>
                         <ItemTemplate>
                             <asp:HyperLink ID="LtlMoneda" runat="server" Text='<%# Eval("TMoneda", "{0}") %>' Style="text-decoration: none" Enabled="false" ForeColor="#333333"></asp:HyperLink>&nbsp;
@@ -399,55 +410,56 @@
                        <%--17--%>
                     <asp:TemplateField Visible="false">
                         <ItemTemplate>
-                            <asp:TextBox ID="TxtLiqCol1" Width="50px" runat="server"  Style="text-align: right;"  ></asp:TextBox>
+                            <asp:TextBox ID="TxtLiqCol1" Width="55px" runat="server"  Style="text-align: right;"  ></asp:TextBox>
                         </ItemTemplate>
                     </asp:TemplateField>
                     <%--18--%>
                      <asp:TemplateField Visible="false">
                         <ItemTemplate>
-                            <asp:TextBox ID="TxtLiqCol2" Width="50px" runat="server"  Style="text-align: right;" ></asp:TextBox>
+                            <asp:TextBox ID="TxtLiqCol2" Width="55px" runat="server"  Style="text-align: right;" ></asp:TextBox>
                         </ItemTemplate>
                     </asp:TemplateField>
                     <%--19--%>
                      <asp:TemplateField Visible="false">
                         <ItemTemplate>
-                            <asp:TextBox ID="TxtLiqCol3" Width="50px" runat="server"  Style="text-align: right;"  ></asp:TextBox>
+                            <asp:TextBox ID="TxtLiqCol3" Width="55px" runat="server"  Style="text-align: right;"  ></asp:TextBox>
                         </ItemTemplate>
                     </asp:TemplateField>
                     <%--20--%>
                      <asp:TemplateField Visible="false">
                         <ItemTemplate>
-                            <asp:TextBox ID="TxtLiqCol4" Width="50px" runat="server"  Style="text-align: right;"  ></asp:TextBox>
+                            <asp:TextBox ID="TxtLiqCol4" Width="55px" runat="server"  Style="text-align: right;"  ></asp:TextBox>
                         </ItemTemplate>
                     </asp:TemplateField>
                     <%--21--%>
                      <asp:TemplateField Visible="false">
                         <ItemTemplate>
-                            <asp:TextBox ID="TxtLiqCol5" Width="50px" runat="server"  Style="text-align: right;"  ></asp:TextBox>
+                            <asp:TextBox ID="TxtLiqCol5" Width="55px" runat="server"  Style="text-align: right;"  ></asp:TextBox>
                         </ItemTemplate>
                     </asp:TemplateField>
                     <%--22--%>
                      <asp:TemplateField Visible="false">
                         <ItemTemplate>
-                            <asp:TextBox ID="TxtLiqCol6" Width="50px" runat="server"  Style="text-align: right;"  ></asp:TextBox>
+                            <asp:TextBox ID="TxtLiqCol6" Width="55px" runat="server"  Style="text-align: right;"  ></asp:TextBox>
                         </ItemTemplate>
                     </asp:TemplateField>
                     <%--23--%>
                      <asp:TemplateField Visible="false">
                         <ItemTemplate>
-                            <asp:TextBox ID="TxtLiqCol7" Width="50px" runat="server"  Style="text-align: right;"  ></asp:TextBox>
+                            <asp:TextBox ID="TxtLiqCol7" Width="55px" runat="server"  Style="text-align: right;"  ></asp:TextBox>
                         </ItemTemplate>
                     </asp:TemplateField>
                     <%--24--%>
                       <asp:TemplateField Visible="false" HeaderText="Total Gastos">
                         <ItemTemplate>
-                            <asp:TextBox ID="TxtLiqCol8" Width="50px" runat="server"  Style="text-align: right;" onkeypress="return  disablekeys();"></asp:TextBox>
+                            <asp:TextBox ID="TxtLiqCol8" Width="55px" runat="server"  Style="text-align: right;" onkeypress="return  disablekeys();"></asp:TextBox>
                         </ItemTemplate>
                     </asp:TemplateField>
                     <%--25--%>
-                    <asp:TemplateField Visible="false" HeaderText="Anticipo">
+                    <asp:TemplateField Visible="false" HeaderText="Anticipo" ItemStyle-Width="120px">
                         <ItemTemplate>
                             <asp:TextBox ID="TxtAmort" Width="50px" runat="server"  Style="text-align: right;"  ></asp:TextBox>
+                            <asp:DropDownList ID="DdlAnti" runat="server" Width="40px"  DataTextField="RazonSocial" DataValueField="CveIE"></asp:DropDownList>
                         </ItemTemplate>
                     </asp:TemplateField>
 
@@ -616,20 +628,13 @@
             } else {
                 txt.value = "";
 
-                let ClsSelLiquidacionVenta = ".ClsSelLiquidacionVenta" + CveVenta;
+                let ClsSelLiqVenta = ".ClsSelLiqVenta" + CveVenta;
-                let ClsSelLiquidacionVentaTotal = ".ClsSelLiquidacionVentaTotal" + CveVenta;
+                let ClsSelLiqVentaTotal = ".ClsSelLiqVentaTotal" + CveVenta;
-
-                $(ClsSelLiquidacionVenta).val('');
-                $(ClsSelLiquidacionVentaTotal).val('');
 
+                $(ClsSelLiqVenta).val('');
+                $(ClsSelLiqVentaTotal).val('');                
 
             }
-            //if (typeof t2 === "undefined") {
-
-            //} else {
-
-            //}
-
           
             if (chkPesosBancos) {
                 CambiaPesosDolares()
@@ -654,6 +659,7 @@
             var div = document.getElementById("DivTC")
 
             let totalLiquidacion = 0.0;
+            let totalAnti = 0.0;
 
             if ($get('TxtTC') != null) {
                 tc = ToDouble($get('TxtTC').value);
@@ -709,21 +715,29 @@
             }
             $get('TxtObservaciones').value = $get('HdnObs').value + ' Ventas: ' + Ventas;
 
+            $(".ClsSelLiq").each(function () {
 
-
+                totalLiquidacion = totalLiquidacion + ToDouble($(this).val());
-            
-            $(".ClsSelLiquidacion").each(function () {
-
-                let valorString = $(this).val();
-                valorString = valorString.replace(/,/g, '');
-
-                if (valorString.trim().length > 0) {
-                    totalLiquidacion = totalLiquidacion + parseFloat(valorString);
-                }
                
             });
 
+            $(".ClsSelLiqAnt").each(function () {
 
+                totalAnti = totalAnti + ToDouble($(this).val());
+               
+            });
+                      
+            totalLiquidacion = totalLiquidacion + totalAnti;
+
+            if ($get('TxtAnticipo') != null) {
+               
+                if ($get('TxtAnticipo').value == '') {
+                    $get('TxtAnticipo').value = 0.00
+                }
+                else {
+                    Importe = Importe + ToDouble($get('TxtAnticipo').value);
+                }
+            }
 
             if ($get('TxtOtrosImportes') != null) {
                 if (pagoMultiple != 0) {
@@ -737,7 +751,6 @@
                 else {
                     return Importe + parseFloat(Comision) - totalLiquidacion;
                 }
-
             }
             else {
                 return Importe - totalLiquidacion
@@ -914,32 +927,33 @@
             }
         } 
 
+        function SumaLiq(txt, CveVenta, pagoMultiple, monedaPago) {
 
+            let ClsSelLiqVenta = ".ClsSelLiqVenta" + CveVenta;
+            let ClsSelLiqVentaTotal = ".ClsSelLiqVentaTotal" + CveVenta;
+            let ClsSelLiqAnticipo = ".ClsSelLiqAnt" + CveVenta;
 
-        function SumaLiquidacion(txt, CveVenta, pagoMultiple, monedaPago) {
-
-            let ClsSelLiquidacionVenta = ".ClsSelLiquidacionVenta" + CveVenta;
-            let ClsSelLiquidacionVentaTotal = ".ClsSelLiquidacionVentaTotal" + CveVenta;
             let Total = 0.0;
+            let Anticipos = 0.0;
 
+            $( ClsSelLiqVenta).each(function () {
 
-            $( ClsSelLiquidacionVenta).each(function () {
+                Total = Total + ToDouble($(this).val());   
 
-                let valorString = $(this).val();
+            });
-                valorString = valorString.replace(/,/g, '');
+            $(ClsSelLiqAnticipo).each(function () {
 
-                if (valorString.trim().length > 0) {
+                Anticipos = Anticipos + ToDouble($(this).val());
-                    Total = Total + parseFloat(valorString);
-                }                
                
             });
            
-            $(ClsSelLiquidacionVentaTotal).each(function () {
+            Total = Total + Anticipos;
+
+            $(ClsSelLiqVentaTotal).each(function () {
                 $(this).val(Total);
                 FormatoMoneda2($(this));
             });
                        
-           
             FormatoMoneda(txt);
 
             var Suma = SumaValores(pagoMultiple, monedaPago);

Ventas/Ventas.aspx.vb

@@ -22335,6 +22335,7 @@ Partial Class Ventas
         DivNombreCliente.Visible = False
         DivTipoPersona.Visible = False
         DivDireccionCliente.Visible = False
+
         DivNumeroCPCliente.Visible = False
         DivColoniaTelefonoCliente.Visible = False
         DivCiudadLocalidadCliente.Visible = False
@@ -33945,6 +33946,21 @@ Partial Class Ventas
 
     End Sub
 
+    Protected Sub RdTipoPersona_SelectedIndexChanged(sender As Object, e As EventArgs)
+
+        DVRegimenSociedad.Visible = False
+        DivRazonSocial2.Attributes.Add("class", "col-md-12")
+
+        If RdTipoPersona.SelectedValue.ToEntero = 1 And UsuarioActual.Empresa.Funcionalidad(350) = "1" Then
+
+            DivRazonSocial2.Attributes.Add("class", "col-md-8")
+            DVRegimenSociedad.Visible = True
+
+        End If
+
+        UpAgregarCliente.Update()
+    End Sub
+
 #Region "C A R T A  -  P O R T E"
 
     Public Sub CargaDireccionCP()
@@ -34338,5 +34354,8 @@ Partial Class Ventas
     End Sub
 #End Region
 
+
+
+
 End Class