Merge branch 'master' of http://192.168.10.111:8383/SIG

AF/CatSubTipos.aspx

@@ -52,8 +52,8 @@
                 </thead>
                 <tr>
                     <td>
-                        <asp:DropDownList ID="DdlTipos" runat="server" AppendDataBoundItems="true" DataValueField="CveTipoActivoFijo" DataTextField="TipoActivoFijo" ValidationGroup="GrpGuardar" Width="190px">
+                        <asp:DropDownList ID="DdlTipos" runat="server" DataValueField="CveTipoActivoFijo" DataTextField="TipoActivoFijo" ValidationGroup="GrpGuardar" Width="190px">
-                            <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
+                            
                         </asp:DropDownList>
                         <asp:RequiredFieldValidator ID="RFVTipos" runat="server" ControlToValidate="DdlTipos" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipos''</b> es necesario, por favor ingréselo." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                         <ajax:ValidatorCalloutExtender ID="VCOTipos" runat="server" HighlightCssClass="vco" TargetControlID="RFVTipos" Width="300px"></ajax:ValidatorCalloutExtender>

AF/CatSubTipos.aspx.vb

@@ -18,8 +18,10 @@ Partial Class AF_CatSubTipos
 	End Sub
 
     Private Sub CargaTipos()
+        DdlTipos.Items.Clear()
         DdlTipos.DataSource = GlobalDTTipoActivoFijo(UsuarioActual.CveEmpresa) '.FiltraParametros("CveEmpresa = " & UsuarioActual.CveEmpresa)
         DdlTipos.DataBind()
+        DdlTipos.Items.Insert(0, New ListItem("Seleccione", "-1"))
     End Sub
 
     Private Sub CargaGlobal()
@@ -46,7 +48,6 @@ Partial Class AF_CatSubTipos
         Else
             CargaGrid("")
         End If
-        CargaGlobal()
     End Sub
 
 #Region "G V  D A T O S"
@@ -93,6 +94,7 @@ Partial Class AF_CatSubTipos
         End If
 
         If Not TieneError Then
+            CargaGlobal()
             CargaDatos()
         End If
     End Sub
@@ -134,6 +136,7 @@ Partial Class AF_CatSubTipos
         End If
 
         If Not TieneError Then
+            CargaGlobal()
             CargaDatos()
         End If
     End Sub
@@ -200,6 +203,8 @@ Partial Class AF_CatSubTipos
         ObjAF.Dispose()
 
         If Not TieneError Then
+            CargaGlobal()
+
             CargaDatos()
         End If
 

AF/CatTipos.aspx.vb

@@ -104,11 +104,7 @@ Partial Class AF_CatTipos
         UpDatos.Update()
     End Sub
     Private Sub CargaGlobal()
-        Dim ObjTipo As New ClsAF
+        GlobalDTTipoActivoFijo(UsuarioActual.CveEmpresa) = Nothing
-        If ObjTipo.GetTiposActivosFijos(-1) Then
-            GlobalDTTipoActivoFijo(-1) = ObjTipo.DtResultados
-        End If
-        ObjTipo.Dispose()
     End Sub
 
 #Region " G V - D A T O S"

App_Code/CFDITimbre.vb

@@ -327,12 +327,14 @@ Public Class CFDIConceptos
     Public Property ClaveProdServ As String = ""
     Public Property ClaveUnidad As String = ""
     Public Property Impuestos As List(Of CFDIConceptosImpuestos)
+    Public Property ACuentaTerceros As CFDIConceptosACuentaTerceros
     Public Property Descuento As Decimal = 0.00D
     Public Property ObjetoImpuesto As String = "02"
     Public Property ImporteGravaIVAAdicional As Decimal = 0.00D 'caso IEPS
 
     Sub New()
         Impuestos = New List(Of CFDIConceptosImpuestos)
+        ACuentaTerceros = New CFDIConceptosACuentaTerceros
     End Sub
 
 End Class
@@ -349,6 +351,16 @@ Public Class CFDIConceptosImpuestos
     Public Property ImporteMN As Decimal = 0.000000D
 
 
+End Class
+
+<Serializable>
+Public Class CFDIConceptosACuentaTerceros
+    Public Property RfcACuentaTerceros As String = ""
+    Public Property NombreACuentaTerceros As String = ""
+    Public Property RegimenFiscalACuentaTerceros As String = ""
+    Public Property DomicilioFiscalACuentaTerceros As String = ""
+
+
 End Class
 
 <Serializable>
@@ -442,8 +454,27 @@ End Class
 Public Class CFDIComplementoPagos20
 
     Public Property TotalTrasladosBaseExento As Decimal = 0
-    Public Property TotalRetencionesIVA As Decimal = 0
+
-    Public Property TotalRetencionesISR As Decimal = 0
+    Public ReadOnly Property TotalRetencionesIVA As Decimal
+        Get
+            Dim Ret As Decimal = 0
+            For Each cfd As CFDIComplementoPago In ComplementoPagos
+                Ret = Ret + ((From c In cfd.Retenciones Where c.Impuesto = "002" Select c.Importe).Sum() * cfd.TipoCambioP)
+            Next
+            Return Ret.RoundSQL()
+        End Get
+    End Property
+
+    Public ReadOnly Property TotalRetencionesISR As Decimal
+        Get
+            Dim Ret As Decimal = 0
+            For Each cfd As CFDIComplementoPago In ComplementoPagos
+                Ret = Ret + ((From c In cfd.Retenciones Where c.Impuesto = "001" Select c.Importe).Sum() * cfd.TipoCambioP)
+            Next
+            Return Ret.RoundSQL()
+        End Get
+    End Property
+
     Public Property ComplementoPagos As List(Of CFDIComplementoPago)
 
     Public ReadOnly Property MontoTotalPagos As Decimal

App_Code/ClsBancos.vb

@@ -1113,7 +1113,8 @@ Public Class ClsBancos
                 Timbre = Timbrado.PreparaTimbrePago40(RFCEmpresa, UsuarioActual.Empresa.Empresa, UsuarioActual.Empresa.CodigoRegimenFiscal,
                                     RFCCliente, dr("NombreCliente").ToString, dr("ClienteCP").ToString, dr("CodigoRegimenFiscal").ToString, Serie, Folio.ToString, FechaTimbrado, Cuentapago,
                                      dr("FechaDocumento").ToString.ToDate, dr("ClaveFormaPagoSAT").ToString, dr("AbreviaturaSAT").ToString, dr("VentasTotalPagado").ToString.ToDecimal,
-                                                UsuarioActual.Empresa.CP.ToString, CuentaBeneficiario, dr("TipoCambioPago").ToString.ToDecimal, dttpagos, dttpagosimpuestos, CFDIRelacionado:=CFDIRelacionado)
+                                                UsuarioActual.Empresa.CP.ToString, CuentaBeneficiario, dr("TipoCambioPago").ToString.ToDecimal, dttpagos, dttpagosimpuestos, CFDIRelacionado:=CFDIRelacionado,
+                                     RfcACuentaTerceros:=dr("RfcACuentaTerceros").ToString, NombreACuentaTerceros:=dr("NombreACuentaTerceros").ToString, RegimenFiscalACuentaTerceros:=dr("RegimenFiscalACuentaTerceros").ToString, DomicilioFiscalACuentaTerceros:=dr("DomicilioFiscalACuentaTerceros").ToString)
 
             Else
                 CFDIVersion = "3.3"

App_Code/ClsContabilidad.vb

@@ -1325,7 +1325,7 @@ Public Class ClsContabilidad
 
             Try
 
-                If GetEncabezadoPrePoliza(CvePrePoliza, Empresa.CveEmpresa) Then
+                If GetEncabezadoPrePoliza(CvePrePoliza, Empresa.CveEmpresa) AndAlso DtResultados.Rows.Count > 0 Then
                     CveTipoPoliza = Data.Rows(0)("CveTipoPoliza").ToString.ToEntero
                     Cargos = Data.Rows(0)("Cargos").ToString.ToDecimal
                     Abonos = Data.Rows(0)("Abonos").ToString.ToDecimal
@@ -3803,7 +3803,7 @@ Public Class ClsContabilidad
     End Function
 
 
-    Public Function GetMovimientosAuxiliaresCatalogo(IdCuenta As Integer, FechaI As Date, FechaF As Date, CveMoneda As Integer, CveProyecto As Integer, CveSubProyecto As Integer, CveEmpresa As Integer, TipoReporte As String) As Boolean
+    Public Function GetMovimientosAuxiliaresCatalogo(IdCuenta As Integer, FechaI As Date, FechaF As Date, CveMoneda As Integer, CveProyecto As Integer, CveSubProyecto As Integer, CveEmpresa As Integer, TipoReporte As String, OpcionCuentas As Integer) As Boolean
         Dim Retorno = False
 
         DataAdapter("PA_Conta_MovimientosAuxiliaresCatalogoGet")
@@ -3816,6 +3816,7 @@ Public Class ClsContabilidad
             .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
             .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
             .Add("@Tipo", SqlDbType.Int).Value = TipoReporte
+            .Add("@OpcionCuentas", SqlDbType.Int).Value = OpcionCuentas
         End With
         SqlAdapter.SelectCommand.CommandTimeout = 0
         Try

App_Code/ClsPaginas.vb

@@ -7788,7 +7788,7 @@ Public Class ClsPaginas
         'concepto pago
         Concepto = String.Format("{0} NC:{1}", CompraActual.ProveedorNombre, Pago.Referencia)
         If Pago.TipoPago = "Egsc" AndAlso Not ErrorMovtos Then ' A N T I C I P O   /   E G R E S O S   X   C O M P R O B A R 
-            Dim ConPrepAplicacion As ConceptosTipoSaldo = ObtenerCveConceptoPrePoliza(11, CompraActual.CveMoneda, True, CompraActual.CveTipoConceptoProveedor)
+            Dim ConPrepAplicacion As ConceptosTipoSaldo = ObtenerCveConceptoPrePoliza(11, Pago.CveMonedaPago, True, CompraActual.CveTipoConceptoProveedor)
             If Pago.CveMonedaPago > 1 Then
                 'Agregamos la Extranjera
                 If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, Pago.ImportePago, Pago.ImportePago, ConPrepAplicacion.CveConcepto, Pago.Referencia, Concepto, CompraActual.IdCtaContableAnticipoProv, CveCompra:=CompraActual.CveCompra, CveProveedor:=Pago.CveProveedor, CveIE:=Pago.CveIE, ImporteME:=Pago.ImportePago, TipoCambio:=TCValuacionPago, CveSubProyecto:=CompraActual.CveSubProyecto) Then ErrorMovtos = True
@@ -7800,7 +7800,7 @@ Public Class ClsPaginas
             End If
         End If
         If Pago.TipoPago.Contiene("NC", "DEV") AndAlso Not ErrorMovtos Then ' N O T A   D E   C R E D I T O 
-            Dim ConPrepAplicacion As ConceptosTipoSaldo = ObtenerCveConceptoPrePoliza(15, CompraActual.CveMoneda, True, CompraActual.CveTipoConceptoProveedor)
+            Dim ConPrepAplicacion As ConceptosTipoSaldo = ObtenerCveConceptoPrePoliza(15, Pago.CveMonedaPago, True, CompraActual.CveTipoConceptoProveedor)
             If Pago.CveMonedaPago > 1 Then
                 'Agregamos la Extranjera
                 If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, Pago.ImportePago, Pago.ImportePago, ConPrepAplicacion.CveConcepto, Pago.Referencia, Concepto, CompraActual.IdCtaContableProv, CveCompra:=Pago.CveCompraAmortizacion, CveCompraAmortizacion:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, ImporteME:=Pago.ImportePago, TipoCambio:=TCValuacionPago, CveSubProyecto:=CompraActual.CveSubProyecto) Then ErrorMovtos = True
@@ -7812,7 +7812,7 @@ Public Class ClsPaginas
             End If
         End If
         If Pago.TipoPago = "DD" AndAlso Not ErrorMovtos Then '  D E U D O R   D I V E R S O
-            Dim ConPrepAplicacion As ConceptosTipoSaldo = ObtenerCveConceptoPrePoliza(17, CompraActual.CveMoneda, True, CompraActual.CveTipoConceptoProveedor)
+            Dim ConPrepAplicacion As ConceptosTipoSaldo = ObtenerCveConceptoPrePoliza(17, Pago.CveMonedaPago, True, CompraActual.CveTipoConceptoProveedor)
             If Pago.CveMonedaPago > 1 Then
                 'Agregamos la Extranjera
                 If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, Pago.ImportePago, Pago.ImportePago, ConPrepAplicacion.CveConcepto, Pago.Referencia, Concepto, CompraActual.IdCtaContableProv, CveCompra:=Pago.CveCompraAmortizacion, CveCompraAmortizacion:=CompraActual.CveCompra, CveProveedor:=Pago.CveProveedor, CveIE:=Pago.CveIE, ImporteME:=Pago.ImportePago, TipoCambio:=TCValuacionPago, CveSubProyecto:=CompraActual.CveSubProyecto, CvePersonal:=Pago.CvePersonal) Then ErrorMovtos = True
@@ -9387,6 +9387,9 @@ Public Class ClsPaginas
             PaginaDict.Add("/RH/CatRegistroPatronal.aspx".ToUpper(), 1324)
             PaginaDict.Add("/SAT/SolicitudesNominaSat.aspx".ToUpper(), 545)
             PaginaDict.Add("/SAT/SolicitudesIngresoSat.aspx".ToUpper(), 1329)
+
+            PaginaDict.Add("/RH/RepAsistencias.aspx".ToUpper(), 1336)
+
 #End Region
 #Region "Sistema"
             '--------------------- Páginas que deben tener restricción ---------------------

App_Code/ClsRH.vb

@@ -2618,6 +2618,7 @@ Public Class ClsRH
         Return Retorno
     End Function
 
+
     Public Function GetAsistencias(CvePersonal As Integer, CveClienteAsignado As Integer, CveProyecto As Integer, CveSubProyecto As Integer, CveTurno As Integer, CveEstatusPersonal As Integer, FechaI As Date, FechaF As Date, CveEmpresa As Integer) As Boolean
         Dim Retorno As Boolean = False
 
@@ -2644,6 +2645,33 @@ Public Class ClsRH
         Return Retorno
     End Function
 
+    Public Function RepGetAsistencias(Grupo As Integer, CveClienteAsignado As Integer, CveSubProyecto As Integer, CveTurno As Integer, CveEstatusPersonal As Integer, FechaI As Date, FechaF As Date, CveEmpresa As Integer, CvePersonalPadre As Integer) As Boolean
+        Dim Retorno As Boolean = False
+
+        SqlDataAdapter("PA_RH_RepPersonalAsistenciasGet")
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@Grupo", SqlDbType.Int).Value = Grupo
+            .Add("@FechaI", SqlDbType.Date).Value = FechaI
+            .Add("@FechaF", SqlDbType.Date).Value = FechaF
+            .Add("@CveClienteAsignado", SqlDbType.Int).Value = CveClienteAsignado
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+            .Add("@CveTurno", SqlDbType.Int).Value = CveTurno
+            .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
+            .Add("@CvePersonalPadre", SqlDbType.Int).Value = CvePersonalPadre
+            .Add("@CveEstatusPersonal", SqlDbType.Int).Value = CveEstatusPersonal
+
+        End With
+
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As SqlException
+            OnError("Ocurrió un error al consultar las Asistencias del Personal.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo)
+        End Try
+
+        Return Retorno
+    End Function
+
     Public Function GetPersonalAsistenciaRegistros(InicioPeriodo As Date, FinPeriodo As Date, CveEmpresa As Integer) As Boolean
         Dim Retorno As Boolean = False
 
@@ -7356,6 +7384,45 @@ Public Class ClsRH
         End Try
         Return Retorno
     End Function
+
+
+    Public Function AddRemoveChecadoresSubProyectos(CveChecador As Integer, CveSubProyecto As Integer, CveUsuario As Integer, Agreagar As Boolean) As Boolean
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_RH_ChecadorSubProyectosAddRemove")
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveChecador", SqlDbType.Int).Value = CveChecador
+            .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
+            .Add("@CveUsuario", SqlDbType.Int).Value = CveUsuario
+            .Add("@Agreagar", SqlDbType.Bit).Value = Agreagar
+        End With
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error al agregar el sub proyecto", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        End Try
+        Return Retorno
+    End Function
+
+
+    Public Function GetChecadoresSubProyectos(CveChecador As Integer, CveEmpresa As Integer) As Boolean
+        Dim Retorno As Boolean = False
+        DataAdapter("PA_RH_ChecadorSubProyectosGet")
+        With SqlAdapter.SelectCommand.Parameters
+            .Add("@CveChecador", SqlDbType.Int).Value = CveChecador
+            .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
+        End With
+        Try
+            SqlAdapter.Fill(Data)
+            Retorno = True
+        Catch ex As Exception
+            OnError("Ocurrió un error al obteger los sub proyecto", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
+        End Try
+        Return Retorno
+    End Function
+
+
+
 #End Region
 
 #Region " A C T I V I D A D E  S"

App_Code/Timbrado.vb

@@ -10,6 +10,8 @@ Imports System.Xml
 Imports System.Xml.Serialization
 Imports Extensiones
 Imports Newtonsoft.Json.Linq
+Imports Profact.TimbraCFDI33.Complementos.CartaPorte10
+Imports Profact.TimbraCFDI33.Complementos.CartaPorte20
 Imports ProfactCartaPorte = Profact.TimbraCFDI33.Complementos.CartaPorte20
 
 
@@ -1042,7 +1044,11 @@ Public Class Timbrado
                                   Serie As String, Folio As String, FechaTimbrado As DateTime,
                                   CuentaPago As String, FechaPago As DateTime, FormaPago As String, MonedaPago As String, Monto As Decimal, LugarExpedicion As String,
                                   CuentaBeneficiario As String, TipoCambioP As Decimal, dttpagos As Data.DataTable, dttpagosimpuestos As DataTable,
-                                  Optional UsoCFDI As String = "CP01", Optional CFDIRelacionado As String = "") As CFDITimbre
+                                  Optional UsoCFDI As String = "CP01", Optional CFDIRelacionado As String = "",
+                                    Optional RfcACuentaTerceros As String = "",
+                                    Optional NombreACuentaTerceros As String = "",
+                                    Optional RegimenFiscalACuentaTerceros As String = "",
+                                    Optional DomicilioFiscalACuentaTerceros As String = "") As CFDITimbre
 
         Dim Timbre As New CFDITimbre
 
@@ -1087,6 +1093,14 @@ Public Class Timbrado
                                                         .ClaveProdServ = "84111506",
                                                         .Noidentificacion = "",
                                                         .ObjetoImpuesto = "01"}
+
+        'Pago ACuentaTerceros
+        If RfcACuentaTerceros <> "" Then
+            concepto.ACuentaTerceros.RfcACuentaTerceros = RfcACuentaTerceros
+            concepto.ACuentaTerceros.NombreACuentaTerceros = NombreACuentaTerceros
+            concepto.ACuentaTerceros.DomicilioFiscalACuentaTerceros = DomicilioFiscalACuentaTerceros
+            concepto.ACuentaTerceros.RegimenFiscalACuentaTerceros = RegimenFiscalACuentaTerceros
+        End If
         Timbre.Conceptos.Add(concepto)
 
         Select Case FormaPago
@@ -1137,6 +1151,7 @@ Public Class Timbrado
                 ObjetoImpuesto = dr("ObjetoImpuesto").ToString
                 VentaImportePagoMN = dr("VentasTotalPagado").ToString.ToDecimal
 
+
                 '' si la moneda es igual, se omite el tipo de cambio de la venta
                 If MonedaPago = VentaAbreviaturaSAT Then
                     VentaTipoCambio = 1
@@ -3628,10 +3643,10 @@ Public Class Timbrado
         If Not UsuarioActual.Empresa.FacturaProduccion OrElse UsuarioActual.CveEmpresa = 1 Then
             AmbienteProductivo = False
             Clave = "12345678a"
-            EmisorRFC = "IIA040805DZ4"
+            EmisorRFC = "EKU9003173C9"
-            EmisorNombre = "INDISTRIA ILUMINADORA DE ALMACENES SA DE CV"
+            UsuarioActual.Empresa.Empresa = "ESCUELA KEMPER URGATE"
-            ArchivoLLave = $"{UsuarioActual.Empresa.Ruta}Certificados\publicKey.key"
+            ArchivoLLave = $"{UsuarioActual.Empresa.Ruta}Certificados\EKU9003173C9.key"
-            ArchivoCertificado = $"{UsuarioActual.Empresa.Ruta}Certificados\publicCer.cer"
+            ArchivoCertificado = $"{UsuarioActual.Empresa.Ruta}Certificados\EKU9003173C9.cer"
             UsuarioActual.Empresa.CodigoRegimenFiscal = "601"
         End If
 
@@ -3792,6 +3807,11 @@ Public Class Timbrado
                     comprobante.Conceptos(i).InformacionAduanera = New Profact.TimbraCFDI40.ComprobanteConceptoInformacionAduanera(1) {} 'solo un codigo por el momento
                     comprobante.Conceptos(i).InformacionAduanera(0) = New Profact.TimbraCFDI40.ComprobanteConceptoInformacionAduanera() With {.NumeroPedimento = concep.NumeroPedimento}
                 End If
+                If concep.ACuentaTerceros IsNot Nothing AndAlso concep.ACuentaTerceros.RfcACuentaTerceros <> "" Then
+                    comprobante.Conceptos(i).ACuentaTerceros = New Profact.TimbraCFDI40.ComprobanteConceptoACuentaTerceros() With {
+                                            .RfcACuentaTerceros = concep.ACuentaTerceros.RfcACuentaTerceros, .NombreACuentaTerceros = concep.ACuentaTerceros.NombreACuentaTerceros,
+                                            .RegimenFiscalACuentaTerceros = concep.ACuentaTerceros.RegimenFiscalACuentaTerceros, .DomicilioFiscalACuentaTerceros = concep.ACuentaTerceros.DomicilioFiscalACuentaTerceros}
+                End If
 
                 j = 0
                 k = 0
@@ -4246,7 +4266,9 @@ Public Class Timbrado
                                 ComPag.Pago(ii).ImpuestosP(0).TrasladosP(x).ImpuestoP = Tra.Impuesto
                                 ComPag.Pago(ii).ImpuestosP(0).TrasladosP(x).TipoFactorP = Tra.TipoFactor
                                 ComPag.Pago(ii).ImpuestosP(0).TrasladosP(x).TasaOCuotaP = Tra.TasaOCuota.RoundSQL(6)
+                                ComPag.Pago(ii).ImpuestosP(0).TrasladosP(x).TasaOCuotaPSpecified = True
                                 ComPag.Pago(ii).ImpuestosP(0).TrasladosP(x).ImporteP = Tra.ImporteMN.RoundSQL(6)
+                                ComPag.Pago(ii).ImpuestosP(0).TrasladosP(x).ImportePSpecified = True
                                 ComPag.Pago(ii).ImpuestosP(0).TrasladosP(x).BaseP = Tra.BaseMN.RoundSQL(2)
                                 x += 1
                             Next
@@ -4333,7 +4355,7 @@ Public Class Timbrado
                         ComCartaPorte.Mercancias.Mercancia(i) = New ProfactCartaPorte.CartaPorteMercanciasMercancia
 
                         If concep.BienesTransp <> "" Then
-                            ComCartaPorte.Mercancias.Mercancia(i).BienesTransp = CType([Enum].Parse(GetType(ProfactCartaPorte.c_ClaveProdServCP), "Item" & concep.BienesTransp), ProfactCartaPorte.c_ClaveProdServCP)
+                            ComCartaPorte.Mercancias.Mercancia(i).BienesTransp = concep.BienesTransp
                         End If
 
                         ComCartaPorte.Mercancias.Mercancia(i).Descripcion = concep.Descripción
@@ -4345,7 +4367,7 @@ Public Class Timbrado
                             ComCartaPorte.Mercancias.Mercancia(i).CveMaterialPeligrosoSpecified = True
                             'si lleva material pelgroso, debe llevar embalaje
                             ComCartaPorte.Mercancias.Mercancia(i).EmbalajeSpecified = True
-                            ComCartaPorte.Mercancias.Mercancia(i).Embalaje = CType([Enum].Parse(GetType(ProfactCartaPorte.c_TipoEmbalaje), "Item" & concep.Embalaje), ProfactCartaPorte.c_TipoEmbalaje)
+                            ComCartaPorte.Mercancias.Mercancia(i).Embalaje = concep.Embalaje
                             ComCartaPorte.Mercancias.Mercancia(i).DescripEmbalaje = concep.DescripEmbalaje
                         End If
 
@@ -4760,22 +4782,17 @@ Public Class Timbrado
 
                         If Retorno = "[]" Then
                             Retorno = resultadoTimbre.Descripcion
+                            MensajeErrorCFDI = resultadoTimbre.Descripcion
                         End If
-                        If MensajeErrorCFDI = "[]" Then
-                            Retorno = resultadoTimbre.Descripcion
-                        End If
-
                     End If
                     resultadoTimbre.GuardaXml(RutaArchivo, NombreArchivoXML)
                 Catch ex As Exception
                     Retorno = ex.ToString()
                 End Try
