AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

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

Browse Source
This commit is contained in:
Jonathan Alexis Perez Morales
2023-07-17 09:08:01 -07:00
parent c0333953ce 2f2247ec29
commit 5fa9a3e268
40 changed files with 3796 additions and 1327 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
App_Code/CFDITimbre.vb
View File

@@ -308,8 +308,8 @@ Public Class CFDINominaReceptor
Public Property TipoPeriodo As String = "" Public Property TipoPeriodo As String = ""
Public Property CodigoBanco As String = "" Public Property CodigoBanco As String = ""
Public Property NumeroCuenta As String = "" Public Property NumeroCuenta As String = ""
Public Property SDI As Double = 0 Public Property SDI As Decimal = 0
Public Property SBC As Double = 0 Public Property SBC As Decimal = 0
Public Property CodigoEntidadFederativa As String = "" Public Property CodigoEntidadFederativa As String = ""
End Class End Class
@@ -486,7 +486,7 @@ Public Class CFDIComplementoPagos20
Get Get
Dim Ret As Decimal = 0 Dim Ret As Decimal = 0
For Each cfd As CFDIComplementoPago In ComplementoPagos For Each cfd As CFDIComplementoPago In ComplementoPagos
Ret = Ret + ((From c In cfd.Traslados Where c.Impuesto = "002" And c.TasaOCuota = 0.0 Select c.BaseMN).Sum() * cfd.TipoCambioP) Ret = Ret + ((From c In cfd.Traslados Where c.Impuesto = "002" And c.TasaOCuota = 0.0 Select c.BaseMN).Sum() * cfd.TipoCambioP.RoundSQL(4)) 'temporal redondeo a 4, 2023.07.07
Next Next
Return Ret.RoundSQL() Return Ret.RoundSQL()
End Get End Get

19
App_Code/ClsPaginas.vb
View File

@@ -6,7 +6,6 @@ Imports System.IO
Imports System.Net.Http Imports System.Net.Http
Imports System.Xml Imports System.Xml
Imports CrystalDecisions.CrystalReports.Engine Imports CrystalDecisions.CrystalReports.Engine
Imports CrystalDecisions.ReportSource
Imports CrystalDecisions.Shared Imports CrystalDecisions.Shared
Imports Extensiones Imports Extensiones
Imports iText.Kernel.Pdf Imports iText.Kernel.Pdf
@@ -1972,6 +1971,23 @@ Public Class ClsPaginas
End Set End Set
End Property End Property
Property GlobalDTTipoPeriodos(CveEmpresa As Integer) As DataTable
Get
Dim AppNombre As String = $"GlobalDTTipoPeriodo-{CveEmpresa}"
If HttpContext.Current.Application(AppNombre) Is Nothing Then
Dim dtt As DataTable = GlobalDTNominasPeriodos(-1, -1, CveEmpresa)
If dtt IsNot Nothing Then
Application(AppNombre) = dtt.FiltraParametros("", DistinctColumns:={"CveTipoPeriodo", "TipoPeriodo"})
End If
End If
GlobalDTTipoPeriodos = DirectCast(HttpContext.Current.Application(AppNombre), DataTable)
End Get
Set(value As DataTable)
Dim AppNombre As String = $"GlobalDTTipoPeriodo-{CveEmpresa}"
HttpContext.Current.Application(AppNombre) = value
End Set
End Property
'Fin TipoPeriodo 'Fin TipoPeriodo
'Periodos 'Periodos
Property GlobalDTNominasPeriodos(CveTipoPeriodo As Integer, CvePeriodo As Integer, CveEmpresa As Integer) As DataTable Property GlobalDTNominasPeriodos(CveTipoPeriodo As Integer, CvePeriodo As Integer, CveEmpresa As Integer) As DataTable
@@ -8172,6 +8188,7 @@ Public Class ClsPaginas
PaginaDict.Add("/RH/CalculoSBC.aspx".ToUpper(), 915) PaginaDict.Add("/RH/CalculoSBC.aspx".ToUpper(), 915)
PaginaDict.Add("/Inicio.aspx".ToUpper(), -1) PaginaDict.Add("/Inicio.aspx".ToUpper(), -1)
PaginaDict.Add("/reporteador.aspx".ToUpper(), -1) PaginaDict.Add("/reporteador.aspx".ToUpper(), -1)
PaginaDict.Add("/SigAyuda.aspx".ToUpper(), -1)
PaginaDict.Add("/General/CATIEPSxEntidadFed.aspx".ToUpper(), 719) PaginaDict.Add("/General/CATIEPSxEntidadFed.aspx".ToUpper(), 719)
PaginaDict.Add("/GPS/ReporteUnidadesnoTransmiten.aspx".ToUpper(), 917) PaginaDict.Add("/GPS/ReporteUnidadesnoTransmiten.aspx".ToUpper(), 917)
PaginaDict.Add("/GPS/RepArrastre.aspx".ToUpper(), 718) PaginaDict.Add("/GPS/RepArrastre.aspx".ToUpper(), 718)

40
App_Code/ClsRH.vb
View File

@@ -1523,16 +1523,14 @@ Public Class ClsRH
Public Property TipoPeriodoPago As String Public Property TipoPeriodoPago As String
Public Property NumeroSS As String Public Property NumeroSS As String
Public Property SeInscribioSS As Boolean Public Property SeInscribioSS As Boolean
Public Property SalarioDiarioPago As Double Public Property SalarioDiarioPago As Decimal
Public Property NetoPeriodo As Double Public Property NetoPeriodo As Decimal
Public Property SalarioDiario As Decimal
Public Property SDI As Decimal
Public Property SalarioDiario As Double Public Property SalarioDiarioSS As Decimal
Public Property SDI As Double
Public Property SalarioDiarioSS As Double
Public Property NumDiasAguinaldo As Integer Public Property NumDiasAguinaldo As Integer
Public Property PorPrimaVacacional As Double Public Property PorPrimaVacacional As Decimal
Public Property Bono As Double 'Public Property Bono As Double
Public Property CveMetodoPago As Integer Public Property CveMetodoPago As Integer
Public Property MetodoPago As String Public Property MetodoPago As String
Public Property MetodoPagoSAT As String Public Property MetodoPagoSAT As String
@@ -1644,14 +1642,14 @@ Public Class ClsRH
TipoPeriodoPago = Data.Rows(0)("TipoPerioricidadPago").ToString TipoPeriodoPago = Data.Rows(0)("TipoPerioricidadPago").ToString
Me.NumeroSS = Data.Rows(0)("NumeroSS").ToString Me.NumeroSS = Data.Rows(0)("NumeroSS").ToString
Me.SeInscribioSS = CBool(Data.Rows(0)("SeInscribioSS").ToString) Me.SeInscribioSS = CBool(Data.Rows(0)("SeInscribioSS").ToString)
Me.SalarioDiarioPago = Data.Rows(0)("SalarioDiarioPago").ToString.ToDouble Me.SalarioDiarioPago = Data.Rows(0)("SalarioDiarioPago").ToString.ToDecimal
Me.NetoPeriodo = Data.Rows(0)("NetoPeriodo").ToString.ToDecimal Me.NetoPeriodo = Data.Rows(0)("NetoPeriodo").ToString.ToDecimal
Me.SalarioDiario = Data.Rows(0)("SalarioDiario").ToString.ToDouble Me.SalarioDiario = Data.Rows(0)("SalarioDiario").ToString.ToDecimal
Me.SDI = Data.Rows(0)("SDI").ToString.ToDouble Me.SDI = Data.Rows(0)("SDI").ToString.ToDecimal
Me.Bono = Data.Rows(0)("Bono").ToString.ToDouble 'Me.Bono = Data.Rows(0)("Bono").ToString.ToDouble
Me.SalarioDiarioSS = Data.Rows(0)("SalarioDiarioSS").ToString.ToDouble Me.SalarioDiarioSS = Data.Rows(0)("SalarioDiarioSS").ToString.ToDecimal
Me.NumDiasAguinaldo = Data.Rows(0)("NumDiasAguinaldo").ToString.ToEntero Me.NumDiasAguinaldo = Data.Rows(0)("NumDiasAguinaldo").ToString.ToEntero
Me.PorPrimaVacacional = Data.Rows(0)("PorPrimaVacacional").ToString.ToDouble Me.PorPrimaVacacional = Data.Rows(0)("PorPrimaVacacional").ToString.ToDecimal
Me.CveMetodoPago = Data.Rows(0)("CveMetodoPago").ToString.ToEntero Me.CveMetodoPago = Data.Rows(0)("CveMetodoPago").ToString.ToEntero
Me.MetodoPago = Data.Rows(0)("MetodoPago").ToString Me.MetodoPago = Data.Rows(0)("MetodoPago").ToString
Me.MetodoPagoSAT = Data.Rows(0)("MetodoPagoSAT").ToString Me.MetodoPagoSAT = Data.Rows(0)("MetodoPagoSAT").ToString
@@ -1824,13 +1822,13 @@ Public Class ClsRH
Me.TipoPeriodo = Data.Rows(0)("TipoPeriodo").ToString Me.TipoPeriodo = Data.Rows(0)("TipoPeriodo").ToString
Me.NumeroSS = Data.Rows(0)("NumeroSS").ToString Me.NumeroSS = Data.Rows(0)("NumeroSS").ToString
Me.SeInscribioSS = CBool(Data.Rows(0)("SeInscribioSS").ToString) Me.SeInscribioSS = CBool(Data.Rows(0)("SeInscribioSS").ToString)
Me.SalarioDiarioPago = Data.Rows(0)("SalarioDiarioPago").ToString.ToDouble Me.SalarioDiarioPago = Data.Rows(0)("SalarioDiarioPago").ToString.ToDecimal
Me.SalarioDiario = Data.Rows(0)("SalarioDiario").ToString.ToDouble Me.SalarioDiario = Data.Rows(0)("SalarioDiario").ToString.ToDecimal
Me.SDI = Data.Rows(0)("SDI").ToString.ToDouble Me.SDI = Data.Rows(0)("SDI").ToString.ToDecimal
Me.Bono = Data.Rows(0)("Bono").ToString.ToDouble 'Me.Bono = Data.Rows(0)("Bono").ToString.ToDouble
Me.SalarioDiarioSS = Data.Rows(0)("SalarioDiarioSS").ToString.ToDouble Me.SalarioDiarioSS = Data.Rows(0)("SalarioDiarioSS").ToString.ToDecimal
Me.NumDiasAguinaldo = Data.Rows(0)("NumDiasAguinaldo").ToString.ToEntero Me.NumDiasAguinaldo = Data.Rows(0)("NumDiasAguinaldo").ToString.ToEntero
Me.PorPrimaVacacional = Data.Rows(0)("PorPrimaVacacional").ToString.ToDouble Me.PorPrimaVacacional = Data.Rows(0)("PorPrimaVacacional").ToString.ToDecimal
Me.CveMetodoPago = Data.Rows(0)("CveMetodoPago").ToString.ToEntero Me.CveMetodoPago = Data.Rows(0)("CveMetodoPago").ToString.ToEntero
Me.MetodoPago = Data.Rows(0)("MetodoPago").ToString Me.MetodoPago = Data.Rows(0)("MetodoPago").ToString
Me.MetodoPagoSAT = Data.Rows(0)("MetodoPagoSAT").ToString Me.MetodoPagoSAT = Data.Rows(0)("MetodoPagoSAT").ToString

3
App_Code/ClsSisUsuarios.vb
View File

@@ -1845,7 +1845,7 @@ Public Class ClsSisUsuarios
#Region " CLONAR USUARIOS " #Region " CLONAR USUARIOS "
Public Function ClonarUsuario(CveUsuario As Integer, CveUsuarioClonado As Integer, UsuariosEmpresas As Boolean, UsuariosModulos As Boolean, UsuariosProcesos As Boolean, UsuariosSubProyectos As Boolean, UsuariosAlmacenes As Boolean, UsuariosOC As Boolean, UsuariosOS As Boolean) As Boolean Public Function ClonarUsuario(CveUsuario As Integer, CveUsuarioClonado As Integer, UsuariosEmpresas As Boolean, UsuariosModulos As Boolean, UsuariosProcesos As Boolean, UsuariosSubProyectos As Boolean, UsuariosAlmacenes As Boolean, UsuariosOC As Boolean, UsuariosOS As Boolean, CveUsuarioModifico As Integer) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
DataAdapter("PA_Sis_ClonarUsuario") DataAdapter("PA_Sis_ClonarUsuario")
@@ -1860,6 +1860,7 @@ Public Class ClsSisUsuarios
.Add("@UsuariosAlmacenes", SqlDbType.Bit).Value = UsuariosAlmacenes .Add("@UsuariosAlmacenes", SqlDbType.Bit).Value = UsuariosAlmacenes
.Add("@UsuariosOC", SqlDbType.Bit).Value = UsuariosOC .Add("@UsuariosOC", SqlDbType.Bit).Value = UsuariosOC
.Add("@UsuariosOS", SqlDbType.Bit).Value = UsuariosOS .Add("@UsuariosOS", SqlDbType.Bit).Value = UsuariosOS
.Add("@CveUsuarioModifico", SqlDbType.Int).Value = CveUsuarioModifico
End With End With
Try Try

4
App_Code/LogicNominas.vb
View File

@@ -140,8 +140,8 @@ Public Class LogicNominas
Dim TipoPeriodoPago As String = "" Dim TipoPeriodoPago As String = ""
Dim ClaveBanco As String = "" Dim ClaveBanco As String = ""
Dim BancoNumCuenta As String = "" Dim BancoNumCuenta As String = ""
Dim SDI As Double = 0 Dim SDI As Decimal = 0
Dim SalarioDiarioSS As Double = 0 Dim SalarioDiarioSS As Decimal = 0
Dim ClaveEstado As String = "" Dim ClaveEstado As String = ""
Dim MetodoPagoFijo As Boolean Dim MetodoPagoFijo As Boolean
Dim totalDb As Decimal Dim totalDb As Decimal

47
App_Code/Timbrado.vb
View File

@@ -1403,7 +1403,7 @@ Public Class Timbrado
comprobante.Version = "4.0" comprobante.Version = "4.0"
comprobante.Fecha = ObjCFDITimbre.Comprobante.Fecha comprobante.Fecha = ObjCFDITimbre.Comprobante.Fecha
comprobante.FormaPago = ObjCFDITimbre.Comprobante.FormadePago comprobante.FormaPago = ObjCFDITimbre.Comprobante.FormadePago
If ObjCFDITimbre.Comprobante.TipoComprobante.Contiene("I", "E", "N") Then comprobante.CondicionesDePago = ObjCFDITimbre.Comprobante.CondicionesdePago If ObjCFDITimbre.Comprobante.TipoComprobante.Contiene("I", "E") Then comprobante.CondicionesDePago = ObjCFDITimbre.Comprobante.CondicionesdePago
comprobante.SubTotal = ObjCFDITimbre.Comprobante.SubTotal.RoundSQL(NumDecimalesImporte) comprobante.SubTotal = ObjCFDITimbre.Comprobante.SubTotal.RoundSQL(NumDecimalesImporte)
If ObjCFDITimbre.Comprobante.TipoComprobante.Contiene("I", "E", "N") AndAlso ObjCFDITimbre.Comprobante.Descuentos > 0 Then If ObjCFDITimbre.Comprobante.TipoComprobante.Contiene("I", "E", "N") AndAlso ObjCFDITimbre.Comprobante.Descuentos > 0 Then
@@ -1472,8 +1472,14 @@ Public Class Timbrado
If concep.Unidad <> "" Then comprobante.Conceptos(i).Unidad = concep.Unidad If concep.Unidad <> "" Then comprobante.Conceptos(i).Unidad = concep.Unidad
comprobante.Conceptos(i).ClaveUnidad = concep.ClaveUnidad comprobante.Conceptos(i).ClaveUnidad = concep.ClaveUnidad
comprobante.Conceptos(i).Descripcion = concep.Descripcion comprobante.Conceptos(i).Descripcion = concep.Descripcion
comprobante.Conceptos(i).ValorUnitario = Decimal.Parse(concep.ValorUnitario.ToString("0.00####")) ' formateo forzoso, ej,2543.1 If ObjCFDITimbre.Comprobante.TipoComprobante.Contiene("P") Then ' consideración especial para pagos, debe ser "0" sin decimales
comprobante.Conceptos(i).Importe = Decimal.Parse(concep.Importe.RoundSQL(NumDecimalesImporte).ToString("0.00")) ' formateo forzoso, ej,2543.1 comprobante.Conceptos(i).ValorUnitario = 0
comprobante.Conceptos(i).Importe = 0
Else
comprobante.Conceptos(i).ValorUnitario = Decimal.Parse(concep.ValorUnitario.ToString("0.00####")) ' formateo forzoso, ej,2543.1
comprobante.Conceptos(i).Importe = Decimal.Parse(concep.Importe.RoundSQL(NumDecimalesImporte).ToString("0.00")) ' formateo forzoso, ej,2543.1
End If
comprobante.Conceptos(i).ClaveProdServ = concep.ClaveProdServ comprobante.Conceptos(i).ClaveProdServ = concep.ClaveProdServ
comprobante.Conceptos(i).ObjetoImp = concep.ObjetoImpuesto comprobante.Conceptos(i).ObjetoImp = concep.ObjetoImpuesto
@@ -2218,8 +2224,8 @@ Public Class Timbrado
Nom.Percepciones.Percepcion(i).TipoPercepcion = percep.TipoPercepcion Nom.Percepciones.Percepcion(i).TipoPercepcion = percep.TipoPercepcion
Nom.Percepciones.Percepcion(i).Clave = percep.Clave Nom.Percepciones.Percepcion(i).Clave = percep.Clave
Nom.Percepciones.Percepcion(i).Concepto = percep.Concepto Nom.Percepciones.Percepcion(i).Concepto = percep.Concepto
Nom.Percepciones.Percepcion(i).ImporteGravado = Math.Round(percep.ImporteGravado, 2).ToString.ToDecimal Nom.Percepciones.Percepcion(i).ImporteGravado = percep.ImporteGravado.RoundSQL
Nom.Percepciones.Percepcion(i).ImporteExento = Math.Round(percep.ImporteExento, 2).ToString.ToDecimal Nom.Percepciones.Percepcion(i).ImporteExento = percep.ImporteExento.RoundSQL
If ObjCFDITimbre.Nomina.HorasExtras IsNot Nothing AndAlso ObjCFDITimbre.Nomina.HorasExtras.Count > 0 Then If ObjCFDITimbre.Nomina.HorasExtras IsNot Nothing AndAlso ObjCFDITimbre.Nomina.HorasExtras.Count > 0 Then
Nom.Percepciones.Percepcion(i).HorasExtra = New Profact.TimbraCFDI33.Complementos.Nomina12.NominaPercepcionesPercepcionHorasExtra(ObjCFDITimbre.Nomina.HorasExtras.Count - 1) {} Nom.Percepciones.Percepcion(i).HorasExtra = New Profact.TimbraCFDI33.Complementos.Nomina12.NominaPercepcionesPercepcionHorasExtra(ObjCFDITimbre.Nomina.HorasExtras.Count - 1) {}
@@ -2259,10 +2265,15 @@ Public Class Timbrado
If ObjCFDITimbre.Nomina.Deducciones IsNot Nothing AndAlso ObjCFDITimbre.Nomina.Deducciones.Count > 0 Then If ObjCFDITimbre.Nomina.Deducciones IsNot Nothing AndAlso ObjCFDITimbre.Nomina.Deducciones.Count > 0 Then
Nom.Deducciones = New Profact.TimbraCFDI33.Complementos.Nomina12.NominaDeducciones() Nom.Deducciones = New Profact.TimbraCFDI33.Complementos.Nomina12.NominaDeducciones()
Nom.Deducciones.TotalOtrasDeduccionesSpecified = True If ObjCFDITimbre.Nomina.TotalDeduccionesOtras > 0 Then
Nom.Deducciones.TotalOtrasDeducciones = Math.Round(ObjCFDITimbre.Nomina.TotalDeduccionesOtras, 2) Nom.Deducciones.TotalOtrasDeduccionesSpecified = True
Nom.Deducciones.TotalImpuestosRetenidosSpecified = True Nom.Deducciones.TotalOtrasDeducciones = ObjCFDITimbre.Nomina.TotalDeduccionesOtras.RoundSQL
Nom.Deducciones.TotalImpuestosRetenidos = Math.Round(ObjCFDITimbre.Nomina.TotalDeduccionesImpuestosRetenidos, 2) End If
If ObjCFDITimbre.Nomina.TotalDeduccionesImpuestosRetenidos > 0 Then
Nom.Deducciones.TotalImpuestosRetenidosSpecified = True
Nom.Deducciones.TotalImpuestosRetenidos = ObjCFDITimbre.Nomina.TotalDeduccionesImpuestosRetenidos.RoundSQL
End If
Nom.Deducciones.Deduccion = New Profact.TimbraCFDI33.Complementos.Nomina12.NominaDeduccionesDeduccion(ObjCFDITimbre.Nomina.Deducciones.Count - 1) {} Nom.Deducciones.Deduccion = New Profact.TimbraCFDI33.Complementos.Nomina12.NominaDeduccionesDeduccion(ObjCFDITimbre.Nomina.Deducciones.Count - 1) {}
Dim i As Integer = 0 Dim i As Integer = 0
For Each deduc As CFDINominaDeducciones In ObjCFDITimbre.Nomina.Deducciones For Each deduc As CFDINominaDeducciones In ObjCFDITimbre.Nomina.Deducciones
@@ -2270,7 +2281,7 @@ Public Class Timbrado
Nom.Deducciones.Deduccion(i).TipoDeduccion = deduc.TipoDeduccion Nom.Deducciones.Deduccion(i).TipoDeduccion = deduc.TipoDeduccion
Nom.Deducciones.Deduccion(i).Clave = deduc.Clave Nom.Deducciones.Deduccion(i).Clave = deduc.Clave
Nom.Deducciones.Deduccion(i).Concepto = deduc.Concepto Nom.Deducciones.Deduccion(i).Concepto = deduc.Concepto
Nom.Deducciones.Deduccion(i).Importe = Math.Round(deduc.Importe, 2) Nom.Deducciones.Deduccion(i).Importe = deduc.Importe.RoundSQL
i += 1 i += 1
Next Next
End If End If
@@ -2286,10 +2297,10 @@ Public Class Timbrado
Nom.OtrosPagos(i).TipoOtroPago = otpag.TipoOtroPago Nom.OtrosPagos(i).TipoOtroPago = otpag.TipoOtroPago
Nom.OtrosPagos(i).Clave = otpag.Clave Nom.OtrosPagos(i).Clave = otpag.Clave
Nom.OtrosPagos(i).Concepto = otpag.Concepto Nom.OtrosPagos(i).Concepto = otpag.Concepto
Nom.OtrosPagos(i).Importe = otpag.Importe Nom.OtrosPagos(i).Importe = otpag.Importe.RoundSQL
If otpag.TipoOtroPago = "002" Then If otpag.TipoOtroPago = "002" Then
Nom.OtrosPagos(i).SubsidioAlEmpleo = New Profact.TimbraCFDI33.Complementos.Nomina12.NominaOtroPagoSubsidioAlEmpleo() Nom.OtrosPagos(i).SubsidioAlEmpleo = New Profact.TimbraCFDI33.Complementos.Nomina12.NominaOtroPagoSubsidioAlEmpleo()
Nom.OtrosPagos(i).SubsidioAlEmpleo.SubsidioCausado = otpag.Importe Nom.OtrosPagos(i).SubsidioAlEmpleo.SubsidioCausado = otpag.Importe.RoundSQL
End If End If
i += 1 i += 1
Next Next
@@ -2316,13 +2327,15 @@ Public Class Timbrado
Nom.Receptor.RiesgoPuestoSpecified = True Nom.Receptor.RiesgoPuestoSpecified = True
Nom.Receptor.RiesgoPuesto = ObjCFDITimbre.Nomina.Receptor.CodigoRiesgoPuesto Nom.Receptor.RiesgoPuesto = ObjCFDITimbre.Nomina.Receptor.CodigoRiesgoPuesto
Nom.Receptor.PeriodicidadPago = ObjCFDITimbre.Nomina.Receptor.TipoPeriodo Nom.Receptor.PeriodicidadPago = ObjCFDITimbre.Nomina.Receptor.TipoPeriodo
Nom.Receptor.BancoSpecified = True If ObjCFDITimbre.Nomina.Receptor.CodigoBanco <> "" Then
Nom.Receptor.Banco = ObjCFDITimbre.Nomina.Receptor.CodigoBanco Nom.Receptor.BancoSpecified = True
Nom.Receptor.CuentaBancaria = ObjCFDITimbre.Nomina.Receptor.NumeroCuenta Nom.Receptor.Banco = ObjCFDITimbre.Nomina.Receptor.CodigoBanco
Nom.Receptor.CuentaBancaria = ObjCFDITimbre.Nomina.Receptor.NumeroCuenta
End If
Nom.Receptor.SalarioBaseCotAporSpecified = True Nom.Receptor.SalarioBaseCotAporSpecified = True
Nom.Receptor.SalarioBaseCotApor = Decimal.Round(ObjCFDITimbre.Nomina.Receptor.SBC.ToDecimal(), 2) Nom.Receptor.SalarioBaseCotApor = ObjCFDITimbre.Nomina.Receptor.SBC.RoundSQL
Nom.Receptor.SalarioDiarioIntegradoSpecified = True Nom.Receptor.SalarioDiarioIntegradoSpecified = True
Nom.Receptor.SalarioDiarioIntegrado = Decimal.Round(ObjCFDITimbre.Nomina.Receptor.SDI.ToDecimal(), 2) Nom.Receptor.SalarioDiarioIntegrado = ObjCFDITimbre.Nomina.Receptor.SDI.RoundSQL
Nom.Receptor.ClaveEntFed = ObjCFDITimbre.Nomina.Receptor.CodigoEntidadFederativa Nom.Receptor.ClaveEntFed = ObjCFDITimbre.Nomina.Receptor.CodigoEntidadFederativa
Dim nsNom As New System.Xml.Serialization.XmlSerializerNamespaces() Dim nsNom As New System.Xml.Serialization.XmlSerializerNamespaces()