-
             Else
                 Retorno = resultadoTimbre.Detalle
                 MensajeErrorCFDI = resultadoTimbre.Detalle
             End If
-
         End If
 
         GuardaLogTimbrado(swTiempo.ToString, UsuarioActual.Empresa.CvePAC)
@@ -4851,6 +4868,11 @@ Public Class Timbrado
                 Next
                 If concep.CuentaPredial <> "" Then cfdi.CuentaPredial(concep.CuentaPredial)
                 If concep.NumeroPedimento <> "" Then cfdi.InformacionAduanera(concep.NumeroPedimento)
+
+                If concep.ACuentaTerceros IsNot Nothing AndAlso concep.ACuentaTerceros.RfcACuentaTerceros <> "" Then
+                    cfdi.ACuentaTerceros(concep.ACuentaTerceros.RfcACuentaTerceros, concep.ACuentaTerceros.NombreACuentaTerceros,
+                                              concep.ACuentaTerceros.RegimenFiscalACuentaTerceros, concep.ACuentaTerceros.DomicilioFiscalACuentaTerceros)
+                End If
             Next
         End If
 
@@ -5121,7 +5143,6 @@ Public Class Timbrado
                               docp.CadPago,
                               docp.SelloPago)
 
-
                 If docp.DocumentosRelacionados.Count > 0 Then
 
                     For Each doc As CFDIComplementoPagosDocsRelacionados In docp.DocumentosRelacionados
@@ -5555,7 +5576,7 @@ Public Class Timbrado
         If Not UsuarioActual.Empresa.FacturaProduccion OrElse UsuarioActual.CveEmpresa = 1 Then
 
             EmisorRFC = "EKU9003173C9"
-            UsuarioActual.Empresa.Empresa = "ESCUELA KEMPER URGATE SA DE CV"
+            UsuarioActual.Empresa.Empresa = "ESCUELA KEMPER URGATE"
             ArchivoLLave = $"{UsuarioActual.Empresa.Ruta}Certificados\EKU9003173C9.key"
             ArchivoCertificado = $"{UsuarioActual.Empresa.Ruta}Certificados\EKU9003173C9.cer"
 
@@ -6522,7 +6543,7 @@ Public Class Timbrado
                         ComCartaPorte.Mercancias.Mercancia(i) = New ProfactCartaPorte.CartaPorteMercanciasMercancia
 
                         If concep.BienesTransp <> "" Then
-                            ComCartaPorte.Mercancias.Mercancia(i).BienesTransp = CType([Enum].Parse(GetType(ProfactCartaPorte.c_ClaveProdServCP), "Item" & concep.BienesTransp), ProfactCartaPorte.c_ClaveProdServCP)
+                            ComCartaPorte.Mercancias.Mercancia(i).BienesTransp = concep.BienesTransp
                         End If
 
                         ComCartaPorte.Mercancias.Mercancia(i).Descripcion = concep.Descripción
@@ -6534,7 +6555,7 @@ Public Class Timbrado
                             ComCartaPorte.Mercancias.Mercancia(i).CveMaterialPeligrosoSpecified = True
                             'si lleva material pelgroso, debe llevar embalaje
                             ComCartaPorte.Mercancias.Mercancia(i).EmbalajeSpecified = True
-                            ComCartaPorte.Mercancias.Mercancia(i).Embalaje = CType([Enum].Parse(GetType(ProfactCartaPorte.c_TipoEmbalaje), "Item" & concep.Embalaje), ProfactCartaPorte.c_TipoEmbalaje)
+                            ComCartaPorte.Mercancias.Mercancia(i).Embalaje = concep.Embalaje
 
                         End If
 

Bancos/IE.aspx

@@ -1421,7 +1421,7 @@
                                 <asp:TemplateField HeaderText="Cancelar" Visible="false" ItemStyle-HorizontalAlign="Center" ItemStyle-Width="15%">
                                     <ItemTemplate>
                                         <asp:LinkButton ID="LnkCancelarComplemetno"  OnClick="LnkCancelarComplemetno_Click" runat="server" AlternateText="Editar" CausesValidation="False"
-                                            data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea cancelar el complemento?" data-btn-ok-label="si"
+                                            data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea cancelar el complemento?" data-btn-ok-label="si" Visible="false"
                                             CssClass="btn btn-circle btn-sm red" Text="<i class='fa fa-minus'></i>" />
                                     </ItemTemplate>
                                 </asp:TemplateField>

Bancos/IE.aspx.vb

@@ -5702,10 +5702,11 @@ Partial Class Bancos_IE
                     If ObjBancos.DtResultados.FiltraParametros(" Estatus IN (1,3) ").Rows.Count = 0 And Tipo.ToUpper = "CARGO" And CveCliente > 0 And CveEstatusIE <> 2 Then
                         DVGenerarComplementoModal.Visible = True
                     End If
-                    If ObjBancos.DtResultados.FiltraParametros(" Estatus IN (1,3) ").Rows.Count = 1 And Tipo.ToUpper = "CARGO" And CveCliente > 0 And CveEstatusIE <> 2 Then
+                    If ObjBancos.DtResultados.FiltraParametros(" Estatus IN (1,3) ").Rows.Count >= 1 And Tipo.ToUpper = "CARGO" And CveCliente > 0 And CveEstatusIE <> 2 Then
                         DivCancelarComplemento.Visible = True
                         GvComplementoPagos.Columns(7).Visible = True
-                        If UsuarioActual.TienePermisoProceso(85) Then GvComplementoPagos.Columns(8).Visible = True
+                        ' si tiene el permiso para eliminar IE o editar IE
+                        If UsuarioActual.TienePermisoProceso(85) OrElse UsuarioActual.TienePermisoProceso(99) Then GvComplementoPagos.Columns(8).Visible = True
                     End If
                     GvComplementoPagos.DataSource = ObjBancos.DtResultados.FiltraParametros("", DistinctColumns:={"CveComplementoPago", "FolioFiscal", "Folio", "SerieFolio", "FechaComplemento", "Importe", "RFCReceptor", "StrEstatus", "FechaCancelacion", "Tipo", "Estatus", "CveIE", "CvePAC", "MotivoCancelacion"})
 
@@ -5745,9 +5746,6 @@ Partial Class Bancos_IE
                     End If
 
                 Else
-                    e.Row.FCLinkButton("LnkCancelarComplemetno").Visible = False
-                    e.Row.FCDropDownList("DdlMotivoCancelacion").Visible = False
-
                     If e.Row.DataKey("Estatus").ToEntero = 2 Then
                         e.Row.FCLiteral("LtlMotivoCancelacion").Visible = True
                     End If

Compras/Compras.aspx.vb

@@ -13940,7 +13940,7 @@ Partial Class Compras_Compras
     Protected Sub BtnRefacturacionVer_Click(sender As Object, e As EventArgs) Handles BtnRefacturacionVer.Click
         Dim Opcion As Integer = 1
 
-        If UsuarioActual.CveEmpresa.Contiene(119, 1, 140) Then Opcion = 2
+        If UsuarioActual.CveEmpresa.Contiene(119, 1, 140, 172, 173, 174) Then Opcion = 2
 
         Dim ObjCompras As New ClsCompras
 

Compras/Proveedores.aspx

@@ -347,9 +347,10 @@
                                                 <div class="col-md-12">
                                                     <div class="form-group form-md-line-input">            
                                                         <asp:DropDownList ID="DdlCveTipoProveedor" runat="server" CssClass="form-control select2me " Width="206px" AutoPostBack="True" OnSelectedIndexChanged="DdlCveTipoProveedor_SelectedIndexChanged">
-                                                            <asp:ListItem Selected="True" Text="Proveedor" Value="1"></asp:ListItem>
+                                                             <asp:ListItem Selected="True" Text="-" Value="0"></asp:ListItem>
-                                                            <asp:ListItem Selected="False" Text="Acreedor" Value="2"></asp:ListItem>
+                                                            <asp:ListItem   Text="Proveedor" Value="1"></asp:ListItem>
-                                                            <asp:ListItem Selected="False" Text="Ambos" Value="3"></asp:ListItem>
+                                                            <asp:ListItem   Text="Acreedor" Value="2"></asp:ListItem>
+                                                            <asp:ListItem   Text="Ambos" Value="3"></asp:ListItem>
                                                         </asp:DropDownList>
                                                         <asp:RequiredFieldValidator ID="RFVCveTipoProveedor" runat="server" ControlToValidate="DdlCveTipoProveedor" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo de Proveedor''</b> es necesario, por favor seleccione uno." InitialValue="0" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                         <ajax:ValidatorCalloutExtender ID="VCECveTipoProveedor" runat="server" HighlightCssClass="vco posicionvalidation" TargetControlID="RFVCveTipoProveedor" Width="350px"></ajax:ValidatorCalloutExtender>

Compras/ReembolsosComprobaciones.aspx.vb

@@ -774,6 +774,11 @@ Partial Class Compras_ReembolsosComprobaciones
                             End If
 
                             If MsgError = "" Then
+
+                                If AplicaPrePolizaPagoCompra(CompraActual, Pago, CvePrePolizaPago, ObjMov) Then
+                                    MsgError = "Detalle"
+                                End If
+
                                 If Not ChkReembolsarSinBancos.Checked AndAlso (Not HdnCheque.Value.ToEntero > 0 Or Not UsuarioActual.CveEmpresa.Contiene(119, 158)) Then
                                     'Si es caja chica metemos el concepto 30, si es funcionario metemos 29
                                     ImporteMovto += Pago.OtroGastoIngreso ' si ajuste, sedebe de aplicar en su contraparte
@@ -781,10 +786,6 @@ Partial Class Compras_ReembolsosComprobaciones
                                         MsgError = "Detalle"
                                     End If
                                 End If
-
-                                If AplicaPrePolizaPagoCompra(CompraActual, Pago, CvePrePolizaPago, ObjMov) Then
-                                    MsgError = "Detalle"
-                                End If
                             End If
 
                             Dim SaldoExcedente As Decimal = gvr.FCTextBox("TxtSaldoExcedente").Text.ToDecimal

Compras/RepNotasCredito.aspx

@@ -39,25 +39,32 @@
 <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 solid  grey-cascade portlet-filter" id="idnecesaria">
-                <div class="portlet-title portlet-filterT" style="">
+                <div class="portlet-title portlet-filterT smalltitle">
-                    <div class="titlefiltros caption ">
+                     <div class="titlefiltros  caption ">
-                        <ul class="list-inline text-size-12">
+                         <div class="row">
-                            <li>Proveedor:
+                            <div class="col-md-1 ">Proveedor:</div>
-                                <asp:DropDownList ID="DdlProveedores" runat="server" CssClass="form-control input-sm select2me" AppendDataBoundItems="true" DataTextField="RazonSocial" DataValueField="CveProveedor" Width="300px">
+                            <div class="col-md-2 ">
+                                <ADS:Dropdownlost ID="DdlProveedores" runat="server" CssStyle="width: 100%;" Width="100%" DataTextField="RazonSocial" DataValueField="CveProveedor"></ADS:Dropdownlost>
+                                <%--<asp:DropDownList CssClass=" select2me" Width="100%" ID="DdlProveedores" runat="server" AppendDataBoundItems="true" DataTextField="RazonSocial" DataValueField="CveProveedor">
                                     <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
-                                </asp:DropDownList>
+                                </asp:DropDownList>--%>
-                            </li>
+                            </div>
-                            <li>Estatus:
+                           <div class="col-md-1 truncate">Estatus:
+                                </div>
+                            <div class="col-md-1" style="min-width: 115px">
                                 <asp:DropDownList ID="DdlOpcion" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" Width="100px">
                                     <asp:ListItem Text="Todos" Value="-1"></asp:ListItem>
                                     <asp:ListItem Selected="True" Text="Con Saldo" Value="0"></asp:ListItem>
                                     <asp:ListItem Text="Sin Saldo" Value="1"></asp:ListItem>
                                 </asp:DropDownList>
-                            </li>
+                           </div>
-                            <li>Fecha I.</li>
+                           <div class="col-md-1 truncate">
-                            <li style="width: 140px;">
+                                Fecha I:                           
-                                <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 110px !important; padding: 0px; margin-bottom: -10px;">
+                            </div>
+                            <div class="col-md-1" style="min-width: 105px">
+                            
+                                <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 80px !important; padding: 0px; margin-bottom: -10px;">
                                     <asp:TextBox ID="txtFechaI" runat="server" CssClass="form-control" CausesValidation="true" Width="98%" MaxLength="10"></asp:TextBox>
                                     <span class="input-group-btn ">
                                         <asp:LinkButton ID="imgCalendario" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
@@ -69,10 +76,13 @@
                                 <ajax:ValidatorCalloutExtender ID="vcoCvFI" runat="server" HighlightCssClass="vco" TargetControlID="cvFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
                                 <%--<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>--%>
                                 <%--<ajax:ValidatorCalloutExtender ID="vcoFfvFI" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaI" Width="350px"></ajax:ValidatorCalloutExtender>--%>
-                            </li>
+                             </div>
-                            <li>Fecha F.</li>
+                            <div class="col-md-1 truncate">
-                            <li>
+                                Fecha Fin: 
-                                <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 110px !important; padding: 0px; margin-bottom: -10px;">
+                           
+                            </div>
+                            <div class="col-md-1" style="min-width: 105px">
+                                <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 80px !important; padding: 0px; margin-bottom: -10px;">
                                     <asp:TextBox ID="txtFechaF" runat="server" CssClass="form-control" CausesValidation="true" Width="98%" MaxLength="10"></asp:TextBox>
                                     <span class="input-group-btn ">
                                         <asp:LinkButton ID="imgCalendarioF" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
@@ -84,8 +94,8 @@
                                 <ajax:ValidatorCalloutExtender ID="vcoCvFF" runat="server" HighlightCssClass="vco" TargetControlID="cvFechaF" Width="350px"></ajax:ValidatorCalloutExtender>
                                 <%--<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>--%>
                                 <%--<ajax:ValidatorCalloutExtender ID="vcoRfvFF" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaF" Width="350px"></ajax:ValidatorCalloutExtender>--%>
-                            </li>
+                            </div>
-                        </ul>
+                        </div>
                     </div>
                     <div class="tools">
                         <asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" OnClick="BtnConsultar_Click" />
@@ -97,10 +107,10 @@
     <asp:UpdatePanel ID="UpDatos" UpdateMode="Conditional" runat="server">
         <ContentTemplate>
             <asp:GridView ID="GvDatos" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Notas de Crédito" OnRowDataBound="GvDatos_RowDataBound"
-                CssClass="table table-striped table-advance table-hover Widthall ScrollAD" data-sort="true" Style="text-align: center;" GridLines="None"
+                CssClass="table table-striped table-advance table-hover Widthall ScrollAD" data-sort="true" GridLines="None"
-                DataKeyNames="CveCompra,Saldo,CveIE,CveProveedor,CvePersonal,CveMoneda,IdCtaContProveedores,IdCtaContExtranjera,IdCtaContComplementaria,TipoCambio,CveSubProyecto">
+                DataKeyNames="CveCompra,Saldo,CveIE,CveProveedor,CvePersonal,CveMoneda,CveTipoConcepto,IdCtaContProveedores,IdCtaContExtranjera,IdCtaContComplementaria,TipoCambio,CveSubProyecto">
                 <Columns>
-                    <asp:TemplateField ItemStyle-Width="7%">
+                    <asp:TemplateField ItemStyle-Width="2%">
                         <ItemTemplate>
                             <asp:CheckBox ID="chk" Checked="false" Visible="false" runat="server" />
                         </ItemTemplate>

Compras/RepNotasCredito.aspx.vb

@@ -20,8 +20,11 @@ Partial Class Compras_RepNotasCredito
 #End Region
     Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
         If Not Page.IsPostBack Then
-            DdlProveedores.DataSource = GlobalDTCompProveedores(UsuarioActual.CveEmpresa)
+            DdlProveedores.setEsWebService(True)
-            DdlProveedores.DataBind()
+            DdlProveedores.Attributes.Add("data-metodo", "getproveedores")
+            DdlProveedores.SelectedText = "Todos"
+            DdlProveedores.SelectedValue = "-1"
+
             TxtFechaSaldar.Text = Now.ToShortDateString
             CargaDatos()
         End If
@@ -68,7 +71,7 @@ Partial Class Compras_RepNotasCredito
             Dim StrFiltro As New StringBuilder
             'StrFiltro.AppendFormat(String.Format("<b>Proveedor:</b> {0}, <b>Estatus:</b> {1}", DdlProveedores.SelectedItem.Text, DdlOpcion.SelectedItem.Text))
             ' If DdlTipoComprobante.SelectedValue <> "-1" Then StrFiltro.AppendFormat("&emsp;<b>Tipo Documento</b>: {0}", DdlTipoComprobante.SelectedItem.Text)
-            If DdlProveedores.SelectedValue <> "-1" Then StrFiltro.AppendFormat("&emsp;<b>Proveedor:</b> {0}", DdlProveedores.SelectedItem.Text)
+            If DdlProveedores.SelectedValue <> "-1" Then StrFiltro.AppendFormat("&emsp;<b>Proveedor:</b> {0}", DdlProveedores.SelectedText)
             If DdlOpcion.SelectedValue <> "-1" Then StrFiltro.AppendFormat("&emsp;<b>Estatus:</b> {0}", DdlOpcion.SelectedItem.Text)
 
             If txtFechaI.Text <> "" Then StrFiltro.AppendFormat("&emsp;<b>Fecha Inicio </b>: {0}", txtFechaI.Text.ToDate.ToShortDateString)
@@ -140,6 +143,7 @@ Partial Class Compras_RepNotasCredito
                 ImporteMN = gr.DataKey("Saldo").ToDecimal.RoundSQL
                 TCCompra = gr.DataKey("TipoCambio").ToDecimal
                 CveMoneda = gr.DataKey("CveMoneda").ToEntero
+                Dim CveTipoConcepto = gr.DataKey("CveTipoConcepto").ToEntero
 
                 If CveMoneda > 1 Then
                     IdCtaContable = gr.DataKey("IdCtaContExtranjera").ToEntero
@@ -148,6 +152,10 @@ Partial Class Compras_RepNotasCredito
                     IdCtaContable = gr.DataKey("IdCtaContProveedores").ToEntero
                 End If
 
+                Dim ConPreP As ConceptosTipoSaldo = ClsPaginas.ObtenerCveConceptoPrePoliza(15, CveMoneda, False, CveTipoConcepto)
+                'Dim CveCon As Integer = ObtConceptoContableProvisionCompra(CveTipoConcepto, DdlTipoComprobante.SelectedValue, DdlMoneda.SelectedValue.ToEntero, False)
+
+
                 If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, -Importe, "", 18, Concepto, TxtFechaSaldar.Text.ToDate, IdCtaContable, -1, gr.DataKey("CveIE").ToEntero, CveProveedor:=gr.DataKey("CveProveedor").ToEntero, CvePersonal:=gr.DataKey("CvePersonal").ToEntero, ImporteMX:=-If(CveMoneda > 1 AndAlso UsaComplementaria, Importe, ImporteMN), ImporteME:=-If(CveMoneda > 1, Importe, 0), CveCompra:=gr.DataKey("CveCompra").ToEntero, CveCompraAmortizacion:=gr.DataKey("CveCompra").ToEntero, TipoCambio:=TCCompra) Then
                     MsgError = "Ocurrio un Error al saldar el movimiento"
                 End If
@@ -181,7 +189,7 @@ Partial Class Compras_RepNotasCredito
                     End If
                     Dim ImporteFluctuacion As Decimal = Math.Abs((Importe * difFluctuacion).RoundSQL)
 
-                    If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovtoFluctua, ImporteFluctuacion, "", CveConceptoFluctua, Concepto, Now, IdCtaContableFluctua, -1, CveCompra:=gr.DataKey("CveCompra").ToEntero, CveProveedor:=gr.DataKey("CveProveedor").ToEntero, ImporteMX:=ImporteFluctuacion, ImporteME:=ImporteFluctuacion, TipoCambio:=TCCompra, TipoCambioPago:=TC) Then
+                    If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, TipoMovtoFluctua, ImporteFluctuacion, "", CveConceptoFluctua, Concepto, Now, IdCtaContableFluctua, -1, CveCompra:=gr.DataKey("CveCompra").ToEntero, CveProveedor:=gr.DataKey("CveProveedor").ToEntero, ImporteMX:=ImporteFluctuacion, ImporteME:=ImporteFluctuacion, TipoCambio:=TCCompra, TipoCambioPago:=TC, CveSubProyecto:=gr.DataKey("CveSubProyecto").ToEntero) Then
                         MsgError = "Ocurrio un Error al saldar el movimiento"
                     End If
                 End If

Contabilidad/RegPrePolizaS.aspx

@@ -181,7 +181,7 @@
                                         <div class="row">
                                             <div class="col-md-12">
                                                 <div class="form-group form-md-line-input input-iconright">
-                                                    <asp:TextBox ID="TxtConcepto" runat="server" Width="100%" CssClass="form-control" Enabled="false"></asp:TextBox>
+                                                    <asp:TextBox ID="TxtConcepto" runat="server" Width="100%" CssClass="form-control" ></asp:TextBox>
                                                     <label for="<%= TxtConcepto.ClientID.ToString()%>">Concepto:</label>
                                                      <asp:RequiredFieldValidator ID="RFVConcepto" runat="server" ControlToValidate="TxtConcepto" Display="None" ErrorMessage="El campo <b>''Concepto''</b> es requerido, por favor ingrese uno." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
                                                     <ajax:ValidatorCalloutExtender ID="VCEConcepto" runat="server" HighlightCssClass="vco" TargetControlID="RFVConcepto" Width="350px"></ajax:ValidatorCalloutExtender>

Contabilidad/RegPrePolizaS.aspx.vb

@@ -1042,7 +1042,7 @@ Partial Class ContabilidadC_RegPrePolizaS
                             If tFolio.ToEntero = 0 Then tFolio = SiguienteFolioBancos(gvr.DataKey("ContadoCuenta").ToEntero, gvr.DataKey("ContadoTipoTransaccion").ToEntero)
 
 