1159
Bancos/IE.aspx.vb
View File

File diff suppressed because it is too large Load Diff

2
Bancos/ProveedoresAbonar.aspx.vb
View File

@@ -895,7 +895,7 @@ Partial Class Bancos_ProveedoresAbonar
IdCuenta = ObjCreditos.DtResultados.Rows(0)("IdCtaContableTarjeta").ToString.ToEntero IdCuenta = ObjCreditos.DtResultados.Rows(0)("IdCtaContableTarjeta").ToString.ToEntero
End If End If
Dim Importe42 As Decimal = Pago.ImportePago + Pago.OtroGastoIngreso Dim Importe42 As Decimal = Pago.ImportePago
tImporteMN = If(Pago.CveMonedaPago = 2, If(DivTC.Visible, Importe42 / TxtTC.Text.ToDecimal * Pago.TCPago, Importe42 * Pago.TCPago), Importe42) tImporteMN = If(Pago.CveMonedaPago = 2, If(DivTC.Visible, Importe42 / TxtTC.Text.ToDecimal * Pago.TCPago, Importe42 * Pago.TCPago), Importe42)
If MsgError = "" AndAlso Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, True, Importe42, tImporteMN, 42, Referencia, ConceptoMovimiento, IdCuenta, CveIE:=CveIE, CveProveedor:=CveProveedor, TipoCambio:=Pago.TCPago, CveSubProyecto:=CveSubProyecto) Then If MsgError = "" AndAlso Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, True, Importe42, tImporteMN, 42, Referencia, ConceptoMovimiento, IdCuenta, CveIE:=CveIE, CveProveedor:=CveProveedor, TipoCambio:=Pago.TCPago, CveSubProyecto:=CveSubProyecto) Then

2
Bancos/RepComplementoPago.aspx.vb
View File

@@ -241,7 +241,7 @@ Partial Class Bancos_RepComplementoPago
e.Row.FCLabel("LblImp").ForeColor = Drawing.Color.Red e.Row.FCLabel("LblImp").ForeColor = Drawing.Color.Red
e.Row.FCLabel("LblImp").ToolTip = String.Format("Importe Pagado:{0} Importe Pagado PUE: {1}, Ot. Ingresos {2}", e.Row.DBCampo("Importe").FormatoNumero, e.Row.DBCampo("PagadoPUE").FormatoNumero, e.Row.DBCampo("PagadoOtIngresos").FormatoNumero) ' VentasTotalPagado e.Row.FCLabel("LblImp").ToolTip = String.Format("Importe Pagado:{0} Importe Pagado PUE: {1}, Ot. Ingresos {2}", e.Row.DBCampo("Importe").FormatoNumero, e.Row.DBCampo("PagadoPUE").FormatoNumero, e.Row.DBCampo("PagadoOtIngresos").FormatoNumero) ' VentasTotalPagado
'si hay una diferencia generado por el tipo de cambio o alguna situación especial, detendrá el timbrado 'si hay una diferencia generado por el tipo de cambio o alguna situación especial, detendrá el timbrado
If Math.Abs(e.Row.DBCampo("Importe").ToDecimal - e.Row.DBCampo("VentasTotalPagado").ToDecimal) > 11 Then If Math.Abs(e.Row.DBCampo("Importe").ToDecimal - e.Row.DBCampo("VentasTotalPagado").ToDecimal) > 20 Then
' si tiene pagado PUE, habilitamos la condición porque esa puede ser la diferencia ' si tiene pagado PUE, habilitamos la condición porque esa puede ser la diferencia
If e.Row.DBCampo("PagadoPUE").ToDecimal > 0 OrElse e.Row.DBCampo("PagadoOtIngresos").ToDecimal > 0 Then If e.Row.DBCampo("PagadoPUE").ToDecimal > 0 OrElse e.Row.DBCampo("PagadoOtIngresos").ToDecimal > 0 Then
e.Row.FCCheckBox("Chk").Visible = True e.Row.FCCheckBox("Chk").Visible = True

22
Compras/ReembolsosComprobaciones.aspx.vb
View File

@@ -402,8 +402,10 @@ Partial Class Compras_ReembolsosComprobaciones
Protected Sub BtnIEGuardar_Click(sender As Object, e As EventArgs) Handles BtnIEGuardar.Click Protected Sub BtnIEGuardar_Click(sender As Object, e As EventArgs) Handles BtnIEGuardar.Click
Dim ValFechaDocumento As Boolean = False Dim ValFechaDocumento As Boolean = False
Dim FoliosFechasValFechaDocumento As New StringBuilder
FoliosFechasValFechaDocumento.AppendLine("Se seleccionaron facturas con fecha de mes superior al mes del pago: <br/>") Dim FoliosFechasValFechaDocumentoAnio As New StringBuilder
Dim FoliosFechasValFechaDocumentoPagoMesSuperior As New StringBuilder
Dim FoliosFechasValFechaDocumentoMesInferior As New StringBuilder
For Each gvRowVal As GridViewRow In GvCxP.Rows For Each gvRowVal As GridViewRow In GvCxP.Rows
@@ -422,12 +424,16 @@ Partial Class Compras_ReembolsosComprobaciones
Dim MesDocumento As Integer = FechaDocumento.Month Dim MesDocumento As Integer = FechaDocumento.Month
If AnioFactura > AnioDocumento Then If AnioFactura > AnioDocumento Then
FoliosFechasValFechaDocumento.AppendLine($"Folio: { gvRowVal.DataKey("SerieFolio") } fecha: {gvRowVal.DataKey("FechaCompra").ToDate.ToString("dd/MM/yyyy") } <br/>") FoliosFechasValFechaDocumentoAnio.AppendLine($"Folio: { gvRowVal.DataKey("SerieFolio") } fecha: {gvRowVal.DataKey("FechaCompra").ToDate.ToString("dd/MM/yyyy") } <br/>")
ValFechaDocumento = True ValFechaDocumento = True
ElseIf AnioFactura = AnioDocumento And MesFactura > MesDocumento Then ElseIf AnioFactura = AnioDocumento And MesFactura > MesDocumento Then
FoliosFechasValFechaDocumento.AppendLine($"Folio: { gvRowVal.DataKey("SerieFolio") } fecha: {gvRowVal.DataKey("FechaCompra").ToDate.ToString("dd/MM/yyyy") } <br/>") FoliosFechasValFechaDocumentoMesInferior.AppendLine($"Folio: { gvRowVal.DataKey("SerieFolio") } fecha: {gvRowVal.DataKey("FechaCompra").ToDate.ToString("dd/MM/yyyy") } <br/>")
ValFechaDocumento = True
ElseIf AnioFactura = AnioDocumento And MesDocumento > MesFactura Then
FoliosFechasValFechaDocumentoPagoMesSuperior.AppendLine($"Folio: { gvRowVal.DataKey("SerieFolio") } fecha: {gvRowVal.DataKey("FechaCompra").ToDate.ToString("dd/MM/yyyy") } <br/>")
ValFechaDocumento = True ValFechaDocumento = True
End If End If
End If End If
Next Next
@@ -437,7 +443,13 @@ Partial Class Compras_ReembolsosComprobaciones
End If End If
If ValFechaDocumento Then If ValFechaDocumento Then
Alert(FoliosFechasValFechaDocumento.ToString, TipoMensaje.MsgAdvertencia)
Dim strMensajeValFechas As String = ""
strMensajeValFechas = $"{strMensajeValFechas}{If(FoliosFechasValFechaDocumentoAnio.Length > 0, "Se seleccionarón facturas con fecha de año superior al año del pago: <br/>" & FoliosFechasValFechaDocumentoAnio.ToString, "")}"
strMensajeValFechas = $"{strMensajeValFechas}{If(FoliosFechasValFechaDocumentoPagoMesSuperior.Length > 0, "Se seleccionarón facturas con fecha de mes inferior al mes del pago: <br/>" & FoliosFechasValFechaDocumentoPagoMesSuperior.ToString, "")}"
strMensajeValFechas = $"{strMensajeValFechas}{If(FoliosFechasValFechaDocumentoMesInferior.Length > 0, "Se seleccionarón facturas con fecha de mes superior al mes del pago: <br/>" & FoliosFechasValFechaDocumentoMesInferior.ToString, "")}"
Alert(strMensajeValFechas, TipoMensaje.MsgAdvertencia)
Exit Sub Exit Sub
End If End If

206
Compras/eFacturas.aspx
View File

@@ -80,6 +80,9 @@
<asp:LinkButton ID="LnkPersonalizar" runat="server" OnClick="LnkPersonalizar_Click" ><i class="fa fa-pencil"></i> Personalizar</asp:LinkButton> <asp:LinkButton ID="LnkPersonalizar" runat="server" OnClick="LnkPersonalizar_Click" ><i class="fa fa-pencil"></i> Personalizar</asp:LinkButton>
</li> </li>
<li>
<asp:LinkButton ID="LnkRegistarFactura" runat="server" OnClick="LnkRegistarFactura_Click" ><i class="fa fa-plus-square-o"></i> Registar Compras</asp:LinkButton>
</li>
</ContentTemplate> </ContentTemplate>
@@ -184,11 +187,157 @@
</asp:UpdatePanel> </asp:UpdatePanel>
<div class="row" style="margin-left: 0px; margin-right: 0px;">
<div style="width: 100%;">
<asp:UpdatePanel ID="UpRegistroFacturas" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="portlet light xspadding bordered" id="DVRegistraFacturas" runat="server" visible="false">
<div class="portlet-title">
<div class="caption font-green">
<i class="icon-pin font-green"></i>
<span class="caption-subject bold uppercase">Registro de Facturas</span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
<div class="tools">
<a href="javascript:;" class="collapse"></a>
</div>
</div>
<div class="portlet-body form">
<div class="row">
<div class="col-md-4">
<div class="form-group form-md-line-input input-iconright">
<asp:HiddenField runat="server" ID="HdnTipoPS" Value="-1" />
<asp:DropDownList ID="DdlClasificacion" runat="server" CssClass=" form-control input-sm select2me" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Width="100%">
<asp:ListItem Selected="True" Text="Seleccione la Clasificación (Todas)" Value="-1"></asp:ListItem>
</asp:DropDownList>
<label for="<%= DdlClasificacion.ClientID.ToString()%>">Clasificación:</label>
</div>
</div>
<div class="col-md-4">
<asp:RadioButtonList ID="RBLContado" runat="server" RepeatDirection="Horizontal" Style="margin: auto" AutoPostBack="True" RepeatColumns="3">
<asp:ListItem Value="6" Selected="True" >Caja Chica</asp:ListItem>
<asp:ListItem Value="2">Viáticos</asp:ListItem>
</asp:RadioButtonList>
</div>
<div class="col-md-4">
<div class="form-group form-md-line-input input-iconright" >
<asp:DropDownList ID="DdlRetIVAConcepto" AppendDataBoundItems="true" CssClass="form-control input-sm select2me" Style="width: 100%;" runat="server"></asp:DropDownList>
<label runat="server" id="LblRetIVAConcepto" for="<%= DdlRetIVAConcepto.ClientID.ToString()%>">Ret. IVA:</label>
</div>
</div>
</div>
<div class="row">
<div class="col-md-4">
<div class="form-group form-md-line-input input-iconright" style="padding-top:14px">
<ADS:Dropdownlost runat="server" ID="DdlPS" CssStyle="width:100%" CssClass="form-control input-sm DdlPS" CssClassDdl="select2me" DataTextField="PSCodigo" DataValueField="CvePS" Width="100%" />
<label for="<%= DdlPS.ClientID.ToString()%>">
Productos / Servicio:<label>
</div>
</div>
<div class="col-md-4">
<div class="form-group form-md-line-input input-iconright" >
<asp:TextBox ID="TxtNumeroReembolso" runat="server" Width="100%" CssClass=" form-control input-sm " />
<label runat="server" id="LblNumeroReembolso" for="<%= TxtNumeroReembolso.ClientID.ToString()%>">Número de Reembolso:</label>
<asp:RequiredFieldValidator ID="RfvTxtNumeroReembolso" runat="server" ControlToValidate="TxtNumeroReembolso" InitialValue="" Display="Dynamic"
ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Num. Reembolso''</b> es necesario, por favor ingreselo." ValidationGroup="GrpRegistroFactura">
</asp:RequiredFieldValidator>
</div>
</div>
<div class="col-md-4">
<div class="form-group form-md-line-input input-iconright" >
<asp:DropDownList ID="DdlRetISRConcepto" AppendDataBoundItems="true" CssClass="form-control input-sm select2me" Style="width: 100%;" runat="server"></asp:DropDownList>
<label runat="server" id="LblRetISRConcepto" for="<%= DdlRetISRConcepto.ClientID.ToString()%>">Ret. ISR:</label>
</div>
</div>
</div>
<div class="row">
<div class="col-md-4">
<div class="form-group form-md-line-input input-iconright" >
<asp:DropDownList ID="DdlSubProyecto" CssClass=" form-control input-sm select2me" runat="server" Width="100%" AppendDataBoundItems="true" DataTextField="SubProyecto" DataValueField="CveSubProyecto" >
<asp:ListItem Selected="true" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList>
<label runat="server" id="LblSubProyecto" for="<%= DdlSubProyecto.ClientID.ToString()%>">SubProyecto:</label>
</div>
</div>
<div class="col-md-4">
<div class="form-group form-md-line-input input-iconright" id="DivCuentaCajaChicaReembolso" runat="server" >
<asp:DropDownList ID="DdlCuentaCajaChicaReembolso" runat="server" CssClass="form-control input-sm select2me" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="NumCuentaMoneda" DataValueField="CveCuenta" Width="100%" ValidationGroup="GrpGuardar">
<asp:ListItem Selected="True" Text="Seleccione cuenta" Value="-1"></asp:ListItem>
</asp:DropDownList>
<label runat="server" id="LblCuentaCajaChicaReembolso" for="<%= DdlCuentaCajaChicaReembolso.ClientID.ToString()%>">Caja Chica:</label>
</div>
<div class="form-group form-md-line-input input-iconright" id="DivPersonalReembolso" runat="server" visible="false" >
<asp:DropDownList ID="DdlPersonalReembolso" runat="server" CssClass="form-control input-sm select2me" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="NombreCompletoNombre" DataValueField="CvePersonal" Width="100%" ValidationGroup="GrpGuardar">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList>
<label runat="server" id="LblPersonalReembolso" for="<%= DdlPersonalReembolso.ClientID.ToString()%>">Viáticos:</label>
</div>
</div>
<div class="col-md-4" style="text-align:center; " >
<asp:Button ID="BtnGuardarFacturas" runat="server" Text="Guardar" class="btn btn-primary" OnClick="BtnGuardarFacturas_Click" style="margin: 0; position: absolute; top: 50%; transform: translateY(30%);" />
</div>
</div>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
<ajax:TabContainer ID="Tab" runat="server" ActiveTabIndex="0" Width="100%"> <ajax:TabContainer ID="Tab" runat="server" ActiveTabIndex="0" Width="100%">
<ajax:TabPanel ID="TabFacturass" runat="server" HeaderText="Facturas"> <ajax:TabPanel ID="TabFacturass" runat="server" HeaderText="Facturas">
<ContentTemplate> <ContentTemplate>
<asp:UpdatePanel ID="UPRegistros" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UPRegistros" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<table cellpadding="0" border="0" width="100%"> <table cellpadding="0" border="0" width="100%">
@@ -201,50 +350,22 @@
</table> </table>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
<asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpDatos" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<div class="row" runat="server" id="DVRegistroFacturas">
<div class="col-md-12">
<asp:UpdatePanel ID="UPPClasificacion" runat="server" UpdateMode="Conditional" RenderMode="Inline">
<ContentTemplate>
<div class="row">
<div class="col-md-6">
<div class="form-group form-md-line-input input-iconright">
<asp:HiddenField runat="server" ID="HdnTipoPS" Value="-1" />
<asp:DropDownList ID="DdlClasificacion" runat="server" CssClass=" form-control input-sm select2me" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Width="100%">
<asp:ListItem Selected="True" Text="Seleccione la Clasificación (Todas)" Value="-1"></asp:ListItem>
</asp:DropDownList>
<label for="<%= DdlClasificacion.ClientID.ToString()%>">Clasificación:</label>
</div>
</div>
<div class="col-md-6">
<div class="form-group form-md-line-input input-iconright">
<ADS:Dropdownlost runat="server" ID="DdlPS" CssStyle="width:100%" CssClass="form-control input-sm DdlPS" CssClassDdl="select2me" DataTextField="PSCodigo" DataValueField="CvePS" />
<label for="<%= DdlPS.ClientID.ToString()%>">
Productos / Servicio:<label>
</div>
</div>
</div>
<br />
</ContentTemplate>
</asp:UpdatePanel>
</div>
</div>
<div class="row"> <div class="row">
<div class="col-md-12"> <div class="col-md-12">
<asp:GridView ID="GvD" runat="server" Width="100%" AutoGenerateColumns="False" DataKeyNames="CveFactura,CveCompra,CveProveedor,SerieFolio,NombreProveedor,UUID,RFCDe,RFCPara,TipoFactura,FueValidado,TipoComprobante,Version,RFCde,XML,PDF,BloquePorComplemento,Total" <asp:GridView ID="GvD" runat="server" Width="100%" AutoGenerateColumns="False" DataKeyNames="CveFactura,CveCompra,CveProveedor,SerieFolio,NombreProveedor,UUID,RFCDe,RFCPara,TipoFactura,FueValidado,TipoComprobante,Version,RFCde,XML,PDF,BloquePorComplemento,Total,CveTipoProveedor"
EmptyDataText="No se encontraron Registros con el filtro actual" CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn" data-sort="true" GridLines="None"> EmptyDataText="No se encontraron Registros con el filtro actual" CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn" data-sort="true" GridLines="None">
<Columns> <Columns>
<asp:TemplateField Visible="false">
<ItemTemplate>
<asp:CheckBox ID="chkRegistraFactura" runat="server"></asp:CheckBox>
</ItemTemplate>
</asp:TemplateField>
<asp:TemplateField HeaderText="Tipo"> <asp:TemplateField HeaderText="Tipo">
<ItemTemplate> <ItemTemplate>
<asp:Label ID="LtTipoComprobante" runat="server" Text='<%# Eval("TipoComprobante") %>'></asp:Label> <asp:Label ID="LtTipoComprobante" runat="server" Text='<%# Eval("TipoComprobante") %>'></asp:Label>
@@ -268,16 +389,7 @@
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField HeaderText="Importe" ItemStyle-Width="125px"> <asp:TemplateField HeaderText="Importe" ItemStyle-Width="125px">
<ItemTemplate> <ItemTemplate>
<%-- <table>
<tr>
<td><asp:Literal ID="LtlTotal" runat="server" Text='<%# String.Format("{0}", Eval("Total", "{0:N2}")) %>'></asp:Literal></td>
<td><asp:Literal ID="LtlAbre" runat="server" Text='<%# String.Format("{0}", Eval("Abreviatura")) %>'></asp:Literal></td>
</tr>
</table>--%>
<%--<asp:Literal ID="LtlTotal" runat="server" Text='<%# String.Format("{0} {1}", Eval("Total", "{0:N2}"), Eval("Abreviatura")) %>'></asp:Literal>--%>
<asp:Literal ID="LtlTotal" runat="server" Text='<%# String.Format("{0}", Eval("Total", "{0:N2}")) %>'></asp:Literal> <asp:Literal ID="LtlTotal" runat="server" Text='<%# String.Format("{0}", Eval("Total", "{0:N2}")) %>'></asp:Literal>
</ItemTemplate> </ItemTemplate>
<ItemStyle HorizontalAlign="Right" /> <ItemStyle HorizontalAlign="Right" />
</asp:TemplateField> </asp:TemplateField>

2299
Compras/eFacturas.aspx.vb
View File

File diff suppressed because it is too large Load Diff

8
Contabilidad/CatCuentas.aspx.vb
View File

@@ -28,10 +28,10 @@ Partial Class Contabilidad_CatCuentas
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not Page.IsPostBack Then If Not Page.IsPostBack Then
If Not UsuarioActual.CveEmpresa.Contiene(13, 83) AndAlso EsProduccion Then 'If Not UsuarioActual.CveEmpresa.Contiene(13, 83) AndAlso EsProduccion Then
Response.Redirect("/Contabilidad2/CatCuentas.aspx") ' Response.Redirect("/Contabilidad2/CatCuentas.aspx")
Exit Sub ' Exit Sub
End If 'End If
If UsuarioActual.Empresa.UsaContabilidad Then If UsuarioActual.Empresa.UsaContabilidad Then
CargaMonedas() CargaMonedas()

329
Contabilidad/RepAnexoCatalogoSegmento.aspx
View File

@@ -145,171 +145,170 @@
</asp:TemplateField> </asp:TemplateField>
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" /> <asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" visible="False" />
<asp:BoundField DataFormatString="{0:N2}" ItemStyle-Width="75px" ItemStyle-HorizontalAlign="Right" />
</Columns> </Columns>

14
Contabilidad/RepAnexoCatalogoSegmento.aspx.vb
View File

@@ -3,6 +3,7 @@ Option Strict On
Imports System.Data Imports System.Data
Imports Extensiones Imports Extensiones
Imports Microsoft.Extensions.Primitives
Imports Microsoft.Reporting.WebForms Imports Microsoft.Reporting.WebForms
Partial Class AC_RepAnexoCatalogoSegmento Partial Class AC_RepAnexoCatalogoSegmento
@@ -339,10 +340,19 @@ Partial Class AC_RepAnexoCatalogoSegmento
Protected Sub LnkExcel_Click(sender As Object, e As EventArgs) Handles LnkExcel.Click Protected Sub LnkExcel_Click(sender As Object, e As EventArgs) Handles LnkExcel.Click
'GvDatos.ExportToExcelG("RepAnexoCatalogoSegmento", "RepAnexoCatalogoSegmento", UsuarioActual) 'GvDatos.ExportToExcelG("RepAnexoCatalogoSegmento", "RepAnexoCatalogoSegmento", UsuarioActual)
GvDatos.ExportToExcelX("RepAnexoCatalogoSegmento") 'GvDatos.ExportToExcelX("RepAnexoCatalogoSegmento")
Dim SbFiltros As New StringBuilder()
SbFiltros.Append($"Fecha Inicio: {TxtFechaDel.Text} Fecha Fin: {TxtFechaAl.Text} ")
SbFiltros.Append($" Cuenta: {TxtCuenta.Text}")
GvDatos.ExportToExcelGembox($"RepAnexoCatalogoSegmento{Now.ToString("yyyyMMddhhss")}", UsuarioActual, "Anexo del Catálogo Por Segmento", DatoTituloExtra:=$"", DatosFiltros:=SbFiltros.ToString())
End Sub End Sub
'Private Sub ImprimirReporte(Optional Formato As String = "PDF") 'Private Sub ImprimirReporte(Optional Formato As String = "PDF")
' Dim Imagen As New System.IO.FileInfo($"{UsuarioActual.Empresa.Ruta}/Logo.png") ' Dim Imagen As New System.IO.FileInfo($"{UsuarioActual.Empresa.Ruta}/Logo.png")
' 'ubicacion del rdlc ' 'ubicacion del rdlc
' Dim reportpath As String = "Contabilidad/Reportes/RepAnexoCatalogo.rdlc" ' Dim reportpath As String = "Contabilidad/Reportes/RepAnexoCatalogo.rdlc"
' 'nombre del reporte ' 'nombre del reporte

5
Contabilidad2/RepMovimientosAuxiliaresCatalogo.aspx
View File

@@ -37,10 +37,8 @@
</asp:Content> </asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="C" runat="Server"> <asp:Content ID="Content3" ContentPlaceHolderID="C" runat="Server">
<asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UPFiltros" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<div class="portlet solid grey-cascade portlet-filter"> <div class="portlet solid grey-cascade portlet-filter">
<div class="portlet-title portlet-filterT smalltitle"> <div class="portlet-title portlet-filterT smalltitle">
<div class="tools"> <div class="tools">
@@ -97,7 +95,7 @@
</div> </div>
</div> </div>
</div> </div>
<div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style=""display:none;""")%>> <div class="portlet-body" <%= IIf(chkexpand.Checked = True, "", "style=""display:none;""")%>>
<div class="row"> <div class="row">
<div class="col-md-1 truncate"> <div class="col-md-1 truncate">
Tipo Movto Tipo Movto
@@ -136,6 +134,7 @@
</div> </div>
</div> </div>
</div>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
<div class="row" style="margin-right: 10px; margin-top: 8px;" align="right"> <div class="row" style="margin-right: 10px; margin-top: 8px;" align="right">

4
Documentacion/TableroMaterialidad.aspx.cs
View File

@@ -1128,8 +1128,8 @@ namespace ADSistemaLibrary3.SatXml
case "TIPOJORNADA": xmlCFDI.complemento.nomina12.Receptor.CodigoTipoJornada = xtr.Value; break; case "TIPOJORNADA": xmlCFDI.complemento.nomina12.Receptor.CodigoTipoJornada = xtr.Value; break;
case "PUESTO": xmlCFDI.complemento.nomina12.Receptor.Puesto = xtr.Value; break; case "PUESTO": xmlCFDI.complemento.nomina12.Receptor.Puesto = xtr.Value; break;
case "RIESGOPUESTO": xmlCFDI.complemento.nomina12.Receptor.CodigoRiesgoPuesto = xtr.Value; break; case "RIESGOPUESTO": xmlCFDI.complemento.nomina12.Receptor.CodigoRiesgoPuesto = xtr.Value; break;
case "SALARIOBASECOTAPOR": xmlCFDI.complemento.nomina12.Receptor.SBC = xtr.Value.ToDouble(); break; case "SALARIOBASECOTAPOR": xmlCFDI.complemento.nomina12.Receptor.SBC = xtr.Value.ToDecimal(); break;
case "SALARIODIARIOINTEGRADO": xmlCFDI.complemento.nomina12.Receptor.SDI = xtr.Value.ToDouble(); break; case "SALARIODIARIOINTEGRADO": xmlCFDI.complemento.nomina12.Receptor.SDI = xtr.Value.ToDecimal(); break;
case "CLAVEENTFED": xmlCFDI.complemento.nomina12.Receptor.CodigoEntidadFederativa = xtr.Value; break; case "CLAVEENTFED": xmlCFDI.complemento.nomina12.Receptor.CodigoEntidadFederativa = xtr.Value; break;
case "PERIODICIDADPAGO": xmlCFDI.complemento.nomina12.Receptor.TipoPeriodo = xtr.Value; break; case "PERIODICIDADPAGO": xmlCFDI.complemento.nomina12.Receptor.TipoPeriodo = xtr.Value; break;
case "CUENTABANCARIA": xmlCFDI.complemento.nomina12.Receptor.NumeroCuenta = xtr.Value; break; case "CUENTABANCARIA": xmlCFDI.complemento.nomina12.Receptor.NumeroCuenta = xtr.Value; break;

4
Documentacion/TableroMaterialidad2.aspx.cs
View File

@@ -1047,8 +1047,8 @@ namespace ADSistemaLibrary43.SatXml
case "TIPOJORNADA": xmlCFDI.complemento.nomina12.Receptor.CodigoTipoJornada = xtr.Value; break; case "TIPOJORNADA": xmlCFDI.complemento.nomina12.Receptor.CodigoTipoJornada = xtr.Value; break;
case "PUESTO": xmlCFDI.complemento.nomina12.Receptor.Puesto = xtr.Value; break; case "PUESTO": xmlCFDI.complemento.nomina12.Receptor.Puesto = xtr.Value; break;
case "RIESGOPUESTO": xmlCFDI.complemento.nomina12.Receptor.CodigoRiesgoPuesto = xtr.Value; break; case "RIESGOPUESTO": xmlCFDI.complemento.nomina12.Receptor.CodigoRiesgoPuesto = xtr.Value; break;
case "SALARIOBASECOTAPOR": xmlCFDI.complemento.nomina12.Receptor.SBC = xtr.Value.ToDouble(); break; case "SALARIOBASECOTAPOR": xmlCFDI.complemento.nomina12.Receptor.SBC = xtr.Value.ToDecimal(); break;
case "SALARIODIARIOINTEGRADO": xmlCFDI.complemento.nomina12.Receptor.SDI = xtr.Value.ToDouble(); break; case "SALARIODIARIOINTEGRADO": xmlCFDI.complemento.nomina12.Receptor.SDI = xtr.Value.ToDecimal(); break;
case "CLAVEENTFED": xmlCFDI.complemento.nomina12.Receptor.CodigoEntidadFederativa = xtr.Value; break; case "CLAVEENTFED": xmlCFDI.complemento.nomina12.Receptor.CodigoEntidadFederativa = xtr.Value; break;
case "PERIODICIDADPAGO": xmlCFDI.complemento.nomina12.Receptor.TipoPeriodo = xtr.Value; break; case "PERIODICIDADPAGO": xmlCFDI.complemento.nomina12.Receptor.TipoPeriodo = xtr.Value; break;
case "CUENTABANCARIA": xmlCFDI.complemento.nomina12.Receptor.NumeroCuenta = xtr.Value; break; case "CUENTABANCARIA": xmlCFDI.complemento.nomina12.Receptor.NumeroCuenta = xtr.Value; break;

26
Inventarios/PopUpExistenciasAlmacen.aspx
View File

@@ -159,17 +159,10 @@
<asp:Label ID="LblUM" runat="server" Text='<%# Eval("UnidadMedida") %>'></asp:Label> <asp:Label ID="LblUM" runat="server" Text='<%# Eval("UnidadMedida") %>'></asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:BoundField DataField="Existencia" ItemStyle-HorizontalAlign="Right" HeaderText="Existencia" DataFormatString="{0:#,###.######}" /> <%--<asp:BoundField DataField="Existencia" ItemStyle-HorizontalAlign="Right" HeaderText="Existencia" DataFormatString="{0:#,###.######}" />--%>
<%--<asp:BoundField DataField="PendientePorSurtir" ItemStyle-HorizontalAlign="Right" HeaderText="Pendiente Por Surtir" DataFormatString="{0:#,###.######}" /> --%> <%--<asp:BoundField DataField="PendientePorSurtir" ItemStyle-HorizontalAlign="Right" HeaderText="Pendiente Por Surtir" DataFormatString="{0:#,###.######}" /> --%>
<asp:TemplateField ItemStyle-HorizontalAlign="Right">
<HeaderTemplate> <asp:BoundField DataField="ExistenciaFinal" ItemStyle-HorizontalAlign="Center" HeaderText="Existencia Real" DataFormatString="{0:#,###.######}" />
<asp:Label ID="LblPPPH" runat="server" ToolTip="Pendiente Por Surtir" Text="Pendiente <br/> Por Surtir"></asp:Label>
</HeaderTemplate>
<ItemTemplate>
<asp:Label ID="LblPP" runat="server" Text='<%# String.Format("{0:#,###.######}", Eval("PendientePorSurtir")) %>'></asp:Label>
</ItemTemplate>
</asp:TemplateField>
<asp:BoundField DataField="ExistenciaFinal" ItemStyle-HorizontalAlign="Right" HeaderText="Existencia Real" DataFormatString="{0:#,###.######}" />
<asp:BoundField DataField="Importe" ItemStyle-HorizontalAlign="Right" HeaderText="Precio Neto" DataFormatString="{0:N2}"/> <asp:BoundField DataField="Importe" ItemStyle-HorizontalAlign="Right" HeaderText="Precio Neto" DataFormatString="{0:N2}"/>
<%--<asp:BoundField DataField="ImportePromocion" ItemStyle-HorizontalAlign="Right" HeaderText="Precio Promoción" DataFormatString="{0:N2}"/>--%> <%--<asp:BoundField DataField="ImportePromocion" ItemStyle-HorizontalAlign="Right" HeaderText="Precio Promoción" DataFormatString="{0:N2}"/>--%>
<asp:TemplateField ItemStyle-HorizontalAlign="Right"> <asp:TemplateField ItemStyle-HorizontalAlign="Right">
@@ -180,8 +173,7 @@
<asp:Label ID="LblP" runat="server" Text='<%# String.Format("{0:N2}", Eval("ImportePromocion")) %>'></asp:Label> <asp:Label ID="LblP" runat="server" Text='<%# String.Format("{0:N2}", Eval("ImportePromocion")) %>'></asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<%--<asp:BoundField DataField="CantidadMinimaPromo" ItemStyle-HorizontalAlign="Right" HeaderText="Cant. Min. Promo" DataFormatString="{0:N0}"/>--%> <asp:TemplateField ItemStyle-HorizontalAlign="Center">
<asp:TemplateField ItemStyle-HorizontalAlign="Right">
<HeaderTemplate> <HeaderTemplate>
<asp:Label ID="LblCMPH" runat="server" ToolTip="Cantidad Mínima Promoción" Text="Cant. Min. <br/> Promoción"></asp:Label> <asp:Label ID="LblCMPH" runat="server" ToolTip="Cantidad Mínima Promoción" Text="Cant. Min. <br/> Promoción"></asp:Label>
</HeaderTemplate> </HeaderTemplate>
@@ -189,8 +181,16 @@
<asp:Label ID="LblCMP" runat="server" Text='<%# String.Format("{0:N0}", Eval("CantidadMinimaPromo")) %>'></asp:Label> <asp:Label ID="LblCMP" runat="server" Text='<%# String.Format("{0:N0}", Eval("CantidadMinimaPromo")) %>'></asp:Label>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:BoundField DataField="CantidadDisponibleInv" ItemStyle-HorizontalAlign="Right" HeaderText="Pendiente Por Recibir" DataFormatString="{0:#,###.######}" Visible="false"/>
<asp:BoundField DataField="Transito" ItemStyle-HorizontalAlign="Right" HeaderText="En Tránsito" DataFormatString="{0:#,###.######}" /> <asp:BoundField DataField="Transito" ItemStyle-HorizontalAlign="Right" HeaderText="En Tránsito" DataFormatString="{0:#,###.######}" />
<asp:TemplateField ItemStyle-HorizontalAlign="Center">
<HeaderTemplate>
<asp:Label ID="LblCMPH2" runat="server" Text="Por Recibir <br/> Fecha"></asp:Label>
</HeaderTemplate>
<ItemTemplate>
<asp:Label ID="LblPR" runat="server" Text='<%# String.Format("{0:#,###}", Eval("PorRecibir")) %>'></asp:Label><br />
<asp:Label Font-Size="10px" Font-Italic="true" ID="Label1" runat="server" Text='<%# String.Format("{0:dd MMMM}", Eval("FechaPorRecibir")) %>'></asp:Label>
</ItemTemplate>
</asp:TemplateField>
</Columns> </Columns>
</asp:GridView> </asp:GridView>
</div> </div>

4
Inventarios/PopUpExistenciasAlmacen.aspx.vb
View File

@@ -274,10 +274,14 @@ Partial Class Inventarios_Default
Dim ObjInventarios As New ClsInventarios Dim ObjInventarios As New ClsInventarios
If ObjInventarios.GetExistenciasMedRin(DDlPS.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, DdlRin.SelectedValue.ToEntero, DdlMedidas.SelectedValue.ToEntero) Then If ObjInventarios.GetExistenciasMedRin(DDlPS.SelectedValue.ToEntero, UsuarioActual.CveEmpresa, DdlRin.SelectedValue.ToEntero, DdlMedidas.SelectedValue.ToEntero) Then
GvMedRin.DataSource = ObjInventarios.DtResultados GvMedRin.DataSource = ObjInventarios.DtResultados
If ObjInventarios.DtResultados.Rows.Count > 0 Then
GvMedRin.Columns(5).Visible = ObjInventarios.DtResultados.MAX("CantidadMinimaPromo") <> ""
End If
End If End If
ObjInventarios.Dispose() ObjInventarios.Dispose()
GvMedRin.DataBind() GvMedRin.DataBind()
UPDatos.Update() UPDatos.Update()
DivMedRin.Visible = True DivMedRin.Visible = True
End Sub End Sub

9
Inventarios/RecepcionAlmacen.aspx.vb
View File

@@ -4054,7 +4054,6 @@ Partial Class Inventarios_RecepcionAlmacen
ObjInventario.GetMovimientosDetalle(CveMovimiento, UsuarioActual.CveEmpresa) ObjInventario.GetMovimientosDetalle(CveMovimiento, UsuarioActual.CveEmpresa)
Dim TotalCosto As Decimal = ObjInventario.DtResultados.SUMD("Total").RoundSQL() Dim TotalCosto As Decimal = ObjInventario.DtResultados.SUMD("Total").RoundSQL()
Dim IdCtaContableCostoInd As Integer = 0
'si reciben parcialidades de producto. en base al total de la importacion y lo recibido. 'si reciben parcialidades de producto. en base al total de la importacion y lo recibido.
Dim PorcentajeRecepcionCompras As Decimal = TotalCosto / DtTempCompras.SUMD("SubTotalTC") Dim PorcentajeRecepcionCompras As Decimal = TotalCosto / DtTempCompras.SUMD("SubTotalTC")
Dim ConceptoPartida As String = String.Format("{0}- Inv#{1}", HLFolio.Text, InvFolio) Dim ConceptoPartida As String = String.Format("{0}- Inv#{1}", HLFolio.Text, InvFolio)
@@ -4071,19 +4070,15 @@ Partial Class Inventarios_RecepcionAlmacen
Dim ImporteAbonoME As Decimal = 0 Dim ImporteAbonoME As Decimal = 0
Dim CveConceptoCostoIndirecto As Integer = If(CveImportacionSurtir > 0, 240, 237) Dim CveConceptoCostoIndirecto As Integer = If(CveImportacionSurtir > 0, 240, 237)
If ObjConta.GetRetCuenta(CveConceptoCostoIndirecto, UsuarioActual.CveEmpresa) AndAlso ObjConta.DtResultados.Rows.Count > 0 Then
IdCtaContableCostoInd = ObjConta.DtResultados.FiltroPrimeroValor("IdCtaContable").ToEntero
End If
If UsaComplementariaCostoIndirecto Then If UsaComplementariaCostoIndirecto Then
CveConceptoCostoIndirecto = If(CveImportacionSurtir > 0, 241, 238) CveConceptoCostoIndirecto = If(CveImportacionSurtir > 0, 241, 238)
ImporteAbono = SubTotalPartida ImporteAbono = SubTotalPartida
ImporteAbonoME = (SubTotalPartida * dr("TipoCambio").ToString.ToDecimal) - SubTotalPartida ImporteAbonoME = (SubTotalPartida * dr("TipoCambio").ToString.ToDecimal) - SubTotalPartida
End If End If
If ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteAbono, ConceptoPartida, CveConceptoCostoIndirecto, ConceptoPartida, FechaMovto, IdCtaContableCostoInd, -1, CveCompra:=CveComp, CveProveedor:=dr("CveProveedor").ToString.ToEntero, CveMovimientoAlmacen:=CveMovimiento, ImporteMX:=ImporteAbono, CveSubProyecto:=CveSubProyecto) Then If ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteAbono, ConceptoPartida, CveConceptoCostoIndirecto, ConceptoPartida, FechaMovto, 0, -1, CveCompra:=CveComp, CveProveedor:=dr("CveProveedor").ToString.ToEntero, CveMovimientoAlmacen:=CveMovimiento, ImporteMX:=ImporteAbono, CveSubProyecto:=CveSubProyecto) Then
' si tiene valor es que hay complementaria ' si tiene valor es que hay complementaria
If ImporteAbonoME > 0 Then If ImporteAbonoME > 0 Then
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteAbono, ConceptoPartida, If(CveImportacionSurtir > 0, 242, 239), ConceptoPartida, FechaMovto, IdCtaContableCostoInd, -1, CveCompra:=CveComp, CveProveedor:=dr("CveProveedor").ToString.ToEntero, CveMovimientoAlmacen:=CveMovimiento, ImporteMX:=ImporteAbono) Then If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteAbono, ConceptoPartida, If(CveImportacionSurtir > 0, 242, 239), ConceptoPartida, FechaMovto, 0, -1, CveCompra:=CveComp, CveProveedor:=dr("CveProveedor").ToString.ToEntero, CveMovimientoAlmacen:=CveMovimiento, ImporteMX:=ImporteAbono) Then
ErrorMovInv = True ErrorMovInv = True
End If End If
End If End If

37
Inventarios/RepEntregaAlmacenRuta.aspx.cs
View File