-                            Dim tCveMoneda As Integer = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveCuenta:=DdlCuenta.SelectedValue.ToEntero).FiltroPrimeroValor("CveMoneda").ToEntero
+                            Dim tCveMoneda As Integer = GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveCuenta:=DdlCuenta.SelectedValue.ToEntero, CveEmpresa:=UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveMoneda").ToEntero
 
 
                             CveIE = ObjIE.AddBancos_IE(gvr.DataKey("ContadoCuenta").ToEntero, gvr.DataKey("ContadoTipoTransaccion").ToEntero, TxtFechaDocumento.Text, tFolio,
@@ -1210,35 +1210,66 @@ Partial Class ContabilidadC_RegPrePolizaS
         ObjContabilidad.IniciaTransacSQL()
 
         Try
-            ObjContabilidad.UpdatePrePoliza(MinFecha, -1, DdlTipoPoliza.SelectedValue.ToEntero, -1, CvePrePoliza, UsuarioActual.CveEmpresa, Concepto:=TxtConcepto.Text, FechaPoliza:=TxtFechaDocumento.Text.ToDate, CveUsuarioModifico:=UsuarioActual.CveUsuario)
 
-            If Not ObjContabilidad.UpdatePrePolizasDetalleBloquear(CvePrePoliza, False) Then
-                OcurrioError = True
-            End If
 
-            If DtMovimientosEliminar IsNot Nothing AndAlso DtMovimientosEliminar.Rows.Count > 0 Then
+            Dim Retorno As Boolean = ObjContabilidad.UpdatePrePoliza(MinFecha, -1, DdlTipoPoliza.SelectedValue.ToEntero, -1, CvePrePoliza, UsuarioActual.CveEmpresa, Concepto:=TxtConcepto.Text, FechaPoliza:=TxtFechaDocumento.Text.ToDate, CveUsuarioModifico:=UsuarioActual.CveUsuario)
-                For Each RowEliminar As DataRow In DtMovimientosEliminar.Rows
-                    If Not ObjContabilidad.RemovePrePolizasDetalle(Me.CvePrePoliza, RowEliminar("CvePrePolizaDetalle").ToString().ToEntero()) Then
-                        OcurrioError = True
-                        Exit For
-                    End If
-                Next
-            End If
 
-            If Not OcurrioError Then
+            If Retorno Then
-                Dim CveIEAgregado As Integer = -1
+                If Not ObjContabilidad.UpdatePrePolizasDetalleBloquear(CvePrePoliza, False) Then
-                For Each row As GridViewRow In GvPrePoliza.Rows
+                    OcurrioError = True
-                    If row.DataKey("CvePrePolizaDetalle").ToEntero > 0 Then
+                End If
-                        If row.FCCheckBox("chkModificado").Checked Then
+
+                If DtMovimientosEliminar IsNot Nothing AndAlso DtMovimientosEliminar.Rows.Count > 0 Then
+                    For Each RowEliminar As DataRow In DtMovimientosEliminar.Rows
+                        If Not ObjContabilidad.RemovePrePolizasDetalle(Me.CvePrePoliza, RowEliminar("CvePrePolizaDetalle").ToString().ToEntero()) Then
+                            OcurrioError = True
+                            Exit For
+                        End If
+                    Next
+                End If
+
+                If Not OcurrioError Then
+                    Dim CveIEAgregado As Integer = -1
+                    For Each row As GridViewRow In GvPrePoliza.Rows
+                        If row.DataKey("CvePrePolizaDetalle").ToEntero > 0 Then
+                            If row.FCCheckBox("chkModificado").Checked Then
+                                contador = contador + 1
+
+                                Dim ImporteIE As Decimal = If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0, row.FCLiteral("TxtCargo").Text.ToDecimal, row.FCLiteral("TxtAbono").Text.ToDecimal)
+
+                                If row.DataKey("CveConceptoContable").ToEntero = 30 AndAlso ImporteIE > 0 AndAlso row.DataKey("CveIE").ToDecimal <= 0 Then
+                                    Dim ObjIE As New ClsBancos(ObjContabilidad.IniciaTransacSQL)
+                                    CveIEAgregado = ObjIE.AddBancos_IE(row.DataKey("ContadoCuenta").ToEntero, row.DataKey("ContadoTipoTransaccion").ToEntero, TxtFechaDocumento.Text, row.DataKey("ContadoNumeroFolio"),
+                                                               row.DataKey("ContadoBeneficiario"), ImporteIE, CveMoneda, 0, row.DataKey("ContadoObservaciones"), "",
+                                                               False, False, 0, row.DataKey("CvePrePoliza").ToEntero, "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
+                                    If CveIEAgregado < 0 Then
+                                        'MsgError = "No se pudo registrar movimiento bancario"
+                                        OcurrioError = True
+                                        Exit For
+                                    End If
+                                End If
+
+                                If Not ObjContabilidad.UpdatePrePolizasDetalle(row.DataKey("CvePrePolizaDetalle").ToEntero, row.FCLiteral("TxtConcepto").Text, row.DataKey("CveSubProyecto").ToEntero,
+                                                                                   row.DataKey("IdCtaContable").ToEntero, If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0, False, True), If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0,
+                                                                                   row.FCLiteral("TxtCargo").Text.ToDecimal, row.FCLiteral("TxtAbono").Text.ToDecimal), CveTipoGasto:=If(DdlTipoGasto.Visible, row.DataKey("CveTipoGasto").ToEntero, row.DataKey("CveTipoGasto").ToEntero),
+                                                                                   CveConceptoContable:=row.DataKey("CveConceptoContable").ToEntero, CveProveedor:=row.DataKey("CveProveedor").ToEntero, CveCompra:=row.DataKey("CveCompra").ToEntero,
+                                                                                   CveCliente:=row.DataKey("CveCliente").ToEntero, CveVenta:=row.DataKey("CveVenta").ToEntero,
+                                                                                   CvePersonal:=row.DataKey("CvePersonal").ToEntero, Referencia:=row.FCLiteral("TxtRef").Text, CveCuenta:=row.DataKey("CveCuenta").ToEntero, CveUsuarioModifico:=UsuarioActual.CveUsuario, CveIE:=CveIEAgregado) Then
+                                    OcurrioError = True
+                                    Exit For
+                                End If
+                            End If
+                        Else
                             contador = contador + 1
 
+
                             Dim ImporteIE As Decimal = If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0, row.FCLiteral("TxtCargo").Text.ToDecimal, row.FCLiteral("TxtAbono").Text.ToDecimal)
 
                             If row.DataKey("CveConceptoContable").ToEntero = 30 AndAlso ImporteIE > 0 AndAlso row.DataKey("CveIE").ToDecimal <= 0 Then
                                 Dim ObjIE As New ClsBancos(ObjContabilidad.IniciaTransacSQL)
                                 CveIEAgregado = ObjIE.AddBancos_IE(row.DataKey("ContadoCuenta").ToEntero, row.DataKey("ContadoTipoTransaccion").ToEntero, TxtFechaDocumento.Text, row.DataKey("ContadoNumeroFolio"),
-                                                           row.DataKey("ContadoBeneficiario"), ImporteIE, CveMoneda, 0, row.DataKey("ContadoObservaciones"), "",
+                                                               row.DataKey("ContadoBeneficiario"), ImporteIE, CveMoneda, 0, row.DataKey("ContadoObservaciones"), "",
-                                                           False, False, 0, row.DataKey("CvePrePoliza").ToEntero, "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
+                                                               False, False, 0, row.DataKey("CvePrePoliza").ToEntero, "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
                                 If CveIEAgregado < 0 Then
                                     'MsgError = "No se pudo registrar movimiento bancario"
                                     OcurrioError = True
@@ -1246,50 +1277,26 @@ Partial Class ContabilidadC_RegPrePolizaS
                                 End If
                             End If
 
-                            If Not ObjContabilidad.UpdatePrePolizasDetalle(row.DataKey("CvePrePolizaDetalle").ToEntero, row.FCLiteral("TxtConcepto").Text, row.DataKey("CveSubProyecto").ToEntero,
+                            If Not ObjContabilidad.AddPrePolizasDetalle(CvePrePoliza, If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0, False, True), If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0,
-                                                                               row.DataKey("IdCtaContable").ToEntero, If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0, False, True), If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0,
+                                                                        row.FCLiteral("TxtCargo").Text.ToDecimal, row.FCLiteral("TxtAbono").Text.ToDecimal), row.DataKey("Referencia").ToString,
-                                                                               row.FCLiteral("TxtCargo").Text.ToDecimal, row.FCLiteral("TxtAbono").Text.ToDecimal), CveTipoGasto:=If(DdlTipoGasto.Visible, row.DataKey("CveTipoGasto").ToEntero, row.DataKey("CveTipoGasto").ToEntero),
+                                                                        row.DataKey("CveConceptoContable").ToEntero, row.FCLiteral("TxtConcepto").Text, Now,
-                                                                               CveConceptoContable:=row.DataKey("CveConceptoContable").ToEntero, CveProveedor:=row.DataKey("CveProveedor").ToEntero, CveCompra:=row.DataKey("CveCompra").ToEntero,
+                                                                        row.DataKey("IdCtaContable").ToEntero, 0, CveSubProyecto:=row.DataKey("CveSubProyecto").ToEntero,
-                                                                               CveCliente:=row.DataKey("CveCliente").ToEntero, CveVenta:=row.DataKey("CveVenta").ToEntero,
+                                                                        CveTipoGasto:=If(DdlTipoGasto.Visible, row.DataKey("CveTipoGasto").ToEntero, row.DataKey("CveTipoGasto").ToEntero),
-                                                                               CvePersonal:=row.DataKey("CvePersonal").ToEntero, Referencia:=row.FCLiteral("TxtRef").Text, CveCuenta:=row.DataKey("CveCuenta").ToEntero, CveUsuarioModifico:=UsuarioActual.CveUsuario, CveIE:=CveIEAgregado) Then
+                                                                        ImporteMX:=If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0,
-                                OcurrioError = True
+                                                                        row.FCLiteral("TxtCargo").Text.ToDecimal, row.FCLiteral("TxtAbono").Text.ToDecimal), CveProveedor:=row.DataKey("CveProveedor").ToEntero,
-                                Exit For
+                                                                        CveCompra:=row.DataKey("CveCompra").ToEntero, CveCliente:=row.DataKey("CveCliente").ToEntero, CveVenta:=row.DataKey("CveVenta").ToEntero,
-                            End If
+                                                                        CvePersonal:=row.DataKey("CvePersonal").ToEntero, CveCuenta:=row.DataKey("CveCuenta").ToEntero, PorcentajeImpuesto:=row.DataKey("PorcentajeImpuesto").ToDecimal, CveIE:=CveIEAgregado) Then
-                        End If
-                    Else
-                        contador = contador + 1
-
-
-                        Dim ImporteIE As Decimal = If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0, row.FCLiteral("TxtCargo").Text.ToDecimal, row.FCLiteral("TxtAbono").Text.ToDecimal)
-
-                        If row.DataKey("CveConceptoContable").ToEntero = 30 AndAlso ImporteIE > 0 AndAlso row.DataKey("CveIE").ToDecimal <= 0 Then
-                            Dim ObjIE As New ClsBancos(ObjContabilidad.IniciaTransacSQL)
-                            CveIEAgregado = ObjIE.AddBancos_IE(row.DataKey("ContadoCuenta").ToEntero, row.DataKey("ContadoTipoTransaccion").ToEntero, TxtFechaDocumento.Text, row.DataKey("ContadoNumeroFolio"),
-                                                           row.DataKey("ContadoBeneficiario"), ImporteIE, CveMoneda, 0, row.DataKey("ContadoObservaciones"), "",
-                                                           False, False, 0, row.DataKey("CvePrePoliza").ToEntero, "", UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
-                            If CveIEAgregado < 0 Then
-                                'MsgError = "No se pudo registrar movimiento bancario"
                                 OcurrioError = True
                                 Exit For
                             End If
                         End If
 
-                        If Not ObjContabilidad.AddPrePolizasDetalle(CvePrePoliza, If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0, False, True), If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0,
+                    Next
-                                                                    row.FCLiteral("TxtCargo").Text.ToDecimal, row.FCLiteral("TxtAbono").Text.ToDecimal), row.DataKey("Referencia").ToString,
+                End If
-                                                                    row.DataKey("CveConceptoContable").ToEntero, row.FCLiteral("TxtConcepto").Text, Now,
+            Else
-                                                                    row.DataKey("IdCtaContable").ToEntero, 0, CveSubProyecto:=row.DataKey("CveSubProyecto").ToEntero,
+                OcurrioError = True
-                                                                    CveTipoGasto:=If(DdlTipoGasto.Visible, row.DataKey("CveTipoGasto").ToEntero, row.DataKey("CveTipoGasto").ToEntero),
-                                                                    ImporteMX:=If(row.FCLiteral("TxtCargo").Text.ToDecimal <> 0,
-                                                                    row.FCLiteral("TxtCargo").Text.ToDecimal, row.FCLiteral("TxtAbono").Text.ToDecimal), CveProveedor:=row.DataKey("CveProveedor").ToEntero,
-                                                                    CveCompra:=row.DataKey("CveCompra").ToEntero, CveCliente:=row.DataKey("CveCliente").ToEntero, CveVenta:=row.DataKey("CveVenta").ToEntero,
-                                                                    CvePersonal:=row.DataKey("CvePersonal").ToEntero, CveCuenta:=row.DataKey("CveCuenta").ToEntero, PorcentajeImpuesto:=row.DataKey("PorcentajeImpuesto").ToDecimal, CveIE:=CveIEAgregado) Then
-                            OcurrioError = True
-                            Exit For
-                        End If
-                    End If
-
-                Next
             End If
+
         Catch ex As Exception
             OcurrioError = True
             OnError("Ocurrío un error al actualizar la PrePoliza", ex)

Contabilidad2/RepAnexoCatalogo.aspx

@@ -101,17 +101,17 @@
                                 <asp:ListItem Text="Con movimientos o saldo no igual a cero" Value="4"></asp:ListItem>
                             </asp:DropDownList>
                         </div>
-                        <div class="col-md-1 truncate" id="tdTipoReporte" visible="true">
+                        <div class="col-md-1 truncate" id="tdTipoReporte" visible="false" runat="server">
                             Tipo
                         </div>
-                        <div class="col-md-2" id="tdTipoReporte2" visible="true">
+                        <div class="col-md-2" id="tdTipoReporte2" visible="false" runat="server">
                             <asp:DropDownList ID="DdlTipoReporte" CssClass="form-control input-sm select2me" runat="server" Width="100%">
                                 <asp:ListItem Text="Contable" Value="1"></asp:ListItem>
                                 <asp:ListItem Text="Contable y Complementario" Value="3"></asp:ListItem>
                                 <asp:ListItem Text="Complementario" Value="2"></asp:ListItem>
                             </asp:DropDownList>
                         </div>
-                        <div class="col-md-1">
+                        <div class="col-md-1" id="divProyecto" runat="server">
                             <asp:Label ID="LblProyecto" runat="server">Proyecto:</asp:Label>
                         </div>
                         <div class="col-md-2">
@@ -123,10 +123,7 @@
                             <asp:DropDownList ID="DdlSubproyecto" CssClass="form-control input-sm select2me" runat="server" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Width="95%" AutoPostBack="True">
                             </asp:DropDownList>
                         </div>
-                        <div class="col-md-2">
+                         <div class="col-md-1">
-                            <asp:DropDownList Visible="false" CssClass="form-control input-sm" Width="150px" ID="DdlTipoCuentas" ClientIDMode="Static" runat="server" DataTextField="Nombre" DataValueField="CveCuenta" TabIndex="4" AutoPostBack="true">
-                            </asp:DropDownList>
-                        </div>
                     </div>
                 </div>
             </div>

Contabilidad2/RepAnexoCatalogo.aspx.vb

@@ -109,10 +109,6 @@ Partial Class AC2_RepAnexoCatalogo
                     'FechaInicio = Request("FI").ToDate
                     FechaFin = Request("FF").ToDate
                     DdlCuentas.SelectedValueExist(IdCuenta)
-                    If DdlCuentas.SelectedValue.ToEntero <> -1 Then
-                        'RegistraScript("Enable();")
-                        DdlTipoCuentas.SelectedValueExist(-2)
-                    End If
 
                     If Request("FI") IsNot Nothing AndAlso Request("FI").ToString.Length = 10 AndAlso Request("FI").ToDate > "01/01/1000".ToDate Then
                         FechaInicio = Request("FI").ToDate
@@ -189,19 +185,13 @@ Partial Class AC2_RepAnexoCatalogo
             Dim dr As DataRow = ObjTipoCuenta.DtResultados.FiltroPrimero("Codigo IN ('_GLOBAL')")
             If dr IsNot Nothing Then strGlobal = dr.Item(0).ToString
             'DTCuentas = ObjTipoCuenta.DtResultados '.FiltraParametros("Afectable = 1")
-            DdlTipoCuentas.DataSource = ObjTipoCuenta.DtResultados.FiltraParametros("Codigo IN ('_ACTIVO', '_BPASIVO', '_CAPITAL', '_CUADRE', '_ESTADISTICAS', '_ORDEN', '_RACREEDOR', '_RDEUDOR', '_UTILIDAD')")
             DdlCuentas.DataSource = ObjTipoCuenta.DtResultados
         End If
         ObjTipoCuenta.Dispose()
-        DdlTipoCuentas.DataBind()
-        'If strGlobal.Length > 0 Then DdlTipoCuentas.Items.Insert(0, New ListItem("Todas", strGlobal))
-        DdlTipoCuentas.Items.Insert(0, New ListItem("Todas las Cuentas", "-1"))
-        DdlTipoCuentas.Items.Add(New ListItem("Algun específico", "-2"))
-        DdlTipoCuentas.SelectedValue = "-2"
 
         DdlCuentas.DataBind()
 
-        CargarCentrosDeCosto(DdlProyecto, DdlSubproyecto, LblProyecto, LblSubProyecto)
+        CargarCentrosDeCosto(DdlProyecto, DdlSubproyecto, LblProyecto, LblSubProyecto, divProyecto:=divProyecto)
 
     End Sub
 
@@ -323,25 +313,17 @@ Partial Class AC2_RepAnexoCatalogo
     End Sub
     Public Sub BtnConsultar_Click(sender As Object, e As EventArgs) Handles BtnConsultar.Click
 
-        If DdlTipoCuentas.SelectedValue.ToEntero = -2 AndAlso DdlCuentas.SelectedValue.ToEntero = -1 Then
+        If DdlCuentas.SelectedValue.ToEntero = -1 Then
             Alert("El campo Cuenta es obligatorio.", TipoMensaje.MsgError)
         Else
             FechaInicio = If(txtFechaI.Text = "" Or txtFechaI.Text = "__/__/____", Date.Now, txtFechaI.Text.ToDate)
             FechaFin = If(txtFechaF.Text = "" Or txtFechaF.Text = "__/__/____", Date.Now, txtFechaF.Text.ToDate)
-            IdCuenta = If(DdlTipoCuentas.SelectedValue.ToEntero = -2, DdlCuentas.SelectedValue.ToEntero, DdlTipoCuentas.SelectedValue.ToEntero)
+            IdCuenta = DdlCuentas.SelectedValue.ToEntero
-
             CargaDatos()
         End If
         'RegistraScript("Enable();")
     End Sub
-    Protected Sub DdlTipoCuentas_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlTipoCuentas.SelectedIndexChanged
+
-        If DdlTipoCuentas.SelectedValue.ToEntero = -2 Then
-            DdlCuentas.Enabled = True
-        Else
-            DdlCuentas.Enabled = False
-            DdlCuentas.SelectedValueExist(-1)
-        End If
-    End Sub
 
     Public Overrides Sub VerifyRenderingInServerForm(control As Control)
 

Contabilidad2/RepBalanceGeneralHorizontal.aspx

@@ -113,7 +113,7 @@
                             </div>
                              </div>
                               
-</div>
+                </div>
             </div>
         </ContentTemplate>
     </asp:UpdatePanel>

Contabilidad2/RepEstadoActividades.aspx

@@ -53,10 +53,8 @@
                                 </asp:DropDownList>
                             </div>
                                                         
-                            <div class="col-md-1">
+                            <asp:Label ID="LblProyecto" runat="server">Proyecto:</asp:Label>                          
-                                <asp:Label ID="LblProyecto" runat="server">Proyecto:</asp:Label>
+                            <div class="col-md-2" id="DivProyecto" runat="server">
-                            </div>
-                            <div class="col-md-2">
                                 <asp:DropDownList ID="DdlProyecto" CssClass=" form-control input-sm select2me" runat="server" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="Proyecto" DataValueField="CveProyecto" Width="95%">
                                 </asp:DropDownList>
                             </div>

Contabilidad2/RepEstadoActividades.aspx.vb

@@ -117,7 +117,7 @@ Partial Class AC_RepEstadoActividades
         End If
         DdlPeriodo.SelectedValue = Now.Month.ToString
 
-        CargarCentrosDeCosto(DdlProyecto, DdlSubproyecto, LblProyecto, LblSubProyecto)
+        CargarCentrosDeCosto(DdlProyecto, DdlSubproyecto, LblProyecto, LblSubProyecto, divProyecto:=DivProyecto)
 
     End Sub
 

Contabilidad2/RepMovimientosAuxiliaresCatalogo.aspx

@@ -44,11 +44,22 @@
             <div class="portlet solid  grey-cascade portlet-filter">
                 <div class="portlet-title portlet-filterT smalltitle">
                     <div class="tools">
-                        <asp:Button ID="BtnConsultar" runat="server" CssClass="btn btn-default" Text="Consultar" Width="100px" OnClick="BtnConsultar_Click" ValidationGroup="GrpConsulta" />
+                        <asp:Button ID="BtnConsultar" runat="server" Text="Consultar" CssClass="btn btn-default" OnClick="BtnConsultar_Click" ValidationGroup="Valida" />
-                        <a href="javascript:;" class="expand"></a>
+                        <a href="javascript:;" data-idchekbox="<%= chkexpand.ClientID%>" class=" <%= IIf(chkexpand.Checked = True, "collapse", "expand")%>"></a><%--class="expand"--%>
+                        <asp:CheckBox ID="chkexpand" CssClass="hidden" runat="server" />
                     </div>
                     <div class="titlefiltros  caption ">
                         <div class="row">
+                            <div class="col-md-1">
+                                Cuenta: 
+                            </div>
+                            <div class="col-md-3">
+                                <asp:DropDownList ID="DdlCuentas" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="CveCuenta" CssClass="form-control input-sm select2me" Enabled="false">
+                                    <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
+                                </asp:DropDownList>
+                                <asp:RequiredFieldValidator ID="RFVDdlCuentas" runat="server" InitialValue="-1" ControlToValidate="DdlCuentas" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cuenta''</b> es necesario, por favor ingréselo." ValidationGroup="GrpConsulta"></asp:RequiredFieldValidator>
+                                <ajax:ValidatorCalloutExtender ID="CERFVDdlCuentas" runat="server" HighlightCssClass="vco" TargetControlID="RFVDdlCuentas" Width="350px"></ajax:ValidatorCalloutExtender>
+                            </div>
                             <div class="col-md-1">
                                 Fecha Inicio:  
                             </div>
@@ -88,28 +99,34 @@
                                 <asp:DropDownList ID="DdlTipoCuentas" CssClass="form-control input-sm" runat="server" DataTextField="Nombre" DataValueField="CveCuenta" TabIndex="4" AutoPostBack="true" ClientIDMode="Static">
                                 </asp:DropDownList>
                             </div>                            
-                            <div class="col-md-1">
-                                Cuenta: 
-                            </div>
-                            <div class="col-md-2">
-                                <asp:DropDownList ID="DdlCuentas" runat="server" AppendDataBoundItems="true" DataTextField="CtaCodigo" DataValueField="CveCuenta" CssClass="form-control input-sm select2me" Enabled="false">
-                                    <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
-                                </asp:DropDownList>
-                                <asp:RequiredFieldValidator ID="RFVDdlCuentas" runat="server" InitialValue="-1" ControlToValidate="DdlCuentas" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cuenta''</b> es necesario, por favor ingréselo." ValidationGroup="GrpConsulta"></asp:RequiredFieldValidator>
-                                <ajax:ValidatorCalloutExtender ID="CERFVDdlCuentas" runat="server" HighlightCssClass="vco" TargetControlID="RFVDdlCuentas" Width="350px"></ajax:ValidatorCalloutExtender>
-                            </div>
                         </div>
                     </div>
                 </div>