@@ -188,7 +188,22 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
} }
} }
private int CveCliente
{
get
{
if (ViewState["CveCliente"] == null)
{
ViewState["CveCliente"] = -1;
}
return ViewState["CveCliente"].ToString().ToEntero();
}
set
{
ViewState["CveCliente"] = value;
}
}
private int CveDireccionOrigen private int CveDireccionOrigen
{ {
@@ -356,10 +371,7 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
GridViewRow GvRow = (GridViewRow)(((LinkButton)sender).NamingContainer); GridViewRow GvRow = (GridViewRow)(((LinkButton)sender).NamingContainer);
CveEntregaAlmacen = GvRow.DataKey("CveEntregaAlmacen").ToEntero(); CveEntregaAlmacen = GvRow.DataKey("CveEntregaAlmacen").ToEntero();
CveTimbre = GvRow.DataKey("CveTimbre").ToEntero(); CveTimbre = GvRow.DataKey("CveTimbre").ToEntero();
int CveCliente = GvRow.DataKey("CveCliente").ToEntero();
int CveAlmacen = GvRow.DataKey("CveAlmacen").ToEntero();
DdlModalCamion.SelectedValueExist(GvRow.DataKey("CveCamion")); DdlModalCamion.SelectedValueExist(GvRow.DataKey("CveCamion"));
DdlModalChofer.SelectedValueExist(GvRow.DataKey("CveChofer")); DdlModalChofer.SelectedValueExist(GvRow.DataKey("CveChofer"));
@@ -383,6 +395,7 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
} }
CveDireccionOrigen = GvRow.DataKey("CveDireccionOrigen").ToEntero(); CveDireccionOrigen = GvRow.DataKey("CveDireccionOrigen").ToEntero();
CveDireccionDestino = GvRow.DataKey("CveDireccionDestino").ToEntero(); CveDireccionDestino = GvRow.DataKey("CveDireccionDestino").ToEntero();
CveCliente = GvRow.DataKey("CveCliente").ToEntero();
ModalActualizaDirecciones(CveTimbre); ModalActualizaDirecciones(CveTimbre);
@@ -398,15 +411,12 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
DVDireccionDestino.Visible = true; DVDireccionDestino.Visible = true;
LnkDireccionDestino.Text = GvRow.DataKey("Direccion") + " <i class='fa fa-search' aria-hidden='true'></i>"; LnkDireccionDestino.Text = GvRow.DataKey("Direccion") + " <i class='fa fa-search' aria-hidden='true'></i>";
} }
UpModalEditarentrega.Update(); UpModalEditarentrega.Update();
RegistraScript("$('#DivEditarEntrega').modal({ backdrop: 'static', keyboard: false });"); RegistraScript("$('#DivEditarEntrega').modal({ backdrop: 'static', keyboard: false });");
} }
private void ModalActualizaDirecciones(int CveTimbre) private void ModalActualizaDirecciones(int CveTimbre)
{ {
ClsGenerales ObjGeneral = new ClsGenerales(); ClsGenerales ObjGeneral = new ClsGenerales();
@@ -1028,9 +1038,10 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
public void EditDireccionOrigen_Click(object sender, EventArgs e) public void EditDireccionOrigen_Click(object sender, EventArgs e)
{ {
//GridViewRow GvRow = (GridViewRow)(((LinkButton)sender).NamingContainer); //GridViewRow GvRow = (GridViewRow)(((LinkButton)sender).NamingContainer);
//int CveDireccionOrigen = GvRow.DataKey("CveDireccionOrigen").ToEntero(); //int CveDireccionOrigen = GvRow.DataKey("CveDireccionOrigen").ToEntero();
CveDireccionEditar = CveDireccionOrigen; CveDireccionEditar = CveDireccionOrigen;
//CveCliente = GvRow.DataKey("CveCliente").ToEntero();
LblTitulodireccion.Text = "Actualizar dirección origen"; LblTitulodireccion.Text = "Actualizar dirección origen";
CargaDatosDireccion(CveDireccionOrigen); CargaDatosDireccion(CveDireccionOrigen);
} }
@@ -1067,7 +1078,7 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
TxtEnvioNoInt.Text = DT.Rows[0]["EnvioNoInt"].ToString(); TxtEnvioNoInt.Text = DT.Rows[0]["EnvioNoInt"].ToString();
TxtEnvioCP.Text = DT.Rows[0]["EnvioCP"].ToString(); TxtEnvioCP.Text = DT.Rows[0]["EnvioCP"].ToString();
// TxtEnvioTel.Text = GvRow.DataKey("EnvioTel") CveCliente = DT.Rows[0]["CveCliente"].ToString().ToEntero();
DdlDirClientePais.SelectedValueExist(DT.Rows[0]["CvePais"].ToString()); DdlDirClientePais.SelectedValueExist(DT.Rows[0]["CvePais"].ToString());
CargaDirClienteEstado(); CargaDirClienteEstado();
@@ -1094,7 +1105,7 @@ public partial class General_RepEntregaAlmacenRuta : ClsPaginas
bool ErrorProceso = false; bool ErrorProceso = false;
//CveDireccionEditar //CveDireccionEditar
if (!ObjCli.DireccionEnvioUpdate(-1, TxtEnvioDireccion.Text, TxtEnvioNoExt.Text, TxtEnvioNoInt.Text, "-1", "-1", "-1", TxtEnvioCP.Text, "-1", UsuarioActual.CveUsuario, -1, CveDireccionEditar, "-1", -1, "-1", if (!ObjCli.DireccionEnvioUpdate(CveCliente, TxtEnvioDireccion.Text, TxtEnvioNoExt.Text, TxtEnvioNoInt.Text, "-1", "-1", "-1", TxtEnvioCP.Text, "-1", UsuarioActual.CveUsuario, -1, CveDireccionEditar, "-1", -1, "-1",
DdlDirClientePais.SelectedValue.ToEntero(), DdlDirClienteEstado.SelectedValue.ToEntero(), DdlDirClienteMunicipio.SelectedValue.ToEntero(), DdlDirClienteLocalidad.SelectedValue.ToEntero(), DdlDirClienteColonia.SelectedValue.ToEntero())) DdlDirClientePais.SelectedValue.ToEntero(), DdlDirClienteEstado.SelectedValue.ToEntero(), DdlDirClienteMunicipio.SelectedValue.ToEntero(), DdlDirClienteLocalidad.SelectedValue.ToEntero(), DdlDirClienteColonia.SelectedValue.ToEntero()))
{ {
ErrorProceso = true; ErrorProceso = true;

74
Nomina/Nomina.aspx.cs
View File

@@ -1,12 +1,7 @@
 using Extensiones;
using AjaxControlToolkit.HtmlEditor.ToolbarButtons;
using ClbNegBICFDv3_3;
using Extensiones;
using iTextSharp.text.pdf; using iTextSharp.text.pdf;
using Profact.TimbraCFDI40;
using System; using System;
using System.Collections.Generic; using System.Collections.Generic;
using System.Collections.Specialized;
using System.Data; using System.Data;
using System.Drawing; using System.Drawing;
using System.IO; using System.IO;
@@ -328,11 +323,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
DdlTipoTrabajador.SelectedValueExist("-1"); DdlTipoTrabajador.SelectedValueExist("-1");
} }
} }
if (UsuarioActual.CveUsuario == 100)
{
Alert("recuerda que solo la empresa (119) tiene activado el timbrado 4.0", TipoMensaje.ToastAdventencia);
}
//CreaObjetoEmpresa(UsuarioActual);
DataTable dtperinc = null; DataTable dtperinc = null;
using (ClsNominas objnom = new ClsNominas()) using (ClsNominas objnom = new ClsNominas())
{ {
@@ -490,7 +481,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
} }
private void CargaTiposPeriodo() private void CargaTiposPeriodo()
{ {
DdlTipoPeriodo.DataSource = GlobalDTTipoPeriodo.FiltraParametros("Estatus = 'Activo'"); DdlTipoPeriodo.DataSource = get_GlobalDTTipoPeriodos(UsuarioActual.CveEmpresa) ;
DdlTipoPeriodoCM.DataSource = DdlTipoPeriodo.DataSource; DdlTipoPeriodoCM.DataSource = DdlTipoPeriodo.DataSource;
DdlTipoPeriodoSim.DataSource = DdlTipoPeriodo.DataSource; DdlTipoPeriodoSim.DataSource = DdlTipoPeriodo.DataSource;
DdlTipoPeriodoSim.DataBind(); DdlTipoPeriodoSim.DataBind();
@@ -1442,7 +1433,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
LogicNominas lognom = new LogicNominas(); LogicNominas lognom = new LogicNominas();
string Msg = ""; string Msg = "";
Msg = lognom.TimbrarNomina(CveNomina, CvePersonal, CvePeriodo, UsuarioActual, versionTimbre: VersionTimbradoEnum.Version4_0); Msg = lognom.TimbrarNomina(CveNomina, CvePersonal, CvePeriodo, UsuarioActual, UsuarioActual.Empresa.CvePAC);
if (Msg != null && Msg.Length > 0) if (Msg != null && Msg.Length > 0)
{ {
@@ -8943,16 +8934,24 @@ public partial class Nomina_Nomina2 : ClsPaginas
CvePrePolizaasmilidos = objnom.DtResultados.Rows[0]["CvePrePolizaAsimilables"].ToString().ToEntero(); CvePrePolizaasmilidos = objnom.DtResultados.Rows[0]["CvePrePolizaAsimilables"].ToString().ToEntero();
CvePrePolizaProrrateo = objnom.DtResultados.Rows[0]["CvePrePolizaProrrateo"].ToString().ToEntero(); CvePrePolizaProrrateo = objnom.DtResultados.Rows[0]["CvePrePolizaProrrateo"].ToString().ToEntero();
} }
string mensaje = string.Format("La provision a sido autorizada.<br/><a href=\"../Contabilidad/RegPrePoliza.aspx?CvePrePoliza={0}&Tipo=NOMPROV\">Provision </a><br/>", CvePrePolizaProvision); string mensaje = string.Format("La provisión a sido generada.<br/><a href='../Contabilidad/RegPrePoliza.aspx?CvePrePoliza={0}' class='Texto'>Provisión </a><br/>", CvePrePolizaProvision);
if (CvePrePolizaasmilidos > 0) if (CvePrePolizaasmilidos > 0)
{ {
mensaje = string.Format("{0} <a href=\"../Contabilidad/RegPrePoliza.aspx?CvePrePoliza={1}&Tipo=NOMPROV\"> Asimilados</a><br/>", mensaje, CvePrePolizaasmilidos); mensaje = string.Format("{0} <a href='../Contabilidad/RegPrePoliza.aspx?CvePrePoliza={1}' class='Texto'> Asimilados</a><br/>", mensaje, CvePrePolizaasmilidos);
} }
if (CvePrePolizaProrrateo > 0) if (CvePrePolizaProrrateo > 0)
{ {
mensaje = string.Format("{0} <a href=\"../Contabilidad/RegPrePoliza.aspx?CvePrePoliza={1}&Tipo=NOMPROV\"> Prorrateo</a><br/>", mensaje, CvePrePolizaProrrateo); mensaje = string.Format("{0} <a href='../Contabilidad/RegPrePoliza.aspx?CvePrePoliza={1}' class='Texto'> Prorrateo</a><br/>", mensaje, CvePrePolizaProrrateo);
}
if (CvePrePolizaProvision > 0)
{
using (ClsContabilidad objconta = new ClsContabilidad())
{
var objUsuario = UsuarioActual;
if (objconta.ValidacionesPrePoliza(CvePrePolizaProvision, ref objUsuario))
{
}
}
} }
Alert(mensaje); Alert(mensaje);
} }
@@ -8966,9 +8965,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
if (ObjContaz.GetConta_ConceptosContables()) if (ObjContaz.GetConta_ConceptosContables())
{ {
ContaConceptossource = ObjContaz.DtResultados; ContaConceptossource = ObjContaz.DtResultados;
} }
} }
if (UsuarioActual.Empresa.TipoContabilidad == 1) if (UsuarioActual.Empresa.TipoContabilidad == 1)
@@ -9003,42 +9000,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
GVProvision.DataBind(); GVProvision.DataBind();
RegistraScript("$('#ModalRegistraProvision').modal();"); RegistraScript("$('#ModalRegistraProvision').modal();");
UpRegistroProvision.Update(); UpRegistroProvision.Update();
/*
StringBuilder str = new StringBuilder();
str.Append("<table>");
str.Append("<tbody>");
//ConceptoContable ConceptoNomina CodigoNombreCompleto
str.Append("<tr>");
str.Append("<th>");
str.Append("Concepto Contable");
str.Append("</th>");
str.Append("<th>");
str.Append("Concepto Nomina");
str.Append("</th>");
str.Append("<th>");
str.Append("Personal");
str.Append("</th>");
str.Append("</tr>");
foreach (DataRow item in objnom.DTSetResultados.Tables[1].Rows)
{
str.Append("<tr>");
str.Append("<td>");
str.Append(item["ConceptoContable"]);
str.Append("</td>");
str.Append("<td>");
str.Append(item["ConceptoNomina"]);
str.Append("</td>");
str.Append("<td>");
str.Append(item["CodigoNombreCompleto"]);
str.Append("</td>");
str.Append("</tr>");
}
str.Append("</tbody>");
str.Append("</table>");
Alert(string.Format("<div>no se pudo registrar la provisión, existen cuentas sin vincular.</div> {0}", str));
*/
} }
} }
} }

11
OC/OC.aspx.vb
View File

@@ -2401,7 +2401,15 @@ Partial Class OC_OC
TieneError = True TieneError = True
End If End If
''validación que para empresas llanteras, y la clasif son llantas, que requiere la fecha de estimación
If UsuarioActual.Empresa.Funcionalidad(558) = "1" Then
Dim dtc As DataTable = DtDetalle.FiltraParametros("Clasificacion like '%Llanta%'")
If dtc IsNot Nothing AndAlso dtc.Rows.Count > 0 AndAlso TxtFechaEstimadaEntrega.Text.ToDate <= MinFecha Then
Alert("Cuando se incluyan productos llantas, deberán especificar fecha estimada de entrega.", TipoMensaje.MsgAdvertencia)
TieneError = True
End If
End If
'SI ES REQUISICION, NO REQUIERE COTIZACION Y ES ESTATUSFINALOK... ENTONCES DEBE DE TENER UN PROVEEDOR SELECCIONADO Y LOS PRECIOS CAPTURADOS 'SI ES REQUISICION, NO REQUIERE COTIZACION Y ES ESTATUSFINALOK... ENTONCES DEBE DE TENER UN PROVEEDOR SELECCIONADO Y LOS PRECIOS CAPTURADOS
'If (TipoOC = "REQ" And ChkCotizacion.Checked = False And CboE.SelectedValue.ToEntero = CveEstatusFinalOK) OrElse TipoOC = "OC" Then 'If (TipoOC = "REQ" And ChkCotizacion.Checked = False And CboE.SelectedValue.ToEntero = CveEstatusFinalOK) OrElse TipoOC = "OC" Then
@@ -2590,9 +2598,6 @@ Partial Class OC_OC
'VALIDACIONES PARA GUARDAR 'VALIDACIONES PARA GUARDAR
If ValidaGuardar() Then Exit Sub If ValidaGuardar() Then Exit Sub
Dim MsgError As String = "Hubo un error al registrar" Dim MsgError As String = "Hubo un error al registrar"
'VARIABLES 'VARIABLES
Dim CveProveedorSucursal As Integer = -1 Dim CveProveedorSucursal As Integer = -1

8
RH/CatTurno.aspx.vb
View File

@@ -127,13 +127,7 @@ Partial Class RH_CatTurno
Private Sub CargaGlobalDTTurno() Private Sub CargaGlobalDTTurno()
Dim ObjRH As New ClsRH GlobalDTTurno(UsuarioActual.CveEmpresa) = Nothing
If ObjRH.GetTurnos() Then
Application("GlobalDTTurno") = ObjRH.DtResultados
Else
Application("GlobalDTTurno") = Nothing
End If
ObjRH.Dispose()
End Sub End Sub
Public Sub Delete_Click(sender As Object, e As EventArgs) Public Sub Delete_Click(sender As Object, e As EventArgs)

165
RH/Personal.aspx
View File