-
+               <div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style=""display:none;""")%>>
-                <div class="portlet-body" style="display: none">
                     <div class="row">
-                        <label class="col-md-1">Moneda:</label>
+                        <div class="col-md-1 truncate">
-                        <div class="col-md-1">
+                            Tipo Movto
-                            <asp:DropDownList ID="DdlMoneda" CssClass="form-control input-sm select2me" runat="server" DataTextField="Moneda" DataValueField="CveMoneda" TabIndex="5" ClientIDMode="Static" Width="100%">
+                        </div>
+                        <div class="col-md-2 truncate">
+                            <asp:DropDownList ID="DdlOpcionCuentas" runat="server" DataTextField="Cuenta" DataValueField="CveCuenta" TabIndex="4" CssClass="form-control input-sm select2me" Width="100%">
+                                <asp:ListItem Text="Todos" Value="-1"></asp:ListItem>
+                                <asp:ListItem Text="Con movimientos" Value="1"></asp:ListItem>
+                                <asp:ListItem Text="Saldo actual no igual a cero" Value="2"></asp:ListItem>
+                                <asp:ListItem Text="Con movimientos y saldo no igual a cero" Value="3"></asp:ListItem>
+                                <asp:ListItem Text="Con movimientos o saldo no igual a cero" Value="4"></asp:ListItem>
                             </asp:DropDownList>
                         </div>
-                        <div class="col-md-1">
+                        <div class="col-md-1 truncate" id="tdTipoReporte" visible="false" runat="server">
+                            Tipo
+                        </div>
+                        <div class="col-md-2" id="tdTipoReporte2" visible="false" runat="server">
+                            <asp:DropDownList ID="DdlTipoReporte" CssClass="form-control input-sm select2me" runat="server" Width="100%">
+                                <asp:ListItem Text="Contable" Value="1"></asp:ListItem>
+                                <asp:ListItem Text="Contable y Complementario" Value="3"></asp:ListItem>
+                                <asp:ListItem Text="Complementario" Value="2"></asp:ListItem>
+                            </asp:DropDownList>
+                        </div>
+                        <div class="col-md-1" id="divProyecto" runat="server">
                             <asp:Label ID="LblProyecto" runat="server">Proyecto:</asp:Label>
                         </div>
                         <div class="col-md-2">
@@ -121,18 +138,7 @@
                             <asp:DropDownList ID="DdlSubproyecto" CssClass="form-control input-sm select2me" runat="server" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Width="95%" AutoPostBack="True">
                             </asp:DropDownList>
                         </div>
-                        <div class="col-md-2" runat="server" id="tdTipoReporte" visible="true">
+                        
-                            <div class="row">
-                                <label class="col-md-3">Tipo:</label>
-                                <div class="col-md-6">
-                                    <asp:DropDownList ID="DdlTipoReporte" CssClass="form-control input-sm select2me" runat="server" Width="100%">
-                                        <asp:ListItem Text="Contable" Value="1"></asp:ListItem>
-                                        <asp:ListItem Text="Contable y Complementarias" Value="2"></asp:ListItem>
-                                        <asp:ListItem Text="Complementarias" Value="3"></asp:ListItem>
-                                    </asp:DropDownList>
-                                </div>
-                            </div>
-                        </div>
                     </div>
                 </div>
             </div>

Contabilidad2/RepMovimientosAuxiliaresCatalogo.aspx.vb

@@ -105,9 +105,7 @@ Partial Class Conta_RepMovimientosAuxiliaresCatalogo
 
             CargaTipoCuentas()
             'TxtCuenta.Enabled = False
-            DdlMoneda.DataSource = GlobalDTMonedas
+
-            'DdlMoneda.Dispose()
-            DdlMoneda.DataBind()
             txtFechaI.Text = Now.FirstDayOfMonth.ToShortDateString
             txtFechaF.Text = Now.LastDayOfMonth.ToShortDateString
 
@@ -228,7 +226,7 @@ Partial Class Conta_RepMovimientosAuxiliaresCatalogo
         ObjTipoCuenta.Dispose()
         DdlCuentas.DataBind()
 
-        CargarCentrosDeCosto(DdlProyecto, DdlSubproyecto, LblProyecto, LblSubProyecto)
+        CargarCentrosDeCosto(DdlProyecto, DdlSubproyecto, LblProyecto, LblSubProyecto, divProyecto:=divProyecto)
 
     End Sub
 
@@ -248,7 +246,7 @@ Partial Class Conta_RepMovimientosAuxiliaresCatalogo
         IdCuenta = DdlCuentas.SelectedValue.ToEntero
         Cuenta = DdlCuentas.SelectedItem.ToString
         Dim ObjConta As New ClsContabilidad
-        If ObjConta.GetMovimientosAuxiliaresCatalogo(IdCuenta, FechaInicio, FechaFin, DdlMoneda.SelectedValue.ToEntero, CveProyecto, CveSubProyecto, UsuarioActual.CveEmpresa, TipoReporte) Then
+        If ObjConta.GetMovimientosAuxiliaresCatalogo(IdCuenta, FechaInicio, FechaFin, -1, CveProyecto, CveSubProyecto, UsuarioActual.CveEmpresa, TipoReporte, DdlOpcionCuentas.SelectedValue.ToEntero) Then
             DtDatos = ObjConta.DtResultados
             DtTotales = DtDatos.Clone
 
@@ -275,8 +273,8 @@ Partial Class Conta_RepMovimientosAuxiliaresCatalogo
                 Row = DtTotales.NewRow
 
                 Row("CveCuenta") = -1
-                Row("CargosMovto") = If(DdlMoneda.SelectedValue = "1", dr("Cargos"), dr("CargosME"))
+                Row("CargosMovto") = If("1" = "1", dr("Cargos"), dr("CargosME"))
-                Row("AbonosMovto") = If(DdlMoneda.SelectedValue = "1", dr("Abonos"), dr("AbonosME"))
+                Row("AbonosMovto") = If("1" = "1", dr("Abonos"), dr("AbonosME"))
                 Row("Saldo") = dr("SaldoActual")
                 Row("CtaMayor") = dr("CtaMayor")
                 Row("Concepto") = String.Format("Total {0}:", dr("Nombre"))
@@ -367,9 +365,9 @@ Partial Class Conta_RepMovimientosAuxiliaresCatalogo
                     End If
 
                     'e.Row.FCLabel("LbReferencia").Text = String.Format("Total {0}:", If(e.Row.DBCampo("CtaMayor").ToString = "2", "", e.Row.DBCampo("Nombre").ToString))
-                    e.Row.FCLabel("LbCargos").Text = e.Row.DBCampo("Cargos").ToString.FormatoNumero(If(DdlMoneda.SelectedValue = "1", 2, 4))
+                    e.Row.FCLabel("LbCargos").Text = e.Row.DBCampo("Cargos").ToString.FormatoNumero(If("1" = "1", 2, 4))
-                    e.Row.FCLabel("LbAbonos").Text = e.Row.DBCampo("Abonos").ToString.FormatoNumero(If(DdlMoneda.SelectedValue = "1", 2, 4))
+                    e.Row.FCLabel("LbAbonos").Text = e.Row.DBCampo("Abonos").ToString.FormatoNumero(If("1" = "1", 2, 4))
-                    e.Row.FCLabel("LbSaldo").Text = e.Row.DBCampo("SaldoActual").ToString.FormatoNumero(If(DdlMoneda.SelectedValue = "1", 2, 4))
+                    e.Row.FCLabel("LbSaldo").Text = e.Row.DBCampo("SaldoActual").ToString.FormatoNumero(If("1" = "1", 2, 4))
                 End If
 
             Else
@@ -378,9 +376,9 @@ Partial Class Conta_RepMovimientosAuxiliaresCatalogo
                 CType(e.Row.FindControl("tr1"), HtmlTableRow).Visible = False
                 e.Row.FCHyperLink("HLPoliza").NavigateUrl = String.Format("/Contabilidad/RegPrePoliza.aspx?CvePrePoliza={0}", e.Row.DBCampo("CvePoliza"))
 
-                If e.Row.DBCampo("CargosMovto").ToDouble <> 0 Then e.Row.FCLabel("LbCargos").Text = e.Row.DBCampo("CargosMovto").ToString.FormatoNumero(If(DdlMoneda.SelectedValue = "1", 2, 4))
+                If e.Row.DBCampo("CargosMovto").ToDouble <> 0 Then e.Row.FCLabel("LbCargos").Text = e.Row.DBCampo("CargosMovto").ToString.FormatoNumero(If("1" = "1", 2, 4))
-                If e.Row.DBCampo("AbonosMovto").ToDouble <> 0 Then e.Row.FCLabel("LbAbonos").Text = e.Row.DBCampo("AbonosMovto").ToString.FormatoNumero(If(DdlMoneda.SelectedValue = "1", 2, 4))
+                If e.Row.DBCampo("AbonosMovto").ToDouble <> 0 Then e.Row.FCLabel("LbAbonos").Text = e.Row.DBCampo("AbonosMovto").ToString.FormatoNumero(If("1" = "1", 2, 4))
-                If e.Row.DBCampo("Saldo").ToDouble <> 0 Then e.Row.FCLabel("LbSaldo").Text = e.Row.DBCampo("Saldo").ToString.FormatoNumero(If(DdlMoneda.SelectedValue = "1", 2, 4))
+                If e.Row.DBCampo("Saldo").ToDouble <> 0 Then e.Row.FCLabel("LbSaldo").Text = e.Row.DBCampo("Saldo").ToString.FormatoNumero(If("1" = "1", 2, 4))
 
             End If
 
@@ -485,7 +483,7 @@ Partial Class Conta_RepMovimientosAuxiliaresCatalogo
         params.Add(New ReportParameter("pImg", If(Imagen.Exists, $"file://{Imagen.FullName}", "")))
         params.Add(New ReportParameter("pFechaFin", FechaFin.ToString("dd/MM/yyyy")))
         params.Add(New ReportParameter("pFechaInicio", FechaInicio.ToString("dd/MM/yyyy")))
-        params.Add(New ReportParameter("CveMoneda", DdlMoneda.SelectedValue))
+        params.Add(New ReportParameter("CveMoneda", "1"))
         params.Add(New ReportParameter("Cuenta", Cuenta))
         ImprimirPDF("Empresas/Grales/Formatos/RepMovimientosAuxiliaresCatalogo.rdlc", DtDatos, params, "MovimientosAuxiliares", Formato)
 

Empresas/154/Formatos/Cotizacion.rdlc

@@ -1916,7 +1916,6 @@
                             <PaddingBottom>2pt</PaddingBottom>
                           </Style>
                         </Textbox>
-                        <rd:Selected>true</rd:Selected>
                       </CellContents>
                     </TablixCell>
                   </TablixCells>
@@ -2757,6 +2756,18 @@
       <AllowBlank>true</AllowBlank>
       <Prompt>ReportParameter1</Prompt>
     </ReportParameter>
+    <ReportParameter Name="CFDIVersion">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="RegimenFiscalCodigo">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
   </ReportParameters>
   <EmbeddedImages>
     <EmbeddedImage Name="ID2">

Empresas/154/Formatos/Factura.rdlc

@@ -152,6 +152,10 @@
           <DataField>PorcentajeIVA</DataField>
           <rd:TypeName>System.String</rd:TypeName>
         </Field>
+        <Field Name="CodigoObjetoImpuesto">
+          <DataField>CodigoObjetoImpuesto</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
       </Fields>
       <rd:DataSetInfo>
         <rd:DataSetName>DsOC</rd:DataSetName>
@@ -491,10 +495,10 @@
             <TablixBody>
               <TablixColumns>
                 <TablixColumn>
-                  <Width>0.54014in</Width>
+                  <Width>0.5in</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>0.59111in</Width>
+                  <Width>0.5in</Width>
                 </TablixColumn>
                 <TablixColumn>
                   <Width>0.80359in</Width>
@@ -503,16 +507,19 @@
                   <Width>0.66404in</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>2.60074in</Width>
+                  <Width>2.38768in</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>0.83102in</Width>
+                  <Width>0.65in</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>0.6403in</Width>
+                  <Width>0.70315in</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>0.69088in</Width>
+                  <Width>0.56738in</Width>
+                </TablixColumn>
+                <TablixColumn>
+                  <Width>0.62838in</Width>
                 </TablixColumn>
                 <TablixColumn>
                   <Width>0.80447in</Width>
@@ -735,6 +742,50 @@
                         </Textbox>
                       </CellContents>
                     </TablixCell>
+                    <TablixCell>
+                      <CellContents>
+                        <Textbox Name="Textbox13">
+                          <CanGrow>true</CanGrow>
+                          <KeepTogether>true</KeepTogether>
+                          <Paragraphs>
+                            <Paragraph>
+                              <TextRuns>
+                                <TextRun>
+                                  <Value>Reg.fiscal:</Value>
+                                  <Style>
+                                    <FontFamily>calibri</FontFamily>
+                                    <FontWeight>Normal</FontWeight>
+                                  </Style>
+                                </TextRun>
+                              </TextRuns>
+                              <Style>
+                                <TextAlign>Left</TextAlign>
+                              </Style>
+                            </Paragraph>
+                          </Paragraphs>
+                          <rd:DefaultName>Textbox13</rd:DefaultName>
+                          <Style>
+                            <Border>
+                              <Style>None</Style>
+                            </Border>
+                            <TopBorder>
+                              <Color>Black</Color>
+                              <Style>Solid</Style>
+                              <Width>2pt</Width>
+                            </TopBorder>
+                            <BottomBorder>
+                              <Color>Black</Color>
+                              <Style>Solid</Style>
+                              <Width>2pt</Width>
+                            </BottomBorder>
+                            <PaddingLeft>2pt</PaddingLeft>
+                            <PaddingRight>2pt</PaddingRight>
+                            <PaddingTop>2pt</PaddingTop>
+                            <PaddingBottom>2pt</PaddingBottom>
+                          </Style>
+                        </Textbox>
+                      </CellContents>
+                    </TablixCell>
                     <TablixCell>
                       <CellContents>
                         <Textbox Name="Textbox53">
@@ -1095,6 +1146,39 @@
                         </Textbox>
                       </CellContents>
                     </TablixCell>
+                    <TablixCell>
+                      <CellContents>
+                        <Textbox Name="CodigoObjetoImpuesto">
+                          <CanGrow>true</CanGrow>
+                          <KeepTogether>true</KeepTogether>
+                          <Paragraphs>
+                            <Paragraph>
+                              <TextRuns>
+                                <TextRun>
+                                  <Value>=Fields!CodigoObjetoImpuesto.Value</Value>
+                                  <Style>
+                                    <FontFamily>calibri</FontFamily>
+                                    <FontSize>8pt</FontSize>
+                                    <FontWeight>Normal</FontWeight>
+                                  </Style>
+                                </TextRun>
+                              </TextRuns>
+                              <Style />
+                            </Paragraph>
+                          </Paragraphs>
+                          <rd:DefaultName>CodigoObjetoImpuesto</rd:DefaultName>
+                          <Style>
+                            <Border>
+                              <Style>None</Style>
+                            </Border>
+                            <PaddingLeft>2pt</PaddingLeft>
+                            <PaddingRight>2pt</PaddingRight>
+                            <PaddingTop>2pt</PaddingTop>
+                            <PaddingBottom>2pt</PaddingBottom>
+                          </Style>
+                        </Textbox>
+                      </CellContents>
+                    </TablixCell>
                     <TablixCell>
                       <CellContents>
                         <Textbox Name="PU1">
@@ -1259,6 +1343,7 @@
                 <TablixMember />
                 <TablixMember />
                 <TablixMember />
+                <TablixMember />
               </TablixMembers>
             </TablixColumnHierarchy>
             <TablixRowHierarchy>
@@ -1275,7 +1360,7 @@
             <Top>1.92778in</Top>
             <Left>0.09836in</Left>
             <Height>0.36206in</Height>
-            <Width>8.16629in</Width>
+            <Width>8.20869in</Width>
             <ZIndex>1</ZIndex>
             <Style>
               <Border>
@@ -1903,6 +1988,25 @@
                 </TextRuns>
                 <Style />
               </Paragraph>
+              <Paragraph>
+                <TextRuns>
+                  <TextRun>
+                    <Value>Reg.fiscal: </Value>
+                    <Style>
+                      <FontFamily>calibri</FontFamily>
+                      <FontWeight>Bold</FontWeight>
+                    </Style>
+                  </TextRun>
+                  <TextRun>
+                    <Value>=Parameters!RegimenFiscalCodigo.Value</Value>
+                    <Style>
+                      <FontFamily>calibri</FontFamily>
+                      <FontWeight>Bold</FontWeight>
+                    </Style>
+                  </TextRun>
+                </TextRuns>
+                <Style />
+              </Paragraph>
             </Paragraphs>
             <rd:DefaultName>Textbox4</rd:DefaultName>
             <Top>3.97614cm</Top>
@@ -2782,41 +2886,6 @@
                   </Border>
                 </Style>
               </Tablix>
-              <Textbox Name="Textbox14">
-                <CanGrow>true</CanGrow>
-                <KeepTogether>true</KeepTogether>
-                <Paragraphs>
-                  <Paragraph>
-                    <TextRuns>
-                      <TextRun>
-                        <Value>VERSION 3.3</Value>
-                        <Style>
-                          <FontFamily>Calibri</FontFamily>
-                          <FontWeight>Normal</FontWeight>
-                        </Style>
-                      </TextRun>
-                    </TextRuns>
-                    <Style>
-                      <TextAlign>Center</TextAlign>
-                    </Style>
-                  </Paragraph>
-                </Paragraphs>
-                <rd:DefaultName>Textbox5</rd:DefaultName>
-                <Top>2.15724cm</Top>
-                <Left>17.53151cm</Left>
-                <Height>0.52063cm</Height>
-                <Width>3.32021cm</Width>
-                <ZIndex>3</ZIndex>
-                <Style>
-                  <Border>
-                    <Style>None</Style>
-                  </Border>
-                  <PaddingLeft>2pt</PaddingLeft>
-                  <PaddingRight>2pt</PaddingRight>
-                  <PaddingTop>2pt</PaddingTop>
-                  <PaddingBottom>2pt</PaddingBottom>
-                </Style>
-              </Textbox>
               <Textbox Name="Textbox41">
                 <CanGrow>true</CanGrow>
                 <KeepTogether>true</KeepTogether>
@@ -2841,7 +2910,7 @@
                 <Left>0.03101cm</Left>
                 <Height>0.54004cm</Height>
                 <Width>20.79183cm</Width>
-                <ZIndex>4</ZIndex>
+                <ZIndex>3</ZIndex>
                 <Style>
                   <Border>
                     <Style>None</Style>
@@ -2856,7 +2925,7 @@
             <KeepTogether>true</KeepTogether>
             <Top>12.7027cm</Top>
             <Left>0.16937cm</Left>
-            <Height>2.67787cm</Height>
+            <Height>2.0799cm</Height>
             <Width>20.85172cm</Width>
             <ZIndex>17</ZIndex>
             <Visibility>
@@ -2868,11 +2937,53 @@
               </Border>
             </Style>
           </Rectangle>
+          <Textbox Name="Textbox7">
+            <CanGrow>true</CanGrow>
+            <KeepTogether>true</KeepTogether>
+            <Paragraphs>
+              <Paragraph>
+                <TextRuns>
+                  <TextRun>
+                    <Value>VERSION </Value>
+                    <Style>
+                      <FontSize>9.16pt</FontSize>
+                      <FontWeight>Bold</FontWeight>
+                    </Style>
+                  </TextRun>
+                  <TextRun>
+                    <Value>=Parameters!CFDIVersion.Value</Value>
+                    <Style>
+                      <FontSize>9.16pt</FontSize>
+                      <FontWeight>Bold</FontWeight>
+                    </Style>
+                  </TextRun>
+                </TextRuns>
+                <Style>
+                  <TextAlign>Right</TextAlign>
+                </Style>
+              </Paragraph>
+            </Paragraphs>
+            <rd:DefaultName>Textbox5</rd:DefaultName>
+            <Top>14.92371cm</Top>
+            <Left>16.61913cm</Left>
+            <Height>0.46567cm</Height>
+            <Width>4.37308cm</Width>
+            <ZIndex>18</ZIndex>
+            <Style>
+              <Border>
+                <Style>None</Style>
+              </Border>
+              <PaddingLeft>2pt</PaddingLeft>
+              <PaddingRight>2pt</PaddingRight>
+              <PaddingTop>2pt</PaddingTop>
+              <PaddingBottom>2pt</PaddingBottom>
+            </Style>
+          </Textbox>
         </ReportItems>
-        <Height>15.38057cm</Height>
+        <Height>15.51286cm</Height>
         <Style />
       </Body>
-      <Width>21.16666cm</Width>
+      <Width>21.13635cm</Width>
       <Page>
         <PageFooter>
           <Height>0.52387cm</Height>
@@ -3625,6 +3736,18 @@
       <AllowBlank>true</AllowBlank>
       <Prompt>ReportParameter1</Prompt>
     </ReportParameter>
+    <ReportParameter Name="CFDIVersion">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="RegimenFiscalCodigo">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
   </ReportParameters>
   <EmbeddedImages>
     <EmbeddedImage Name="ID2">

Empresas/165/Formatos/Factura.rdlc

@@ -172,6 +172,10 @@
           <DataField>SATClaveUM</DataField>
           <rd:TypeName>System.String</rd:TypeName>
         </Field>
+        <Field Name="CodigoObjetoImpuesto">
+          <DataField>CodigoObjetoImpuesto</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
       </Fields>
       <rd:DataSetInfo>
         <rd:DataSetName>DsOC</rd:DataSetName>
@@ -1540,7 +1544,10 @@
                   <Width>2.0584cm</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>10.69901cm</Width>
+                  <Width>9.20688cm</Width>
+                </TablixColumn>
+                <TablixColumn>
+                  <Width>1.58142cm</Width>
                 </TablixColumn>
                 <TablixColumn>
                   <Width>1.6882cm</Width>
@@ -1699,6 +1706,43 @@
                         </Textbox>
                       </CellContents>
                     </TablixCell>
+                    <TablixCell>
+                      <CellContents>
+                        <Textbox Name="Textbox1">
+                          <CanGrow>true</CanGrow>
+                          <KeepTogether>true</KeepTogether>
+                          <Paragraphs>
+                            <Paragraph>
+                              <TextRuns>
+                                <TextRun>
+                                  <Value>Obj. Imp.</Value>
+                                  <Style>
+                                    <FontFamily>calibri</FontFamily>
+                                    <FontSize>9pt</FontSize>
+                                    <Color>White</Color>
+                                  </Style>
+                                </TextRun>
+                              </TextRuns>
+                              <Style>
+                                <TextAlign>Center</TextAlign>
+                              </Style>
+                            </Paragraph>
+                          </Paragraphs>
+                          <rd:DefaultName>Textbox1</rd:DefaultName>
+                          <Style>
+                            <Border>
+                              <Color>White</Color>
+                              <Style>Solid</Style>
+                            </Border>
+                            <BackgroundColor>Black</BackgroundColor>
+                            <PaddingLeft>2pt</PaddingLeft>
+                            <PaddingRight>2pt</PaddingRight>
+                            <PaddingTop>2pt</PaddingTop>
+                            <PaddingBottom>2pt</PaddingBottom>
+                          </Style>
+                        </Textbox>
+                      </CellContents>
+                    </TablixCell>
                     <TablixCell>
                       <CellContents>
                         <Textbox Name="Textbox84">
@@ -1942,6 +1986,44 @@
                         </Textbox>
                       </CellContents>
                     </TablixCell>
+                    <TablixCell>
+                      <CellContents>
+                        <Textbox Name="CodigoObjetoImpuesto">
+                          <CanGrow>true</CanGrow>
+                          <KeepTogether>true</KeepTogether>
+                          <Paragraphs>
+                            <Paragraph>
+                              <TextRuns>
+                                <TextRun>
+                                  <Value>=Fields!CodigoObjetoImpuesto.Value</Value>
+                                  <Style>
+                                    <FontSize>7pt</FontSize>
+                                  </Style>
+                                </TextRun>
+                              </TextRuns>
+                              <Style />
+                            </Paragraph>
+                          </Paragraphs>
+                          <rd:DefaultName>CodigoObjetoImpuesto</rd:DefaultName>
+                          <Style>
+                            <Border>
+                              <Color>White</Color>
+                              <Style>Solid</Style>
+                            </Border>
+                            <TopBorder>
+                              <Style>None</Style>
+                            </TopBorder>
+                            <BottomBorder>
+                              <Style>None</Style>
+                            </BottomBorder>
+                            <PaddingLeft>2pt</PaddingLeft>
+                            <PaddingRight>2pt</PaddingRight>
+                            <PaddingTop>2pt</PaddingTop>
+                            <PaddingBottom>2pt</PaddingBottom>
+                          </Style>
+                        </Textbox>
+                      </CellContents>
+                    </TablixCell>
                     <TablixCell>
                       <CellContents>
                         <Textbox Name="PU1">
@@ -2037,6 +2119,7 @@
                 <TablixMember />
                 <TablixMember />
                 <TablixMember />
+                <TablixMember />
               </TablixMembers>
             </TablixColumnHierarchy>
             <TablixRowHierarchy>
@@ -2056,7 +2139,7 @@
             <Top>4.14415cm</Top>
             <Left>0.11516cm</Left>
             <Height>1.09418cm</Height>
-            <Width>19.94062cm</Width>
+            <Width>20.02991cm</Width>
             <ZIndex>13</ZIndex>
             <Style>
               <Border>
@@ -2535,7 +2618,13 @@
                         </Style>
                       </TextRun>
                       <TextRun>
-                        <Value>       Version 3.3</Value>
+                        <Value>       Version  </Value>
+                        <Style>
+                          <FontSize>9pt</FontSize>
+                        </Style>
+                      </TextRun>
+                      <TextRun>
+                        <Value>=Parameters!CFDIVersion.Value</Value>
                         <Style>
                           <FontSize>9pt</FontSize>
                         </Style>
@@ -2548,7 +2637,7 @@
                 <Top>2.74248cm</Top>
                 <Left>4.41157cm</Left>
                 <Height>0.4871cm</Height>
-                <Width>5.45089cm</Width>
+                <Width>8.02442cm</Width>
                 <ZIndex>11</ZIndex>
                 <Style>
                   <Border>
@@ -3581,7 +3670,7 @@
         <Height>18.69133cm</Height>
         <Style />
       </Body>
-      <Width>20.16633cm</Width>
+      <Width>20.15157cm</Width>
       <Page>
         <PageFooter>
           <Height>0.74111cm</Height>
@@ -4234,6 +4323,18 @@
       <AllowBlank>true</AllowBlank>
       <Prompt>ReportParameter1</Prompt>
     </ReportParameter>
+    <ReportParameter Name="CFDIVersion">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="RegimenFiscalCodigo">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
   </ReportParameters>
   <EmbeddedImages>
     <EmbeddedImage Name="Logo2">

Empresas/32/Formatos/Factura.rdlc

@@ -136,6 +136,10 @@
           <DataField>Descuento</DataField>
           <rd:TypeName>System.String</rd:TypeName>
         </Field>
+        <Field Name="CodigoObjetoImpuesto">
+          <DataField>CodigoObjetoImpuesto</DataField>
+          <rd:TypeName>System.String</rd:TypeName>
+        </Field>
       </Fields>
       <rd:DataSetInfo>
         <rd:DataSetName>DsOC</rd:DataSetName>
@@ -317,13 +321,16 @@
                   <Width>0.74905in</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>4.43046in</Width>
+                  <Width>4.1032in</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>0.83784in</Width>
+                  <Width>0.61967in</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>1.17409in</Width>
+                  <Width>0.77961in</Width>
+                </TablixColumn>
+                <TablixColumn>
+                  <Width>0.96216in</Width>
                 </TablixColumn>
               </TablixColumns>
               <TablixRows>
@@ -438,6 +445,42 @@
                         </Textbox>
                       </CellContents>
                     </TablixCell>
+                    <TablixCell>
+                      <CellContents>
+                        <Textbox Name="Textbox8">
+                          <CanGrow>true</CanGrow>
+                          <KeepTogether>true</KeepTogether>
+                          <Paragraphs>
+                            <Paragraph>
+                              <TextRuns>
+                                <TextRun>
+                                  <Value>Obj. Imp.</Value>
+                                  <Style>
+                                    <FontFamily>calibri</FontFamily>
+                                    <FontSize>9pt</FontSize>
+                                    <Color>White</Color>
+                                  </Style>
+                                </TextRun>
+                              </TextRuns>
+                              <Style>
+                                <TextAlign>Left</TextAlign>
+                              </Style>
+                            </Paragraph>
+                          </Paragraphs>
+                          <rd:DefaultName>Textbox8</rd:DefaultName>
+                          <Style>
+                            <Border>
+                              <Color>#686868</Color>
+                              <Style>Solid</Style>
+                            </Border>
+                            <BackgroundColor>#686868</BackgroundColor>
+                            <VerticalAlign>Middle</VerticalAlign>
+                            <PaddingLeft>2pt</PaddingLeft>
+                            <PaddingRight>2pt</PaddingRight>
+                          </Style>
+                        </Textbox>
+                      </CellContents>
+                    </TablixCell>
                     <TablixCell>
                       <CellContents>
                         <Textbox Name="Textbox21">
@@ -616,6 +659,38 @@
                         </Textbox>
                       </CellContents>
                     </TablixCell>
+                    <TablixCell>
+                      <CellContents>
+                        <Textbox Name="CodigoObjetoImpuesto">
+                          <CanGrow>true</CanGrow>
+                          <KeepTogether>true</KeepTogether>
+                          <Paragraphs>
+                            <Paragraph>
+                              <TextRuns>
+                                <TextRun>
+                                  <Value>=Fields!CodigoObjetoImpuesto.Value</Value>
+                                  <Style>
+                                    <FontSize>8pt</FontSize>
+                                  </Style>
+                                </TextRun>
+                              </TextRuns>
+                              <Style />
+                            </Paragraph>
+                          </Paragraphs>
+                          <rd:DefaultName>CodigoObjetoImpuesto</rd:DefaultName>
+                          <Style>
+                            <Border>
+                              <Color>#686868</Color>
+                              <Style>Solid</Style>
+                            </Border>
+                            <PaddingLeft>2pt</PaddingLeft>
+                            <PaddingRight>2pt</PaddingRight>
+                            <PaddingTop>2pt</PaddingTop>
+                            <PaddingBottom>2pt</PaddingBottom>
+                          </Style>
+                        </Textbox>
+                      </CellContents>
+                    </TablixCell>
                     <TablixCell>
                       <CellContents>
                         <Textbox Name="PU">
@@ -800,6 +875,41 @@
                         </Textbox>
                       </CellContents>
                     </TablixCell>
+                    <TablixCell>
+                      <CellContents>
+                        <Textbox Name="Textbox24">
+                          <CanGrow>true</CanGrow>
+                          <KeepTogether>true</KeepTogether>
+                          <Paragraphs>
+                            <Paragraph>
+                              <TextRuns>
+                                <TextRun>
+                                  <Value />
+                                  <Style>
+                                    <FontSize>8pt</FontSize>
+                                  </Style>
+                                </TextRun>
+                              </TextRuns>
+                              <Style />
+                            </Paragraph>
+                          </Paragraphs>
+                          <rd:DefaultName>Textbox24</rd:DefaultName>
+                          <Style>
+                            <Border>
+                              <Style>None</Style>
+                            </Border>
+                            <TopBorder>
+                              <Color>#686868</Color>
+                              <Style>Solid</Style>
+                            </TopBorder>
+                            <PaddingLeft>2pt</PaddingLeft>
+                            <PaddingRight>2pt</PaddingRight>
+                            <PaddingTop>2pt</PaddingTop>
+                            <PaddingBottom>2pt</PaddingBottom>
+                          </Style>
+                        </Textbox>
+                      </CellContents>
+                    </TablixCell>
                     <TablixCell>
                       <CellContents>
                         <Textbox Name="Textbox74">
@@ -887,6 +997,7 @@
                 <TablixMember />
                 <TablixMember />
                 <TablixMember />
+                <TablixMember />
               </TablixMembers>
             </TablixColumnHierarchy>
             <TablixRowHierarchy>
@@ -906,7 +1017,7 @@
             <Top>2.02937in</Top>
             <Left>0.07745cm</Left>
             <Height>0.5in</Height>
-            <Width>7.87749in</Width>
+            <Width>7.89973in</Width>
             <Style>
               <Border>
                 <Style>None</Style>
@@ -1390,7 +1501,7 @@
             </Paragraphs>
             <rd:DefaultName>Textbox3</rd:DefaultName>
             <Top>1.10885in</Top>
-            <Left>5.662in</Left>
+            <Left>5.67589in</Left>
             <Height>0.20721in</Height>
             <Width>2.24597in</Width>
             <ZIndex>12</ZIndex>
@@ -1707,7 +1818,7 @@
             </Paragraphs>
             <rd:DefaultName>Textbox19</rd:DefaultName>
             <Top>1.53209in</Top>
-            <Left>0.86776in</Left>
+            <Left>0.89901in</Left>
             <Height>0.23611in</Height>
             <Width>7.00896in</Width>
             <ZIndex>18</ZIndex>
@@ -1777,13 +1888,7 @@
                     </Style>
                   </TextRun>
                   <TextRun>
-                    <Value>                                                                                                                     RFC: </Value>
+                    <Value xml:space="preserve">                                                                                                                     </Value>
-                    <Style>
-                      <FontSize>6pt</FontSize>
-                    </Style>
-                  </TextRun>
-                  <TextRun>
-                    <Value>=Parameters!ClienteRFC.Value</Value>
                     <Style>
                       <FontSize>6pt</FontSize>
                     </Style>
@@ -1794,9 +1899,9 @@
             </Paragraphs>
             <rd:DefaultName>Textbox19</rd:DefaultName>
             <Top>1.78208in</Top>
-            <Left>0.86776in</Left>
+            <Left>0.88006in</Left>
             <Height>0.23611in</Height>
-            <Width>7.02631in</Width>
+            <Width>2.09801in</Width>
             <ZIndex>20</ZIndex>
             <Style>
               <Border>
@@ -2459,7 +2564,7 @@
             </Paragraphs>
             <rd:DefaultName>ImporteLetra</rd:DefaultName>
             <Top>2.73851in</Top>
-            <Left>1.39103in</Left>
+            <Left>1.40492in</Left>
             <Height>0.20833in</Height>
             <Width>4.73657in</Width>
             <ZIndex>38</ZIndex>
@@ -3113,7 +3218,7 @@
                   </Paragraph>
                 </Paragraphs>
                 <rd:DefaultName>Textbox75</rd:DefaultName>
-                <Top>0.17461in</Top>
+                <Top>0.14683in</Top>
                 <Left>0.01577in</Left>
                 <Height>0.64213in</Height>
                 <Width>7.82181in</Width>
@@ -3145,7 +3250,7 @@
                   </Paragraph>
                 </Paragraphs>
                 <rd:DefaultName>Textbox64</rd:DefaultName>
-                <Top>0.88618in</Top>
+                <Top>0.8584in</Top>
                 <Left>0.01139in</Left>
                 <Height>0.25in</Height>
                 <Width>0.6875in</Width>
@@ -3178,7 +3283,7 @@
                   </Paragraph>
                 </Paragraphs>
                 <rd:DefaultName>Textbox64</rd:DefaultName>
-                <Top>1.13618in</Top>
+                <Top>1.1084in</Top>
                 <Left>0.01139in</Left>
                 <Height>0.26414in</Height>
                 <Width>0.6875in</Width>
@@ -3211,7 +3316,7 @@
                   </Paragraph>
                 </Paragraphs>
                 <rd:DefaultName>Textbox66</rd:DefaultName>
-                <Top>0.88643in</Top>
+                <Top>0.85865in</Top>
                 <Left>0.68876in</Left>
                 <Height>0.25in</Height>
                 <Width>5.30535in</Width>
@@ -3244,7 +3349,7 @@
                   </Paragraph>
                 </Paragraphs>
                 <rd:DefaultName>Textbox66</rd:DefaultName>
-                <Top>1.15032in</Top>
+                <Top>1.12254in</Top>
                 <Left>0.70265in</Left>
                 <Height>0.25in</Height>
                 <Width>5.27757in</Width>
@@ -3274,7 +3379,7 @@
                   </Paragraph>
                 </Paragraphs>
                 <rd:DefaultName>Textbox68</rd:DefaultName>
-                <Top>0.88643in</Top>
+                <Top>0.85865in</Top>
                 <Left>6.04966in</Left>
                 <Height>0.51389in</Height>
                 <Width>1.84346in</Width>
@@ -3307,7 +3412,7 @@
                   </Paragraph>
                 </Paragraphs>
                 <rd:DefaultName>Textbox69</rd:DefaultName>
-                <Top>1.46976in</Top>
+                <Top>1.44198in</Top>
                 <Left>6.27507in</Left>
                 <Height>0.25in</Height>
                 <Width>1.4375in</Width>
@@ -3323,7 +3428,7 @@
                 </Style>
               </Textbox>
               <Line Name="Line7">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>0.05457cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3335,7 +3440,7 @@
                 </Style>
               </Line>
               <Line Name="Line8">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>0.69053cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3347,7 +3452,7 @@
                 </Style>
               </Line>
               <Line Name="Line9">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>1.32627cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3359,7 +3464,7 @@
                 </Style>
               </Line>
               <Line Name="Line10">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>1.63234cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3371,7 +3476,7 @@
                 </Style>
               </Line>
               <Line Name="Line11">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>2.2683cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3383,7 +3488,7 @@
                 </Style>
               </Line>
               <Line Name="Line12">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>2.90404cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3395,7 +3500,7 @@
                 </Style>
               </Line>
               <Line Name="Line13">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>3.57348cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3407,7 +3512,7 @@
                 </Style>
               </Line>
               <Line Name="Line14">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>4.20944cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3419,7 +3524,7 @@
                 </Style>
               </Line>
               <Line Name="Line15">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>4.84518cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3431,7 +3536,7 @@
                 </Style>
               </Line>
               <Line Name="Line16">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>5.15125cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3443,7 +3548,7 @@
                 </Style>
               </Line>
               <Line Name="Line17">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>5.78721cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3455,7 +3560,7 @@
                 </Style>
               </Line>
               <Line Name="Line18">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>6.42295cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3467,7 +3572,7 @@
                 </Style>
               </Line>
               <Line Name="Line19">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>7.10321cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3479,7 +3584,7 @@
                 </Style>
               </Line>
               <Line Name="Line20">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>7.73917cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3491,7 +3596,7 @@
                 </Style>
               </Line>
               <Line Name="Line21">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>8.37491cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3503,7 +3608,7 @@
                 </Style>
               </Line>
               <Line Name="Line22">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>8.68098cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3515,7 +3620,7 @@
                 </Style>
               </Line>
               <Line Name="Line23">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>9.31694cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3527,7 +3632,7 @@
                 </Style>
               </Line>
               <Line Name="Line24">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>9.95268cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3539,7 +3644,7 @@
                 </Style>
               </Line>
               <Line Name="Line25">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>14.03363cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3551,7 +3656,7 @@
                 </Style>
               </Line>
               <Line Name="Line26">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>14.66959cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3563,7 +3668,7 @@
                 </Style>
               </Line>
               <Line Name="Line27">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>15.30533cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3575,7 +3680,7 @@
                 </Style>
               </Line>
               <Line Name="Line28">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>15.6114cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3587,7 +3692,7 @@
                 </Style>
               </Line>
               <Line Name="Line29">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>16.24736cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3599,7 +3704,7 @@
                 </Style>
               </Line>
               <Line Name="Line30">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>16.8831cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3611,7 +3716,7 @@
                 </Style>
               </Line>
               <Line Name="Line31">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>10.5767cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3623,7 +3728,7 @@
                 </Style>
               </Line>
               <Line Name="Line32">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>11.21266cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3635,7 +3740,7 @@
                 </Style>
               </Line>
               <Line Name="Line33">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>11.8484cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3647,7 +3752,7 @@
                 </Style>
               </Line>
               <Line Name="Line34">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>12.15447cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3659,7 +3764,7 @@
                 </Style>
               </Line>
               <Line Name="Line35">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>12.79043cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3671,7 +3776,7 @@
                 </Style>
               </Line>
               <Line Name="Line36">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>13.42617cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3683,7 +3788,7 @@
                 </Style>
               </Line>
               <Line Name="Line37">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>18.37745cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3695,7 +3800,7 @@
                 </Style>
               </Line>
               <Line Name="Line38">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>19.01341cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3707,7 +3812,7 @@
                 </Style>
               </Line>
               <Line Name="Line42">
-                <Top>0.26711cm</Top>
+                <Top>0.19655cm</Top>
                 <Left>17.71435cm</Left>
                 <Height>0cm</Height>
                 <Width>0.57653cm</Width>
@@ -3720,9 +3825,9 @@
               </Line>
             </ReportItems>
             <KeepTogether>true</KeepTogether>
-            <Top>18.57368cm</Top>
+            <Top>18.64424cm</Top>
             <Left>0.09423cm</Left>
-            <Height>4.36819cm</Height>
+            <Height>4.29763cm</Height>
             <Width>20.04854cm</Width>
             <ZIndex>49</ZIndex>
             <Style>
@@ -4180,47 +4285,11 @@
                   </Border>
                 </Style>
               </Tablix>
-              <Textbox Name="Textbox82">
-                <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>Right</TextAlign>
-                    </Style>
-                  </Paragraph>
-                </Paragraphs>
-                <rd:DefaultName>Textbox5</rd:DefaultName>
-                <Top>2.28775cm</Top>
-                <Left>17.08931cm</Left>
-                <Height>0.6cm</Height>
-                <Width>3.06609cm</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>15.56744cm</Top>
             <Left>0.07745cm</Left>
-            <Height>2.97096cm</Height>
+            <Height>2.25247cm</Height>
             <Width>20.1554cm</Width>
             <ZIndex>50</ZIndex>
             <Visibility>
@@ -4232,6 +4301,175 @@
               </Border>
             </Style>
           </Rectangle>
+          <Textbox Name="Textbox35">
+            <KeepTogether>true</KeepTogether>
+            <Paragraphs>
+              <Paragraph>
+                <TextRuns>
+                  <TextRun>
+                    <Value>=Parameters!RegimenFiscalCodigo.Value</Value>
+                    <Style>
+                      <FontSize>6pt</FontSize>
+                    </Style>
+                  </TextRun>
+                </TextRuns>
+                <Style />
+              </Paragraph>
+            </Paragraphs>
+            <rd:DefaultName>Textbox19</rd:DefaultName>
+            <Top>1.7682in</Top>
+            <Left>3.65389in</Left>
+            <Height>0.23611in</Height>
+            <Width>1.9149in</Width>
+            <ZIndex>51</ZIndex>
+            <Style>
+              <Border>
+                <Color>#3a4341</Color>
+                <Style>Solid</Style>
+              </Border>
+              <TopBorder>
+                <Style>None</Style>
+              </TopBorder>
+              <BottomBorder>
+                <Style>None</Style>
+                <Width>1pt</Width>
+              </BottomBorder>
+              <LeftBorder>
+                <Style>None</Style>
+              </LeftBorder>
+              <RightBorder>
+                <Style>None</Style>
+              </RightBorder>
+              <PaddingLeft>2pt</PaddingLeft>
+              <PaddingRight>2pt</PaddingRight>
+              <PaddingTop>2pt</PaddingTop>
+              <PaddingBottom>2pt</PaddingBottom>
+            </Style>
+          </Textbox>
+          <Textbox Name="Textbox34">
+            <CanGrow>true</CanGrow>
+            <KeepTogether>true</KeepTogether>
+            <Paragraphs>
+              <Paragraph>
+                <TextRuns>
+                  <TextRun>
+                    <Value>Reg.fiscal:</Value>
+                    <Style>
+                      <FontFamily>Calibri</FontFamily>
+                      <FontSize>9pt</FontSize>
+                    </Style>
+                  </TextRun>
+                </TextRuns>
+                <Style />
+              </Paragraph>
+            </Paragraphs>
+            <rd:DefaultName>Textbox19</rd:DefaultName>
+            <Top>1.7682in</Top>
+            <Left>2.97807in</Left>
+            <Height>0.23611in</Height>
+            <Width>0.642in</Width>
+            <ZIndex>52</ZIndex>
+            <Style>
+              <Border>
+                <Color>#3a4341</Color>
+                <Style>None</Style>
+              </Border>
+              <BottomBorder>
+                <Color>#4182bb</Color>
+                <Style>None</Style>
+                <Width>1pt</Width>
+              </BottomBorder>
+              <PaddingLeft>2pt</PaddingLeft>
+              <PaddingRight>2pt</PaddingRight>
+              <PaddingTop>2pt</PaddingTop>
+              <PaddingBottom>2pt</PaddingBottom>
+            </Style>
+          </Textbox>
+          <Textbox Name="Textbox32">
+            <KeepTogether>true</KeepTogether>
+            <Paragraphs>
+              <Paragraph>
+                <TextRuns>
+                  <TextRun>
+                    <Value>RFC:   </Value>
+                    <Style>
+                      <FontSize>6pt</FontSize>
+                    </Style>
+                  </TextRun>
+                  <TextRun>
+                    <Value>=Parameters!ClienteRFC.Value</Value>
+                    <Style>
+                      <FontSize>6pt</FontSize>
+                    </Style>
+                  </TextRun>
+                  <TextRun>
+                    <Value xml:space="preserve">                                                                                                                                                            </Value>
+                    <Style>
+                      <FontSize>6pt</FontSize>
+                    </Style>
+                  </TextRun>
+                </TextRuns>
+                <Style />
+              </Paragraph>
+            </Paragraphs>
+            <rd:DefaultName>Textbox19</rd:DefaultName>
+            <Top>1.7682in</Top>
+            <Left>5.56215in</Left>
+            <Height>0.23611in</Height>
+            <Width>2.33193in</Width>
+            <ZIndex>53</ZIndex>
+            <Style>
+              <Border>
+                <Style>None</Style>
+              </Border>
+              <PaddingLeft>2pt</PaddingLeft>
+              <PaddingRight>2pt</PaddingRight>
+              <PaddingTop>2pt</PaddingTop>
+              <PaddingBottom>2pt</PaddingBottom>
+            </Style>
+          </Textbox>
+          <Textbox Name="Textbox9">
+            <CanGrow>true</CanGrow>
+            <KeepTogether>true</KeepTogether>
+            <Paragraphs>
+              <Paragraph>
+                <TextRuns>
+                  <TextRun>
+                    <Value>VERSION </Value>
+                    <Style>
+                      <FontSize>9.16pt</FontSize>
+                      <FontWeight>Bold</FontWeight>
+                    </Style>
+                  </TextRun>
+                  <TextRun>
+                    <Value>=Parameters!CFDIVersion.Value</Value>
+                    <Style>
+                      <FontSize>9.16pt</FontSize>
+                      <FontWeight>Bold</FontWeight>
+                    </Style>
+                  </TextRun>
+                </TextRuns>
+                <Style>
+                  <TextAlign>Right</TextAlign>
+                </Style>
+              </Paragraph>
+            </Paragraphs>
+            <rd:DefaultName>Textbox5</rd:DefaultName>
+            <Top>18.00925cm</Top>
+            <Left>15.94067cm</Left>
+            <Height>0.49387cm</Height>
+            <Width>4.14557cm</Width>
+            <ZIndex>54</ZIndex>
+            <Style>
+              <Border>
+                <Style>None</Style>
+              </Border>
+              <PaddingLeft>2pt</PaddingLeft>
+              <PaddingRight>2pt</PaddingRight>
+              <PaddingTop>2pt</PaddingTop>
+              <PaddingBottom>2pt</PaddingBottom>
+            </Style>
+          </Textbox>
         </ReportItems>
         <Height>22.94187cm</Height>
         <Style />
@@ -4913,6 +5151,18 @@
       <AllowBlank>true</AllowBlank>
       <Prompt>ReportParameter1</Prompt>
     </ReportParameter>
+    <ReportParameter Name="CFDIVersion">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
+    <ReportParameter Name="RegimenFiscalCodigo">
+      <DataType>String</DataType>
+      <Nullable>true</Nullable>
+      <AllowBlank>true</AllowBlank>
+      <Prompt>ReportParameter1</Prompt>
+    </ReportParameter>
   </ReportParameters>
   <rd:ReportUnitType>Cm</rd:ReportUnitType>
   <rd:ReportID>ce050101-4530-4332-90ec-6ac094336e40</rd:ReportID>

GPS/Asistencia.rdlc

@@ -67,19 +67,19 @@
                   <Width>1.43285cm</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>5.73362cm</Width>
+                  <Width>7.48903cm</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>2.51764cm</Width>
+                  <Width>2.17368cm</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>1.99729cm</Width>
+                  <Width>1.89146cm</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>2.5cm</Width>
+                  <Width>2.25269cm</Width>
                 </TablixColumn>
                 <TablixColumn>
-                  <Width>2.5cm</Width>
+                  <Width>1.89147cm</Width>
                 </TablixColumn>
                 <TablixColumn>
                   <Width>2.1825cm</Width>
@@ -87,7 +87,7 @@
               </TablixColumns>
               <TablixRows>
                 <TablixRow>
-                  <Height>0.6cm</Height>
+                  <Height>0.41479cm</Height>
                   <TablixCells>
                     <TablixCell>
                       <CellContents>
@@ -99,10 +99,15 @@
                               <TextRuns>
                                 <TextRun>
                                   <Value>Código</Value>
-                                  <Style />
+                                  <Style>
+                                    <FontSize>8pt</FontSize>
+                                    <FontWeight>Bold</FontWeight>
+                                  </Style>
                                 </TextRun>
                               </TextRuns>
-                              <Style />
+                              <Style>
+                                <TextAlign>Center</TextAlign>
+                              </Style>
                             </Paragraph>
                           </Paragraphs>
                           <rd:DefaultName>Textbox1</rd:DefaultName>
@@ -130,10 +135,7 @@
                               <Style>Solid</Style>
                               <Width>1pt</Width>
                             </RightBorder>
-                            <PaddingLeft>2pt</PaddingLeft>
+                            <BackgroundColor>Silver</BackgroundColor>
-                            <PaddingRight>2pt</PaddingRight>
-                            <PaddingTop>2pt</PaddingTop>
-                            <PaddingBottom>2pt</PaddingBottom>
                           </Style>
                         </Textbox>
                       </CellContents>
@@ -148,10 +150,15 @@
                               <TextRuns>
                                 <TextRun>
                                   <Value>Personal</Value>
-                                  <Style />
+                                  <Style>
+                                    <FontSize>8pt</FontSize>
+                                    <FontWeight>Bold</FontWeight>
+                                  </Style>
                                 </TextRun>
                               </TextRuns>
-                              <Style />
+                              <Style>
+                                <TextAlign>Center</TextAlign>
+                              </Style>
                             </Paragraph>
                           </Paragraphs>
                           <rd:DefaultName>Textbox3</rd:DefaultName>
@@ -179,10 +186,7 @@
                               <Style>Solid</Style>
                               <Width>1pt</Width>
                             </RightBorder>
-                            <PaddingLeft>2pt</PaddingLeft>
+                            <BackgroundColor>Silver</BackgroundColor>
-                            <PaddingRight>2pt</PaddingRight>
-                            <PaddingTop>2pt</PaddingTop>
-                            <PaddingBottom>2pt</PaddingBottom>
                           </Style>
                         </Textbox>
                       </CellContents>
@@ -197,10 +201,15 @@
                               <TextRuns>
                                 <TextRun>
                                   <Value>Asistencias</Value>
-                                  <Style />
+                                  <Style>
+                                    <FontSize>8pt</FontSize>
+                                    <FontWeight>Bold</FontWeight>
+                                  </Style>
                                 </TextRun>
                               </TextRuns>
-                              <Style />
+                              <Style>
+                                <TextAlign>Center</TextAlign>
+                              </Style>
                             </Paragraph>
                           </Paragraphs>
                           <rd:DefaultName>Textbox5</rd:DefaultName>
@@ -228,10 +237,7 @@
                               <Style>Solid</Style>
                               <Width>1pt</Width>
                             </RightBorder>
-                            <PaddingLeft>2pt</PaddingLeft>
+                            <BackgroundColor>Silver</BackgroundColor>
-                            <PaddingRight>2pt</PaddingRight>
-                            <PaddingTop>2pt</PaddingTop>
-                            <PaddingBottom>2pt</PaddingBottom>
                           </Style>
                         </Textbox>
                       </CellContents>
@@ -246,10 +252,15 @@
                               <TextRuns>
                                 <TextRun>
                                   <Value>% de Pago</Value>
-                                  <Style />
+                                  <Style>
+                                    <FontSize>8pt</FontSize>
+                                    <FontWeight>Bold</FontWeight>
+                                  </Style>
                                 </TextRun>
                               </TextRuns>
-                              <Style />
+                              <Style>
+                                <TextAlign>Center</TextAlign>
+                              </Style>
                             </Paragraph>
                           </Paragraphs>
                           <rd:DefaultName>Textbox9</rd:DefaultName>
@@ -277,10 +288,7 @@
                               <Style>Solid</Style>
                               <Width>1pt</Width>
                             </RightBorder>
-                            <PaddingLeft>2pt</PaddingLeft>
+                            <BackgroundColor>Silver</BackgroundColor>
-                            <PaddingRight>2pt</PaddingRight>
-                            <PaddingTop>2pt</PaddingTop>
-                            <PaddingBottom>2pt</PaddingBottom>
                           </Style>
                         </Textbox>
                       </CellContents>
@@ -295,10 +303,15 @@
                               <TextRuns>
                                 <TextRun>
                                   <Value>Horas Dobles</Value>
-                                  <Style />
+                                  <Style>
+                                    <FontSize>8pt</FontSize>
+                                    <FontWeight>Bold</FontWeight>
+                                  </Style>
                                 </TextRun>
                               </TextRuns>
-                              <Style />
+                              <Style>
+                                <TextAlign>Center</TextAlign>
+                              </Style>
                             </Paragraph>
                           </Paragraphs>
                           <rd:DefaultName>Textbox11</rd:DefaultName>
@@ -326,10 +339,7 @@
                               <Style>Solid</Style>
                               <Width>1pt</Width>
                             </RightBorder>
-                            <PaddingLeft>2pt</PaddingLeft>
+                            <BackgroundColor>Silver</BackgroundColor>
-                            <PaddingRight>2pt</PaddingRight>
-                            <PaddingTop>2pt</PaddingTop>
-                            <PaddingBottom>2pt</PaddingBottom>
                           </Style>
                         </Textbox>
                       </CellContents>
@@ -344,10 +354,15 @@
                               <TextRuns>
                                 <TextRun>
                                   <Value>Horas Triples</Value>
-                                  <Style />
+                                  <Style>
+                                    <FontSize>8pt</FontSize>
+                                    <FontWeight>Bold</FontWeight>
+                                  </Style>
                                 </TextRun>
                               </TextRuns>
-                              <Style />
+                              <Style>
+                                <TextAlign>Center</TextAlign>
+                              </Style>
                             </Paragraph>
                           </Paragraphs>
                           <rd:DefaultName>Textbox7</rd:DefaultName>
@@ -375,10 +390,7 @@
                               <Style>Solid</Style>
                               <Width>1pt</Width>
                             </RightBorder>
-                            <PaddingLeft>2pt</PaddingLeft>
+                            <BackgroundColor>Silver</BackgroundColor>
-                            <PaddingRight>2pt</PaddingRight>
-                            <PaddingTop>2pt</PaddingTop>
-                            <PaddingBottom>2pt</PaddingBottom>
                           </Style>
                         </Textbox>
                       </CellContents>
@@ -393,10 +405,15 @@
                               <TextRuns>
                                 <TextRun>
                                   <Value>Firma</Value>
-                                  <Style />
+                                  <Style>
+                                    <FontSize>8pt</FontSize>
+                                    <FontWeight>Bold</FontWeight>
+                                  </Style>
                                 </TextRun>
                               </TextRuns>
-                              <Style />
+                              <Style>
+                                <TextAlign>Center</TextAlign>
+                              </Style>
                             </Paragraph>
                           </Paragraphs>
                           <rd:DefaultName>Textbox13</rd:DefaultName>
@@ -424,10 +441,7 @@
                               <Style>Solid</Style>
                               <Width>1pt</Width>
                             </RightBorder>
-                            <PaddingLeft>2pt</PaddingLeft>
+                            <BackgroundColor>Silver</BackgroundColor>
-                            <PaddingRight>2pt</PaddingRight>
-                            <PaddingTop>2pt</PaddingTop>
-                            <PaddingBottom>2pt</PaddingBottom>
                           </Style>
                         </Textbox>
                       </CellContents>
@@ -435,7 +449,7 @@
                   </TablixCells>
                 </TablixRow>
                 <TablixRow>
-                  <Height>0.6cm</Height>
+                  <Height>0.36188cm</Height>
                   <TablixCells>
                     <TablixCell>
                       <CellContents>
@@ -447,7 +461,9 @@
                               <TextRuns>
                                 <TextRun>
                                   <Value>=Fields!Codigo.Value</Value>
-                                  <Style />
+                                  <Style>
+                                    <FontSize>8pt</FontSize>
+                                  </Style>
                                 </TextRun>
                               </TextRuns>
                               <Style />
@@ -457,7 +473,7 @@
                           <Style>
                             <Border>
                               <Color>Gray</Color>
-                              <Style>Solid</Style>
+                              <Style>None</Style>
                               <Width>0.5pt</Width>
                             </Border>
                             <TopBorder>
@@ -480,10 +496,6 @@
                               <Style>Solid</Style>
                               <Width>0.5pt</Width>
                             </RightBorder>
-                            <PaddingLeft>2pt</PaddingLeft>
-                            <PaddingRight>2pt</PaddingRight>
-                            <PaddingTop>2pt</PaddingTop>
-                            <PaddingBottom>2pt</PaddingBottom>
                           </Style>
                         </Textbox>
                       </CellContents>
@@ -498,7 +510,9 @@
                               <TextRuns>
                                 <TextRun>
                                   <Value>=Fields!Nombre.Value</Value>
-                                  <Style />
+                                  <Style>
+                                    <FontSize>8pt</FontSize>
+                                  </Style>
                                 </TextRun>
                               </TextRuns>
                               <Style />
@@ -531,10 +545,6 @@
                               <Style>Solid</Style>
                               <Width>0.5pt</Width>
                             </RightBorder>
-                            <PaddingLeft>2pt</PaddingLeft>
-                            <PaddingRight>2pt</PaddingRight>
-                            <PaddingTop>2pt</PaddingTop>
-                            <PaddingBottom>2pt</PaddingBottom>
                           </Style>
                         </Textbox>
                       </CellContents>
@@ -549,7 +559,9 @@
                               <TextRuns>
                                 <TextRun>
                                   <Value>=Fields!AsistenciasInasistencias.Value</Value>
-                                  <Style />
+                                  <Style>
+                                    <FontSize>8pt</FontSize>
+                                  </Style>
                                 </TextRun>
                               </TextRuns>
                               <Style />
@@ -582,10 +594,6 @@
                               <Style>Solid</Style>
                               <Width>0.5pt</Width>
                             </RightBorder>
-                            <PaddingLeft>2pt</PaddingLeft>
-                            <PaddingRight>2pt</PaddingRight>
-                            <PaddingTop>2pt</PaddingTop>
-                            <PaddingBottom>2pt</PaddingBottom>
                           </Style>
                         </Textbox>
                       </CellContents>
@@ -601,6 +609,7 @@
                                 <TextRun>
                                   <Value>=Fields!PorcentajePago.Value</Value>
                                   <Style>
+                                    <FontSize>8pt</FontSize>
                                     <Format>0;(0)</Format>
                                   </Style>
                                 </TextRun>
@@ -615,13 +624,8 @@
                               <Style>Solid</Style>
                               <Width>0.5pt</Width>
                             </Border>
-                            <PaddingLeft>2pt</PaddingLeft>
-                            <PaddingRight>2pt</PaddingRight>
-                            <PaddingTop>2pt</PaddingTop>
-                            <PaddingBottom>2pt</PaddingBottom>
                           </Style>
                         </Textbox>
-                        <rd:Selected>true</rd:Selected>
                       </CellContents>
                     </TablixCell>
                     <TablixCell>
@@ -634,7 +638,9 @@
                               <TextRuns>
                                 <TextRun>
                                   <Value>=IIf(Fields!HorasDobles.Value&gt;0,Fields!HorasDobles.Value.ToString(),"")</Value>
-                                  <Style />
+                                  <Style>
+                                    <FontSize>8pt</FontSize>
+                                  </Style>
                                 </TextRun>
                               </TextRuns>
                               <Style />
@@ -667,10 +673,6 @@
                               <Style>Solid</Style>
                               <Width>0.5pt</Width>
                             </RightBorder>
-                            <PaddingLeft>2pt</PaddingLeft>
-                            <PaddingRight>2pt</PaddingRight>
-                            <PaddingTop>2pt</PaddingTop>
-                            <PaddingBottom>2pt</PaddingBottom>
                           </Style>
                         </Textbox>
                       </CellContents>
@@ -685,7 +687,9 @@
                               <TextRuns>
                                 <TextRun>
                                   <Value>=IIf(Fields!HorasTriples.Value&gt;0,Fields!HorasTriples.Value.ToString(),"")</Value>
-                                  <Style />
+                                  <Style>
+                                    <FontSize>8pt</FontSize>
+                                  </Style>
                                 </TextRun>
                               </TextRuns>
                               <Style />
@@ -718,10 +722,6 @@
                               <Style>Solid</Style>
                               <Width>0.5pt</Width>
                             </RightBorder>
-                            <PaddingLeft>2pt</PaddingLeft>
-                            <PaddingRight>2pt</PaddingRight>
-                            <PaddingTop>2pt</PaddingTop>
-                            <PaddingBottom>2pt</PaddingBottom>
                           </Style>
                         </Textbox>
                       </CellContents>
@@ -736,7 +736,9 @@
                               <TextRuns>
                                 <TextRun>
                                   <Value />
-                                  <Style />
+                                  <Style>
+                                    <FontSize>8pt</FontSize>
+                                  </Style>
                                 </TextRun>
                               </TextRuns>
                               <Style />
@@ -769,10 +771,6 @@
                               <Style>Solid</Style>
                               <Width>0.5pt</Width>
                             </RightBorder>
-                            <PaddingLeft>2pt</PaddingLeft>
-                            <PaddingRight>2pt</PaddingRight>
-                            <PaddingTop>2pt</PaddingTop>
-                            <PaddingBottom>2pt</PaddingBottom>
                           </Style>
                         </Textbox>
                       </CellContents>
@@ -805,8 +803,8 @@
             <DataSetName>DataSet1</DataSetName>
             <Top>3.2953cm</Top>
             <Left>0.31432cm</Left>
-            <Height>1.2cm</Height>
+            <Height>0.77667cm</Height>
-            <Width>18.8639cm</Width>
+            <Width>19.31368cm</Width>
             <Style>
               <Border>
                 <Style>None</Style>
@@ -901,7 +899,7 @@
             </Style>
           </Image>
         </ReportItems>
-        <Height>1.92637in</Height>
+        <Height>1.6972in</Height>
         <Style />
       </Body>
       <Width>7.72756in</Width>
@@ -922,14 +920,16 @@
                       <Style />
                     </TextRun>
                   </TextRuns>
-                  <Style />
+                  <Style>
+                    <TextAlign>Right</TextAlign>
+                  </Style>
                 </Paragraph>
               </Paragraphs>
               <rd:DefaultName>Textbox4</rd:DefaultName>
               <Top>0.14111cm</Top>
-              <Left>16.67822cm</Left>
+              <Left>16.00382cm</Left>
               <Height>0.6cm</Height>
-              <Width>2.5cm</Width>
+              <Width>3.62419cm</Width>
               <Style>
                 <Border>
                   <Style>None</Style>

Inventarios/Kardex.aspx

@@ -381,68 +381,61 @@
                             <asp:LinkButton data-toggle="tooltip" title="Editar Fecha" ID="LnkEditarFecha" OnClick="LnkEditarFecha_Click" CssClass="btn btn-circle btn-sm green" runat="server" Text="<i class='fa fa-pencil'></i>"></asp:LinkButton>
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:BoundField DataField="Concepto" ItemStyle-Width="170px" HeaderText="Movimiento" ItemStyle-HorizontalAlign="Left" />
+                    <asp:BoundField DataField="Concepto" HeaderText="Movimiento" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField DataField="Almacen" ItemStyle-Width="140px" HeaderText="Almacén" ItemStyle-HorizontalAlign="Left" />
+                    <asp:BoundField DataField="Almacen" HeaderText="Almacén" ItemStyle-HorizontalAlign="Left" />
                     <asp:TemplateField ItemStyle-Width="70px" HeaderText="Folio">
                         <ItemTemplate>
                             <asp:HyperLink ID="hlFolio" runat="server" Text='<%# Eval("Folio")%>' CssClass="Texto" NavigateUrl='<%# Eval("CveMovimiento", "/Inventarios/EntradasSalidas.aspx?CveMovimiento={0}")%>' Target="_blank" />
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:TemplateField ItemStyle-Width="140px" ItemStyle-HorizontalAlign="Left" HeaderText="Folio Doc.">
+                    <asp:TemplateField ItemStyle-HorizontalAlign="Left" HeaderText="Folio Doc.">
                         <ItemTemplate>
                             <asp:HyperLink runat="server" Target="_blank" ID="hlFolioD" Text='<%# Eval("FolioDocto")%>' CssClass="Texto" />
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Left" HeaderText="Folio Rel." Visible="false">
+                    <asp:TemplateField  ItemStyle-HorizontalAlign="Left" HeaderText="Folio Rel." Visible="false">
                         <ItemTemplate>
                             <asp:HyperLink runat="server" Target="_blank" ID="hlFolioDr" Text='<%# Eval("FolioRelacionEntrada")%>' NavigateUrl='<%# Eval("CveVentaRelacionada", "/Ventas/Ventas.aspx?CveVenta={0}")%>' CssClass="Texto" />
                         </ItemTemplate>
                     </asp:TemplateField>
-                    <asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Left" HeaderText="U. M.">
+                    <asp:TemplateField ItemStyle-Width="80px" ItemStyle-HorizontalAlign="Left" HeaderText="U. M.">
                         <ItemTemplate>
                             <asp:Label ID="lbUm" runat="server" Text='<%# Eval("UnidadMedida")%>' data-toggle="tooltip" title='<%# Eval("CveUnidadMedida")%>'></asp:Label>
                         </ItemTemplate>
-                        <ItemStyle Width="100px"></ItemStyle>
                     </asp:TemplateField>
                      <asp:TemplateField ItemStyle-Width="70px" ItemStyle-HorizontalAlign="Left" HeaderText="Sección" Visible="false">
                         <ItemTemplate>
                             <asp:Literal ID="lbSA" runat="server" Text='<%# Eval("SeccionAlmacen")%>'></asp:Literal>
                         </ItemTemplate>                       
-                        <ItemStyle Width="100px"></ItemStyle>
                     </asp:TemplateField>
                     <asp:TemplateField ItemStyle-Width="70px" ItemStyle-HorizontalAlign="Left" HeaderText="Serie" Visible="false">
                         <ItemTemplate>
                             <asp:Literal ID="lbS" runat="server" Text='<%# Eval("Serie")%>'></asp:Literal>
                         </ItemTemplate>                       
-                        <ItemStyle Width="100px"></ItemStyle>
                     </asp:TemplateField>
                     <asp:TemplateField ItemStyle-Width="70px" ItemStyle-HorizontalAlign="Left" HeaderText="Lote" Visible="false">
                         <ItemTemplate>
                             <asp:Literal ID="lbL" runat="server" Text='<%# Eval("Lote")%>'></asp:Literal>
                         </ItemTemplate>                     
-                        <ItemStyle Width="70"></ItemStyle>
                     </asp:TemplateField>
-                    <asp:TemplateField ItemStyle-Width="70px" ItemStyle-HorizontalAlign="Center" HeaderText="F. Caducidad" Visible="false">
+                    <asp:TemplateField ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Center" HeaderText="F. Caducidad" Visible="false">
                         <ItemTemplate>
                             <asp:Label ID="lbFCad" runat="server" Text='<%# Eval("FechaCaducidad", "{0:d}")%>' data-toggle="tooltip"></asp:Label>
                         </ItemTemplate>                      
-                        <ItemStyle Width="75px"></ItemStyle>
                     </asp:TemplateField>
-                    <asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Right" HeaderText="Entrada">
+                    <asp:TemplateField ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" HeaderText="Entrada">
                         <ItemTemplate>
                             <asp:Label ID="lbEntrada" runat="server"
                                 Text='<%# Eval("Entrada", "{0:###,###.####}")%>'></asp:Label>
                         </ItemTemplate>                       
-                        <ItemStyle Width="100px" HorizontalAlign="Right"></ItemStyle>
                     </asp:TemplateField>
-                    <asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Right" HeaderText="Salida">
+                    <asp:TemplateField ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" HeaderText="Salida">
                         <ItemTemplate>
                             <asp:Label ID="lbSalida" runat="server"
                                 Text='<%# Eval("Salida", "{0:###,###.####}")%>'></asp:Label>
                         </ItemTemplate>
-                        <ItemStyle Width="100px" HorizontalAlign="Right"></ItemStyle>
                     </asp:TemplateField>
-                    <asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Right" HeaderText="Costo">
+                    <asp:TemplateField ItemStyle-Width="80px" ItemStyle-HorizontalAlign="Right" HeaderText="Costo">
                         <ItemTemplate>
                             <asp:Label ID="lbCosto" runat="server"
                                 Text='<%# Eval("Costo", "{0:N2}")%>'></asp:Label>
@@ -454,21 +447,18 @@
                             <asp:Label ID="lbImporte" runat="server"
                                 Text='<%# Eval("Importe", "{0:N2}")%>'></asp:Label>
                         </ItemTemplate>                       
-                        <ItemStyle Width="100px" HorizontalAlign="Right"></ItemStyle>
                     </asp:TemplateField>
-                    <asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Right" HeaderText="Existencias">
+                    <asp:TemplateField ItemStyle-Width="80px" ItemStyle-HorizontalAlign="Right" HeaderText="Existencias">
                         <ItemTemplate>
                             <asp:Label ID="lbExistencias" runat="server"
                                 Text='<%# Eval("Existencias", "{0:#,###.####}")%>'></asp:Label>
                         </ItemTemplate>                      
-                        <ItemStyle Width="100px"></ItemStyle>
                     </asp:TemplateField>
                     <asp:TemplateField ItemStyle-Width="100px" ItemStyle-HorizontalAlign="Right" HeaderText="Valor">
                         <ItemTemplate>
                             <asp:Label ID="lbValor" runat="server"
                                 Text='<%# Eval("ValorInventario", "{0:N2}")%>'></asp:Label>
                         </ItemTemplate>                      
-                        <ItemStyle Width="100px" HorizontalAlign="Right"></ItemStyle>
                     </asp:TemplateField>
                 </Columns>
                 <RowStyle CssClass="Texto" />

Inventarios/RepConsumoInterno.aspx

@@ -146,13 +146,14 @@
                     <asp:BoundField DataField="FechaMovto" HeaderText="Fecha"  ItemStyle-Width="5%" DataFormatString="{0:dd/MM/yyyy}" ItemStyle-HorizontalAlign="Center" />
                     <asp:BoundField DataField="Almacen" HeaderText="Almacén" ItemStyle-Width="10%" ItemStyle-HorizontalAlign="Left" />
                     
-                    <asp:BoundField DataField="CodPS" HeaderText="Producto" ItemStyle-Width="30%" ItemStyle-HorizontalAlign="Left" />
+                    <asp:BoundField DataField="CodPS" HeaderText="Producto" ItemStyle-HorizontalAlign="Left" />
                     <asp:BoundField DataField="Cantidad" HeaderText="Cantidad" ItemStyle-Width="5%"  DataFormatString="{0:N0}" ItemStyle-HorizontalAlign="Right" />
                     <asp:BoundField DataField="Observaciones" HeaderText="Observaciones" ItemStyle-Width="20%" ItemStyle-HorizontalAlign="Left" />
 
                     <asp:BoundField DataField="NombreCompleto" HeaderText="Personal" ItemStyle-Width="20%" ItemStyle-HorizontalAlign="Left" />
                     <asp:BoundField DataField="CodigoAF" HeaderText="Activo Fijo" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Left" />
-                    <asp:BoundField DataField="PU" Visible ="false" HeaderText="Importe" DataFormatString="{0:N2}" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Right" />
+                    <asp:BoundField DataField="PU" Visible ="false" HeaderText="PU" DataFormatString="{0:N2}" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Right" />
+                    <asp:BoundField DataField="Importe" Visible ="false" HeaderText="Importe" DataFormatString="{0:N2}" ItemStyle-Width="5%" ItemStyle-HorizontalAlign="Right" />
                    
                   <%--  <asp:TemplateField HeaderText="Folio" ItemStyle-HorizontalAlign="Left" ItemStyle-Width="7%">
                         <ItemTemplate>

Inventarios/RepConsumoInterno.aspx.cs

@@ -64,6 +64,7 @@ public partial class Inventarios_RepConsumoInterno : ClsPaginas
         ObjGeneral.Dispose();
         bool TienePermisoImportes = UsuarioActual.TienePermisoProceso(201);
         GVDatos.Columns[8].Visible = TienePermisoImportes; // costo
+        GVDatos.Columns[9].Visible = TienePermisoImportes; // costo
 
         GVDatos.DataBind();
        

Nomina/Nomina.aspx

@@ -212,7 +212,7 @@
                 <asp:LinkButton ID="LnkAutorizar" Visible="false" OnClick="LnkAutorizar_Click" runat="server"><i class="fa fa-thumbs-up" aria-hidden="true"></i>Autorizar</asp:LinkButton>
             </li>
             <li>
-                <asp:LinkButton ID="LnkCancelarNomina" Visible="false" OnClick="LnkCancelarNomina_Click" runat="server"><i class="fa fa-ban" aria-hidden="true"></i>Cancelar nómina</asp:LinkButton>
+                <asp:LinkButton ID="LnkCancelarNomina" Visible="false" OnClick="LnkCancelarNomina_Click" runat="server"><i class="fa fa-ban" aria-hidden="true"></i>Desautorizar nómina</asp:LinkButton>
             </li>
             <li>
                 <asp:LinkButton ID="LnkTimbrarTodos" Visible="false" OnClick="LnkTimbrarTodos_Click" runat="server"><i class="fa fa-bell"></i> Timbrar todos</asp:LinkButton>

RH/Asistencias.aspx

@@ -21,71 +21,109 @@
     </asp:Panel>
 </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="" id="PorletAsistencia">
-                <div class="portlet-title portlet-filterT" style="">
 
+
+              <div class="portlet solid  grey-cascade portlet-filter">
+                <div class="portlet-title portlet-filterT smalltitle">
                     <div class="tools">
                         <asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" />
-                        <a href="javascript:;" class="collapse"></a>
+                        <a href="javascript:;" data-idchekbox="<%= chkexpand.ClientID%>" class=" <%= IIf(chkexpand.Checked = True, "collapse", "expand")%>"></a><%--class="expand"--%>
-                        <%--<a onclick="document.getElementById('C_BtnConsultar').click();" class="reload"></a>--%>
+                        <asp:CheckBox ID="chkexpand" CssClass="hidden" runat="server" />
                     </div>
-                    <div class="titlefiltros ">
+                    <div class="titlefiltros  caption ">
-                        <ul class="list-inline">
+
-                            <li>Cliente:
+                        <div class="row">
-                                <asp:Button ID="BtnCargarClientes" runat="server" ClientIDMode="Static" Text="CargarClientes" Style="display: none;" />
+                            <div class="col-md-1" style="text-align: right">
+                                Cliente:
+                            </div>
+                            <div class="col-md-1">
                                 <ADS:Dropdownlost CssClassDdl="select2me" ID="DdlCliente" Width="100%" data-metodo="getcliente" UsaWebService="true" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%"></ADS:Dropdownlost>
-                                <%--<asp:DropDownList ID="DdlCliente" runat="server" AppendDataBoundItems="true" Style="display: inline-block; width: 250px;" DataTextField="Nombre" DataValueField="CveCliente" Class="form-control input-sm select2me">
+                            </div>
-                                    <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
+
-                                </asp:DropDownList>--%>
+                            <div class="col-md-1" id="DivProyectosAsignado1" runat="server">
-                            </li>
-                            <li id="DivProyectosAsignado" runat="server">
                                 <asp:Label runat="server" ID="LblProyectoAsignado" AssociatedControlID="DdlProyecto">Proyecto:  </asp:Label>
-                                <asp:DropDownList ID="DdlProyecto" runat="server" AppendDataBoundItems="true" Style="display: inline-block; width: 170px;" AutoPostBack="true" DataTextField="Proyecto" DataValueField="CveProyecto" Class="form-control input-sm select2me" ValidationGroup="GrpGuardar">
+                            </div>
+                            <div class="col-md-1" id="DivProyectosAsignado2" runat="server">
+                                <asp:DropDownList ID="DdlProyecto" runat="server" AppendDataBoundItems="true" Style="display: inline-block;" AutoPostBack="true" DataTextField="Proyecto" DataValueField="CveProyecto" Class="form-control input-sm select2me" ValidationGroup="GrpGuardar">
                                     <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
                                 </asp:DropDownList>
-                            </li>
+                            </div>
-                            <li>
+
+                            <div class="col-md-1" style="text-align: right">
                                 <asp:Label runat="server" ID="LblSubProyectoAsignado" AssociatedControlID="DdlSubProyecto">SubProyecto:  </asp:Label>
-                                <asp:DropDownList ID="DdlSubProyecto" runat="server" AppendDataBoundItems="true" Style="display: inline-block; width: 150px;" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Class="form-control input-sm select2me" ValidationGroup="GrpGuardar">
+                            </div>
+
+                            <div class="col-md-1">
+                                <asp:DropDownList ID="DdlSubProyecto" runat="server" AppendDataBoundItems="true" Style="display: inline-block" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Class="form-control input-sm select2me" ValidationGroup="GrpGuardar">
                                     <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
                                 </asp:DropDownList>
-                            </li>
+                            </div>
-                            <li>
+
+
+                            <div class="col-md-1" style="text-align: right">
                                 <asp:Label runat="server" AssociatedControlID="DdlTurno">Turno:  </asp:Label>
-                                <asp:DropDownList ID="DdlTurno" runat="server" AppendDataBoundItems="true" Style="width: 130px;" DataTextField="Turno" DataValueField="CveTurno" Class="form-control input-sm select2me" ValidationGroup="GrpGuardar">
+                            </div>
+                            <div class="col-md-1">
+
+                                <asp:DropDownList ID="DdlTurno" runat="server" AppendDataBoundItems="true" DataTextField="Turno" DataValueField="CveTurno"
+                                    Class="form-control input-sm select2me" ValidationGroup="GrpGuardar">
                                     <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
                                 </asp:DropDownList>
-                            </li>
+                            </div>
-                            <li>
+
+                            <div class="col-md-1" style="text-align: right">
                                 <asp:Label AssociatedControlID="DdlSupervisorOrganigrama" runat="server" Text="Supervisor:" Style="display: inline-block;"></asp:Label>
-                                <asp:DropDownList ID="DdlSupervisorOrganigrama" runat="server" Style="display: inline-block; width: 240px;" AppendDataBoundItems="True" DataTextField="NombreCompleto" DataValueField="CvePersonal" CssClass="form-control input-sm select2me" ValidationGroup="GrpGuardar">
+                            </div>
+                            <div class="col-md-1">
+                                <asp:DropDownList ID="DdlSupervisorOrganigrama" runat="server" Style="display: inline-block;" AppendDataBoundItems="True" DataTextField="NombreCompleto" DataValueField="CvePersonal" CssClass="form-control input-sm select2me" ValidationGroup="GrpGuardar">
                                     <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
                                     <asp:ListItem Text="Sin Asignar" Value="-2"></asp:ListItem>
                                     <asp:ListItem Text="Cabecera" Value="0"></asp:ListItem>
                                 </asp:DropDownList>
-                            </li>
+                            </div>
-                            <li style="width: 227px">
+
+
+                            <div class="col-md-1" style="text-align: right">
                                 <asp:Label runat="server" AssociatedControlID="TxtFechaAsistencia">F. Asistencia: </asp:Label>
-                                <asp:TextBox ID="TxtFechaAsistencia" runat="server" MaxLength="10" Width="90px" Height="28px"></asp:TextBox><span class="input-group-btn "><asp:LinkButton ID="ImgFechaAsistencia" class="btn default " Style="padding: 4px 8px;" Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
+                            </div>
-                                </span>
+                            <div class="col-md-1">
-                                <ajax:MaskedEditExtender ID="MEEFechaAsistencia" runat="server" TargetControlID="TxtFechaAsistencia" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
+                                <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 100px !important; padding: 0px;">
-                                <ajax:CalendarExtender runat="server" ID="CEFechaAsistencia" TargetControlID="TxtFechaAsistencia" PopupButtonID="ImgFechaAsistencia" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
+                                    <asp:TextBox Width="80px" ID="txtFechaAsistencia" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10"></asp:TextBox>
-                                <asp:RequiredFieldValidator ID="RFVFechaAsistencia" runat="server" ControlToValidate="TxtFechaAsistencia" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha de Ingreso''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
+                                    <span class="input-group-btn ">
-                                <asp:CompareValidator ID="CVFechaAsistencia" runat="server" ControlToValidate="TxtFechaAsistencia" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha de Ingreso''</b> no tiene el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpGuardar"></asp:CompareValidator>
+                                        <asp:LinkButton ID="imgCalendario" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
-                                <ajax:ValidatorCalloutExtender ID="VCOFechaAsistencia1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaAsistencia" Width="350px"></ajax:ValidatorCalloutExtender>
+                                    </span>
-                                &nbsp;
+
-                        <ajax:ValidatorCalloutExtender ID="VCOFechaAsistencia2" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaAsistencia" Width="350px"></ajax:ValidatorCalloutExtender>
+                                    <ajax:MaskedEditExtender ID="MEEFechaI" runat="server" TargetControlID="txtFechaAsistencia" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
-                            </li>
+                                    <ajax:CalendarExtender runat="server" ID="Calendario" TargetControlID="txtFechaAsistencia" PopupButtonID="ImgCalendario" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
-                        </ul>
+                                    <asp:RequiredFieldValidator ID="rfvFechaI" runat="server" ControlToValidate="txtFechaAsistencia" Display="None" ErrorMessage="El campo <b>''Fecha Asistencia''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
+                                    <asp:CompareValidator ID="cvFechaI" runat="server" ControlToValidate="txtFechaAsistencia" Display="None" ErrorMessage="El campo <b>''Fecha Asistencia''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="Valida"></asp:CompareValidator>
+                                    <ajax:ValidatorCalloutExtender ID="vcoFfvFI" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
+                                    <ajax:ValidatorCalloutExtender ID="vcoCvFI" runat="server" HighlightCssClass="vco" TargetControlID="cvFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
+
+                                </div>
+                            </div>
+
+
+
+                        </div>
                     </div>
                 </div>
-                <div class="portlet-body" style="font-size: 120%">
+
-                    <ul class="list-inline">
+                <div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style=""display:none;""")%>>
-                    </ul>
+                    <div class="row">                   
+                    </div>
                 </div>
             </div>