@@ -292,16 +292,22 @@
</div> </div>
</div> </div>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="row" style="margin-bottom: 5px">
<asp:TextBox CssClass="form-control" ID="TxtColonia" runat="server" MaxLength="70"></asp:TextBox> <div class="col-md-6">
<label for="<%= TxtColonia.ClientID.ToString()%>">Colonia: </label> <div class="form-group form-md-line-input input-iconright">
<i></i> <asp:TextBox CssClass="form-control" ID="TxtColonia" runat="server" MaxLength="70"></asp:TextBox>
</div> <label for="<%= TxtColonia.ClientID.ToString()%>">Colonia: </label>
<i></i>
</div>
</div>
<div class="col-md-6">
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
<asp:TextBox CssClass="form-control" ID="TxtCP" runat="server" MaxLength="5"></asp:TextBox> <asp:TextBox CssClass="form-control" ID="TxtCP" runat="server" MaxLength="5"></asp:TextBox>
<label for="<%= TxtCP.ClientID.ToString()%>">Código Postal: </label> <label for="<%= TxtCP.ClientID.ToString()%>">Código Postal: </label>
<i></i> <i></i>
</div> </div>
</div>
</div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
<asp:TextBox CssClass="form-control" ID="TxtCiudad" runat="server" MaxLength="30"></asp:TextBox> <asp:TextBox CssClass="form-control" ID="TxtCiudad" runat="server" MaxLength="30"></asp:TextBox>
<label for="<%= TxtCiudad.ClientID.ToString()%>">Ciudad: </label> <label for="<%= TxtCiudad.ClientID.ToString()%>">Ciudad: </label>
@@ -592,23 +598,20 @@
</asp:DropDownList> </asp:DropDownList>
<asp:Label AssociatedControlID="DdlEmpresaAsignada" runat="server" Text="Outsourcing :"></asp:Label> <asp:Label AssociatedControlID="DdlEmpresaAsignada" runat="server" Text="Outsourcing :"></asp:Label>
<i></i> <i></i>
</div> </div>
<div class="form-group form-md-line-input input-iconright" id="divAgroTipoTrabajador" runat="server" visible="false">
<div class="form-group form-md-line-input input-iconright">
<asp:DropDownList Width="100%" ID="DdlTipoTrabajador" CssClass="form-control input-sm select2me" runat="server" AutoPostBack="true" <asp:DropDownList Width="100%" ID="DdlTipoTrabajador" CssClass="form-control input-sm select2me" runat="server" AutoPostBack="true"
DataTextField="TipoTrabajadorB" DataValueField="CveTipoTrabajador" ValidationGroup="GrpGuardar" OnSelectedIndexChanged="DdlTipoTrabajador_SelectedIndexChanged"> DataTextField="TipoTrabajadorB" DataValueField="CveTipoTrabajador" ValidationGroup="GrpGuardar" OnSelectedIndexChanged="DdlTipoTrabajador_SelectedIndexChanged">
</asp:DropDownList> </asp:DropDownList>
<asp:Label AssociatedControlID="DdlTipoTrabajador" runat="server" Text="Tipo trabajador:"></asp:Label> <asp:Label AssociatedControlID="DdlTipoTrabajador" runat="server" Text="Tipo trabajador:"></asp:Label>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright" id="divAgroDepto" runat="server" visible="false">
<asp:DropDownList Width="100%" ID="DDlAgroDepartamento" CssClass="form-control input-sm select2me" runat="server" <asp:DropDownList Width="100%" ID="DDlAgroDepartamento" CssClass="form-control input-sm select2me" runat="server"
DataTextField="Departamento" DataValueField="CveDepartamento" ValidationGroup="GrpGuardar"> DataTextField="Departamento" DataValueField="CveDepartamento" ValidationGroup="GrpGuardar">
</asp:DropDownList> </asp:DropDownList>
<asp:Label AssociatedControlID="DDlAgroDepartamento" runat="server" Text="Depto:"></asp:Label> <asp:Label AssociatedControlID="DDlAgroDepartamento" runat="server" Text="Depto:"></asp:Label>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright" id="divMedioTransporte" runat="server" visible="false">
<asp:DropDownList Width="100%" ID="DdlMedioTransporte" CssClass="form-control input-sm select2me" runat="server" <asp:DropDownList Width="100%" ID="DdlMedioTransporte" CssClass="form-control input-sm select2me" runat="server"
DataTextField="Nombre" DataValueField="CveOrigen" ValidationGroup="GrpGuardar"> DataTextField="Nombre" DataValueField="CveOrigen" ValidationGroup="GrpGuardar">
</asp:DropDownList> </asp:DropDownList>
@@ -625,7 +628,7 @@
<asp:CheckBox ID="ChkSindicalizado" CssClass="chksino " Text=" " runat="server" /> <asp:CheckBox ID="ChkSindicalizado" CssClass="chksino " Text=" " runat="server" />
</div> </div>
</div> </div>
<div class="row"> <div class="row" id="divAgro1" runat="server" visible="false">
<div class="col-md-6"> <div class="col-md-6">
<asp:Label AssociatedControlID="ChkEstemporal" CssClass="lblforchk" runat="server" Text="¿es Temporal?:"></asp:Label> <asp:Label AssociatedControlID="ChkEstemporal" CssClass="lblforchk" runat="server" Text="¿es Temporal?:"></asp:Label>
<asp:CheckBox ID="ChkEstemporal" Text=" " AutoPostBack="true" OnCheckedChanged="ChkEstemporal_CheckedChanged" CssClass="chksino" runat="server" /> <asp:CheckBox ID="ChkEstemporal" Text=" " AutoPostBack="true" OnCheckedChanged="ChkEstemporal_CheckedChanged" CssClass="chksino" runat="server" />
@@ -642,7 +645,7 @@
</div> </div>
</div> </div>
<div class="row"> <div class="row" id="divAgro2" runat="server" visible="false">
<div class="col-md-6"> <div class="col-md-6">
<asp:Label AssociatedControlID="chkEsReserva" CssClass="lblforchk" runat="server" Text="Es reserva:"></asp:Label> <asp:Label AssociatedControlID="chkEsReserva" CssClass="lblforchk" runat="server" Text="Es reserva:"></asp:Label>
<asp:CheckBox ID="chkEsReserva" CssClass="chksino " Text=" " runat="server" /> <asp:CheckBox ID="chkEsReserva" CssClass="chksino " Text=" " runat="server" />
@@ -660,7 +663,6 @@
<asp:CheckBox ID="CHKRFCValidado" Text=" " CssClass="chksino" runat="server" /> <asp:CheckBox ID="CHKRFCValidado" Text=" " CssClass="chksino" runat="server" />
</div> </div>
</div> </div>
</div> </div>
</div> </div>
</div> </div>
@@ -1530,19 +1532,22 @@
<asp:CompareValidator ID="CVBono" runat="server" ControlToValidate="TxtBono" CssClass="help-block errorimput" ErrorMessage="El campo <b>''Bono''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpGuardar"></asp:CompareValidator> <asp:CompareValidator ID="CVBono" runat="server" ControlToValidate="TxtBono" CssClass="help-block errorimput" ErrorMessage="El campo <b>''Bono''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpGuardar"></asp:CompareValidator>
<i></i> <i></i>
</div> </div>
<div class="row">
<div class="form-group form-md-line-input input-iconright"> <div class="col-md-6">
<asp:TextBox CssClass="form-control" ID="TxtNumDiasAguinaldo" Text="15" runat="server" MaxLength="10"></asp:TextBox> <div class="form-group form-md-line-input input-iconright">
<asp:Label runat="server" AssociatedControlID="TxtNumDiasAguinaldo" Text="Número de días Aguinaldo:"></asp:Label> <asp:TextBox CssClass="form-control" ID="TxtNumDiasAguinaldo" Text="15" runat="server" MaxLength="10"></asp:TextBox>
<i></i> <asp:Label runat="server" AssociatedControlID="TxtNumDiasAguinaldo" Text="Días Aguinaldo:"></asp:Label>
<i></i>
</div>
</div>
<div class="col-md-6">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox CssClass="form-control" ID="TxtPorPrimaVacacional" Text="25" runat="server" MaxLength="10"></asp:TextBox>
<asp:Label runat="server" AssociatedControlID="TxtPorPrimaVacacional" Text="Prima Vacacional:"></asp:Label>
<i>%</i>
</div>
</div>
</div> </div>
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox CssClass="form-control" ID="TxtPorPrimaVacacional" Text="25" runat="server" MaxLength="10"></asp:TextBox>
<asp:Label runat="server" AssociatedControlID="TxtPorPrimaVacacional" Text="Prima Vacacional:"></asp:Label>
<i>%</i>
</div>
<div class="form-group form-md-line-input input-iconright" runat="server" id="DVNetoPeriodo" visible="false" > <div class="form-group form-md-line-input input-iconright" runat="server" id="DVNetoPeriodo" visible="false" >
<asp:TextBox CssClass="form-control" ID="TxtNetoPeriodo" runat="server" MaxLength="10"></asp:TextBox> <asp:TextBox CssClass="form-control" ID="TxtNetoPeriodo" runat="server" MaxLength="10"></asp:TextBox>
<asp:Label runat="server" AssociatedControlID="TxtNetoPeriodo" Text="Neto Periodo:"></asp:Label> <asp:Label runat="server" AssociatedControlID="TxtNetoPeriodo" Text="Neto Periodo:"></asp:Label>
@@ -2398,7 +2403,7 @@
</div> </div>
<div class="portlet-body portlet-filter"> <div class="portlet-body portlet-filter">
<div class="row"> <div class="row">
<div class="form-group form-md-line-input input-iconright col-md-2"> <div class="form-group form-md-line-input input-iconright col-md-2" id="divCliente" runat="server" visible="false">
<label class="col-md-1 truncate" style="width: 100px; margin-top: -10px; margin-left: -15px; margin-bottom: 2px; font-size: 13px">Cliente: </label> <label class="col-md-1 truncate" style="width: 100px; margin-top: -10px; margin-left: -15px; margin-bottom: 2px; font-size: 13px">Cliente: </label>
<ADS:Dropdownlost CssClassDdl="form-control input-sm select2me" ID="DdlClienteAsistenciaC" Width="100%" data-metodo="getcliente" runat="server" DataTextField="Nombre" DataValueField="CveCliente" CssStyle="width: 100%;"></ADS:Dropdownlost> <ADS:Dropdownlost CssClassDdl="form-control input-sm select2me" ID="DdlClienteAsistenciaC" Width="100%" data-metodo="getcliente" runat="server" DataTextField="Nombre" DataValueField="CveCliente" CssStyle="width: 100%;"></ADS:Dropdownlost>
<%--<asp:DropDownList Width="100%" ID="DdlClienteAsistenciaC" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" CssClass=" form-control select2me "> <%--<asp:DropDownList Width="100%" ID="DdlClienteAsistenciaC" runat="server" AppendDataBoundItems="true" DataTextField="Nombre" DataValueField="CveCliente" CssClass=" form-control select2me ">
@@ -2456,10 +2461,10 @@
<table class="table table-striped table-hover Widthall" id="GvAsistenciaHeader"> <table class="table table-striped table-hover Widthall" id="GvAsistenciaHeader">
<%--<thead>--%> <%--<thead>--%>
<tr class="Titulos"> <tr class="Titulos">
<th style="width: 120px"> <th style="width: 130px">
<asp:LinkButton ID="LbFechaAsistencia" runat="server" CausesValidation="false" Text="Fecha" CommandArgument="" OnClick="LbOrden_Click"></asp:LinkButton> <asp:LinkButton ID="LbFechaAsistencia" runat="server" CausesValidation="false" Text="Fecha" CommandArgument="" OnClick="LbOrden_Click"></asp:LinkButton>
</th> </th>
<th style="width: 180px"> <th style="width: 180px" id="tdCliente1" runat="server" visible ="false">
<asp:LinkButton ID="LbClienteAsistencia" runat="server" CausesValidation="false" Text="Cliente" CommandArgument="Cliente1;1" OnClick="LbOrden_Click"> <asp:LinkButton ID="LbClienteAsistencia" runat="server" CausesValidation="false" Text="Cliente" CommandArgument="Cliente1;1" OnClick="LbOrden_Click">
<asp:Literal ID="ImgCliente1" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal> <asp:Literal ID="ImgCliente1" runat="server" Text=" <i class='fa fa-sort' style='color:#999' ></i>"></asp:Literal>
</asp:LinkButton> </asp:LinkButton>
@@ -2501,7 +2506,7 @@
<%--</thead>--%> <%--</thead>--%>
<tr> <tr>
<td> <td>
<div class="input-group input-sm date date-picker" data-date-format="dd/mm/yyyy" style="min-width: 100px; max-width: 200px;"> <div class="input-group input-sm date date-picker" data-date-format="dd/mm/yyyy" style="min-width: 110px; max-width: 200px;">
<asp:TextBox ID="TxtFechaAsistencia" runat="server" CausesValidation="true" CssClass="form-control input-sm"></asp:TextBox> <asp:TextBox ID="TxtFechaAsistencia" runat="server" CausesValidation="true" CssClass="form-control input-sm"></asp:TextBox>
<span class="input-group-btn "> <span class="input-group-btn ">
<asp:LinkButton ID="ImgCalendarioAsistencia" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton> <asp:LinkButton ID="ImgCalendarioAsistencia" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
@@ -2514,9 +2519,8 @@
<ajax:ValidatorCalloutExtender ID="VCOFechaAsistencia1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaAsistencia" Width="350px"></ajax:ValidatorCalloutExtender> <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> <ajax:ValidatorCalloutExtender ID="VCOFechaAsistencia2" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaAsistencia" Width="350px"></ajax:ValidatorCalloutExtender>
</td> </td>
<td> <td id="tdCliente2" runat="server" visible ="false">
<ADS:Dropdownlost CssClassDdl="form-control input-sm select2me" ID="DdlClienteAsistenciaA" Width="100%" data-metodo="getcliente" runat="server" DataTextField="Nombre" DataValueField="CveCliente" UsaWebService="true" CssStyle="width: 100%;"></ADS:Dropdownlost> <ADS:Dropdownlost CssClassDdl="form-control input-sm select2me" ID="DdlClienteAsistenciaA" Width="100%" data-metodo="getcliente" runat="server" DataTextField="Nombre" DataValueField="CveCliente" UsaWebService="true" CssStyle="width: 100%;"></ADS:Dropdownlost>
</td> </td>
<td> <td>
<asp:DropDownList Width="100%" ID="DdlProyectoAsistenciaA" runat="server" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="Proyecto" DataValueField="CveProyecto" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;" ValidationGroup="GrpGuardarAsistencia"> <asp:DropDownList Width="100%" ID="DdlProyectoAsistenciaA" runat="server" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="Proyecto" DataValueField="CveProyecto" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 100px !important;" ValidationGroup="GrpGuardarAsistencia">
@@ -2529,7 +2533,7 @@
</asp:DropDownList> </asp:DropDownList>
</td> </td>
<td> <td>
<asp:DropDownList Width="100%" ID="DdlTipoAsistencias" runat="server" DataTextField="Tipo" DataValueField="CveAsistenciasInasistencias" CssClass="table-group-action-input form-control input-inline input-small input-sm" Style="width: 70px !important;" ValidationGroup="GrpGuardarAsistencia" <asp:DropDownList Width="100%" ID="DdlTipoAsistencias" runat="server" DataTextField="Tipo" DataValueField="CveAsistenciasInasistencias" CssClass="table-group-action-input form-control input-inline input-small input-sm" Style="min-width: 70px" ValidationGroup="GrpGuardarAsistencia"
AutoPostBack="true" OnSelectedIndexChanged="DdlTipoAsistencias_SelectedIndexChanged"> AutoPostBack="true" OnSelectedIndexChanged="DdlTipoAsistencias_SelectedIndexChanged">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem> <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList> </asp:DropDownList>
@@ -2542,7 +2546,7 @@
<asp:TextBox CssClass="form-control input-sm" ID="TxtHorasTriples" runat="server" MaxLength="3" Text="0" Width="50px"></asp:TextBox></td> <asp:TextBox CssClass="form-control input-sm" ID="TxtHorasTriples" runat="server" MaxLength="3" Text="0" Width="50px"></asp:TextBox></td>
<td> <td>
<asp:DropDownList Width="100%" ID="DdlMotivoHoraExtra" runat="server" AppendDataBoundItems="true" DataTextField="MotivoHoraExtra" DataValueField="CveMotivoHoraExtra" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 110px !important;"> <asp:DropDownList Width="100%" ID="DdlMotivoHoraExtra" runat="server" AppendDataBoundItems="true" DataTextField="MotivoHoraExtra" DataValueField="CveMotivoHoraExtra" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 110px !important;">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem> <asp:ListItem Selected="True" Text="-" Value="-1"></asp:ListItem>
</asp:DropDownList> </asp:DropDownList>
</td> </td>
<td> <td>
@@ -2563,7 +2567,7 @@
<asp:Literal ID="LtlFecha" runat="server"></asp:Literal> <asp:Literal ID="LtlFecha" runat="server"></asp:Literal>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField> <asp:TemplateField Visible="false">
<HeaderTemplate>Cliente</HeaderTemplate> <HeaderTemplate>Cliente</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlCliente" runat="server" Text='<%# Eval("Cliente") %>'></asp:Literal> <asp:Literal ID="LtlCliente" runat="server" Text='<%# Eval("Cliente") %>'></asp:Literal>
@@ -2584,39 +2588,39 @@
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>Asistencia</HeaderTemplate> <HeaderTemplate>Asistencia</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:DropDownList ID="DdlTipoAsistencias" runat="server" TabIndex="2" DataTextField="Tipo" DataValueField="CveAsistenciasInasistencias" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 70px !important;"></asp:DropDownList> <asp:DropDownList ID="DdlTipoAsistencias" runat="server" TabIndex="2" DataTextField="Tipo" DataValueField="CveAsistenciasInasistencias" Class="table-group-action-input form-control input-inline input-small input-sm" Style="min-width: 70px;"></asp:DropDownList>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>% Pago</HeaderTemplate> <HeaderTemplate>% Pago</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:TextBox CssClass="form-control" ID="TxtPorPago" TabIndex="1" runat="server" MaxLength="3" Text="100" Width="44px"></asp:TextBox> <asp:TextBox CssClass="input-group input-sm" ID="TxtPorPago" TabIndex="1" runat="server" MaxLength="3" Text="100" Width="44px"></asp:TextBox>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>Hrs Dob.</HeaderTemplate> <HeaderTemplate>Hrs Dob.</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:TextBox CssClass="form-control" ID="TxtHorasDobles" TabIndex="1" runat="server" MaxLength="3" Text="0" Width="50px"></asp:TextBox> <asp:TextBox CssClass="form-control input-sm" ID="TxtHorasDobles" TabIndex="1" runat="server" MaxLength="3" Text="0" Width="50px"></asp:TextBox>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>Hrs Trip.</HeaderTemplate> <HeaderTemplate>Hrs Trip.</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:TextBox CssClass="form-control" ID="TxtHorasTriples" TabIndex="1" runat="server" MaxLength="3" Text="0" Width="50px"></asp:TextBox> <asp:TextBox CssClass="form-control input-sm" ID="TxtHorasTriples" TabIndex="1" runat="server" MaxLength="3" Text="0" Width="50px"></asp:TextBox>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>Motivo H. Extras</HeaderTemplate> <HeaderTemplate>Motivo H. Extras</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:DropDownList ID="DdlMotivoHoraExtra" runat="server" TabIndex="2" AppendDataBoundItems="true" DataTextField="MotivoHoraExtra" DataValueField="CveMotivoHoraExtra" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 110px !important;"> <asp:DropDownList ID="DdlMotivoHoraExtra" runat="server" TabIndex="2" AppendDataBoundItems="true" DataTextField="MotivoHoraExtra" DataValueField="CveMotivoHoraExtra" Class="table-group-action-input form-control input-inline input-small input-sm" Style="width: 110px !important;">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem> <asp:ListItem Selected="True" Text="-" Value="-1"></asp:ListItem>
</asp:DropDownList> </asp:DropDownList>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>Obs.</HeaderTemplate> <HeaderTemplate>Obs.</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:TextBox CssClass="form-control" ID="TxtObservaciones" TabIndex="3" runat="server" Width="84px" MaxLength="150"></asp:TextBox> <asp:TextBox CssClass="form-control input-sm" ID="TxtObservaciones" TabIndex="3" runat="server" Width="84px" MaxLength="150"></asp:TextBox>
</ItemTemplate> </ItemTemplate>
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField ItemStyle-HorizontalAlign="Left" Visible="false"> <asp:TemplateField ItemStyle-HorizontalAlign="Left" Visible="false">
@@ -2872,10 +2876,11 @@
</div> </div>
<div class="tools"><a href="javascript;" class="collapse" data-original-title="" title=""></a></div> <div class="tools"><a href="javascript;" class="collapse" data-original-title="" title=""></a></div>
<div class="actions"> <div class="actions">
<div class="btn-group"> <div class="btn-group">
<asp:HyperLink data-toggle="modal" data-target="#ModalAddVacaciones" runat="server" class="btn green btn-outline btn-sm"> <asp:LinkButton runat="server" id="LnkSolicitarVacaciones" CssClass="btn green btn-outline btn-sm" OnClick="LnkSolicitarVacaciones_Click" > <i class="fa fa-plus"></i> Solicitar Vacaciones</asp:LinkButton>
<%--<asp:HyperLink data-toggle="modal" data-target="#ModalAddVacaciones" runat="server" class="btn green btn-outline btn-sm">
<i class="fa fa-plus"></i> Solicitar Vacaciones <i class="fa fa-plus"></i> Solicitar Vacaciones
</asp:HyperLink> </asp:HyperLink>--%>
</div> </div>
</div> </div>
@@ -3034,7 +3039,7 @@
</div> </div>
<div class="modal-body"> <div class="modal-body">
<asp:UpdatePanel runat="server" ID="UpdatePanel2" UpdateMode="Conditional"> <asp:UpdatePanel runat="server" ID="UpSolicitarVacaciones" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<div class="row"> <div class="row">
@@ -3061,11 +3066,12 @@
</div> </div>
</div> </div>
<asp:Panel runat="server" ID="PnlVacfechas" CssClass="row"> <asp:Panel runat="server" ID="PnlVacfechas" CssClass="row">
<div class="col-md-6"> <div class="col-md-3">
<div class="form-group form-md-line-input input-iconright calendarlinealinput" style="width: 100px !important">
<div class="form-group form-md-line-input input-iconright calendarlinealinput" style="width: 100px !important">
<div class="input-group input-sm date date-picker" data-date-format="dd/mm/yyyy" style="width: 160px;"> <div class="input-group input-sm date date-picker" data-date-format="dd/mm/yyyy" style="width: 160px;">
<asp:TextBox ID="TxtFechaInicioVac" runat="server" CausesValidation="true" CssClass="form-control input-sm"></asp:TextBox> <asp:TextBox ID="TxtFechaInicioVac" runat="server" CausesValidation="true" CssClass="form-control input-sm" onblur="calculaFechasVacaciones();" ></asp:TextBox>
<span class="input-group-btn "> <span class="input-group-btn ">
<asp:LinkButton ID="ImgTxtFechaInicioVac" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton> <asp:LinkButton ID="ImgTxtFechaInicioVac" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
</span> </span>
@@ -3074,13 +3080,25 @@
<label>Fecha Inicial</label> <label>Fecha Inicial</label>
</div> </div>
</div> </div>
</div> </div>
<asp:Panel runat="server" ID="PnlVacDiasPago" CssClass="col-md-3">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtVacDiasPago" CssClass="form-control input-sm form-small" type="number" runat="server" style="margin-top:20px!important" onblur="calculaFechasVacaciones();" ></asp:TextBox>
<asp:Label runat="server" AssociatedControlID="TxtVacDiasPago" style="margin-top:10px!important">Días pago</asp:Label>
</div>
</asp:Panel>
<div class="col-md-6"> <div class="col-md-6">
<div class="form-group form-md-line-input input-iconright " style="width: 100px !important"> <div class="form-group form-md-line-input input-iconright " style="width: 100px !important">
<div class="input-group input-sm date date-picker" data-date-format="dd/mm/yyyy" style="width: 160px;"> <div class="input-group input-sm date date-picker" data-date-format="dd/mm/yyyy" style="width: 160px;">
<asp:TextBox ID="TxtFechaFinVac" runat="server" CausesValidation="true" CssClass="form-control input-sm"></asp:TextBox> <asp:TextBox ID="TxtFechaFinVac" runat="server" CausesValidation="true" CssClass="form-control input-sm" ClientIDMode="Static"></asp:TextBox>
<span class="input-group-btn "> <span class="input-group-btn " >
<asp:LinkButton ID="ImgTxtFechaFinVac" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton> <asp:LinkButton ID="ImgTxtFechaFinVac" class="btn default " Text="<i class='fa fa-calendar'></i>" style="display:none!important" runat="server"></asp:LinkButton>
</span> </span>
<ajax:MaskedEditExtender ID="MEETxtFechaFinVac" runat="server" TargetControlID="TxtFechaFinVac" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender> <ajax:MaskedEditExtender ID="MEETxtFechaFinVac" runat="server" TargetControlID="TxtFechaFinVac" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender runat="server" ID="CETxtFechaFinVac" TargetControlID="TxtFechaFinVac" PopupButtonID="ImgTxtFechaFinVac" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender> <ajax:CalendarExtender runat="server" ID="CETxtFechaFinVac" TargetControlID="TxtFechaFinVac" PopupButtonID="ImgTxtFechaFinVac" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
@@ -3093,7 +3111,7 @@
<asp:Panel runat="server" ID="PnlVacDias" CssClass="row"> <asp:Panel runat="server" ID="PnlVacDias" CssClass="row">
<div class="col-md-6"> <div class="col-md-6">
<div class="form-group form-md-line-input input-iconright calendarlinealinput form-small"> <div class="form-group form-md-line-input input-iconright calendarlinealinput form-small">
<asp:TextBox ID="Txtdiasinabiles" runat="server" TextMode="Number" CausesValidation="true" CssClass="form-control input-sm form-small"></asp:TextBox> <asp:TextBox ID="Txtdiasinabiles" runat="server" TextMode="Number" CausesValidation="true" CssClass="form-control input-sm form-small" ClientIDMode="Static"></asp:TextBox>
<asp:Label runat="server" AssociatedControlID="Txtdiasinabiles">Días feriados</asp:Label> <asp:Label runat="server" AssociatedControlID="Txtdiasinabiles">Días feriados</asp:Label>
</div> </div>
</div> </div>
@@ -3119,12 +3137,7 @@
</div> </div>
</div> </div>
</div> </div>
<asp:Panel runat="server" ID="PnlVacDiasPago" CssClass="col-md-6">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtVacDiasPago" CssClass="form-control input-sm form-small" type="number" runat="server"></asp:TextBox>
<asp:Label runat="server" AssociatedControlID="TxtVacDiasPago">Días pago</asp:Label>
</div>
</asp:Panel>
</asp:Panel> </asp:Panel>
<asp:Panel runat="server" ID="PnlVacChecks" CssClass="row"> <asp:Panel runat="server" ID="PnlVacChecks" CssClass="row">
@@ -3141,6 +3154,9 @@
<asp:CheckBox ID="ChkVacCobrarIMSS" CssClass="chksino " Checked="true" Text=" " runat="server" /> <asp:CheckBox ID="ChkVacCobrarIMSS" CssClass="chksino " Checked="true" Text=" " runat="server" />
</div> </div>
</asp:Panel> </asp:Panel>
<asp:Button runat="server" ClientIDMode="Static" ID="LnkCalculaFechasVacaciones" OnClick="LnkCalculaFechasVacaciones_Click" style="display:none!important" ></asp:Button>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</div> </div>
@@ -5744,6 +5760,7 @@
</div> </div>
<iframe id="my_iframe" style="display: none;"></iframe> <iframe id="my_iframe" style="display: none;"></iframe>
</asp:Content> </asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server"> <asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
<script src="/Metronic/assets/global/plugins/dropzone/dropzone.js"></script> <script src="/Metronic/assets/global/plugins/dropzone/dropzone.js"></script>
@@ -5758,6 +5775,30 @@
height: 50 height: 50
}); });
$('[data-toggle="tooltip"]').tooltip(); $('[data-toggle="tooltip"]').tooltip();
$("#Txtdiasinabiles").prop("readonly", true);
$("#Txtdiasinabiles").on("paste", function (event) {
event.preventDefault();
});
$("#Txtdiasinabiles").on("contextmenu", function (event) {
if (event.which === 3) {
event.preventDefault();
}
});
$("#TxtFechaFinVac").prop("readonly", true);
$("#TxtFechaFinVac").on("paste", function (event) {
event.preventDefault();
});
$("#TxtFechaFinVac").on("contextmenu", function (event) {
if (event.which === 3) {
event.preventDefault();
}
});
}); });
} }
@@ -7272,5 +7313,11 @@
return pstCURP return pstCURP
} }
function calculaFechasVacaciones(){
$('#LnkCalculaFechasVacaciones').click();
}
</script> </script>
</asp:Content> </asp:Content>

121
RH/Personal.aspx.vb
View File

@@ -1048,22 +1048,14 @@ Partial Class RH_Personal
End Sub End Sub
Private Sub SetValues() Private Sub SetValues()
ViewState("Orden") = String.Empty ViewState("Orden") = String.Empty
'DdlClienteAsignado.Attributes.Add("onclick", "CargaClientes();")
'DdlClienteAsistenciaC.Attributes.Add("onclick", "CargaClientes();")
'DdlClienteAsistenciaA.Attributes.Add("onclick", "CargaClientes();")
CargaClientes() CargaClientes()
Dim fechainicioasistencia As String Dim fechainicioasistencia As String
Dim fechaFinasistencia As String Dim fechaFinasistencia As String
If Now.Day >= 15 Then If Now.Day >= 15 Then
'fechainicioasistencia = String.Format("{0:01/MM/yyyy}", Now)
'fechaFinasistencia = String.Format("{0:15/MM/yyyy}", Now)
fechainicioasistencia = String.Format("{0:16/MM/yyyy}", Now) fechainicioasistencia = String.Format("{0:16/MM/yyyy}", Now)
Dim dateendasis As DateTime = String.Format("{0:01/MM/yyyy}", Now).ToDateTime().AddMonths(1).AddDays(-1) Dim dateendasis As DateTime = String.Format("{0:01/MM/yyyy}", Now).ToDateTime().AddMonths(1).AddDays(-1)
fechaFinasistencia = String.Format("{0:dd/MM/yyyy}", dateendasis) fechaFinasistencia = String.Format("{0:dd/MM/yyyy}", dateendasis)
Else Else
'Dim dateendasis As DateTime = String.Format("{0:01/MM/yyyy}", Now).ToDateTime().AddDays(-1)
'fechainicioasistencia = String.Format("{0:16/MM/yyyy}", dateendasis)
'fechaFinasistencia = String.Format("{0:dd/MM/yyyy}", dateendasis)
fechainicioasistencia = String.Format("{0:01/MM/yyyy}", Now) fechainicioasistencia = String.Format("{0:01/MM/yyyy}", Now)
fechaFinasistencia = String.Format("{0:15/MM/yyyy}", Now) fechaFinasistencia = String.Format("{0:15/MM/yyyy}", Now)
End If End If
@@ -1089,12 +1081,18 @@ Partial Class RH_Personal
DdlSubProyectoAsistenciasC.SelectedValue = Request("CveSubProyecto") DdlSubProyectoAsistenciasC.SelectedValue = Request("CveSubProyecto")
End If End If
End If End If
'DdlProyectoAsistenciaC
'DdlSubProyectoAsistenciasC
End If End If
TxtFechaICredito.Text = $"01/01/{Now.Year}" TxtFechaICredito.Text = $"01/01/{Now.Year}"
TxtFechaFCredito.Text = Now.ToShortDateString TxtFechaFCredito.Text = Now.ToShortDateString
If UsuarioActual.Empresa.Funcionalidad(509) = "1" Then
divCliente.Visible = True
tdCliente1.Visible = True
tdCliente2.Visible = True
GVAsistencia.Columns(1).Visible = True
End If
End Sub End Sub
Private Sub SetPermisos() Private Sub SetPermisos()
'Permisos 'Permisos
@@ -1147,20 +1145,29 @@ Partial Class RH_Personal
End Sub End Sub
Protected Sub cargaagrodeptos() Protected Sub cargaagrodeptos()
Using objrh As New ClsRH()
If (objrh.AgroDepartamentosGet(UsuarioActual.CveEmpresa, -1, -1)) Then If UsuarioActual.Empresa.Funcionalidad(590) = "1" Then 'empresa agricola
Dim dt As DataTable = objrh.DtResultados.FiltraParametros(String.Format("CveTipoTrabajador ={0}", DdlTipoTrabajador.SelectedValue.ToEntero())) Using objrh As New ClsRH()
Dim drow As DataRow = dt.NewRow() divAgroTipoTrabajador.Visible = True
drow("CveDepartamento") = "-1" divAgroDepto.Visible = True
drow("Departamento") = "Seleccione" divMedioTransporte.Visible = True
dt.Rows.InsertAt(drow, 0) divAgro1.Visible = True
If DDlAgroDepartamento.Items.Count() > 0 Then divAgro2.Visible = True
DDlAgroDepartamento.SelectedValueExist("-1") If (objrh.AgroDepartamentosGet(UsuarioActual.CveEmpresa, -1, -1)) Then
Dim dt As DataTable = objrh.DtResultados.FiltraParametros(String.Format("CveTipoTrabajador ={0}", DdlTipoTrabajador.SelectedValue.ToEntero()))
Dim drow As DataRow = dt.NewRow()
drow("CveDepartamento") = "-1"
drow("Departamento") = "Seleccione"
dt.Rows.InsertAt(drow, 0)
If DDlAgroDepartamento.Items.Count() > 0 Then
DDlAgroDepartamento.SelectedValueExist("-1")
End If
DDlAgroDepartamento.DataSource = dt
DDlAgroDepartamento.DataBind()
End If End If
DDlAgroDepartamento.DataSource = dt End Using
DDlAgroDepartamento.DataBind() End If
End If
End Using
End Sub End Sub
Private Sub CargaEscolaridad() Private Sub CargaEscolaridad()
DdlEscolaridad.DataSource = GlobalDTEscolaridad DdlEscolaridad.DataSource = GlobalDTEscolaridad
@@ -1786,7 +1793,7 @@ Partial Class RH_Personal
salarioVariable = If(salarioVariable > 0, salarioVariable, 0) salarioVariable = If(salarioVariable > 0, salarioVariable, 0)
TxtSalarioCotizado.Text = ObjPersonal.SalarioDiarioSS.ToString() TxtSalarioCotizado.Text = ObjPersonal.SalarioDiarioSS.ToString()
TxtFISalariodiario.Text = ObjPersonal.SalarioDiario.ToString() TxtFISalariodiario.Text = ObjPersonal.SalarioDiario.ToString()
TxtBono.Text = ObjPersonal.Bono.ToString() 'TxtBono.Text = ObjPersonal.Bono.ToString()
TxtNumDiasAguinaldo.Text = ObjPersonal.NumDiasAguinaldo.ToString() TxtNumDiasAguinaldo.Text = ObjPersonal.NumDiasAguinaldo.ToString()
TxtFIAguinaldo.Text = ObjPersonal.NumDiasAguinaldo.ToString() TxtFIAguinaldo.Text = ObjPersonal.NumDiasAguinaldo.ToString()
TxtPorPrimaVacacional.Text = ObjPersonal.PorPrimaVacacional.ToString() TxtPorPrimaVacacional.Text = ObjPersonal.PorPrimaVacacional.ToString()
@@ -1889,6 +1896,8 @@ Partial Class RH_Personal
TxtFechaFinVac.Text = Now.AddDays(VacDiasDisponibles).ToString("dd/MM/yyyy") TxtFechaFinVac.Text = Now.AddDays(VacDiasDisponibles).ToString("dd/MM/yyyy")
'PERSONAL ALTAS 'PERSONAL ALTAS
If ObjPersonal.GetPersonalAltas(CvePersonal) Then If ObjPersonal.GetPersonalAltas(CvePersonal) Then
GvPersonalAltas.DataSource = ObjPersonal.DtResultados GvPersonalAltas.DataSource = ObjPersonal.DtResultados
@@ -3746,7 +3755,7 @@ Partial Class RH_Personal
params.Add(New ReportParameter("SDD", ObjPersonal.SalarioDiario.ToString())) params.Add(New ReportParameter("SDD", ObjPersonal.SalarioDiario.ToString()))
params.Add(New ReportParameter("SDI", ObjPersonal.SDI.ToString())) params.Add(New ReportParameter("SDI", ObjPersonal.SDI.ToString()))
params.Add(New ReportParameter("SalarioIMSS", ObjPersonal.SalarioDiarioSS.ToString())) params.Add(New ReportParameter("SalarioIMSS", ObjPersonal.SalarioDiarioSS.ToString()))
params.Add(New ReportParameter("Bono", ObjPersonal.Bono.ToString())) params.Add(New ReportParameter("Bono", ""))
params.Add(New ReportParameter("DiasAguinaldo", ObjPersonal.NumDiasAguinaldo.ToString())) params.Add(New ReportParameter("DiasAguinaldo", ObjPersonal.NumDiasAguinaldo.ToString()))
params.Add(New ReportParameter("PrimaVacacional", ObjPersonal.PorPrimaVacacional.ToString())) params.Add(New ReportParameter("PrimaVacacional", ObjPersonal.PorPrimaVacacional.ToString()))
params.Add(New ReportParameter("MetodoPago", If(DdlMetodoPago.SelectedValue = "-1", "", DdlMetodoPago.SelectedItem.Text))) params.Add(New ReportParameter("MetodoPago", If(DdlMetodoPago.SelectedValue = "-1", "", DdlMetodoPago.SelectedItem.Text)))
@@ -3836,7 +3845,7 @@ Partial Class RH_Personal
params.Add(New ReportParameter("SDD", ObjPersonal.SalarioDiario.ToString())) params.Add(New ReportParameter("SDD", ObjPersonal.SalarioDiario.ToString()))
params.Add(New ReportParameter("SDI", ObjPersonal.SDI.ToString())) params.Add(New ReportParameter("SDI", ObjPersonal.SDI.ToString()))
params.Add(New ReportParameter("SalarioIMSS", ObjPersonal.SalarioDiarioSS.ToString())) params.Add(New ReportParameter("SalarioIMSS", ObjPersonal.SalarioDiarioSS.ToString()))
params.Add(New ReportParameter("Bono", ObjPersonal.Bono.ToString())) params.Add(New ReportParameter("Bono", ""))
params.Add(New ReportParameter("DiasAguinaldo", ObjPersonal.NumDiasAguinaldo.ToString())) params.Add(New ReportParameter("DiasAguinaldo", ObjPersonal.NumDiasAguinaldo.ToString()))
params.Add(New ReportParameter("PrimaVacacional", ObjPersonal.PorPrimaVacacional.ToString())) params.Add(New ReportParameter("PrimaVacacional", ObjPersonal.PorPrimaVacacional.ToString()))
params.Add(New ReportParameter("MetodoPago", If(DdlMetodoPago.SelectedValue = "-1", "", DdlMetodoPago.SelectedItem.Text))) params.Add(New ReportParameter("MetodoPago", If(DdlMetodoPago.SelectedValue = "-1", "", DdlMetodoPago.SelectedItem.Text)))
@@ -7807,5 +7816,65 @@ Partial Class RH_Personal
#End Region #End Region
Protected Sub LnkSolicitarVacaciones_Click(sender As Object, e As EventArgs)
TxtVacDiasPago.Text = VacDiasDisponibles.ToString
Dim diaDescanso As Integer = GlobalDTTurno(UsuarioActual.CveEmpresa).FiltroPrimeroValor("DiaDescanso", $" CveTurno = {DdlTurno.SelectedValue.ToEntero}").ToEntero
diaDescanso = If(diaDescanso <= 0, 1, diaDescanso)
ContarDiasDeLaSemana(TxtFechaInicioVac.Text.ToDate, TxtVacDiasPago.Text.ToEntero)
If Not diaDescanso > 0 Then
Alert("El turno no tiene día de descanso, provisionalmente se tomara el domingo.", TipoMensaje.MsgAdvertencia)
End If
RegistraScript("$('#ModalAddVacaciones').modal('show');")
End Sub
Private Sub ContarDiasDeLaSemana(fechaInicio As Date, diasVacaciones As Integer)
If TxtVacDiasPago.Text.ToEntero > VacDiasDisponibles Then
TxtVacDiasPago.Text = VacDiasDisponibles.ToString
End If
Dim diaDescanso As Integer = GlobalDTTurno(UsuarioActual.CveEmpresa).FiltroPrimeroValor("DiaDescanso", $" CveTurno = {DdlTurno.SelectedValue.ToEntero}").ToEntero
diaDescanso = If(diaDescanso <= 0, 1, diaDescanso)
Dim DiasAgregados As Integer = 0
Dim FechaFin As Date = fechaInicio
For x = 2 To diasVacaciones
Dim day_of_week = CType(FechaFin.DayOfWeek, Integer) + 1
If day_of_week = diaDescanso Then
FechaFin = FechaFin.AddDays(2)
DiasAgregados = DiasAgregados + 1
Else
FechaFin = FechaFin.AddDays(1)
day_of_week = CType(FechaFin.DayOfWeek, Integer) + 1
If day_of_week = diaDescanso Then
DiasAgregados = DiasAgregados + 1
End If
End If
Next
TxtFechaFinVac.Text = FechaFin.ToString
Txtdiasinabiles.Text = DiasAgregados.ToString
UpSolicitarVacaciones.Update()
End Sub
Protected Sub LnkCalculaFechasVacaciones_Click(sender As Object, e As EventArgs)
ContarDiasDeLaSemana(TxtFechaInicioVac.Text.ToDate, TxtVacDiasPago.Text.ToEntero)
End Sub
End Class End Class

42
SigAyuda.aspx
View File

@@ -621,6 +621,48 @@
</ul> </ul>
</div> </div>
<%-- O I --%>
<div class="mt-list-container list-todo">
<div class="list-todo-line"></div>
<ul>
<li class="mt-list-item">
<div class="list-todo-icon bg-white">
<i class="fa fa-users"></i>
</div>
<div class="list-todo-item grey">
<a class="list-toggle-container font-white" data-toggle="collapse" href="#divtaskOI" aria-expanded="false">
<div class="list-toggle done uppercase">
<div class="list-toggle-title bold">Organización Interna</div>
<div class="badge badge-default pull-right bold">1</div>
</div>
</a>
<div class="task-list panel-collapse collapse " id="divtaskOI" runat="server" ClientIDMode="Static">
<ul>
<li class="task-list-item done">
<div class="task-icon">
<a href="javascript:;">
<i class="fa fa-file-pdf-o fa-3"></i>
</a>
</div>
<div class="task-status">
<a class="done" href="javascript:downFile('Manuales/OI/Manual OI.pdf');">
<i class="fa fa-download fa-3"></i>
</a>
</div>
<div class="task-content">
<h4 class="uppercase bold">Manual OI
</h4>
</div>
</li>
</ul>
</div>
</div>
</li>
</ul>
</div>
<%--</div> <%--</div>
<div class="tab-content"> <div class="tab-content">

51
SigAyuda.aspx.vb
View File

@@ -1,32 +1,45 @@
 Option Explicit On