+
+ 
+
+
+
+
+
         </ContentTemplate>
     </asp:UpdatePanel>
     <table style="width: 100%;">
@@ -93,7 +131,7 @@
             <td>
                 <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
                     <ContentTemplate>
-                        <asp:GridView ID="GV" runat="server" AutoGenerateColumns="false" DataKeyNames="CvePersonal" EmptyDataText="No se encontró Personal asignado al Proyecto o al Cliente" ToolTip="Listado de Personal" CssClass="table table-striped table-advance table-hover Widthall ScrollAD" Style="text-align: center;" GridLines="None">
+                        <asp:GridView ID="GV" runat="server" AutoGenerateColumns="false" DataKeyNames="CvePersonal,CveCliente" EmptyDataText="No se encontró Personal asignado al Proyecto o al Cliente" ToolTip="Listado de Personal" CssClass="table table-striped table-advance table-hover Widthall ScrollAD" Style="text-align: center;" GridLines="None">
                             <Columns>
                                 <asp:TemplateField>
                                     <HeaderTemplate>N°</HeaderTemplate>
@@ -107,6 +145,15 @@
                                         <asp:Literal ID="LtlPersonal" runat="server" Text='<%# Eval("Nombre") %>'></asp:Literal>
                                     </ItemTemplate>
                                 </asp:TemplateField>
+
+                                <asp:TemplateField ItemStyle-Width="100px" HeaderStyle-Width="100px"  FooterStyle-HorizontalAlign="Left">
+                                    <HeaderTemplate>Cliente</HeaderTemplate>
+                                    <ItemTemplate>
+                                        <asp:Label ID="LtlCliente" CssClass="truncate" Width="100px" runat="server" Text='<%# Eval("Nombre") %>'></asp:Label>
+                                    </ItemTemplate>
+                                </asp:TemplateField>
+
+                                
                                 <asp:TemplateField>
                                     <HeaderTemplate>Asistencia</HeaderTemplate>
                                     <ItemTemplate>

RH/Asistencias.aspx.vb

@@ -9,7 +9,7 @@ Partial Class RH_Asistencias
 
         If Not IsPostBack Then
             'CargaClientes()
-            DdlCliente.Attributes.Add("onclick", "CargaClientes();")
+            'DdlCliente.Attributes.Add("onclick", "CargaClientes();")
             CargaSuperioresOrganigrama()
             CargaProyecto()
             CargaTurnos()
@@ -44,30 +44,31 @@ Partial Class RH_Asistencias
 
     End Sub
 #End Region
-    Private Sub CargaClientes()
+    'Private Sub CargaClientes()
-        Dim ObjClientes As New ClsClientes
+    '    Dim ObjClientes As New ClsClientes
-        If ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa, -1) Then
+    '    If ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa, -1) Then
-            DdlCliente.DataSource = ObjClientes.DtResultados
+    '        DdlCliente.DataSource = ObjClientes.DtResultados
-        Else
+    '    Else
-            DdlCliente.DataSource = Nothing
+    '        DdlCliente.DataSource = Nothing
-        End If
+    '    End If
-        ObjClientes.Dispose()
+    '    ObjClientes.Dispose()
-        'Application("GlobalDTResponsable")
+    '    'Application("GlobalDTResponsable")
 