Partial Class Metronic_SigAyuda Option Strict On
Inherits System.Web.UI.Page
Imports Extensiones
Partial Class Metronic_SigAyuda
Inherits ClsPaginas
Private Sub Metronic_SigAyuda_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
If usuarioActual.CveEmpresa.Contiene(13, 83) Then
divtaskOI.Visible = True
End If
End If
End Sub
Protected Sub btnDownload_Click(sender As Object, e As EventArgs) Protected Sub btnDownload_Click(sender As Object, e As EventArgs)
Try Try
Dim docto As String = TxtDocto.Text.Replace("/", "\") Dim docto As String = TxtDocto.Text.Replace("/", "\")
Dim path As String = $"{AppDomain.CurrentDomain.BaseDirectory}{docto}" Dim path As String = $"{AppDomain.CurrentDomain.BaseDirectory}{docto}"
Dim file As New System.IO.FileInfo(path) Dim file As New System.IO.FileInfo(path)
Dim mimeType As String = "text/plain" Dim mimeType As String = "text/plain"
Try Try
mimeType = MimeMapping.GetMimeMapping(path) mimeType = MimeMapping.GetMimeMapping(path)
Catch ex As Exception Catch ex As Exception
End Try End Try
'Response.Write(path) 'Response.Write(path)
Response.Clear() Response.Clear()
Response.ClearHeaders() Response.ClearHeaders()
Response.ClearContent() Response.ClearContent()
Response.AddHeader("Content-Disposition", $"attachment; filename= {Uri.EscapeDataString(file.Name)}") Response.AddHeader("Content-Disposition", $"attachment; filename= {Uri.EscapeDataString(file.Name)}")
Response.AddHeader("Content-Length", file.Length.ToString()) Response.AddHeader("Content-Length", file.Length.ToString())
Response.ContentType = mimeType Response.ContentType = mimeType
Response.Flush() Response.Flush()
Response.TransmitFile(file.FullName) Response.TransmitFile(file.FullName)
Response.End() Response.End()
Catch ex As Exception Catch ex As Exception
'GuardaLog($"GenerateFile: {ex.ToString()}") 'GuardaLog($"GenerateFile: {ex.ToString()}")
End Try End Try
End Sub End Sub
End Class End Class

2
Sistemas/UsuarioDetalle.aspx.vb
View File

@@ -3838,7 +3838,7 @@ Partial Class Sistemas_UsuarioDetalle
Dim Retorno = False Dim Retorno = False
If CveUsuarioClonado > 0 Then If CveUsuarioClonado > 0 Then
If ObjUsuarios.ClonarUsuario(CveUsuario, CveUsuarioClonado, ChkEmpresas.Checked, ChkModulos.Checked, ChkPermisos.Checked, ChkProyectos.Checked, ChkAlmacenes.Checked, ChkEstatusOC.Checked, ChkEstatusOS.Checked) Then If ObjUsuarios.ClonarUsuario(CveUsuario, CveUsuarioClonado, ChkEmpresas.Checked, ChkModulos.Checked, ChkPermisos.Checked, ChkProyectos.Checked, ChkAlmacenes.Checked, ChkEstatusOC.Checked, ChkEstatusOS.Checked, UsuarioActual.CveUsuario) Then
Alert("El usuario fue clonado con exito.", TipoMensaje.MsgInformacion, "document.location.href=""/Sistemas/Usuarios.aspx"";") Alert("El usuario fue clonado con exito.", TipoMensaje.MsgInformacion, "document.location.href=""/Sistemas/Usuarios.aspx"";")
Retorno = True Retorno = True
Else Else

122
Site.master.vb
View File

@@ -1,17 +1,12 @@
Option Explicit On Option Explicit On
Option Strict On Option Strict On
Imports System.Activities.Statements
Imports System.Data Imports System.Data
Imports System.IO Imports System.IO
Imports System.Security.Cryptography.X509Certificates Imports System.Security.Cryptography.X509Certificates
Imports ADSNetLibrary.SIGAPI.Services.SAT.DescargaCFDI Imports ADSNetLibrary.SIGAPI.Services.SAT.DescargaCFDI
Imports DocumentFormat.OpenXml.Math
Imports DocumentFormat.OpenXml.Packaging
Imports DocumentFormat.OpenXml.Spreadsheet Imports DocumentFormat.OpenXml.Spreadsheet
Imports Extensiones Imports Extensiones
'Imports Microsoft.AspNet.SignalR.Client
'Imports ChatHub
Partial Class Site Partial Class Site
Inherits BaseMasterPage Inherits BaseMasterPage
@@ -383,19 +378,6 @@ Partial Class Site
dt.ReadXml(String.Format("{0}\Menu\ERP\{1}.xml", AppDomain.CurrentDomain.BaseDirectory, UsuarioActual.CveUsuario)) dt.ReadXml(String.Format("{0}\Menu\ERP\{1}.xml", AppDomain.CurrentDomain.BaseDirectory, UsuarioActual.CveUsuario))
End If 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 CveModulo As Integer = CveModulomasterpage.Text.ToEntero()
'Dim ScriptColorGrupoModulo As String = ""
'Dim LinkBase = "javascript:;"
'Dim HeaderBar As New StringBuilder("<li><i class='fa fa-home'></i><a href='/Inicio.aspx'>Inicio</a>")
'Dim LinkPadre = ""
'Dim Linkpapa As String = ""
'Dim LinkHijo = ""
'Dim Linkson As String = ""
'Dim LinkNieto = ""
'Dim ClassActive As String
'CveModuloPadreSeleccionado = 0 : CveModuloHijoSeleccionado = 0 : CveModuloNietoSeleccionado = 0
Dim menuobj = New MenuModal() Dim menuobj = New MenuModal()
menuobj.dt = dt menuobj.dt = dt
menuobj.CveModuloSeleccionado = CveModulomasterpage.Text.ToEntero() menuobj.CveModuloSeleccionado = CveModulomasterpage.Text.ToEntero()
@@ -408,116 +390,14 @@ Partial Class Site
menuobj.HeaderBar.Append(stritem) menuobj.HeaderBar.Append(stritem)
Next Next
'Dim MenuHTML As New StringBuilder
'For Each drP As DataRow In Inicio
' CveModuloPadre = drP("CveModulo").ToString().ToEntero()
' LinkPadre = drP("LIGA").ToString()
' If drP("PopUp").ToString() = "S" Then LinkPadre = String.Format("javascript:AbrirVentana('{0}',{1},{2},'N');", drP("LIGA"), drP("ANCHO"), drP("ALTO"))
' Dim Hijos = From h In dt.AsEnumerable Where h!CvePadre.Equals(CveModuloPadre) Order By h!Orden
' If CveModulo = drP("CveModulo").ToString().ToEntero() Then
' HeaderBar.AppendFormat("<i class='fa fa-angle-right'></i></li> <li><a href='{0}'>{1}</a>", LinkPadre, drP("Modulo").ToString())
' ScriptColorGrupoModulo = ColorPage(drP("CveGrupoModulo").ToString().ToEntero())
' End If
' If Hijos.Count > 0 Then
' Linkpapa = LinkPadre
' LinkPadre = LinkBase
' MenuHTML.AppendFormat("<li id='m{3}'><a href='{0}'>{2}<span class='title'>{1}</span><span id='j{3}' ></span><span class='arrow '></span></a><ul class='sub-menu'>", LinkPadre, drP("Modulo"), If(drP("Estilo").ToString() <> "", String.Format("<i class='{0}'></i>", drP("Estilo")), ""), drP("CveModulo"))
' For Each drH As DataRow In Hijos
' Dim CveModuloHijo As Integer = drH("CveModulo").ToString().ToEntero()
' LinkHijo = drH("LIGA").ToString()
' If (drH("IsAngular").ToString() = "1") Then
' LinkHijo = String.Format("{1}:84{0}", drH("LIGA"), strdomain)
' End If
' If CveModulo = drH("CveModulo").ToString().ToEntero() Then
' CveModuloPadreSeleccionado = CveModuloPadre
' ClassActive = "class='active'"
' HeaderBar.AppendFormat("<i class='fa fa-angle-right'></i> </li><li><a href='{0}'>{1}</a> <i class='fa fa-angle-right'></i> </li><li><a href='{2}'>{3}</a>", Linkpapa, drP("Modulo").ToString(), LinkHijo, drH("Modulo").ToString())
' ScriptColorGrupoModulo = ColorPage(drH("CveGrupoModulo").ToString().ToEntero())
' Else
' ClassActive = ""
' End If
' If drH("PopUp").ToString() = "S" Then LinkHijo = String.Format("javascript:AbrirVentana('{0}',{1},{2},'N');", drH("LIGA"), drH("ANCHO"), drH("ALTO"))
' Dim Nietos = From h In dt.AsEnumerable Where h!CvePadre.Equals(CveModuloHijo) Order By h!Orden
' If Nietos.Count > 0 Then
' Linkson = LinkHijo
' LinkHijo = LinkBase
' MenuHTML.AppendFormat("<li id='m{3}'><a href='{0}'>{2}{1}<span class='arrow '></span> </a><ul class='sub-menu'>", LinkHijo, drH("Modulo"), If(drP("Estilo").ToString() <> "", String.Format("<i class='{0}'></i>", drH("Estilo")), ""), drH("CveModulo"))
' For Each drN As DataRow In Nietos
' LinkNieto = drN("LIGA").ToString()
' If (drN("IsAngular").ToString() = "1") Then
' LinkNieto = String.Format("{1}:84{0}", drN("LIGA"), strdomain)
' End If
' If CveModulo = drN("CveModulo").ToString().ToEntero() Then
' CveModuloPadreSeleccionado = CveModuloPadre : CveModuloHijoSeleccionado = CveModuloHijo
' ClassActive = "class='active'"
' HeaderBar.AppendFormat("<i class='fa fa-angle-right'></i> </li><li><a href='{0}'>{1}</a> <i class='fa fa-angle-right'></i> </li><li><a href='{2}'>{3}</a> <i class='fa fa-angle-right'></i> </li><li><a href='{4}'>{5}</a>", Linkpapa, drP("Modulo").ToString(), Linkson, drH("Modulo").ToString(), LinkNieto, drN("Modulo"))
' ScriptColorGrupoModulo = ColorPage(drN("CveGrupoModulo").ToString().ToEntero())
' Else
' ClassActive = ""
' End If
' If drN("PopUp").ToString() = "S" Then LinkNieto = String.Format("javascript:AbrirVentana('{0}',{1},{2},'N');", drN("LIGA"), drN("ANCHO"), drN("ALTO"))
' Dim bizNietos = From h In dt.AsEnumerable Where h!CvePadre.Equals(drN("CveModulo").ToString().ToEntero()) Order By h!Orden
' Dim LinkBizNieto As String
' If bizNietos.Count = 0 Then
' MenuHTML.AppendFormat("<li id='m{4}'{3}><a href=""{0}"">{2}{1}</a></li>", LinkNieto, drN("Modulo"), If(drN("Estilo").ToString() <> "", String.Format("<i class='{0}'></i>", drN("Estilo")), ""), ClassActive, drN("CveModulo").ToString().ToEntero())
' Else
' MenuHTML.AppendFormat("<li id='m{3}'><a href='{0}'>{2}{1}<span class='arrow '></span> </a><ul class='sub-menu'>", LinkNieto, drN("Modulo"), If(drN("Estilo").ToString() <> "", String.Format("<i class='{0}'></i>", drN("Estilo")), ""), drN("CveModulo"))
' For Each drBN As DataRow In bizNietos
' LinkBizNieto = drBN("LIGA").ToString()
' If (drBN("IsAngular").ToString() = "1") Then
' LinkBizNieto = String.Format("{1}:84{0}", drBN("LIGA"), strdomain)
' End If
' If CveModulo = drBN("CveModulo").ToString().ToEntero() Then
' CveModuloPadreSeleccionado = CveModuloPadre : CveModuloHijoSeleccionado = CveModuloHijo
' ClassActive = "class='active'"
' HeaderBar.AppendFormat("<i class='fa fa-angle-right'></i> </li><li><a href='{0}'>{1}</a> <i class='fa fa-angle-right'></i> </li><li><a href='{2}'>{3}</a> <i class='fa fa-angle-right'></i> </li><li><a href='{4}'>{5}</a> <i class='fa fa-angle-right'></i> </li><li><a href='{6}'>{7}</a>", Linkpapa, drP("Modulo").ToString(), Linkson, drH("Modulo").ToString(), LinkNieto, drN("Modulo"), LinkBizNieto, drBN("Modulo"))
' ScriptColorGrupoModulo = ColorPage(drBN("CveGrupoModulo").ToString().ToEntero())
' Else
' ClassActive = ""
' End If
' If drBN("PopUp").ToString() = "S" Then LinkBizNieto = String.Format("javascript:AbrirVentana('{0}',{1},{2},'N');", drBN("LIGA"), drBN("ANCHO"), drBN("ALTO"))
' MenuHTML.AppendFormat("<li id='m{4}'{3}><a href=""{0}"">{2}{1}</a></li>", LinkBizNieto, drBN("Modulo"), If(drBN("Estilo").ToString() <> "", String.Format("<i class='{0}'></i>", drBN("Estilo")), ""), ClassActive, drBN("CveModulo").ToString().ToEntero())
' Next
' MenuHTML.AppendFormat("</ul></li>")
' End If
' Next
' MenuHTML.AppendFormat("</ul></li>")
' Else
' MenuHTML.AppendFormat("<li {3}><a href=""{0}"">{2}{1}</a></li>", LinkHijo, drH("Modulo"), If(drP("Estilo").ToString() <> "", String.Format("<i class='{0}'></i>", drH("Estilo")), ""), ClassActive)
' End If
' Next
' MenuHTML.AppendFormat("</ul></li>")
' Else
' MenuHTML.AppendFormat("<li><a href=""{0}"">{2}<span class='title'>{1}</span></a></li>", LinkPadre, drP("Modulo"), If(drP("Estilo").ToString() <> "", String.Format("<i class='{0}'></i>", drP("Estilo")), ""))
' End If
'Next
'If CveModuloPadreSeleccionado > 0 Then
' menuobj.MenuHTML = menuobj.MenuHTML.Replace(String.Format("id='m{0}'", CveModuloPadreSeleccionado), String.Format("id='m{0}' class='active open'", CveModuloPadreSeleccionado))
' menuobj.MenuHTML = menuobj.MenuHTML.Replace(String.Format("id='j{0}'", CveModuloPadreSeleccionado), String.Format("id='j{0}' class='selected'", CveModuloPadreSeleccionado))
'Else
'End If
'If CveModuloHijoSeleccionado > 0 Then
' menuobj.MenuHTML = menuobj.MenuHTML.Replace(String.Format("id='m{0}'", CveModuloHijoSeleccionado), String.Format("id='m{0}' class='open'", CveModuloHijoSeleccionado))
' menuobj.MenuHTML = menuobj.MenuHTML.Replace(String.Format("id='j{0}'", CveModuloHijoSeleccionado), String.Format("id='j{0}' class='selected'", CveModuloHijoSeleccionado))
'End If
'HeaderBar.AppendFormat("</li>")
menuobj.HeaderBar.AppendFormat("{0}", menuobj.ScriptColorGrupoModulo) menuobj.HeaderBar.AppendFormat("{0}", menuobj.ScriptColorGrupoModulo)
BarraNavegacion.Text = menuobj.HeaderBar.ToString() BarraNavegacion.Text = menuobj.HeaderBar.ToString()
'CargaMenu(MenuHTML)
Menu.Text = menuobj.MenuHTML.ToString() Menu.Text = menuobj.MenuHTML.ToString()
menuobj.MenuHTML.Clear() menuobj.MenuHTML.Clear()
menuobj.HeaderBar.Clear() menuobj.HeaderBar.Clear()
End Sub End Sub
Private Function ColorPage(value As Integer) As String Private Function ColorPage(value As Integer) As String
Select Case value Select Case value

12
Ventas/CatClasificacionesDetalle.aspx.vb
View File

@@ -40,10 +40,7 @@ Partial Class CatClasificacionesDetalle
If CargaDatos() Then If CargaDatos() Then
DdlCategoria.DataSource = GlobalDTGralCategorias(UsuarioActual.CveEmpresa) If UsuarioActual.Empresa.TipoContabilidad = 2 Then
DdlCategoria.DataBind()
If UsuarioActual.Empresa.UsaContabilidad Then
Dim Cuenta As New ClsContPAQi(UsuarioActual.Empresa) Dim Cuenta As New ClsContPAQi(UsuarioActual.Empresa)
If Cuenta.GetCuentas(-1, "-1", -1) Then If Cuenta.GetCuentas(-1, "-1", -1) Then
@@ -100,8 +97,8 @@ Partial Class CatClasificacionesDetalle
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
Dim ObjClasificaciones As New ClsClasificaciones Dim ObjClasificaciones As New ClsClasificaciones
If ObjClasificaciones.GetClasificaciones() Then If ObjClasificaciones.GetClasificaciones(CveEmpresa:=UsuarioActual.CveEmpresa) Then
Dim dr As DataRow = ObjClasificaciones.DtResultados.FiltraParametros(String.Format("CveClasificacion = {0} AND CveEmpresa = {1}", CveClasificacion, UsuarioActual.CveEmpresa)).FiltroPrimero("") Dim dr As DataRow = ObjClasificaciones.DtResultados.FiltraParametros(String.Format("CveClasificacion = {0} ", CveClasificacion)).FiltroPrimero("")
If dr IsNot Nothing Then If dr IsNot Nothing Then
TxtClasificacion.Text = dr("Clasificacion").ToString TxtClasificacion.Text = dr("Clasificacion").ToString
@@ -110,6 +107,8 @@ Partial Class CatClasificacionesDetalle
DdlCuentaCostos.SelectedValue = dr("IdCuentaCostos").ToString DdlCuentaCostos.SelectedValue = dr("IdCuentaCostos").ToString
DdlCuentaIngresos.SelectedValue = dr("IdCuentaIngresos").ToString DdlCuentaIngresos.SelectedValue = dr("IdCuentaIngresos").ToString
DdlCategoria.DataSource = GlobalDTGralCategorias(UsuarioActual.CveEmpresa)
DdlCategoria.DataBind()
DdlCategoria.SelectedValue = dr("CveCategoria").ToString DdlCategoria.SelectedValue = dr("CveCategoria").ToString
ChkEstado.Checked = dr("Estatus").ToString = "Activo" ChkEstado.Checked = dr("Estatus").ToString = "Activo"
@@ -123,6 +122,7 @@ Partial Class CatClasificacionesDetalle
Me.GvDatos.DataSource = Nothing Me.GvDatos.DataSource = Nothing
End If End If
End If End If
End If End If

170
Ventas/Clientes.aspx
View File

@@ -392,10 +392,7 @@
<i></i> <i></i>
</div> </div>
</div> </div>
</div> </div>
<div class="row" runat="server" id="DivPersonaFisica" visible="false"> <div class="row" runat="server" id="DivPersonaFisica" visible="false">
<div class="col-md-4 form-group form-md-line-input input-iconright"> <div class="col-md-4 form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtApellidoPaterno" CssClass="form-control " runat="server" MaxLength="150"></asp:TextBox> <asp:TextBox ID="TxtApellidoPaterno" CssClass="form-control " runat="server" MaxLength="150"></asp:TextBox>
@@ -415,9 +412,7 @@
<label style="width: 90%" for="<%= TxtNombres.ClientID.ToString()%>">Nombres:</label> <label style="width: 90%" for="<%= TxtNombres.ClientID.ToString()%>">Nombres:</label>
<i></i> <i></i>
</div> </div>
</div> </div>
<div class="form-group form-md-line-input input-iconright "> <div class="form-group form-md-line-input input-iconright ">
<asp:TextBox ID="TxtNombreComercial" CssClass="form-control" runat="server" MaxLength="200" ClientIDMode="Static"></asp:TextBox> <asp:TextBox ID="TxtNombreComercial" CssClass="form-control" runat="server" MaxLength="200" ClientIDMode="Static"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVNombreComercial" runat="server" ControlToValidate="TxtNombreComercial" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Nombre Comercial''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RFVNombreComercial" runat="server" ControlToValidate="TxtNombreComercial" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Nombre Comercial''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
@@ -432,15 +427,21 @@
<label for="<%= TxtRFC.ClientID.ToString()%>">RFC:</label> <label for="<%= TxtRFC.ClientID.ToString()%>">RFC:</label>
<i></i> <i></i>
</div> </div>
<div class="form-group form-md-line-input"> <div class="row">
<asp:TextBox ID="TxtCodigo" runat="server" OnTextChanged="TxtCodigo_TextChanged" AutoPostBack="true" CssClass="form-control" MaxLength="25"></asp:TextBox> <div class="col-md-6 ">
<label for="<%= TxtCodigo.ClientID.ToString()%>">Código:</label> <div class="form-group form-md-line-input">
</div> <asp:TextBox ID="TxtCodigo" runat="server" OnTextChanged="TxtCodigo_TextChanged" AutoPostBack="true" CssClass="form-control" MaxLength="25"></asp:TextBox>
<div class="form-group form-md-line-input"> <label for="<%= TxtCodigo.ClientID.ToString()%>">Código:</label>
<asp:TextBox ID="TxtNombreCorto" runat="server" CssClass="form-control" MaxLength="10"></asp:TextBox> </div>
<label for="<%= TxtNombreCorto.ClientID.ToString()%>">Nombre Corto: </label> </div>
<div class="col-md-6 ">
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtNombreCorto" runat="server" CssClass="form-control" MaxLength="10"></asp:TextBox>
<label for="<%= TxtNombreCorto.ClientID.ToString()%>">Nombre Corto: </label>
</div> </div>
</div>
</div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtDireccion" runat="server" CssClass="form-control" MaxLength="90"></asp:TextBox> <asp:TextBox ID="TxtDireccion" runat="server" CssClass="form-control" MaxLength="90"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVDireccion" runat="server" ControlToValidate="TxtDireccion" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Dirección''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RFVDireccion" runat="server" ControlToValidate="TxtDireccion" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Dirección''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
@@ -531,7 +532,7 @@
<div class="col-md-12"> <div class="col-md-12">
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlRegimenFiscal" DataTextField="CodigoRegimenFiscalTexto" Width="100%" DataValueField="CveRegimenFiscal" runat="server" CssClass="form-control input-sm select2me"> <asp:DropDownList ID="DdlRegimenFiscal" DataTextField="CodigoRegimenFiscalTexto" AutoPostBack ="true" Width="100%" DataValueField="CveRegimenFiscal" runat="server" CssClass="form-control input-sm select2me">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem> <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList> </asp:DropDownList>
<asp:RequiredFieldValidator ID="RFVRegimenFiscal" runat="server" InitialValue="-1" ControlToValidate="DdlRegimenFiscal" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Regimen Fiscal''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RFVRegimenFiscal" runat="server" InitialValue="-1" ControlToValidate="DdlRegimenFiscal" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Regimen Fiscal''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
@@ -577,41 +578,38 @@
<label for="<%= TxtContacto.ClientID.ToString()%>">Contacto Compras: </label> <label for="<%= TxtContacto.ClientID.ToString()%>">Contacto Compras: </label>
</div> </div>
<div class="row"> <div class="row">
<div class="col-md-8"> <div class="col-md-6">
<div class="form-group form-md-line-input"> <div class="col-md-8">
<asp:TextBox ID="TxtTelefono" CssClass="form-control" runat="server" MaxLength="10" ValidationGroup="GrpGuardar"></asp:TextBox> <div class="form-group form-md-line-input">
<ajax:MaskedEditExtender ID="MEETelefono" runat="server" TargetControlID="TxtTelefono" ClearMaskOnLostFocus="false" MaskType="Number" Mask="(999) 999-9999" MessageValidatorTip="true" InputDirection="LeftToRight" ErrorTooltipEnabled="True"></ajax:MaskedEditExtender> <asp:TextBox ID="TxtTelefono" CssClass="form-control" runat="server" MaxLength="10" ValidationGroup="GrpGuardar"></asp:TextBox>
<label for="<%= TxtTelefono.ClientID.ToString()%>">Teléfono: </label> <ajax:MaskedEditExtender ID="MEETelefono" runat="server" TargetControlID="TxtTelefono" ClearMaskOnLostFocus="false" MaskType="Number" Mask="(999) 999-9999" MessageValidatorTip="true" InputDirection="LeftToRight" ErrorTooltipEnabled="True"></ajax:MaskedEditExtender>
<label for="<%= TxtTelefono.ClientID.ToString()%>">Teléfono: </label>
</div>
</div>
<div class="col-md-4">
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtExtension" CssClass="form-control" runat="server" MaxLength="10" ValidationGroup="GrpGuardar"></asp:TextBox>
<label for="<%= TxtExtension.ClientID.ToString()%>">Ext: </label>
</div>
</div> </div>
</div> </div>
<div class="col-md-4">
<div class="form-group form-md-line-input"> <div class="col-md-6">
<asp:TextBox ID="TxtExtension" CssClass="form-control" runat="server" MaxLength="10" ValidationGroup="GrpGuardar"></asp:TextBox> <div class="col-md-8">
<label for="<%= TxtExtension.ClientID.ToString()%>">Ext: </label> <div class="form-group form-md-line-input">
</div> <asp:TextBox ID="TxtTelefonoOtro" CssClass="form-control" runat="server" MaxLength="150"></asp:TextBox>
</div> <ajax:MaskedEditExtender ID="MaskedEditExtender3" runat="server" TargetControlID="TxtTelefonoOtro" ClearMaskOnLostFocus="false" MaskType="Number" Mask="(999) 999-9999" MessageValidatorTip="true" InputDirection="LeftToRight" ErrorTooltipEnabled="True"></ajax:MaskedEditExtender>
</div> <label for="<%= TxtTelefonoOtro.ClientID.ToString()%>">Teléfono Otro: </label>
</div>
<div class="row"> </div>
<div class="col-md-8">
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtTelefonoOtro" CssClass="form-control" runat="server" MaxLength="150"></asp:TextBox>
<ajax:MaskedEditExtender ID="MaskedEditExtender3" runat="server" TargetControlID="TxtTelefonoOtro" ClearMaskOnLostFocus="false" MaskType="Number" Mask="(999) 999-9999" MessageValidatorTip="true" InputDirection="LeftToRight" ErrorTooltipEnabled="True"></ajax:MaskedEditExtender>
<label for="<%= TxtTelefonoOtro.ClientID.ToString()%>">Teléfono Otro: </label>
</div>
</div>
<div>
<div class="col-md-4"> <div class="col-md-4">
<div class="form-group form-md-line-input"> <div class="form-group form-md-line-input">
<asp:TextBox ID="TxtExtOtro" CssClass="form-control" runat="server" MaxLength="10" ValidationGroup="GrpGuardar"></asp:TextBox> <asp:TextBox ID="TxtExtOtro" CssClass="form-control" runat="server" MaxLength="10" ValidationGroup="GrpGuardar"></asp:TextBox>
<label for="<%= TxtExtOtro.ClientID.ToString()%>">Ext: </label> <label for="<%= TxtExtOtro.ClientID.ToString()%>">Ext: </label>
</div> </div>
</div> </div>
</div> </div>
</div> </div>
<div class="form-group form-md-line-input"> <div class="form-group form-md-line-input">
<asp:TextBox ID="TxtCelular" CssClass="form-control" runat="server" MaxLength="150"></asp:TextBox> <asp:TextBox ID="TxtCelular" CssClass="form-control" runat="server" MaxLength="150"></asp:TextBox>
<ajax:MaskedEditExtender ID="MaskedEditExtender5" runat="server" TargetControlID="TxtCelular" ClearMaskOnLostFocus="false" MaskType="Number" Mask="(999) 999-9999" MessageValidatorTip="true" InputDirection="LeftToRight" ErrorTooltipEnabled="True"></ajax:MaskedEditExtender> <ajax:MaskedEditExtender ID="MaskedEditExtender5" runat="server" TargetControlID="TxtCelular" ClearMaskOnLostFocus="false" MaskType="Number" Mask="(999) 999-9999" MessageValidatorTip="true" InputDirection="LeftToRight" ErrorTooltipEnabled="True"></ajax:MaskedEditExtender>
@@ -1028,7 +1026,7 @@
<HeaderTemplate> <HeaderTemplate>
<asp:UpdatePanel runat="server"> <asp:UpdatePanel runat="server">
<ContentTemplate> <ContentTemplate>
<asp:Label runat="server" Text="Fiscal/Contable" ID="HeedarContable"></asp:Label> <asp:Label runat="server" Text="Fiscal/Contable" ID="HeaderContable"></asp:Label>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</HeaderTemplate> </HeaderTemplate>
@@ -1051,30 +1049,20 @@
</div> </div>
</div> </div>
</div> </div>
<div class="portlet-body form"> <div class="portlet-body form">
<%-- <div class="form-group form-md-line-input">
<asp:TextBox ID="TxtConvenioCIE" CssClass="form-control" runat="server" MaxLength="50" Enabled="false"></asp:TextBox>
<label for="<%= TxtConvenioCIE.ClientID.ToString()%>">Convenio CIE:</label>
</div>--%>
<div class="form-group form-md-line-input">
<asp:TextBox ID="TxtReferenciaFiscal" CssClass="form-control" runat="server" Enabled="false"></asp:TextBox>
<label for="<%= TxtReferenciaFiscal.ClientID.ToString()%>">Referencia:</label>
</div>
<%-- <div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtNumCtaPago" CssClass="form-control" runat="server" MaxLength="30" Enabled="false"></asp:TextBox>
<label for="<%= TxtNumCtaPago.ClientID.ToString()%>">Número de cuenta de Pago: </label>
<i></i>
</div>--%>
<%-- <div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlMetodoPago" CssClass="form-control select2me" runat="server" AppendDataBoundItems="true" CausesValidation="true" DataTextField="MetodoPago" DataValueField="CveMetodoPago" ValidationGroup="GrpGuardar">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList>
<label for="<%= DdlMetodoPago.ClientID.ToString()%>">Método de Pago:</label>
<asp:RequiredFieldValidator ID="RFVMetodoPago" runat="server" ControlToValidate="DdlMetodoPago" CssClass="help-block" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Método de Pago''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<i></i>
</div>--%>
<div id="DivRetenciones" runat="server"> <div id="DivRetenciones" runat="server">
<div class="row"> <div class="row">
<div class="col-md-6">
<div id="DivRetIVA" runat="server" class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtRetIVA" CssClass="form-control" runat="server" MaxLength="9" Text="0"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVRetIVA" class="help-block errorimput" runat="server" ControlToValidate="TxtRetIVA" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Retención de IVA''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CVRetIVA" class="help-block errorimput" runat="server" ControlToValidate="TxtRetIVA" ErrorMessage="El campo <b>''Retención de IVA''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Double" ValidationGroup="GrpGuardar"></asp:CompareValidator>
<label for="<%= TxtRetIVA.ClientID.ToString()%>">¿El Cliente nos retiene IVA?: </label>
<i style="font-weight: bold;">%</i>
</div>
</div>
<div class="col-md-6"> <div class="col-md-6">
<div id="DivTipoRetenciones" runat="server" visible="false" class="form-group form-md-line-input input-iconright"> <div id="DivTipoRetenciones" runat="server" visible="false" class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlTipoRetencion" ToolTip="Al establecer la retención de servicios, deberá especificarse el producto, como outsourcing para que se aplique la retención." <asp:DropDownList ID="DdlTipoRetencion" ToolTip="Al establecer la retención de servicios, deberá especificarse el producto, como outsourcing para que se aplique la retención."
@@ -1083,22 +1071,12 @@
<asp:ListItem Text="Arrendamiento" Value="1"></asp:ListItem> <asp:ListItem Text="Arrendamiento" Value="1"></asp:ListItem>
<asp:ListItem Text="Servicios Profesionales" Value="2"></asp:ListItem> <asp:ListItem Text="Servicios Profesionales" Value="2"></asp:ListItem>
<asp:ListItem Text="Fletes" Value="3"></asp:ListItem> <asp:ListItem Text="Fletes" Value="3"></asp:ListItem>
<asp:ListItem Text="Servicios" Value="4"></asp:ListItem>
</asp:DropDownList> </asp:DropDownList>
<label for="<%= DdlTipoRetencion.ClientID.ToString()%>">Tipo de Retención de IVA:</label> <label for="<%= DdlTipoRetencion.ClientID.ToString()%>">Tipo de Retención de IVA:</label>
<asp:RequiredFieldValidator ID="RFVTipoRetencion" runat="server" ControlToValidate="DdlTipoRetencion" CssClass="help-block" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo de Retención''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RFVTipoRetencion" runat="server" ControlToValidate="DdlTipoRetencion" CssClass="help-block" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo de Retención''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<i></i> <i></i>
</div> </div>
</div> </div>
<div class="col-md-6">
<div id="DivRetIVA" runat="server" class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtRetIVA" CssClass="form-control" runat="server" MaxLength="9" Text="0"></asp:TextBox>
<asp:RequiredFieldValidator ID="RFVRetIVA" class="help-block errorimput" runat="server" ControlToValidate="TxtRetIVA" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Retención de IVA''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CVRetIVA" class="help-block errorimput" runat="server" ControlToValidate="TxtRetIVA" ErrorMessage="El campo <b>''Retención de IVA''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Double" ValidationGroup="GrpGuardar"></asp:CompareValidator>
<label for="<%= TxtRetIVA.ClientID.ToString()%>">¿El Cliente nos retiene IVA?: </label>
<i style="font-weight: bold;">%</i>
</div>
</div>
</div> </div>
<div class="row"> <div class="row">
<div class="col-md-6"> <div class="col-md-6">
@@ -1118,16 +1096,19 @@
¿El Cliente nos retiene IVA por Fletes y Acarreos?: ¿El Cliente nos retiene IVA por Fletes y Acarreos?:
<asp:CheckBox ID="ChkRetIVAFletesAcarreos" CssClass="make-switchsd" runat="server" /> <asp:CheckBox ID="ChkRetIVAFletesAcarreos" CssClass="make-switchsd" runat="server" />
</div> </div>
<div class="form-group form-md-line-input" style="display:none;">
<asp:TextBox ID="TxtReferenciaFiscal" CssClass="form-control" runat="server" Enabled="false"></asp:TextBox>
<label for="<%= TxtReferenciaFiscal.ClientID.ToString()%>">Referencia:</label>
</div>
<br /> <br />
<br />
<div class="caption font-blue"> <div class="caption font-blue">
<i class="icon-pin font-blue"></i> <i class="icon-pin font-blue"></i>
<span class="caption-subject bold uppercase">CFDI Versión</span> <span class="caption-subject bold uppercase">CFDI Versión</span>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlUsoCFDI" CssClass="form-control select2me" runat="server" Width="250" AppendDataBoundItems="true" CausesValidation="true" DataTextField="UsoCFDIDescripcion" DataValueField="CveUsoCFDI" ValidationGroup="GrpGuardar"> <asp:DropDownList ID="DdlUsoCFDI" CssClass="form-control select2me" runat="server" Width="250" AppendDataBoundItems="false" CausesValidation="true" DataTextField="UsoCFDIDescripcion" DataValueField="CveUsoCFDI" ValidationGroup="GrpGuardar">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem> <asp:ListItem Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList> </asp:DropDownList>
<label for="<%= DdlUsoCFDI.ClientID.ToString()%>">Uso CFDI:</label> <label for="<%= DdlUsoCFDI.ClientID.ToString()%>">Uso CFDI:</label>
<asp:RequiredFieldValidator ID="RFVUsoCFDI" runat="server" InitialValue="-1" ControlToValidate="DdlUsoCFDI" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''USO CFDI''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RFVUsoCFDI" runat="server" InitialValue="-1" ControlToValidate="DdlUsoCFDI" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''USO CFDI''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
@@ -1135,7 +1116,7 @@
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlMetodoPago33" CssClass="form-control select2me" runat="server" Width="250" AppendDataBoundItems="true" CausesValidation="true" DataTextField="MetodoPagoSAT" DataValueField="CveMetodoPago" ValidationGroup="GrpGuardar" AutoPostBack="true" <asp:DropDownList ID="DdlMetodoPago33" CssClass="form-control select2me" runat="server" Width="250" AppendDataBoundItems="true" CausesValidation="true" DataTextField="MetodoPagoSAT" DataValueField="CveMetodoPago" AutoPostBack="true"
OnSelectedIndexChanged="DdlMetodoPago33_SelectedIndexChanged"> OnSelectedIndexChanged="DdlMetodoPago33_SelectedIndexChanged">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem> <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList> </asp:DropDownList>
@@ -1143,21 +1124,26 @@
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlFormaPago33" CssClass="form-control select2me" runat="server" Width="250" AppendDataBoundItems="true" CausesValidation="true" DataTextField="FormaPagoSAT" DataValueField="CveFormaPago" ValidationGroup="GrpGuardar"> <asp:DropDownList ID="DdlFormaPago33" CssClass="form-control select2me" runat="server" Width="250" AppendDataBoundItems="true" CausesValidation="true" DataTextField="FormaPagoSAT" DataValueField="CveFormaPago">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem> <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList> </asp:DropDownList>
<label for="<%= DdlFormaPago33.ClientID.ToString()%>">Forma Pago:</label> <label for="<%= DdlFormaPago33.ClientID.ToString()%>">Forma Pago:</label>
</div> </div>
<div class="row">
<div class="form-group form-md-line-input" id="DivDesglosaIEPS" runat="server"> <div class="col-md-6">
El cliente desglosa IEPS: <div class="form-group form-md-line-input" id="DivDesglosaIEPS" runat="server">
El cliente desglosa IEPS:
<asp:CheckBox ID="ChkDesglosarIEPS" Checked="true" CssClass="make-switchsd" data-size="small" runat="server" /> <asp:CheckBox ID="ChkDesglosarIEPS" Checked="true" CssClass="make-switchsd" data-size="small" runat="server" />
</div> </div>
<div class="form-group form-md-line-input" id="DivNoDesglosaIVA" runat="server"> </div>
El cliente No desglosa IVA: <div class="col-md-6">
<asp:CheckBox ID="ChkNoDesglosaIVA" Checked="false" CssClass="make-switchsd" data-size="small" runat="server" /> <div class="form-group form-md-line-input" id="DivNoDesglosaIVA" runat="server">
</div> El cliente No desglosa IVA:
<asp:CheckBox ID="ChkNoDesglosaIVA" Checked="false" CssClass="make-switchsd" data-size="small" runat="server" />
</div>
</div>
</div>
<br /> <br />
@@ -4636,7 +4622,7 @@
<asp:Button ID="BtnGuardar" runat="server" CssClass="btn btn-primary" Text="Guardar" Visible="false" ValidationGroup="GrpGuardar" /> <asp:Button ID="BtnGuardar" runat="server" CssClass="btn btn-primary" Text="Guardar" Visible="false" ValidationGroup="GrpGuardar" />
<asp:Button ID="BtnEliminar" runat="server" CssClass="btn btn-danger" Text="Eliminar" Visible="false" data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si" /> <asp:Button ID="BtnEliminar" runat="server" CssClass="btn btn-danger" Text="Eliminar" Visible="false" data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si" />
<asp:Button ID="BtnCancelar" runat="server" CssClass="btn btn-default" Text="Cancelar" Visible="false" OnClientClick="javascript:window.location.href='/Ventas/CatClientes.aspx'; return false;" /> <asp:Button ID="BtnCancelar" runat="server" CssClass="btn btn-default" Text="Cancelar" Visible="false" OnClientClick="javascript:window.location.href='/Ventas/CatClientes.aspx'; return false;" />
<asp:ValidationSummary ID="VS" runat="server" DisplayMode="BulletList" ShowSummary="true" ValidationGroup="GrpGuardar" /> <asp:ValidationSummary ID="VSGuardar" runat="server" DisplayMode="BulletList" ShowSummary="true" ValidationGroup="GrpGuardar" />
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</td> </td>

59
Ventas/Clientes.aspx.vb
View File

@@ -1436,7 +1436,7 @@ Partial Class Clientes
DdlMonedaExtranjeraAnticipos.SelectedValue = IdCtaMonedaExtranjeraAnticipos DdlMonedaExtranjeraAnticipos.SelectedValue = IdCtaMonedaExtranjeraAnticipos
ActivarRegistroAutomatico() ActivarRegistroAutomatico()
HeedarContable.Attributes.Remove("onclick") HeaderContable.Attributes.Remove("onclick")
UpFiscalContable.Update() UpFiscalContable.Update()
End Sub End Sub
@@ -2061,30 +2061,38 @@ Partial Class Clientes
End Sub End Sub
Private Sub CargaFormaPago33() Private Sub CargaFormaPago33()
DdlFormaPago33.Items.Clear() 'DdlFormaPago33.Items.Clear()
DdlFormaPago33.DataSource = GlobalDTVtaFormaPago 'DdlFormaPago33.DataSource = GlobalDTVtaFormaPago
DdlFormaPago33.DataBind() 'DdlFormaPago33.DataBind()
CargaFormaDePago()
DdlSucursalFormaPago33.Items.Clear() DdlSucursalFormaPago33.Items.Clear()
DdlSucursalFormaPago33.DataSource = GlobalDTVtaFormaPago DdlSucursalFormaPago33.DataSource = GlobalDTVtaFormaPago
DdlSucursalFormaPago33.DataBind() DdlSucursalFormaPago33.DataBind()
End Sub End Sub
Private Sub CargaComboCFDI() Private Sub CargaComboCFDI()
Dim RegimenFiscalCliente = DdlRegimenFiscal.SelectedValue.ToString() Dim RegimenFiscalCliente As String = "-1"
'If Not UsuarioActual.Empresa.Funcionalidad(350).Contiene("1", "2") Then If DdlRegimenFiscal.SelectedValue <> "-1" Then RegimenFiscalCliente = GlobalDTRegimenesFiscales(-1).FiltroPrimeroValor("CodigoRegimenFiscal", $"CveRegimenFiscal = {DdlRegimenFiscal.SelectedValue}")
' RegimenFiscalCliente = "-1" Dim tcveuso As Integer = DdlUsoCFDI.SelectedValue.ToEntero
'End If
DdlUsoCFDI.Items.Clear() DdlUsoCFDI.SelectedIndex = 0
Dim EsPersonaMoral As Boolean = (RdTipoPersona.SelectedValue = "1") Dim EsPersonaMoral As Boolean = (RdTipoPersona.SelectedValue = "1")
DdlUsoCFDI.DataSource = GlobalDTSATUsosCFDI(If(Not EsPersonaMoral, 1, 0), RegimenFiscalReceptor:=RegimenFiscalCliente) DdlUsoCFDI.DataSource = GlobalDTSATUsosCFDI(If(Not EsPersonaMoral, 1, 0), RegimenFiscalReceptor:=RegimenFiscalCliente)
DdlUsoCFDI.Items.Clear()
DdlUsoCFDI.DataBind() DdlUsoCFDI.ClearSelection()
Try
DdlUsoCFDI.DataBind()
Catch ex As Exception
End Try
DdlUsoCFDI.Items.Insert(0, New ListItem("Seleccione", "-1")) DdlUsoCFDI.Items.Insert(0, New ListItem("Seleccione", "-1"))
If tcveuso > 0 Then DdlUsoCFDI.SelectedValueExist(tcveuso)
DdlSucursalUsoCFDI.Items.Clear() DdlSucursalUsoCFDI.Items.Clear()
DdlSucursalUsoCFDI.DataSource = GlobalDTSATUsosCFDI(UsuarioActual.Empresa.EsPersonaFisica, RegimenFiscalReceptor:=RegimenFiscalCliente) DdlSucursalUsoCFDI.DataSource = GlobalDTSATUsosCFDI(UsuarioActual.Empresa.EsPersonaFisica, RegimenFiscalReceptor:=RegimenFiscalCliente)
DdlSucursalUsoCFDI.DataBind() DdlSucursalUsoCFDI.DataBind()
UpFiscalContable.Update()
End Sub End Sub
#End Region #End Region
@@ -10322,6 +10330,7 @@ Partial Class Clientes
DdlRegimenFiscal.DataSource = dt DdlRegimenFiscal.DataSource = dt
DdlRegimenFiscal.DataBind() DdlRegimenFiscal.DataBind()
DdlRegimenFiscal.SelectedValueExist(Val) DdlRegimenFiscal.SelectedValueExist(Val)
CargaComboCFDI()
UpDatos.Update() UpDatos.Update()
End Sub End Sub
@@ -10480,10 +10489,8 @@ Partial Class Clientes
UpLineaAdicionalmodal.Update() UpLineaAdicionalmodal.Update()
End Sub End Sub
Protected Sub LnkEliminarLineaAdicional_Click(sender As Object, e As EventArgs) Protected Sub LnkEliminarLineaAdicional_Click(sender As Object, e As EventArgs)
Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow) Dim GvRow As GridViewRow = DirectCast(DirectCast(sender, LinkButton).NamingContainer, GridViewRow)
Dim CveLineaAdicionalEliminar = GvRow.DataKey("CveLineaAdicional").ToEntero Dim CveLineaAdicionalEliminar = GvRow.DataKey("CveLineaAdicional").ToEntero
@@ -10503,10 +10510,8 @@ Partial Class Clientes
GetLineasAdicionales() GetLineasAdicionales()
End If End If
End Sub End Sub
Protected Sub DdlTipoLineaAdicionalModal_SelectedIndexChanged(sender As Object, e As EventArgs) Protected Sub DdlTipoLineaAdicionalModal_SelectedIndexChanged(sender As Object, e As EventArgs)
DvLineaAdicionalDiasVenciemientoModal.Visible = If(DdlTipoLineaAdicionalModal.SelectedValue.ToEntero = 2, True, False) DvLineaAdicionalDiasVenciemientoModal.Visible = If(DdlTipoLineaAdicionalModal.SelectedValue.ToEntero = 2, True, False)
@@ -10525,7 +10530,7 @@ Partial Class Clientes
DdlFormaPago33.Items.Clear() DdlFormaPago33.Items.Clear()
If DdlMetodoPago33.SelectedValue.ToEntero = 3 Then If DdlMetodoPago33.SelectedValue = "3" Then
DdlFormaPago33.DataSource = GlobalDTVtaFormaPago.FiltraParametros("CveFormaPago = 20") DdlFormaPago33.DataSource = GlobalDTVtaFormaPago.FiltraParametros("CveFormaPago = 20")
Else Else
DdlFormaPago33.DataSource = GlobalDTVtaFormaPago.FiltraParametros("CveFormaPago <> 20") DdlFormaPago33.DataSource = GlobalDTVtaFormaPago.FiltraParametros("CveFormaPago <> 20")
@@ -10572,11 +10577,8 @@ Partial Class Clientes
If Not ErrorCambio Then If Not ErrorCambio Then
Alert("Vendedor Cambiado Correctamente.", TipoMensaje.MsgInformacion, $"document.location.href=""/Ventas/Clientes.aspx?CveCliente={CveCliente}""") Alert("Vendedor Cambiado Correctamente.", TipoMensaje.MsgInformacion, $"document.location.href=""/Ventas/Clientes.aspx?CveCliente={CveCliente}""")
End If End If
End Sub End Sub
@@ -10589,7 +10591,10 @@ Partial Class Clientes
UpDatos.Update() UpDatos.Update()
End Sub
Private Sub DdlRegimenFiscal_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlRegimenFiscal.SelectedIndexChanged
CargaComboCFDI()
End Sub End Sub
End Class End Class