-        DdlCliente.DataBind()
+    '    DdlCliente.DataBind()
-    End Sub
+    'End Sub
 
-    Protected Sub BtnCargarClientes_Click(sender As Object, e As System.EventArgs) Handles BtnCargarClientes.Click
+    'Protected Sub BtnCargarClientes_Click(sender As Object, e As System.EventArgs) Handles BtnCargarClientes.Click
-        CargaClientes()
+    '    'CargaClientes()
-        DdlCliente.Attributes.Remove("onclick")
+    '    'DdlCliente.Attributes.Remove("onclick")
-    End Sub
+    'End Sub
 
     Private Sub CargaProyecto()
         'DdlProyecto.DataSource = GlobalDTProyectos(UsuarioActual.Empresa.CveEmpresa).FiltraParametros("", DistinctColumns:={"CveProyecto", "Proyecto"})
         'DdlProyecto.DataBind()
 
         CargarCentrosDeCosto(DdlProyecto, DdlProyecto, LblProyectoAsignado, LblSubProyectoAsignado)
-        DivProyectosAsignado.Visible = LblProyectoAsignado.Visible
+        DivProyectosAsignado1.Visible = LblProyectoAsignado.Visible
+        DivProyectosAsignado2.Visible = LblProyectoAsignado.Visible
 
 
         DdlSubProyecto.DataSource = If(Not UsuarioActual.TienePermisoProceso(110), GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1), GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa, 1))
@@ -220,7 +221,9 @@ Partial Class RH_Asistencias
         Dim OcurrioError As Boolean = False
 
         For Each Row As GridViewRow In GV.Rows
-            If Not ObjPersonal.AddAsistencia(Row.DataKey("CvePersonal").ToEntero, DdlCliente.SelectedValue.ToEntero, DdlSubProyecto.SelectedValue.ToEntero, TxtFechaAsistencia.Text.Trim.ToDate,
+            Dim CveCliente As Integer = Row.DataKey("CveCliente").ToEntero
+
+            If Not ObjPersonal.AddAsistencia(Row.DataKey("CvePersonal").ToEntero, CveCliente, DdlSubProyecto.SelectedValue.ToEntero, txtFechaAsistencia.Text.Trim.ToDate,
                                          Row.FCDropDownList("DdlTipoAsistencias").SelectedValue.ToEntero, Row.FCTextBox("TxtPorPago").Text.Trim.ToDouble, Row.FCTextBox("TxtHorasDobles").Text.Trim.ToDouble,
                                          Row.FCTextBox("TxtHorasTriples").Text.Trim.ToDouble, Row.FCDropDownList("DdlMotivoHoraExtra").SelectedValue.ToEntero, Row.FCTextBox("TxtObservaciones").Text.Trim,
                                          UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa) Then
@@ -291,3 +294,4 @@ Partial Class RH_Asistencias
     End Sub
 
 End Class
+

RH/CatChecadores.aspx

@@ -96,6 +96,33 @@
                             <label for="ChkEstatus">Estatus:</label>
                             <asp:CheckBox runat="server" ID="ChkEstatus" CssClass="make-switchsd" data-size="small" Text=" " />
                         </div>
+
+                         </br>
+                        </br>
+                        <div class="row">
+                            <div class="row">
+                                <div class="col-md-12">
+                                    <asp:GridView ID="GvChecadorSubProyectos" runat="server" AutoGenerateColumns="False" OnRowDataBound="GvChecadorSubProyectos_RowDataBound" Width="90%"
+                                        DataKeyNames="CveSubProyecto,CveChecador"
+                                        EmptyDataText="No se encontraron Tipo Gasto" ToolTip="Listado de Tipo Gasto " CssClass="table table-striped table-advance table-hover" Style="margin-top: -10px; width: 100%" GridLines="None">
+                                        <Columns>
+                                            <asp:BoundField HeaderText="SubProyecto" DataField="SubProyecto" />
+                                            <asp:BoundField HeaderText="Usuario" DataField="Usuario"  />
+                                            <asp:BoundField HeaderText="Fecha" DataField="FechaIng" DataFormatString="{0:d}" />
+                                            <asp:TemplateField>
+                                                <ItemTemplate>
+                                                    <asp:CheckBox ID="Chk" runat="server" />
+                                                </ItemTemplate>
+                                            </asp:TemplateField>
+                                        </Columns>
+                                    </asp:GridView>
+
+
+                                </div>                                
+                            </div>
+
+                        </div>
+
                     </div>
                     </br>
                     <div class="modal-footer">

RH/CatChecadores.aspx.cs

@@ -57,6 +57,11 @@ public partial class RH_CatChecadores : ClsPaginas
         TxtPuerto.Text = "";
         BtnChecadorAgregar.Text = "Agregar";
         divChkEstatus.Visible = false;
+
+        GvChecadorSubProyectos.DataSource = null;
+        GvChecadorSubProyectos.DataBind();
+        GvChecadorSubProyectos.Visible = false;
+
         UpModalTiposD.Update();
         RegistraScript(String.Format("$('#{0}').modal();", "DivAgregarTiposD"));
     }
@@ -64,6 +69,7 @@ public partial class RH_CatChecadores : ClsPaginas
     protected void BtnChecadorAgregar_Click(object sender, EventArgs e)
     {
         ClsRH ObjRH = new ClsRH();
+
         if (BtnChecadorAgregar.Text == "Agregar")
         {
             if (ObjRH.AddChecadores(TxtChecador.Text, DdlSubProyecto.SelectedValue.ToEntero(), TxtIPLocal.Text, TxtPuerto.Text, UsuarioActual.CveUsuario,CveModelo:DdlModelo.SelectedValue.ToEntero()))
@@ -73,10 +79,37 @@ public partial class RH_CatChecadores : ClsPaginas
         }
         else
         {
+            bool errorProceso = false;
+            //ObjRH.IniciaTransacSQL();
+
             if (ObjRH.UpdateChecadores(CveChecador,TxtChecador.Text,DdlSubProyecto.SelectedValue.ToEntero(),TxtIPLocal.Text,TxtPuerto.Text,Estatus: ChkEstatus.Checked, CveModelo: DdlModelo.SelectedValue.ToEntero()))
             {
                 Alert("Checador actualizado correctamente");
             }
+
+            foreach(GridViewRow GvRow  in GvChecadorSubProyectos.Rows)
+            {
+                if(GvRow.RowType == DataControlRowType.DataRow)
+                {
+                    CheckBox Chk = GvRow.FCCheckBox("Chk");
+                    if (!ObjRH.AddRemoveChecadoresSubProyectos(CveChecador, GvRow.DataKey("CveSubProyecto").ToEntero(), UsuarioActual.CveUsuario, Chk.Checked))
+                    {
+                        errorProceso = true;
+                        break;
+                    }
+                }                
+            }
+
+            //if (errorProceso)
+            //{
+            //    ObjRH.RollBack();
+            //}
+            //else
+            //{
+            //    ObjRH.Commit();
+            //}
+            
+
         }
         ObjRH.Dispose();
         CargaDatos();
@@ -90,13 +123,30 @@ public partial class RH_CatChecadores : ClsPaginas
 
         CveChecador = GvRow.DataKey("CveChecador").ToEntero();
         TxtChecador.Text = GvRow.DataKey("Checador");
-        DdlSubProyecto.SelectedValue = GvRow.DataKey("CveSubProyecto");
+        DdlSubProyecto.SelectedValueExist(GvRow.DataKey("CveSubProyecto"));
+
         DdlModelo.SelectedValue = GvRow.DataKey("CveModelo");
         TxtIPLocal.Text = GvRow.DataKey("IPLocal");
         TxtPuerto.Text = GvRow.DataKey("Puerto");
         BtnChecadorAgregar.Text = "Actualizar";
         ChkEstatus.Checked = GvRow.DataKey("Estatus") == "Activo";
         divChkEstatus.Visible = true;
+
+        GvChecadorSubProyectos.Visible = true;
+
+         ClsRH objRH = new ClsRH();
+
+        if (objRH.GetChecadoresSubProyectos(CveChecador, UsuarioActual.CveEmpresa))
+        {
+            GvChecadorSubProyectos.DataSource = objRH.DtResultados;
+        }
+
+        GvChecadorSubProyectos.DataBind();
+        objRH.Dispose();
+
+
+
+
         UpModalTiposD.Update();
         RegistraScript(String.Format("$('#{0}').modal();", "DivAgregarTiposD"));
     }
@@ -114,4 +164,12 @@ public partial class RH_CatChecadores : ClsPaginas
         }
         ObjRH.Dispose();
     }
+
+    protected void GvChecadorSubProyectos_RowDataBound(object sender, GridViewRowEventArgs e)
+    {
+        if(e.Row.RowType == DataControlRowType.DataRow)
+        {
+            e.Row.FCCheckBox("Chk").Checked = e.Row.DataKey("CveChecador").ToEntero() > 0 ? true : false;
+        }
+    }
 }

RH/RepAsistencias.aspx