3
Ventas/ClientesAbonar.aspx
View File

@@ -652,8 +652,7 @@
<asp:ListItem Text="Gasto No Deducible" Value="255" Selected="True"></asp:ListItem> <asp:ListItem Text="Gasto No Deducible" Value="255" Selected="True"></asp:ListItem>
<asp:ListItem Text="Incobrable No Deducible" Value="179"></asp:ListItem> <asp:ListItem Text="Incobrable No Deducible" Value="179"></asp:ListItem>
<asp:ListItem Text="Incobrable Deducible" Value="263"></asp:ListItem> <asp:ListItem Text="Incobrable Deducible" Value="263"></asp:ListItem>
<asp:ListItem Text="Reservas" Value="252"></asp:ListItem> <asp:ListItem Text="Reservas" Value="252"></asp:ListItem>
<asp:ListItem Text="Otros Ingresos" Value="78"></asp:ListItem>
</asp:DropDownList> </asp:DropDownList>
</div> </div>
</div> </div>

1
Ventas/ClientesAbonar.aspx.vb
View File

@@ -2450,7 +2450,6 @@ Partial Class Ventas_ClientesAbonar
If CveConceptoDeduccion = 179 Then IdCuentaContableNoDeducible = UsuarioActual.Empresa.Funcionalidad(559).ToEntero If CveConceptoDeduccion = 179 Then IdCuentaContableNoDeducible = UsuarioActual.Empresa.Funcionalidad(559).ToEntero
If CveConceptoDeduccion = 263 Then IdCuentaContableNoDeducible = UsuarioActual.Empresa.Funcionalidad(537).ToEntero If CveConceptoDeduccion = 263 Then IdCuentaContableNoDeducible = UsuarioActual.Empresa.Funcionalidad(537).ToEntero
If CveConceptoDeduccion = 252 Then IdCuentaContableNoDeducible = UsuarioActual.Empresa.Funcionalidad(581).ToEntero If CveConceptoDeduccion = 252 Then IdCuentaContableNoDeducible = UsuarioActual.Empresa.Funcionalidad(581).ToEntero
If CveConceptoDeduccion = 78 Then IdCuentaContableNoDeducible = UsuarioActual.Empresa.IdCuentaOtrosIngresos
If UsuarioActual.CveEmpresa.Contiene(4, 7, 11, 12, 122) Then If UsuarioActual.CveEmpresa.Contiene(4, 7, 11, 12, 122) Then

2
Ventas/PV.aspx
View File

@@ -2605,7 +2605,7 @@
</div> </div>
<div id="DivFormaCliente" runat="server" visible="false" class="row" style="padding-left: 16px;"> <div id="DivFormaCliente" runat="server" visible="false" class="row" style="padding-left: 16px;">
<div class="form-group form-md-line-input input-iconright col-xs-6"> <div class="form-group form-md-line-input input-iconright col-xs-6">
<asp:DropDownList ID="DdlMetodoCliente" runat="server" CssClass=" form-control input-sm select2me" CausesValidation="true" DataTextField="MetodoPagoSAT" DataValueField="CveMetodoPago" Width="100%"> <asp:DropDownList ID="DdlMetodoCliente" runat="server" CssClass=" form-control input-sm select2me" AutoPostBack="true" CausesValidation="true" DataTextField="MetodoPagoSAT" DataValueField="CveMetodoPago" Width="100%">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem> <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList> </asp:DropDownList>
<asp:RequiredFieldValidator ID="RequiredFieldValidator6" runat="server" ControlToValidate="DdlMetodoCliente" InitialValue="-1" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Método Pago''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardarCliente"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RequiredFieldValidator6" runat="server" ControlToValidate="DdlMetodoCliente" InitialValue="-1" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Método Pago''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardarCliente"></asp:RequiredFieldValidator>

11
Ventas/PV.aspx.vb
View File

@@ -8661,4 +8661,15 @@ Partial Class PV
RegistraScript("AbrirModalDescuentoAdicional();") RegistraScript("AbrirModalDescuentoAdicional();")
End Sub End Sub
Private Sub DdlMetodoCliente_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlMetodoCliente.SelectedIndexChanged
DdlFormaCliente.Items.Clear()
If DdlMetodoCliente.SelectedValue = "3" Then
DdlFormaCliente.DataSource = GlobalDTVtaFormaPago.FiltraParametros("CveFormaPago = 20")
Else
DdlFormaCliente.DataSource = GlobalDTVtaFormaPago.FiltraParametros("CveFormaPago <> 20")
End If
DdlFormaCliente.DataBind()
End Sub
End Class End Class

2
Ventas/Ventas.aspx
View File

@@ -7899,7 +7899,7 @@
</div> </div>
<div id="DivFormaCliente" runat="server" visible="false" class="row" style="padding-left: 16px;"> <div id="DivFormaCliente" runat="server" visible="false" class="row" style="padding-left: 16px;">
<div class="form-group form-md-line-input input-iconright col-xs-6"> <div class="form-group form-md-line-input input-iconright col-xs-6">
<asp:DropDownList ID="DdlMetodoCliente" runat="server" CssClass=" form-control input-sm select2me" AppendDataBoundItems="true" CausesValidation="true" DataTextField="MetodoPagoSAT" DataValueField="CveMetodoPago" Width="100%"> <asp:DropDownList ID="DdlMetodoCliente" runat="server" CssClass=" form-control input-sm select2me" AutoPostBack="true" AppendDataBoundItems="true" CausesValidation="true" DataTextField="MetodoPagoSAT" DataValueField="CveMetodoPago" Width="100%">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem> <asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList> </asp:DropDownList>
<asp:RequiredFieldValidator ID="RequiredFieldValidator6" runat="server" ControlToValidate="DdlMetodoCliente" InitialValue="-1" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Método Pago''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardarCliente"></asp:RequiredFieldValidator> <asp:RequiredFieldValidator ID="RequiredFieldValidator6" runat="server" ControlToValidate="DdlMetodoCliente" InitialValue="-1" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Método Pago''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardarCliente"></asp:RequiredFieldValidator>

18
Ventas/Ventas.aspx.vb
View File

@@ -6151,14 +6151,10 @@ Partial Class Ventas
dtt = GlobalDTVtaFormaPago dtt = GlobalDTVtaFormaPago
End If End If
DdlFormaPago33.Items.Clear() DdlFormaPago33.Items.Clear()
'DdlFormaPago33.ClearSelection()
'DdlFormaPago33.DataBind()
DdlFormaPago33.DataSource = dtt DdlFormaPago33.DataSource = dtt
DdlFormaPago33.SelectedValue = dtt.FiltroPrimeroValor("CveFormaPago", "") DdlFormaPago33.SelectedValue = dtt.FiltroPrimeroValor("CveFormaPago", "")
DdlFormaPago33.DataBind() DdlFormaPago33.DataBind()
DdlFormaCliente.DataSource = GlobalDTVtaFormaPago
DdlFormaCliente.DataBind()
DdlMetodoCliente.DataSource = GlobalDTVtaMetodoPago DdlMetodoCliente.DataSource = GlobalDTVtaMetodoPago
DdlMetodoCliente.DataBind() DdlMetodoCliente.DataBind()
@@ -23505,7 +23501,8 @@ Partial Class Ventas
RdTipoPersona.SelectedValue = "0" RdTipoPersona.SelectedValue = "0"
DdlMetodoCliente.SelectedValueExist(1) DdlMetodoCliente.SelectedValueExist(1)
DdlFormaCliente.SelectedValueExist(1)
'DdlFormaCliente.SelectedValueExist(1)
DdlRegimenFiscalCliente.DataSource = GlobalDTRegimenesFiscales().FiltraParametros("CveRegimenFiscal = 11") DdlRegimenFiscalCliente.DataSource = GlobalDTRegimenesFiscales().FiltraParametros("CveRegimenFiscal = 11")
DdlRegimenFiscalCliente.DataBind() DdlRegimenFiscalCliente.DataBind()
@@ -37120,5 +37117,16 @@ Partial Class Ventas
Tab.ActiveTabIndex = 0 Tab.ActiveTabIndex = 0
Updatetabs.Update() Updatetabs.Update()
End Sub End Sub
Private Sub DdlMetodoCliente_SelectedIndexChanged(sender As Object, e As EventArgs) Handles DdlMetodoCliente.SelectedIndexChanged
DdlFormaCliente.Items.Clear()
If DdlMetodoCliente.SelectedValue = "3" Then
DdlFormaCliente.DataSource = GlobalDTVtaFormaPago.FiltraParametros("CveFormaPago = 20")
Else
DdlFormaCliente.DataSource = GlobalDTVtaFormaPago.FiltraParametros("CveFormaPago <> 20")
End If
DdlFormaCliente.DataBind()
End Sub
End Class End Class