@@ -0,0 +1,320 @@
+<%@ Page Title="RH - Captura de Asistencias" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepAsistencias.aspx.vb" Inherits="RH_RepAsistencias" %>
+<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
+</asp:Content>
+<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
+    <style>
+       /* .adsCol div{
+            height:22px!important
+        }*/
+    </style>
+</asp:Content>
+<asp:Content ID="Content3" ContentPlaceHolderID="HB" runat="Server">
+</asp:Content>
+<asp:Content ID="Content4" ContentPlaceHolderID="E" runat="Server">
+	Reporte Asistencias
+</asp:Content>
+<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
+    
+      <asp:UpdatePanel runat="server" UpdateMode="Conditional" ID="UpAcciones">
+        <ContentTemplate>
+
+            <li>
+                <asp:LinkButton ID="LnkExportar" runat="server" Visible="false"><i class="fa fa-ad-excel"></i> Generar Excel</asp:LinkButton>
+            </li>
+
+        </ContentTemplate>
+        <Triggers>
+            <asp:PostBackTrigger ControlID="LnkExportar" />
+        </Triggers>
+    </asp:UpdatePanel>
+
+</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">
+                <div class="portlet-title portlet-filterT smalltitle">
+                    <div class="tools">
+                        <asp:Button ID="BtnConsultar" runat="server" Text="Consultar" class="btn btn-primary" />
+                        <a href="javascript:;" data-idchekbox="<%= chkexpand.ClientID%>" class=" <%= IIf(chkexpand.Checked = True, "collapse", "expand")%>"></a><%--class="expand"--%>
+                        <asp:CheckBox ID="chkexpand" CssClass="hidden" runat="server" />
+                    </div>
+                    <div class="titlefiltros  caption ">
+
+                         <div class="row">
+
+                           
+
+                           <div class="col-md-1" style="text-align:right">                         
+                              Cliente:
+                           </div>
+                            <div class="col-md-1">                            
+                                <asp:Button ID="BtnCargarClientes" runat="server" ClientIDMode="Static" Text="CargarClientes" Style="display: none;" />
+                                <ADS:Dropdownlost CssClassDdl="select2me" ID="DdlCliente" Width="100%" data-metodo="getcliente" UsaWebService="true" runat="server" DataTextField="NombreComercial" DataValueField="CveCliente" CssStyle="width: 100%"></ADS:Dropdownlost>                                
+                            </div>
+                         
+                            <div class="col-md-1" style="text-align:right">
+                                <asp:Label runat="server" ID="LblSubProyectoAsignado" AssociatedControlID="DdlSubProyecto">SubProyecto:  </asp:Label>
+                            </div>
+                           <div class="col-md-1">
+                                <asp:DropDownList ID="DdlSubProyecto" runat="server" AppendDataBoundItems="true" Style="display: inline-block;" DataTextField="SubProyecto" DataValueField="CveSubProyecto" Class="form-control input-sm select2me" ValidationGroup="GrpGuardar">
+                                    
+                                </asp:DropDownList>
+                            </div>
+
+
+                               <div class="col-md-1" style="text-align:right">
+                             <asp:Label runat="server" AssociatedControlID="TxtFechaAsistencia">F. Inicial: </asp:Label>
+                         </div>
+                         <div class="col-md-1">
+                             <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 100px !important; padding: 0px;">
+                             <asp:TextBox ID="TxtFechaAsistencia" runat="server" MaxLength="10" Width="90px" Height="28px"></asp:TextBox><span class="input-group-btn ">
+                                 <asp:LinkButton ID="LnkFechaAsistencia" class="btn default " Style="padding: 4px 8px;margin-top:-2px" Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
+                             </span>
+                             <ajax:MaskedEditExtender ID="MEEFechaAsistencia" runat="server" TargetControlID="TxtFechaAsistencia" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
+                             <ajax:CalendarExtender runat="server" ID="CEFechaAsistencia" TargetControlID="TxtFechaAsistencia" PopupButtonID="LnkFechaAsistencia" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
+                             <asp:RequiredFieldValidator ID="RFVFechaAsistencia" runat="server" ControlToValidate="TxtFechaAsistencia" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha de Ingreso''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
+                             <asp:CompareValidator ID="CVFechaAsistencia" runat="server" ControlToValidate="TxtFechaAsistencia" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha de Ingreso''</b> no tiene el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpGuardar"></asp:CompareValidator>
+                             <ajax:ValidatorCalloutExtender ID="VCOFechaAsistencia1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaAsistencia" Width="350px"></ajax:ValidatorCalloutExtender>
+                             
+                                 <ajax:ValidatorCalloutExtender ID="VCOFechaAsistencia2" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaAsistencia" Width="350px"></ajax:ValidatorCalloutExtender>
+
+                              </div>
+                         </div>
+
+                         <div class="col-md-1" style="text-align:right">
+                             <asp:Label runat="server" AssociatedControlID="TxtFechaAsistenciaFin">F. Fin: </asp:Label>
+                         </div>
+                         <div class="col-md-1">
+                             <div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 100px !important; padding: 0px;">
+                                 <asp:TextBox ID="TxtFechaAsistenciaFin" runat="server" MaxLength="10" Width="90px" Height="28px"></asp:TextBox><span class="input-group-btn ">
+                                     <asp:LinkButton ID="LnkFechaAsistenciaFin" class="btn default " Style="padding: 4px 8px;margin-top:-2px" Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
+                                 </span>
+                                 <ajax:MaskedEditExtender ID="MaskedEditExtender1" runat="server" TargetControlID="TxtFechaAsistenciaFin" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
+                                 <ajax:CalendarExtender runat="server" ID="CalendarExtender1" TargetControlID="TxtFechaAsistenciaFin" PopupButtonID="LnkFechaAsistenciaFin" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
+                                 <asp:RequiredFieldValidator ID="RequiredFieldValidator1" runat="server" ControlToValidate="TxtFechaAsistenciaFin" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha de Ingreso''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
+                                 <asp:CompareValidator ID="CompareValidator1" runat="server" ControlToValidate="TxtFechaAsistenciaFin" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha de Ingreso''</b> no tiene el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpGuardar"></asp:CompareValidator>
+                                 <ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender1" runat="server" HighlightCssClass="vco" TargetControlID="RequiredFieldValidator1" Width="350px"></ajax:ValidatorCalloutExtender>
+                                 <ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender2" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaAsistencia" Width="350px"></ajax:ValidatorCalloutExtender>
+                             </div>
+                          </div>
+
+
+                                <div class="col-md-1" style="text-align:right">                                                       
+                              Grupo:
+                           </div>
+                            <div class="col-md-1">                                                            
+                                <asp:DropDownList runat="server" CssClass="select2me" ID="DdlGrupo" Width="100%">
+                                    <asp:ListItem Value="1" Selected="True">Cliente</asp:ListItem>
+                                    <asp:ListItem Value="2">Personal</asp:ListItem>
+                                </asp:DropDownList>                                
+                            </div>
+
+
+                           
+                       </div>
+
+
+                    </div>
+                </div>
+                <div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style=""display:none;""")%>>
+
+                    <div class="row">
+
+                        <div class="col-md-1" style="text-align:right">
+                                <asp:Label runat="server" AssociatedControlID="DdlTurno">Turno:  </asp:Label>
+                            </div>
+                           <div class="col-md-1">
+                                <asp:DropDownList ID="DdlTurno" runat="server" AppendDataBoundItems="true"  DataTextField="Turno" DataValueField="CveTurno" Class="form-control input-sm select2me" ValidationGroup="GrpGuardar">
+                                    <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
+                                </asp:DropDownList>
+                            </div>
+                            <div class="col-md-1" style="text-align:right">
+                                <asp:Label AssociatedControlID="DdlSupervisorOrganigrama" runat="server" Text="Supervisor:" Style="display: inline-block;"></asp:Label>
+                           </div>
+                           <div class="col-md-1">
+                                <asp:DropDownList ID="DdlSupervisorOrganigrama" runat="server" Style="display: inline-block; ;" AppendDataBoundItems="True" DataTextField="NombreCompleto" DataValueField="CvePersonal" CssClass="form-control input-sm select2me" ValidationGroup="GrpGuardar">
+                                    <asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
+                                    <asp:ListItem Text="Sin Asignar" Value="-2"></asp:ListItem>
+                                    <asp:ListItem Text="Cabecera" Value="0"></asp:ListItem>
+                                </asp:DropDownList>
+                            </div>
+
+
+                    </div>
+
+                </div>
+            </div>
+
+
+
+        </ContentTemplate>
+    </asp:UpdatePanel>
+     
+
+    <div class="row">
+        <div class="col-md-12">
+
+            <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
+                <ContentTemplate>
+
+                     <%--'SUM(1) CountEmpleados, ISNULL(C.CveCliente,-1) AS CveCliente, ISNULL(C.Nombre,''Cliente sin Asignar'') AS Cliente ,RH.CvePersonal, RH.NombreCompleto, ',--%>
+
+                    <asp:GridView ID="GV" runat="server" AutoGenerateColumns="false" DataKeyNames="Ordenador,CvePersonal,Cliente,NombreCompleto" 
+                        EmptyDataText="No se encontraron registros" ToolTip="Listado de Personal"
+                        
+                        CssClass="ADSCROLLER2  table table-striped table-advance table-hover" data-cols="1" data-heightmenos="300"
+                        Style="text-align: center;" GridLines="None">
+                        <Columns>
+                            <asp:TemplateField ItemStyle-HorizontalAlign="Left"  HeaderStyle-Width="300px" >
+                                <HeaderTemplate>Grupo</HeaderTemplate>
+                                <ItemTemplate>
+                                    <asp:Label  CssClass="truncate" ID ="LtlNombreCompleto"  runat="server" Text='<%# Eval("NombreCompleto") %>'></asp:Label>
+                                </ItemTemplate>
+                            </asp:TemplateField>                            
+                            
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+
+                          <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+
+                           <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+
+                            
+                           <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+
+                            
+                           <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+
+                            
+                           <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            
+                           <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            
+                           <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+
+                            
+                           <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+                            <asp:BoundField DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Right" ItemStyle-CssClass="ceros" ItemStyle-Width="75px" />
+
+
+                        </Columns>
+                        <RowStyle CssClass="Texto" />
+                        <AlternatingRowStyle CssClass="TextoAlterno" />
+                        <HeaderStyle CssClass="Titulos" />
+                    </asp:GridView>
+
+                    
+
+                </ContentTemplate>
+            </asp:UpdatePanel>
+
+        </div>
+
+    </div>
+
+    
+
+    
+
+</asp:Content>
+<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
+    <script type="text/javascript">
+      
+    </script>
+</asp:Content>

RH/RepAsistencias.aspx.vb

@@ -0,0 +1,184 @@
+Imports System.Data
+Imports Extensiones
+
+
+Partial Class RH_RepAsistencias
+    Inherits ClsPaginas
+
+    Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
+
+        If Not IsPostBack Then
+            'CargaClientes()
+            'DdlCliente.Attributes.Add("onclick", "CargaClientes();")
+            CargaClientes()
+            CargaProyecto()
+            CargaTurnos()
+
+            TxtFechaAsistenciaFin.Text = Now.ToShortDateString
+            TxtFechaAsistencia.Text = $"01/{Now.ToString("MM")}/{Now.Year}"
+
+
+        End If
+    End Sub
+
+#Region "CargaCombos"
+
+
+    Private Sub CargaClientes()
+        Dim ObjClientes As New ClsClientes
+        If ObjClientes.GetClientes(-1, "-1", "-1", "-1", "-1", "-1", "-1", -1, UsuarioActual.CveEmpresa, -1) Then
+            DdlCliente.DataSource = ObjClientes.DtResultados
+        Else
+            DdlCliente.DataSource = Nothing
+        End If
+        ObjClientes.Dispose()
+
+
+        DdlCliente.DataBind()
+    End Sub
+
+    Protected Sub BtnCargarClientes_Click(sender As Object, e As System.EventArgs) Handles BtnCargarClientes.Click
+        CargaClientes()
+        'DdlCliente.Attributes.Remove("onclick")
+    End Sub
+
+    Private Sub CargaProyecto()
+        'DdlProyecto.DataSource = GlobalDTProyectos(UsuarioActual.Empresa.CveEmpresa).FiltraParametros("", DistinctColumns:={"CveProyecto", "Proyecto"})
+        'DdlProyecto.DataBind()
+
+        CargarCentrosDeCosto(Nothing, Nothing, Nothing, LblSubProyectoAsignado)
+        'DivProyectosAsignado.Visible = LblProyectoAsignado.Visible
+
+
+        DdlSubProyecto.DataSource = If(Not UsuarioActual.TienePermisoProceso(110), GlobalDTSubProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1, 1), GlobalDTSubProyectos(-1, -1, UsuarioActual.CveEmpresa, 1))
+        DdlSubProyecto.DataBind()
+        DdlSubProyecto.Items.Insert(0, New ListItem("Todos", "-1"))
+    End Sub
+
+    Private Sub CargaSubProyecto()
+        DdlSubProyecto.Items.Clear()
+        DdlSubProyecto.DataSource = GlobalDTSubProyectos(-1)
+        DdlSubProyecto.DataBind()
+        DdlSubProyecto.Items.Insert(0, New ListItem("Todos", "-1"))
+    End Sub
+
+    Private Sub CargaTurnos()
+        DdlTurno.DataSource = GlobalDTTurno(UsuarioActual.CveEmpresa)
+        DdlTurno.DataBind()
+    End Sub
+
+#End Region
+
+    'Protected Sub DdlProyecto_SelectedIndexChanged(sender As Object, e As System.EventArgs) Handles DdlProyecto.SelectedIndexChanged
+    '    CargaSubProyecto()
+    'End Sub
+
+    Protected Sub BtnConsultar_Click(sender As Object, e As System.EventArgs) Handles BtnConsultar.Click
+
+        LnkExportar.Visible = False
+        GvOcultarColumnas()
+
+        If TxtFechaAsistencia.Text.Trim.ToDate.Year.Contiene(Now.Year - 1, Now.Year, Now.Year + 1) Then
+
+            Dim objpersonal As New ClsRH
+            Dim dtTemp As New DataTable
+            Dim CveClienteAsignado As Integer = If(DdlCliente.SelectedValue.ToEntero > 0, DdlCliente.SelectedValue.ToEntero, -1)
+
+            If objpersonal.RepGetAsistencias(DdlGrupo.SelectedValue.ToEntero, CveClienteAsignado, DdlSubProyecto.SelectedValue.ToEntero, DdlTurno.SelectedValue.ToEntero, 1, TxtFechaAsistencia.Text.Trim.ToDate,
+                                             TxtFechaAsistenciaFin.Text.Trim.ToDate, UsuarioActual.CveEmpresa, DdlSupervisorOrganigrama.SelectedValue.ToEntero()) Then
+                dtTemp = objpersonal.DtResultados
+
+                GvMostrarColumnas(dtTemp)
+                GV.DataSource = dtTemp
+
+                If dtTemp.Rows.Count > 0 Then
+                    LnkExportar.Visible = True
+                End If
+
+            Else
+                GV.DataSource = Nothing
+            End If
+
+            objpersonal.Dispose()
+            GV.DataBind()
+
+            UpDatos.Update()
+            UpAcciones.Update()
+
+        Else
+            Alert("La Fecha está fuera de los parámetros establecidos, por favor revise. Fecha: " & TxtFechaAsistencia.Text, TipoMensaje.MsgAdvertencia)
+        End If
+    End Sub
+
+    Private Sub GvOcultarColumnas()
+
+        Dim index = 1
+
+        For index = 1 To GV.Columns.Count - 1
+            CType(GV.Columns(index), BoundField).DataField = Nothing
+        Next
+        UpDatos.Update()
+    End Sub
+    Private Sub GvMostrarColumnas(dt As DataTable)
+        Dim index = 1
+
+
+        For index = 1 To dt.Columns.Count - 5
+            CType(GV.Columns(index + 4), BoundField).DataField = dt.Columns(index + 4).ColumnName
+
+            Dim tmpDate As Date
+            If (Date.TryParse(dt.Columns(index + 4).ColumnName, tmpDate)) Then
+                CType(GV.Columns(index + 4), BoundField).HeaderText = tmpDate.ToString("dd-MMM").Replace(".", "")
+            Else
+                CType(GV.Columns(index + 4), BoundField).HeaderText = dt.Columns(index + 4).ColumnName
+            End If
+
+
+
+
+        Next
+
+
+        UpDatos.Update()
+    End Sub
+
+    Protected Sub GV_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GV.RowDataBound
+
+        If e.Row.RowType = DataControlRowType.DataRow Then
+
+            If e.Row.DataKey("Ordenador").ToEntero = 0 Then
+                e.Row.CssClass = "SubTotales"
+
+            End If
+
+            e.Row.Attributes.Add("style", "max-height: 22px;")
+
+        End If
+
+
+
+    End Sub
+
+    Private Sub LnkExportar_Click(sender As Object, e As EventArgs) Handles LnkExportar.Click
+
+        Dim SubProyecto As String = ""
+
+        If DdlSubProyecto.SelectedValue.ToEntero > 0 Then
+            SubProyecto = DdlSubProyecto.SelectedItem.Text
+        End If
+
+        Dim SbFiltros As New StringBuilder()
+        SbFiltros.Append($"Fecha Inicio: {TxtFechaAsistencia.Text} Fecha Fin: {TxtFechaAsistenciaFin.Text} ")
+        SbFiltros.Append($"SubProyecto: {SubProyecto}")
+
+        GV.ExportToExcelGembox("ReporteIncidencias", UsuarioActual, "Reporte Incidencias", "", DatosFiltros:=SbFiltros.ToString())
+        'GvAnual.ExportToExcelGembox("AnexoCatálogoAnual", UsuarioActual, $"01/01/{DdlEjercicio.SelectedValue}", $"31/12/{DdlEjercicio2.SelectedValue}", "Anexo del Catálogo - Anual", SubProyecto, DdlDivisor.SelectedValue.ToEntero, DatoTituloExtra:=$"Periodo {DdlPeriodo.SelectedItem.Text}")
+
+    End Sub
+
+
+    Public Overrides Sub VerifyRenderingInServerForm(ByVal control As Control)
+    End Sub
+
+
+End Class

RH/RepPersonalInconsistencias.aspx

@@ -92,8 +92,8 @@
                             <ContentTemplate>
                                 <asp:Label ID="LbTotalContratos" runat="server" Font-Size="Medium"></asp:Label><br />
                                 <br />
-                                <asp:GridView ID="GV" runat="server" ShowHeader="True" AutoGenerateColumns="False" EmptyDataText="No se encontraron Registros de Contratos Vencidos o Próximos a Vencer." CellPadding="1" CellSpacing="1" RowStyle-VerticalAlign="Middle" RowStyle-HorizontalAlign="Center" 
+                                <asp:GridView ID="GV" runat="server" ShowHeader="True" AutoGenerateColumns="False" EmptyDataText="No se encontraron Registros de Contratos Vencidos o Próximos a Vencer." CellPadding="1" CellSpacing="1" RowStyle-VerticalAlign="Middle"  
-                                     CssClass="table table-striped table-advance table-hover Widthall ScrollAD" data-sort="true" GridLines="None">
+                                     CssClass="table table-advance table-hover Widthall ScrollAD" data-sort="true" GridLines="None">
                                     <Columns>
                                         <asp:TemplateField  ItemStyle-HorizontalAlign="Left">
                                             <HeaderTemplate>
@@ -106,7 +106,6 @@
                                                 <asp:Label ID="Label1" runat="server" Text='<%# Bind("NombreCompleto")%>'></asp:Label>
                                             </ItemTemplate>
                                             <ControlStyle CssClass="Texto" />                                          
-                                            <ItemStyle Width="450px" />
                                         </asp:TemplateField>
                                         <asp:TemplateField>
                                             <HeaderTemplate>
@@ -119,7 +118,6 @@
                                                 <asp:Label ID="Label2" runat="server" Text='<%# Bind("FechaIngreso", "{0:d}")%>'></asp:Label>
                                             </ItemTemplate>
                                             <ControlStyle CssClass="Texto" />                                          
-                                            <ItemStyle Width="200px" />
                                         </asp:TemplateField>
                                         <asp:TemplateField>
                                             <HeaderTemplate>
@@ -132,7 +130,6 @@
                                                 <asp:Label ID="Label3" runat="server" Text='<%# Bind("Turno")%>'></asp:Label>
                                             </ItemTemplate>
                                             <ControlStyle CssClass="Texto" />                                          
-                                            <ItemStyle Width="110px" />
                                         </asp:TemplateField>
                                         <asp:TemplateField>
                                             <HeaderTemplate>
@@ -145,7 +142,6 @@
                                                 <asp:Label ID="Label4" runat="server" Text='<%# Bind("Departamento")%>'></asp:Label>
                                             </ItemTemplate>
                                             <ControlStyle CssClass="Texto" />                                          
-                                            <ItemStyle Width="150px" />
                                         </asp:TemplateField>
                                         <asp:TemplateField>
                                             <HeaderTemplate>
@@ -158,7 +154,6 @@
                                                 <asp:Label ID="Label5" runat="server" Text='<%# Bind("Puesto")%>'></asp:Label>
                                             </ItemTemplate>
                                             <ControlStyle CssClass="Texto" />                                           
-                                            <ItemStyle Width="200px" />
                                         </asp:TemplateField>
                                         <asp:TemplateField>
                                             <HeaderTemplate>
@@ -171,7 +166,6 @@
                                                 <asp:Label ID="Label6" runat="server" Text='<%# Bind("Proyecto")%>'></asp:Label>
                                             </ItemTemplate>
                                             <ControlStyle CssClass="Texto" />                                           
-                                            <ItemStyle Width="300px" />
                                         </asp:TemplateField>
                                         <asp:TemplateField>
                                             <HeaderTemplate>
@@ -184,7 +178,7 @@
                                                 <asp:Label ID="Label7" runat="server" Text='<%# Bind("SubProyecto")%>'></asp:Label>
                                             </ItemTemplate>
                                             <ControlStyle CssClass="Texto" />
-                                            <ItemStyle Width="300px" />
+                                           
                                         </asp:TemplateField>
                                         <asp:TemplateField>
                                             <HeaderTemplate>
@@ -197,7 +191,6 @@
                                                 <asp:Label ID="Label8" runat="server" Text='<%# Bind("SeInscribioSS")%>'></asp:Label>
                                             </ItemTemplate>
                                             <ControlStyle CssClass="Texto" />                                           
-                                            <ItemStyle Width="450px" />
                                         </asp:TemplateField>
                                         <asp:TemplateField>
                                             <HeaderTemplate>
@@ -210,25 +203,19 @@
                                                 <asp:Label ID="Label9" runat="server" Text='<%# Bind("FechaFinContrato", "{0:d}")%>'></asp:Label>
                                             </ItemTemplate>
                                             <ControlStyle CssClass="Texto" />                                          
-                                            <ItemStyle Width="200px" />
                                         </asp:TemplateField>
                                         <asp:TemplateField>
                                             <HeaderTemplate>
-                                               <%-- <asp:LinkButton ID="LbEstatus" runat="server" CausesValidation="False" Text="" CommandArgument="Estatus0;0" OnClick="LbOrden_Click">--%>
+                                             Estatus
-                                                    Estatus
-                                                   <%-- <asp:Literal ID="ImgEstatus0" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
-                                                </asp:LinkButton>--%>
                                             </HeaderTemplate>
                                             <ItemTemplate>
                                                 <asp:Label ID="Label10" runat="server" Text='<%# Bind("Estatus")%>'></asp:Label>
                                             </ItemTemplate>
                                             <ControlStyle CssClass="Texto" />                                          
-                                            <ItemStyle Width="110px" />
                                         </asp:TemplateField>                                        
                                     </Columns>
-                                    <HeaderStyle CssClass="Titulos"></HeaderStyle>
+                                    <RowStyle CssClass="Texto" />
-                                    <AlternatingRowStyle CssClass="TextoAlterno"></AlternatingRowStyle>
+                                    <HeaderStyle CssClass="Titulos" />
-                                    <RowStyle CssClass="Texto"></RowStyle>
                                 </asp:GridView>
                             </ContentTemplate>
                         </asp:UpdatePanel>
@@ -377,7 +364,6 @@
                                         </asp:TemplateField>
                                     </Columns>
                                     <HeaderStyle CssClass="Titulos"></HeaderStyle>                                  
-                                    <AlternatingRowStyle CssClass="TextoAlterno"></AlternatingRowStyle>
                                     <RowStyle CssClass="Texto"></RowStyle>
                                 </asp:GridView>
                             </ContentTemplate>

Site.master.vb

@@ -377,7 +377,7 @@ Partial Class Site
         End If
 
         'Dim Inicio = From i In dt.AsEnumerable Where i!CvePadre.Equals(0) Order By i!Orden
-        Dim CveModuloPadre, CveModuloPadreSeleccionado, CveModuloHijoSeleccionado, CveModuloNietoSeleccionado As Integer
+        'Dim CveModuloPadre, CveModuloPadreSeleccionado, CveModuloHijoSeleccionado, CveModuloNietoSeleccionado As Integer
         'Dim CveModulo As Integer = CveModulomasterpage.Text.ToEntero()
         'Dim ScriptColorGrupoModulo As String = ""
         'Dim LinkBase = "javascript:;"

Ventas/Clientes.aspx

@@ -1989,16 +1989,16 @@
                                                     </div>
                                                 </div>
                                                 <div class="row">                                                    
-                                                    <div class="col-md-12 text-center">
+                                                    <div class="col-md-4 text-center">
-                                                        <asp:LinkButton ID="LnkGenerarReporteCxC" CssClass="btn btn-success" Text="<i class='fa fa-cogs'></i>  Generar" runat="server" />
-                                                        &nbsp;&nbsp;<asp:Button ID="BtnCobranzaSMS" data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si" runat="server" Visible="false" Text=" Enviar SMS" OnClick="BtnCobranzaSMS_Click" CssClass="btn btn-default" />
-                                                    </div>
-                                                    <div class="col-md-12 text-center">
                                                         <asp:RadioButtonList ID="RBLGenerarReporteCxC" RepeatDirection="Horizontal" runat="server" Style="margin: 0 auto;">
                                                             <asp:ListItem Text="PDF" Value="PDF" Selected="True" />
                                                             <asp:ListItem Text="EXCEL" Value="EXCEL" />
                                                         </asp:RadioButtonList>
                                                     </div>
+                                                    <div class="col-md-4 text-center">
+                                                        <asp:LinkButton ID="LnkGenerarReporteCxC" CssClass="btn btn-success" Text="<i class='fa fa-cogs'></i>  Generar" runat="server" />
+                                                        &nbsp;&nbsp;<asp:Button ID="BtnCobranzaSMS" data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si" runat="server" Visible="false" Text=" Enviar SMS" OnClick="BtnCobranzaSMS_Click" CssClass="btn btn-default" />
+                                                    </div>
                                                 </div>
                                             </div>
                                             <div class="portlet-footer">

Ventas/Clientes.aspx.vb

@@ -1999,7 +1999,7 @@ Partial Class Clientes
             If DtCxCActivas.MAX("LineaAdicional") = "" Then GvCxC.Columns(6).Visible = False
             If DtCxCActivas.MAX("CobranzaEstatus") = "" Then GvCxC.Columns(10).Visible = False
             'solo tomo los 10 ultimos mas el totalizador general
-            Dim dt As DataTable = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Hist'")
+            Dim dt As DataTable = ObjMovtos.DtResultados.FiltraParametros("Tipo = 'Hist'", "Fecha DESC")
             DtHistorialCxC = dt
             If dt IsNot Nothing AndAlso dt.Rows.Count > 0 Then
                 GvCxCHistorial.DataSource = dt.AsEnumerable().Take(22).CopyToDataTable()

Ventas/RepCancelacionesPorRespuesta.aspx

@@ -104,7 +104,7 @@
 
                             <asp:GridView ID="GvRefacturaciones" runat="server" AutoGenerateColumns="false" EmptyDataText="No se encontraron solicitudes de cancelación"
                                 DataKeyNames="CveVenta,CveCliente,SerieFolio,Folio,TipoDocto,Nombre,FolioFiscal,Total,SubTotal,CveEstatusFactura,RFCReceptor,CveEstatusRefacturacion,CveVentaSustitucion,TotalSustitucion,RFCReceptorSustitucion,CveClienteSustitucion,FolioFiscalSustitucion,SerieFolioSustitucion"
-                                CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" data-sort="true" GridLines="None" Width="99%" OnRowDataBound="GvDatos_RowDataBound">
+                                CssClass="table table-striped table-advance table-hover Widthall ScrollAD mysmallbtn" data-sort="true" GridLines="None" Width="99%" OnRowDataBound="GvRefacturaciones_RowDataBound">
                                 <Columns>
                                     <asp:BoundField HeaderText="Cliente" DataField="Nombre" ItemStyle-Width="25%" />
                                     <asp:BoundField HeaderText="Folio Fiscal" DataField="FolioFiscal" ItemStyle-Width="265px" />
@@ -125,7 +125,7 @@
                                         <ItemTemplate>
                                             <div class="row" style="padding-bottom:3px;">
                                                 <div class="col-md-12">
-                                                    <asp:LinkButton ID="LnkCancelar" Visible="false" runat="server" OnClick="BtnCancelarDocumento_Click" CssClass="btn btn-circle btn-sm red" Text="<i class='fa fa-ban'> </i>" ToolTip="Cancelar refacturación" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea cancelar el documento?" data-btn-ok-label="si"></asp:LinkButton>
+                                                    <asp:LinkButton ID="LnkCancelar" Visible="false" runat="server" OnClick="BtnCancelarDocumento_Click" CssClass="btn btn-circle btn-sm red" Text="<i class='fa fa-ban'> </i>" ToolTip="Esta seguro que desea cancelar la factura pendiente?" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea cancelar el documento?" data-btn-ok-label="si"></asp:LinkButton>
                                                 </div>
                                             </div>
                                             <div class="row">

Ventas/RepCancelacionesPorRespuesta.aspx.cs

@@ -623,6 +623,35 @@ public partial class Ventas_RepCancelacionesPorRespuesta : ClsPaginas
             }
         }
     }
+
+    protected void GvRefacturaciones_RowDataBound(object sender, GridViewRowEventArgs e)
+    {
+        if (e.Row.RowType == DataControlRowType.DataRow)
+        {
+            GridView gv = (GridView)sender;
+            if (!(e.Row.DBCampo("PuedeRefacturar").ToEntero() == 0 || !string.IsNullOrEmpty(e.Row.DBCampo("FolioFiscalSustitucion"))))
+            {
+                e.Row.FCHyperLink("HplRefact").NavigateUrl = string.Format("/Ventas/Ventas.aspx?CveDevolucion={0}&NuevaFactura=1", e.Row.DBCampo("CveVenta"));
+                e.Row.FCHyperLink("HplRefact").Visible = true;
+            }
+
+            if (e.Row.DBCampo("CveEstatusFactura").ToString().ToEntero() == 23)
+            {
+                e.Row.FCLinkButton("LnkValidarRefac").Visible = false;
+            }
+
+            if (e.Row.DBCampo("PuedeRefacturar") == "0" && e.Row.DBCampo("CveEstatusFactura") == "23" && e.Row.DBCampo("CveVentaSustitucion").ToEntero() > 0)
+            {
+                if (e.Row.FCLinkButton("LnkCancelar") != null) e.Row.FCLinkButton("LnkCancelar").Visible = true;
+            }
+
+            if (string.IsNullOrEmpty(e.Row.DBCampo("FolioFiscal")))
+            {
+                e.Row.FCLinkButton("LnkValidarRefac").Visible = false;
+            }
+        }
+    }
+
     public void BtnEnviarMailCancelacion_Click(object sender, EventArgs e)
     {
         if (this.CveVenta > 0)

Ventas/Ventas.aspx.vb

@@ -23661,7 +23661,7 @@ Partial Class Ventas
 
 #Region " INVENTARIO POR ENTREGA"
     Private Sub InventarioMov(Optional CveVentaPadre As Integer = -1)
-        If CveVentaPadre > 0 Then
+        If CveVentaPadre > 0 AndAlso DdlTipoComprobante.SelectedValue <> "Dev" Then
             Dim RowVentas As DataRow = Nothing
             Using ObjVentas As New ClsVentas
                 If ObjVentas.GetVenta(CveVentaPadre, UsuarioActual.CveEmpresa, VerificaAlmacen:=False) Then
@@ -34657,6 +34657,10 @@ Partial Class Ventas
         CalculaLineasAdicionales()
         DdlLineaAdicional.Enabled = True
 
+        If UsuarioActual.TienePermisoProceso(357) AndAlso LblSeTimbro.Text = "No" Then
+            DdlUsoCFDI.Enabled = True
+        End If
+
         UpParametros.Update()
         UPObservaciones.Update()
         UpFacturar.Update()