Merge branch 'master' of http://jperez@192.168.10.111:8383/SIG.git
This commit is contained in:
@@ -395,7 +395,8 @@ End Class
|
||||
<Serializable>
|
||||
Public Class CFDIRetenciones
|
||||
Public Property Impuesto As String
|
||||
Public Property Importe As Double
|
||||
Public Property Importe As Decimal
|
||||
Public Property TasaOCuota As String
|
||||
End Class
|
||||
|
||||
|
||||
@@ -439,8 +440,8 @@ Public Class CFDIComplementoPagos
|
||||
Public Property FormaDePagoP As String = ""
|
||||
Public Property MonedaP As String = ""
|
||||
Public Property NumOperacion As String = ""
|
||||
Public Property TipoCambioP As Double = 0
|
||||
Public Property Monto As Double
|
||||
Public Property TipoCambioP As Decimal = 0
|
||||
Public Property Monto As Decimal
|
||||
Public Property RfcEmisorCtaOrd As String = ""
|
||||
Public Property NomBancoOrdExt As String = ""
|
||||
Public Property CtaOrdenante As String = ""
|
||||
@@ -452,8 +453,24 @@ Public Class CFDIComplementoPagos
|
||||
Public Property SelloPago As String = ""
|
||||
Public Property DocumentosRelacionados As List(Of CFDIComplementoPagosDocsRelacionados)
|
||||
Public Property Impuestos As List(Of CFDIConceptosImpuestos)
|
||||
Public ReadOnly Property Totales As CFDIComplementoPagosTotales
|
||||
Get
|
||||
Dim tRetorno As New CFDIComplementoPagosTotales
|
||||
tRetorno.MontoTotalPagos = (From c In DocumentosRelacionados Select c.ImpPagado).Sum()
|
||||
|
||||
Public ReadOnly Property TotalImpuestosRetenidos As Double
|
||||
tRetorno.TotalTrasladosBaseIVA0 = (From c In Traslados Where c.Impuesto = "002" And c.TasaOCuota = 0 Select c.Base).Sum()
|
||||
tRetorno.TotalTrasladosBaseIVA8 = (From c In Traslados Where c.Impuesto = "002" And c.TasaOCuota = 0.08 Select c.Base).Sum()
|
||||
tRetorno.TotalTrasladosBaseIVA16 = (From c In Traslados Where c.Impuesto = "002" And c.TasaOCuota = 0.16 Select c.Base).Sum()
|
||||
|
||||
tRetorno.TotalTrasladosImpuestoIVA0 = (From c In Traslados Where c.Impuesto = "002" And c.TasaOCuota = 0 Select c.Importe).Sum()
|
||||
tRetorno.TotalTrasladosImpuestoIVA8 = (From c In Traslados Where c.Impuesto = "002" And c.TasaOCuota = 0.08 Select c.Importe).Sum()
|
||||
tRetorno.TotalTrasladosImpuestoIVA16 = (From c In Traslados Where c.Impuesto = "002" And c.TasaOCuota = 0.16 Select c.Importe).Sum()
|
||||
|
||||
Return tRetorno
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Public ReadOnly Property TotalImpuestosRetenidos As Decimal
|
||||
Get
|
||||
Return (From c In Impuestos
|
||||
Where c.TrasladooRetencion = "R"
|
||||
@@ -461,7 +478,7 @@ Public Class CFDIComplementoPagos
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Public ReadOnly Property TotalImpuestosTrasladados As Double
|
||||
Public ReadOnly Property TotalImpuestosTrasladados As Decimal
|
||||
Get
|
||||
Return (From c In Impuestos
|
||||
Where c.TrasladooRetencion = "T"
|
||||
@@ -476,6 +493,60 @@ Public Class CFDIComplementoPagos
|
||||
|
||||
End Sub
|
||||
|
||||
Public ReadOnly Property Retenciones As List(Of CFDIRetenciones)
|
||||
Get
|
||||
Dim tRetorno As New List(Of CFDIRetenciones)
|
||||
Dim TRetenciones As New List(Of CFDIRetenciones)
|
||||
|
||||
For Each c As CFDIComplementoPagosDocsRelacionados In DocumentosRelacionados
|
||||
For Each imp As CFDIConceptosImpuestos In c.Impuestos
|
||||
If imp.TrasladooRetencion = "R" Then
|
||||
tRetorno.Add(New CFDIRetenciones With {.Impuesto = imp.Impuesto, .Importe = imp.Importe})
|
||||
|
||||
End If
|
||||
Next
|
||||
Next
|
||||
If tRetorno.Count > 0 Then
|
||||
TRetenciones = tRetorno.GroupBy(Function(t) New With {Key t.Impuesto}) _
|
||||
.Select(Function(t) New CFDIRetenciones With {.Impuesto = t.Key.Impuesto,
|
||||
.Importe = t.Sum(Function(tt) tt.Importe)}) _
|
||||
.OrderBy(Function(x) x.Impuesto).ToList
|
||||
End If
|
||||
|
||||
tRetorno = Nothing
|
||||
Return TRetenciones
|
||||
|
||||
End Get
|
||||
End Property
|
||||
|
||||
Public ReadOnly Property Traslados As List(Of CFDITraslados)
|
||||
Get
|
||||
Dim tRetorno As New List(Of CFDITraslados)
|
||||
Dim TTraslados As New List(Of CFDITraslados)
|
||||
For Each c As CFDIComplementoPagosDocsRelacionados In DocumentosRelacionados
|
||||
For Each imp As CFDIConceptosImpuestos In c.Impuestos
|
||||
If imp.TrasladooRetencion = "T" Then
|
||||
tRetorno.Add(New CFDITraslados With {.Impuesto = imp.Impuesto, .Base = imp.Base, .Importe = imp.Importe, .TasaOCuota = imp.TasaOCuota, .TipoFactor = imp.TipoFactor})
|
||||
End If
|
||||
Next
|
||||
Next
|
||||
'ya generado todos los registros posibles, los agrupo y los sumo
|
||||
If tRetorno.Count > 0 Then
|
||||
TTraslados = tRetorno.GroupBy(Function(t) New With {Key t.TipoFactor, Key t.Impuesto, Key t.TasaOCuota}) _
|
||||
.Select(Function(t) New CFDITraslados With {.Impuesto = t.Key.Impuesto,
|
||||
.TipoFactor = t.Key.TipoFactor,
|
||||
.TasaOCuota = t.Key.TasaOCuota,
|
||||
.Base = t.Sum(Function(tt) tt.Base),
|
||||
.Importe = t.Sum(Function(tt) tt.Importe)}) _
|
||||
.OrderBy(Function(x) x.Impuesto).ToList
|
||||
|
||||
End If
|
||||
tRetorno = Nothing
|
||||
Return TTraslados
|
||||
|
||||
End Get
|
||||
End Property
|
||||
|
||||
End Class
|
||||
|
||||
<Serializable>
|
||||
@@ -486,10 +557,33 @@ Public Class CFDIComplementoPagosDocsRelacionados
|
||||
Public Property MonedaDR As String = ""
|
||||
Public Property MetodoDePagoDR As String = ""
|
||||
Public Property TipoCambioDR As Decimal
|
||||
Public Property EquivalenciaDR As Decimal = 1
|
||||
Public Property NumParcialidad As Integer = 1
|
||||
Public Property ImpSaldoAnt As Double
|
||||
Public Property ImpPagado As Double
|
||||
Public Property ImpSaldoInsoluto As Double
|
||||
Public Property ImpSaldoAnt As Decimal
|
||||
Public Property ImpPagado As Decimal
|
||||
Public Property ImpSaldoInsoluto As Decimal
|
||||
Public Property ObjetoImpuesto As String = "01"
|
||||
Public Property Impuestos As List(Of CFDIConceptosImpuestos)
|
||||
Sub New()
|
||||
Impuestos = New List(Of CFDIConceptosImpuestos)
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
|
||||
<Serializable>
|
||||
Public Class CFDIComplementoPagosTotales
|
||||
Public Property MontoTotalPagos As Decimal = 0
|
||||
Public Property TotalTrasladosBaseIVA16 As Decimal = 0
|
||||
Public Property TotalTrasladosImpuestoIVA16 As Decimal = 0
|
||||
Public Property TotalTrasladosBaseIVA8 As Decimal = 0
|
||||
Public Property TotalTrasladosImpuestoIVA8 As Decimal = 0
|
||||
Public Property TotalTrasladosBaseIVA0 As Decimal = 0
|
||||
Public Property TotalTrasladosImpuestoIVA0 As Decimal = 0
|
||||
Public Property TotalTrasladosBaseExento As Decimal = 0
|
||||
Public Property TotalRetencionesIVA As Decimal = 0
|
||||
Public Property TotalRetencionesISR As Decimal = 0
|
||||
Public Property TotalRetencionesIEPS As Decimal = 0
|
||||
|
||||
End Class
|
||||
|
||||
|
||||
|
||||
@@ -953,6 +953,7 @@ Public Class ClsBancos
|
||||
Dim Estatus As Integer = 1
|
||||
|
||||
Dim dttpagos As DataTable = Nothing
|
||||
Dim dttpagosimpuestos As DataTable = Nothing
|
||||
Dim dr As Data.DataRow = Nothing
|
||||
|
||||
If GetComplementoPagosRep(-1, Now.AddYears(-5), Now, If(CvePrePoliza > 0, -1, CveIE), CveVenta, If(EsRegeneracion, 2, 1), UsuarioActual.CveEmpresa, CvePrePoliza:=CvePrePoliza) Then
|
||||
@@ -996,7 +997,6 @@ Public Class ClsBancos
|
||||
'ReceptorRFC = drr("RFC").ToString
|
||||
'ReceptorNombre = drr("NombreCliente").ToString
|
||||
|
||||
|
||||
Folio = FActual
|
||||
ComplementoSerieFolio = $"{Serie}-{Folio}"
|
||||
|
||||
@@ -1084,12 +1084,25 @@ Public Class ClsBancos
|
||||
Dim Timbre As CFDITimbre = Nothing
|
||||
Dim Timbrado As New Timbrado
|
||||
|
||||
If UsuarioActual.Empresa.Funcionalidad(350) = "1" Then
|
||||
|
||||
If GetComplementoPagosImpuestos(CveIE, UsuarioActual.CveEmpresa) Then
|
||||
dttpagosimpuestos = DtResultados
|
||||
End If
|
||||
|
||||
Timbre = Timbrado.PreparaTimbrePago(RFCEmpresa, UsuarioActual.Empresa.Empresa, UsuarioActual.Empresa.CodigoRegimenFiscal,
|
||||
Timbre = Timbrado.PreparaTimbrePago40(RFCEmpresa, UsuarioActual.Empresa.Empresa, UsuarioActual.Empresa.CodigoRegimenFiscal,
|
||||
RFCCliente, dr("NombreCliente").ToString, dr("ClienteCP").ToString, dr("CodigoRegimenFiscal").ToString, Serie, Folio.ToString, FechaTimbrado, Cuentapago,
|
||||
dr("FechaDocumento").ToString.ToDate, dr("ClaveFormaPagoSAT").ToString, dr("AbreviaturaSAT").ToString, dr("VentasTotalPagado").ToString.ToDecimal,
|
||||
UsuarioActual.Empresa.CP.ToString, CuentaBeneficiario, dr("TipoCambioPago").ToString.ToDecimal, dttpagos, dttpagosimpuestos, CFDIRelacionado:=CFDIRelacionado)
|
||||
|
||||
Else
|
||||
Timbre = Timbrado.PreparaTimbrePago(RFCEmpresa, UsuarioActual.Empresa.Empresa, UsuarioActual.Empresa.CodigoRegimenFiscal,
|
||||
RFCCliente, dr("NombreCliente").ToString, Serie, Folio.ToString, FechaTimbrado, Cuentapago,
|
||||
dr("FechaDocumento").ToString.ToDate, dr("ClaveFormaPagoSAT").ToString, dr("AbreviaturaSAT").ToString, dr("VentasTotalPagado").ToString.ToDouble,
|
||||
UsuarioActual.Empresa.CP.ToString, CuentaBeneficiario, dr("TipoCambioPago").ToString.ToDouble, dttpagos, CFDIRelacionado:=CFDIRelacionado, EsCancelacion:=False)
|
||||
dr("FechaDocumento").ToString.ToDate, dr("ClaveFormaPagoSAT").ToString, dr("AbreviaturaSAT").ToString, dr("VentasTotalPagado").ToString.ToDecimal,
|
||||
UsuarioActual.Empresa.CP.ToString, CuentaBeneficiario, dr("TipoCambioPago").ToString.ToDecimal, dttpagos, CFDIRelacionado:=CFDIRelacionado, EsCancelacion:=False)
|
||||
|
||||
End If
|
||||
|
||||
|
||||
''PREPARA PARA CANCELACION POR SUSTITUCION DE COMPLEMENTO DE PAGO
|
||||
'If CFDIRelacionado <> "-1" And CFDIRelacionado <> "" Then
|
||||
@@ -1365,6 +1378,26 @@ Public Class ClsBancos
|
||||
Return Retorno
|
||||
End Function
|
||||
|
||||
Public Function GetComplementoPagosImpuestos(CveIE As Integer, CveEmpresa As Integer) As Boolean
|
||||
Dim Retorno As Boolean = False
|
||||
|
||||
DataAdapter("PA_Banc_ComplementoPagoImpuestosGet")
|
||||
|
||||
With SqlAdapter.SelectCommand.Parameters
|
||||
.Add("@CveIE", SqlDbType.Int).Value = CveIE
|
||||
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
|
||||
End With
|
||||
Try
|
||||
SqlAdapter.Fill(Data)
|
||||
|
||||
Retorno = True
|
||||
Catch ex As Exception
|
||||
OnError("Ocurrió un error al obtener informacion de complementos de pago en impuestos.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
|
||||
End Try
|
||||
|
||||
Return Retorno
|
||||
End Function
|
||||
|
||||
Public Function GetComplementoPagos(CveComplementoPago As Integer, CveIE As Integer, CveVenta As Integer, CveEmpresa As Integer) As Boolean
|
||||
Dim Retorno As Boolean = False
|
||||
|
||||
|
||||
@@ -5807,7 +5807,7 @@ Public Class ClsContabilidad
|
||||
Public Function AddCuentasAsignaciones(Optional CveConceptoContable As Integer = -1, Optional CveEmpresa As Integer = -1, Optional CveCuenta As Integer = -1, Optional IdCtaContable As Integer = -1,
|
||||
Optional CveProveedor As Integer = -1, Optional CveCliente As Integer = -1, Optional CvePersonal As Integer = -1, Optional CveClasificacion As Integer = -1,
|
||||
Optional CveAlmacen As Integer = -1, Optional PorcentajeIVA As Decimal = -1, Optional CveConceptoNomina As Decimal = -1, Optional CveBancoCuenta As Integer = -1,
|
||||
Optional CveSubProyecto As Integer = -1, Optional CveActivoFijo As Integer = -1) As Boolean
|
||||
Optional CveSubProyecto As Integer = -1, Optional CveActivoFijo As Integer = -1, Optional CveTipoGasto As Integer = -1) As Boolean
|
||||
Dim Retorno = False
|
||||
|
||||
DataAdapter("PA_Conta_CuentasAsignacionesAdd")
|
||||
@@ -5827,6 +5827,7 @@ Public Class ClsContabilidad
|
||||
.Add("@CveBancoCuenta", SqlDbType.Int).Value = CveBancoCuenta
|
||||
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
|
||||
.Add("@CveActivoFijo", SqlDbType.Int).Value = CveActivoFijo
|
||||
.Add("@CveTipoGasto", SqlDbType.Int).Value = CveTipoGasto
|
||||
End With
|
||||
|
||||
Try
|
||||
@@ -5862,7 +5863,7 @@ Public Class ClsContabilidad
|
||||
Optional IdCtaContable As Integer = -1, Optional CveProveedor As Integer = -1, Optional CveCliente As Integer = -1,
|
||||
Optional CvePersonal As Integer = -1, Optional CveClasificacion As Integer = -1, Optional CveAlmacen As Integer = -1,
|
||||
Optional PorcentajeIVA As Decimal = -1, Optional CveConceptoNomina As Decimal = -1, Optional CveBancoCuenta As Integer = -1,
|
||||
Optional CveSubProyecto As Integer = -1, Optional CveActivoFijo As Integer = -1) As Boolean
|
||||
Optional CveSubProyecto As Integer = -1, Optional CveActivoFijo As Integer = -1, Optional CveTipoGasto As Integer = -1) As Boolean
|
||||
Dim Retorno = False
|
||||
|
||||
DataAdapter("PA_Conta_CuentasAsignacionesUpdate")
|
||||
@@ -5882,6 +5883,7 @@ Public Class ClsContabilidad
|
||||
.Add("@CveBancoCuenta", SqlDbType.Int).Value = CveBancoCuenta
|
||||
.Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto
|
||||
.Add("@CveActivoFijo", SqlDbType.Int).Value = CveActivoFijo
|
||||
.Add("@CveTipoGasto", SqlDbType.Int).Value = CveTipoGasto
|
||||
End With
|
||||
|
||||
Try
|
||||
@@ -6629,6 +6631,30 @@ Public Class ClsContabilidad
|
||||
End Function
|
||||
|
||||
|
||||
Public Function GetRepOrigenAplicacion(FechaFin As Date, CveEmpresa As Integer) As Boolean
|
||||
Dim Respuesta As Boolean = False
|
||||
|
||||
DataAdapter("PA_Conta_RepOrigenAplicacionGet2")
|
||||
|
||||
With SqlAdapter.SelectCommand.Parameters
|
||||
|
||||
.Add("@FechaFin", SqlDbType.Date).Value = FechaFin
|
||||
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
|
||||
|
||||
|
||||
End With
|
||||
Try
|
||||
SqlAdapter.Fill(Data)
|
||||
Respuesta = True
|
||||
Catch ex As Exception
|
||||
Me.OnError("Ocurrió un error al obtener el reporte", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
|
||||
End Try
|
||||
|
||||
Return Respuesta
|
||||
|
||||
End Function
|
||||
|
||||
|
||||
#Region "IDisposable Support"
|
||||
' IDisposable
|
||||
Protected Overridable Sub Dispose(disposing As Boolean)
|
||||
|
||||
@@ -31,11 +31,22 @@ Public Class ClsEdocumentacion
|
||||
SqlAdapter.SelectCommand.Transaction = SqlTransacc
|
||||
End If
|
||||
Data = New DataTable
|
||||
End Sub
|
||||
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
#End Region
|
||||
#Region "materialidad"
|
||||
|
||||
Public Function Materialidad_Tablero(cveEmpresa As Int32, anio As Int32, mes As Int32) As Boolean
|
||||
Dim retorno As Boolean = False
|
||||
DataAdapter("PA_Materialidad_TableroGET", CommandType.StoredProcedure)
|
||||
addParameters("@CveEmpresa", SqlDbType.Int, cveEmpresa)
|
||||
addParameters("@Anio", SqlDbType.Int, anio)
|
||||
addParameters("@Mes", SqlDbType.Int, mes)
|
||||
retorno = RunQuery("Ocurrió un error al obtener el Materialidad_Tablero.")
|
||||
Return retorno
|
||||
End Function
|
||||
#End Region
|
||||
|
||||
#Region "Propiedades"
|
||||
Public ReadOnly Property DSResultados() As DataSet
|
||||
Get
|
||||
|
||||
@@ -4264,7 +4264,7 @@ Public Class ClsPaginas
|
||||
PaginaDict.Add("/Nomina/ChecadorAsistencia.aspx".ToUpper(), 921)
|
||||
PaginaDict.Add("/Nomina/ISRCalculoAnual.aspx".ToUpper(), 918)
|
||||
PaginaDict.Add("/Nomina/MovimientosSUA.aspx".ToUpper(), 919)
|
||||
'PaginaDict.Add("/Nomina/Acumulados.aspx".ToUpper(), 916)
|
||||
PaginaDict.Add("/Nomina/Acumulados.aspx".ToUpper(), 916)
|
||||
PaginaDict.Add("/RH/CalculoSBC.aspx".ToUpper(), 915)
|
||||
PaginaDict.Add("/Inicio.aspx".ToUpper(), -1)
|
||||
PaginaDict.Add("/reporteador.aspx".ToUpper(), -1)
|
||||
@@ -4863,7 +4863,6 @@ Public Class ClsPaginas
|
||||
'PaginaDict.Add("/Contabilidad2/RepBalanceGeneral.aspx".ToUpper(), 530)
|
||||
PaginaDict.Add("/Contabilidad2/CatCuentasAsignaciones.aspx".ToUpper(), 724)
|
||||
PaginaDict.Add("/Contabilidad2/CatContaEjercicios.aspx".ToUpper(), 725)
|
||||
PaginaDict.Add("/Contabilidad2/PolizasImpresion.aspx".ToUpper(), 726)
|
||||
PaginaDict.Add("/Contabilidad2/RepEstadoResultadosHorizontal.aspx".ToUpper(), 420)
|
||||
|
||||
PaginaDict.Add("/Contabilidad2/RepAnexoCatalogoMensualHorizontal.aspx".ToUpper(), -1)
|
||||
|
||||
@@ -686,7 +686,7 @@ Namespace Modelos
|
||||
|
||||
Return Not ErrorPrePolizas
|
||||
End Function
|
||||
Public Function EmitirFactura(Optional Timbrar As Boolean = True, Optional Transac As SqlClient.SqlTransaction = Nothing, Optional ObjContPaqTransac As ClsContPAQi = Nothing) As MMensajeFactura
|
||||
Public Function EmitirFactura(Optional Timbrar As Boolean = True, Optional Transac As SqlClient.SqlTransaction = Nothing, Optional ObjContPaqTransac As ClsContPAQi = Nothing, Optional Modulo As String = "Modelos/GuardarVentaM") As MMensajeFactura
|
||||
Dim Retorno As New MMensajeFactura()
|
||||
|
||||
If Me.Version = "3.3" AndAlso Not Me.TipoDocto.Contiene("Ped", "PeC") Then
|
||||
@@ -782,7 +782,7 @@ Namespace Modelos
|
||||
Next
|
||||
End If
|
||||
|
||||
GuardarVenta(Me, ObjVentas, ObjConta, ObjInventario, ObjContr, DtDetalle, Me.CveNCaVincular, ObjContPaq, ObjBancos, ObjOS, ObjEventos, ObjCGame, ObjClientes, ObjAcum:=ObjAcum, Resp:=Retorno)
|
||||
GuardarVenta(Me, ObjVentas, ObjConta, ObjInventario, ObjContr, DtDetalle, Me.CveNCaVincular, ObjContPaq, ObjBancos, ObjOS, ObjEventos, ObjCGame, ObjClientes, ObjAcum:=ObjAcum, Resp:=Retorno, Modulo:=Modulo)
|
||||
|
||||
'SI ES REFACTURACION
|
||||
Dim ObjNC As List(Of Object) = Nothing
|
||||
@@ -1453,10 +1453,10 @@ Namespace Modelos
|
||||
End If
|
||||
|
||||
End Sub
|
||||
Public Sub GuardarVenta(ByRef factura As Modelos.Factura, ByRef ObjVentas As ClsVentas, ByRef ObjConta As ClsContabilidad, ByRef ObjInventario As ClsInventarios, ByRef ObjContr As ClsContratos, ByRef TmpDTDetalle As DataTable, CveNCaVincular As Integer, ByRef objContPaqi As ClsContPAQi, Optional ByRef ObjBancos As ClsBancos = Nothing, Optional ByRef ObjOS As ClsOS = Nothing, ByRef Optional ObjEventos As ClsOIEventos = Nothing, ByRef Optional ObjCGame As ClsCGame = Nothing, ByRef Optional ObjCliente As ClsClientes = Nothing, Optional EsNotaCredito As Boolean = False, Optional ObjAcum As ClsAcumuladores = Nothing, ByRef Optional Resp As MMensajeFactura = Nothing)
|
||||
Public Sub GuardarVenta(ByRef factura As Modelos.Factura, ByRef ObjVentas As ClsVentas, ByRef ObjConta As ClsContabilidad, ByRef ObjInventario As ClsInventarios, ByRef ObjContr As ClsContratos, ByRef TmpDTDetalle As DataTable, CveNCaVincular As Integer, ByRef objContPaqi As ClsContPAQi, Optional ByRef ObjBancos As ClsBancos = Nothing, Optional ByRef ObjOS As ClsOS = Nothing, ByRef Optional ObjEventos As ClsOIEventos = Nothing, ByRef Optional ObjCGame As ClsCGame = Nothing, ByRef Optional ObjCliente As ClsClientes = Nothing, Optional EsNotaCredito As Boolean = False, Optional ObjAcum As ClsAcumuladores = Nothing, ByRef Optional Resp As MMensajeFactura = Nothing, Optional Modulo As String = "Modelos/GuardarVentaM")
|
||||
Dim Msgok As New StringBuilder
|
||||
|
||||
factura.CvePrePoliza = ObjConta.AddPrePolizas("Modelos/GuardarVentaM", factura.CvePlantillaPoliza, factura.TotalTC, factura.TotalTC, factura.CveMoneda, factura.Fecha, If(factura.CveEmpresaCRM > 0, factura.EmpresaCRM, factura.Cliente.Nombre), factura.CveUsuario, factura.CveEmpresa)
|
||||
factura.CvePrePoliza = ObjConta.AddPrePolizas(Modulo, factura.CvePlantillaPoliza, factura.TotalTC, factura.TotalTC, factura.CveMoneda, factura.Fecha, If(factura.CveEmpresaCRM > 0, factura.EmpresaCRM, factura.Cliente.Nombre), factura.CveUsuario, factura.CveEmpresa)
|
||||
|
||||
Dim RFCReceptor As String = ""
|
||||
|
||||
|
||||
@@ -898,8 +898,8 @@ Public Class Timbrado
|
||||
|
||||
Public Function PreparaTimbrePago(EmisorRFC As String, EmisorNombre As String, EmisorRegimenFiscal As String,
|
||||
ReceptorRFC As String, ReceptorNombre As String, Serie As String, Folio As String, FechaTimbrado As DateTime,
|
||||
CuentaPago As String, FechaPago As DateTime, FormaPago As String, MonedaPago As String, Monto As Double, LugarExpedicion As String,
|
||||
CuentaBeneficiario As String, TipoCambioP As Double, dttpagos As Data.DataTable,
|
||||
CuentaPago As String, FechaPago As DateTime, FormaPago As String, MonedaPago As String, Monto As Decimal, LugarExpedicion As String,
|
||||
CuentaBeneficiario As String, TipoCambioP As Decimal, dttpagos As Data.DataTable,
|
||||
Optional UsoCFDI As String = "P01", Optional CFDIRelacionado As String = "", Optional EsCancelacion As Boolean = False) As CFDITimbre
|
||||
' validación extra para cuando es cancelación requiere el folio relacionado
|
||||
If EsCancelacion AndAlso CFDIRelacionado = "" Then
|
||||
@@ -957,7 +957,7 @@ Public Class Timbrado
|
||||
|
||||
Dim ImporteCancelacion As Decimal = 1
|
||||
Dim MonedaCancelacion As String = "MXN"
|
||||
Dim TipoCambioCancelacion As Double = 1
|
||||
Dim TipoCambioCancelacion As Decimal = 1
|
||||
If EsCancelacion Then MonedaPago = MonedaCancelacion
|
||||
'como registra un peso por cada fatura que se cancele, se tiene que multiplicar por el numero de facturas, para que se pueda emitir el timbre
|
||||
If dttpagos IsNot Nothing AndAlso dttpagos.Rows.Count > 0 Then ImporteCancelacion = ImporteCancelacion * dttpagos.Rows.Count
|
||||
@@ -966,7 +966,7 @@ Public Class Timbrado
|
||||
Timbre.ComplementoPagos.FechaPago = FechaPago
|
||||
Timbre.ComplementoPagos.FormaDePagoP = FormaPago
|
||||
Timbre.ComplementoPagos.MonedaP = MonedaPago
|
||||
Timbre.ComplementoPagos.Monto = If(EsCancelacion, ImporteCancelacion, Monto)
|
||||
Timbre.ComplementoPagos.Monto = If(EsCancelacion, ImporteCancelacion, Monto).RoundSQL
|
||||
Timbre.ComplementoPagos.TipoCambioP = If(EsCancelacion, TipoCambioCancelacion, TipoCambioP)
|
||||
|
||||
|
||||
@@ -1019,6 +1019,155 @@ Public Class Timbrado
|
||||
If PorcentajeIEPS > 0 Then Timbre.ComplementoPagos.Impuestos.Add(New CFDIConceptosImpuestos With {.Base = VentaImportePago * PorcentajeIEPS, .TasaOCuota = PorcentajeIEPS, .Impuesto = "003"})
|
||||
|
||||
|
||||
'Next
|
||||
|
||||
Return Timbre
|
||||
|
||||
End Function
|
||||
|
||||
Public Function PreparaTimbrePago40(EmisorRFC As String, EmisorNombre As String, EmisorRegimenFiscal As String,
|
||||
ReceptorRFC As String, ReceptorNombre As String, ReceptorDomicilioFiscal As String, ReceptorRegimenFiscal As String,
|
||||
Serie As String, Folio As String, FechaTimbrado As DateTime,
|
||||
CuentaPago As String, FechaPago As DateTime, FormaPago As String, MonedaPago As String, Monto As Decimal, LugarExpedicion As String,
|
||||
CuentaBeneficiario As String, TipoCambioP As Decimal, dttpagos As Data.DataTable, dttpagosimpuestos As DataTable,
|
||||
Optional UsoCFDI As String = "CP01", Optional CFDIRelacionado As String = "") As CFDITimbre
|
||||
|
||||
Dim Timbre As New CFDITimbre
|
||||
|
||||
Timbre.Comprobante.TipoComprobante = "P"
|
||||
Timbre.Comprobante.Folio = Folio
|
||||
Timbre.Comprobante.Serie = Serie
|
||||
Timbre.Comprobante.Fecha = FechaTimbrado
|
||||
Timbre.Comprobante.FormadePago = ""
|
||||
Timbre.Comprobante.CondicionesdePago = ""
|
||||
Timbre.Comprobante.MetodoPago = ""
|
||||
Timbre.Comprobante.SubTotal = 0
|
||||
Timbre.Comprobante.Descuentos = 0
|
||||
Timbre.Comprobante.Moneda = "XXX"
|
||||
Timbre.Comprobante.TipoCambio = ""
|
||||
Timbre.Comprobante.Total = 0
|
||||
|
||||
Timbre.Comprobante.LugarExpedicion = LugarExpedicion
|
||||
|
||||
Timbre.Emisor.RegimenFiscal = EmisorRegimenFiscal
|
||||
Timbre.Emisor.Nombre = EmisorNombre
|
||||
Timbre.Emisor.RFC = EmisorRFC
|
||||
|
||||
Timbre.Receptor.RFC = ReceptorRFC
|
||||
Timbre.Receptor.Nombre = ReceptorNombre
|
||||
Timbre.Receptor.DomicilioFiscalReceptor = ReceptorDomicilioFiscal
|
||||
Timbre.Receptor.RegimenFiscalReceptor = ReceptorRegimenFiscal
|
||||
Timbre.Receptor.UsoCFDI = UsoCFDI
|
||||
|
||||
If CFDIRelacionado <> "-1" And CFDIRelacionado <> "" Then
|
||||
Timbre.CFDIRelacionados.TipoRelacion = "04"
|
||||
Timbre.CFDIRelacionados.UUID.Add(CFDIRelacionado)
|
||||
End If
|
||||
|
||||
'detalles
|
||||
|
||||
Dim concepto As New CFDIConceptos With {.Cantidad = 1,
|
||||
.Descripcion = "Pago",
|
||||
.ValorUnitario = 0,
|
||||
.Importe = 0,
|
||||
.Unidad = "",
|
||||
.ClaveUnidad = "ACT",
|
||||
.ClaveProdServ = "84111506",
|
||||
.Noidentificacion = "",
|
||||
.ObjetoImpuesto = "01"}
|
||||
Timbre.Conceptos.Add(concepto)
|
||||
|
||||
Select Case FormaPago
|
||||
Case "01"
|
||||
CuentaPago = ""
|
||||
CuentaBeneficiario = ""
|
||||
|
||||
End Select
|
||||
|
||||
Dim ImporteCancelacion As Decimal = 1
|
||||
Dim MonedaCancelacion As String = "MXN"
|
||||
Dim TipoCambioCancelacion As Decimal = 1
|
||||
|
||||
'como registra un peso por cada fatura que se cancele, se tiene que multiplicar por el numero de facturas, para que se pueda emitir el timbre
|
||||
If dttpagos IsNot Nothing AndAlso dttpagos.Rows.Count > 0 Then ImporteCancelacion = ImporteCancelacion * dttpagos.Rows.Count
|
||||
Timbre.ComplementoPagos.CtaOrdenante = CuentaPago
|
||||
Timbre.ComplementoPagos.CtaBeneficiario = CuentaBeneficiario
|
||||
Timbre.ComplementoPagos.FechaPago = FechaPago
|
||||
Timbre.ComplementoPagos.FormaDePagoP = FormaPago
|
||||
Timbre.ComplementoPagos.MonedaP = MonedaPago
|
||||
Timbre.ComplementoPagos.Monto = Monto.RoundSQL
|
||||
Timbre.ComplementoPagos.TipoCambioP = TipoCambioP
|
||||
|
||||
|
||||
Dim VentaFolioFiscal, VentaSerie, VentaFolio, VentaAbreviaturaSAT, VentaMetodoPago, ObjetoImpuesto As String
|
||||
Dim VentaImportePago, VentaImporteSaldoInsoluto, VentaImporteSaldoAnterior, VentaTipoCambio, PorcentajeIVA, PorcentajeIEPS As Decimal
|
||||
Dim VentaNumParcialidad As Integer
|
||||
|
||||
If dttpagos IsNot Nothing AndAlso dttpagos.Rows.Count > 0 Then
|
||||
|
||||
For Each dr As Data.DataRow In dttpagos.Rows
|
||||
VentaFolioFiscal = dr("FolioFiscal").ToString
|
||||
VentaSerie = dr("VentaSerie").ToString
|
||||
VentaFolio = dr("VentaFolio").ToString
|
||||
VentaAbreviaturaSAT = dr("VentaAbreviaturaSAT").ToString
|
||||
VentaMetodoPago = dr("MetodoPago").ToString
|
||||
VentaImportePago = dr("VentaImportePagado").ToString.ToDecimal
|
||||
VentaImporteSaldoInsoluto = dr("ImpSaldoInsoluto").ToString.ToDecimal
|
||||
VentaImporteSaldoAnterior = dr("ImpSaldoAnterior").ToString.ToDecimal
|
||||
VentaTipoCambio = dr("TipoCambio").ToString.ToDecimal
|
||||
VentaNumParcialidad = dr("NumParcialidad").ToString.ToEntero
|
||||
PorcentajeIVA = dr("PorcentajeIVA").ToString.ToDecimal
|
||||
PorcentajeIEPS = dr("PorcentajeIEPS").ToString.ToDecimal
|
||||
ObjetoImpuesto = dr("ObjetoImpuesto").ToString
|
||||
' si la moneda es igual, se omite el tipo de cambio de la venta
|
||||
If MonedaPago = VentaAbreviaturaSAT Then
|
||||
VentaTipoCambio = 1
|
||||
End If
|
||||
|
||||
'condiciones especiales para el pago en pesos, facturas en moneda extranjera
|
||||
If MonedaPago = "MXN" AndAlso VentaAbreviaturaSAT <> "MXN" Then
|
||||
VentaTipoCambio = 1 / VentaTipoCambio
|
||||
End If
|
||||
|
||||
' For Each drr As Data.DataRow In DtFacturasPagadas.Rows
|
||||
Dim doc As New CFDIComplementoPagosDocsRelacionados With {.IdDocumento = VentaFolioFiscal,
|
||||
.Serie = VentaSerie,
|
||||
.Folio = VentaFolio,
|
||||
.MonedaDR = VentaAbreviaturaSAT,
|
||||
.MetodoDePagoDR = VentaMetodoPago,
|
||||
.ImpPagado = VentaImportePago,
|
||||
.ImpSaldoInsoluto = VentaImporteSaldoInsoluto,
|
||||
.ImpSaldoAnt = VentaImporteSaldoAnterior,
|
||||
.TipoCambioDR = VentaTipoCambio,
|
||||
.EquivalenciaDR = VentaTipoCambio,
|
||||
.NumParcialidad = VentaNumParcialidad,
|
||||
.ObjetoImpuesto = ObjetoImpuesto} 'If(drr("MetodoPago").ToString = "PUE", 0, drr("NumParcialidad").ToString.ToEntero)}
|
||||
|
||||
For Each drp As DataRow In dttpagosimpuestos.FiltraParametros(String.Format("FolioFiscal = '{0}'", VentaFolioFiscal.ToLower)).Rows
|
||||
doc.Impuestos.Add(New CFDIConceptosImpuestos With {
|
||||
.TrasladooRetencion = drp("Tipo").ToString,
|
||||
.Base = drp("Base").ToString.ToDecimal.RoundSQL,
|
||||
.TasaOCuota = drp("PorcentajeImpuesto").ToString().ToDecimal,
|
||||
.Impuesto = drp("TipoImpuesto").ToString,
|
||||
.Importe = drp("Importe").ToString().ToDecimal.RoundSQL
|
||||
}
|
||||
)
|
||||
|
||||
Next
|
||||
|
||||
Timbre.ComplementoPagos.DocumentosRelacionados.Add(doc)
|
||||
|
||||
Next
|
||||
|
||||
|
||||
End If
|
||||
'If drr("IVA").ToString.ToDouble > 0 Then
|
||||
'If PorcentajeIVA > 0 Then Timbre.ComplementoPagos.Impuestos.Add(New CFDIConceptosImpuestos With {.TrasladooRetencion = "T", .Base = VentaImportePago * PorcentajeIVA, .TasaOCuota = PorcentajeIVA, .Impuesto = "002"})
|
||||
'Timbre.ComplementoPagos.Impuestos.Add(New CFDIConceptosImpuestos With {.TrasladooRetencion = "R", .Base = 0, .TasaOCuota = 0, .Impuesto = "002"})
|
||||
|
||||
'If PorcentajeIEPS > 0 Then Timbre.ComplementoPagos.Impuestos.Add(New CFDIConceptosImpuestos With {.Base = VentaImportePago * PorcentajeIEPS, .TasaOCuota = PorcentajeIEPS, .Impuesto = "003"})
|
||||
|
||||
|
||||
'Next
|
||||
|
||||
Return Timbre
|
||||
@@ -1204,7 +1353,7 @@ Public Class Timbrado
|
||||
|
||||
For Each Ret In ObjCFDITimbre.Retenciones
|
||||
Dim clbImp As ClbNegBICFDv3_3.Impuesto = If(Ret.Impuesto = "002", ClbNegBICFDv3_3.Impuesto.IVA, If(Ret.Impuesto = "003", ClbNegBICFDv3_3.Impuesto.IEPS, ClbNegBICFDv3_3.Impuesto.ISR))
|
||||
Msg = CFDi.ImpuestosRetencionesCfd(clbImp, Ret.Importe.ToDecimal)
|
||||
Msg = CFDi.ImpuestosRetencionesCfd(clbImp, Ret.Importe)
|
||||
Next
|
||||
|
||||
If Not HasErrorRetenciones Then
|
||||
@@ -3551,6 +3700,10 @@ Public Class Timbrado
|
||||
#End Region
|
||||
|
||||
#Region "Receptor"
|
||||
If ObjCFDITimbre.Receptor.RFC.ToUpper.Contiene("XAXX010101000", "XEXX010101000") Then 'Condición del SAT. CFDI40149
|
||||
ObjCFDITimbre.Receptor.DomicilioFiscalReceptor = ObjCFDITimbre.Comprobante.LugarExpedicion
|
||||
End If
|
||||
|
||||
comprobante.Receptor = New Profact.TimbraCFDI40.ComprobanteReceptor()
|
||||
comprobante.Receptor.Rfc = ObjCFDITimbre.Receptor.RFC
|
||||
comprobante.Receptor.Nombre = ObjCFDITimbre.Receptor.Nombre
|
||||
@@ -3675,7 +3828,7 @@ Public Class Timbrado
|
||||
For Each Ret In ObjCFDITimbre.Retenciones
|
||||
comprobante.Impuestos.Retenciones(w) = New Profact.TimbraCFDI40.ComprobanteImpuestosRetencion()
|
||||
comprobante.Impuestos.Retenciones(w).Impuesto = Ret.Impuesto
|
||||
comprobante.Impuestos.Retenciones(w).Importe = Ret.Importe.ToDecimal
|
||||
comprobante.Impuestos.Retenciones(w).Importe = Ret.Importe
|
||||
w += 1
|
||||
Next
|
||||
|
||||
@@ -3899,9 +4052,9 @@ Public Class Timbrado
|
||||
ComPag.Pago(0).FechaPago = ObjCFDITimbre.ComplementoPagos.FechaPago.ToString("yyyy-MM-ddTHH:mm:ss").ToDate()
|
||||
ComPag.Pago(0).FormaDePagoP = ObjCFDITimbre.ComplementoPagos.FormaDePagoP
|
||||
ComPag.Pago(0).MonedaP = ObjCFDITimbre.ComplementoPagos.MonedaP
|
||||
ComPag.Pago(0).TipoCambioPSpecified = If(ObjCFDITimbre.ComplementoPagos.MonedaP = "MXN", False, True)
|
||||
ComPag.Pago(0).TipoCambioP = ObjCFDITimbre.ComplementoPagos.TipoCambioP.ToDecimal
|
||||
ComPag.Pago(0).Monto = ObjCFDITimbre.ComplementoPagos.Monto.ToDecimal
|
||||
ComPag.Pago(0).TipoCambioPSpecified = True 'If(ObjCFDITimbre.ComplementoPagos.MonedaP = "MXN", False, True)
|
||||
ComPag.Pago(0).TipoCambioP = ObjCFDITimbre.ComplementoPagos.TipoCambioP
|
||||
ComPag.Pago(0).Monto = ObjCFDITimbre.ComplementoPagos.Monto
|
||||
If ObjCFDITimbre.ComplementoPagos.NumOperacion <> "" Then
|
||||
ComPag.Pago(0).NumOperacion = ObjCFDITimbre.ComplementoPagos.NumOperacion
|
||||
End If
|
||||
@@ -3936,6 +4089,30 @@ Public Class Timbrado
|
||||
End If
|
||||
|
||||
If ObjCFDITimbre.ComplementoPagos.DocumentosRelacionados.Count > 0 Then
|
||||
Dim Totales As New Profact.TimbraCFDI40.Complementos.Pagos20.PagosTotales()
|
||||
'Totales Generales
|
||||
|
||||
Totales.MontoTotalPagos = ObjCFDITimbre.ComplementoPagos.Totales.MontoTotalPagos
|
||||
|
||||
Totales.TotalTrasladosBaseIVA16 = ObjCFDITimbre.ComplementoPagos.Totales.TotalTrasladosBaseIVA16
|
||||
Totales.TotalTrasladosBaseIVA16Specified = Totales.TotalTrasladosBaseIVA16 > 0
|
||||
Totales.TotalTrasladosImpuestoIVA16 = ObjCFDITimbre.ComplementoPagos.Totales.TotalTrasladosImpuestoIVA16.RoundSQL
|
||||
Totales.TotalTrasladosImpuestoIVA16Specified = Totales.TotalTrasladosBaseIVA16 > 0
|
||||
|
||||
Totales.TotalTrasladosBaseIVA8 = ObjCFDITimbre.ComplementoPagos.Totales.TotalTrasladosBaseIVA8
|
||||
Totales.TotalTrasladosBaseIVA8Specified = Totales.TotalTrasladosBaseIVA8 > 0
|
||||
Totales.TotalTrasladosImpuestoIVA8 = ObjCFDITimbre.ComplementoPagos.Totales.TotalTrasladosBaseIVA8.RoundSQL
|
||||
Totales.TotalTrasladosImpuestoIVA8Specified = Totales.TotalTrasladosBaseIVA8 > 0
|
||||
|
||||
Totales.TotalTrasladosBaseIVA0 = ObjCFDITimbre.ComplementoPagos.Totales.TotalTrasladosBaseIVA0
|
||||
Totales.TotalTrasladosBaseIVA0Specified = Totales.TotalTrasladosBaseIVA0 > 0
|
||||
Totales.TotalTrasladosImpuestoIVA0 = 0
|
||||
Totales.TotalTrasladosImpuestoIVA0Specified = Totales.TotalTrasladosBaseIVA0 > 0
|
||||
|
||||
|
||||
Totales.TotalRetencionesIEPSSpecified = False
|
||||
ComPag.Totales = Totales
|
||||
|
||||
ComPag.Pago(0).DoctoRelacionado = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoDoctoRelacionado(ObjCFDITimbre.ComplementoPagos.DocumentosRelacionados.Count - 1) {}
|
||||
Dim i As Integer
|
||||
For Each doc As CFDIComplementoPagosDocsRelacionados In ObjCFDITimbre.ComplementoPagos.DocumentosRelacionados
|
||||
@@ -3946,60 +4123,124 @@ Public Class Timbrado
|
||||
End If
|
||||
ComPag.Pago(0).DoctoRelacionado(i).Folio = doc.Folio
|
||||
ComPag.Pago(0).DoctoRelacionado(i).MonedaDR = doc.MonedaDR
|
||||
'ComPag.Pago(0).DoctoRelacionado(i).TipoCambioDRSpecifiedP = If(doc.TipoCambioDR = 0, False, True)
|
||||
'ComPag.Pago(0).DoctoRelacionado(i).TipoCambioDR = doc.TipoCambioDR
|
||||
'ComPag.Pago(0).DoctoRelacionado(i).MetodoDePagoDR = doc.MetodoDePagoDR
|
||||
ComPag.Pago(0).DoctoRelacionado(i).NumParcialidad = doc.NumParcialidad.ToString
|
||||
|
||||
'ComPag.Pago(0).DoctoRelacionado(i).ImpSaldoAntSpecified = True
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpSaldoAnt = doc.ImpSaldoAnt.ToDecimal
|
||||
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpSaldoAnt = doc.ImpSaldoAnt.RoundSQL
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpPagadoSpecified = True
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpPagado = doc.ImpPagado.ToDecimal
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpPagado = doc.ImpPagado.RoundSQL
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpSaldoInsoluto = doc.ImpSaldoInsoluto.RoundSQL
|
||||
ComPag.Pago(0).DoctoRelacionado(i).EquivalenciaDR = doc.EquivalenciaDR
|
||||
ComPag.Pago(0).DoctoRelacionado(i).EquivalenciaDRSpecified = True
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ObjetoImpDR = doc.ObjetoImpuesto
|
||||
|
||||
'ComPag.Pago(0).DoctoRelacionado(i).ImpSaldoInsolutoSpecified = True
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpSaldoInsoluto = doc.ImpSaldoInsoluto.ToDecimal
|
||||
If doc.Impuestos IsNot Nothing Then
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpuestosDR = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoDoctoRelacionadoImpuestosDR
|
||||
''traslados
|
||||
If (doc.Impuestos).Where(Function(x) x.TrasladooRetencion = "T").Count > 0 Then
|
||||
Dim j As Integer = 0
|
||||
For Each docimp As CFDIConceptosImpuestos In doc.Impuestos.Where(Function(x) x.TrasladooRetencion = "T")
|
||||
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpuestosDR.TrasladosDR = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoDoctoRelacionadoImpuestosDRTrasladoDR(doc.Impuestos.Where(Function(x) x.TrasladooRetencion = "T").Count - 1) {}
|
||||
If docimp.TrasladooRetencion = "T" Then
|
||||
Dim Tra As New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoDoctoRelacionadoImpuestosDRTrasladoDR
|
||||
Tra.BaseDR = docimp.Base
|
||||
Tra.ImporteDRSpecified = True
|
||||
Tra.ImporteDR = docimp.Importe
|
||||
Tra.ImpuestoDR = docimp.Impuesto
|
||||
Tra.TipoFactorDR = docimp.TipoFactor
|
||||
Tra.TasaOCuotaDRSpecified = True
|
||||
Tra.TasaOCuotaDR = docimp.TasaOCuota
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpuestosDR.TrasladosDR(j) = Tra
|
||||
End If
|
||||
j += 1
|
||||
Next
|
||||
End If
|
||||
|
||||
''retenciones
|
||||
If (doc.Impuestos).Where(Function(x) x.TrasladooRetencion = "R").Count > 0 Then
|
||||
Dim j As Integer = 0
|
||||
For Each docimp As CFDIConceptosImpuestos In doc.Impuestos.Where(Function(x) x.TrasladooRetencion = "R")
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpuestosDR.RetencionesDR = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoDoctoRelacionadoImpuestosDRRetencionDR(doc.Impuestos.Where(Function(x) x.TrasladooRetencion = "R").Count - 1) {}
|
||||
If docimp.TrasladooRetencion = "R" Then
|
||||
Dim Tra As New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoDoctoRelacionadoImpuestosDRRetencionDR
|
||||
Tra.BaseDR = docimp.Base
|
||||
Tra.ImporteDR = docimp.Importe
|
||||
Tra.ImpuestoDR = docimp.Impuesto
|
||||
Tra.TipoFactorDR = docimp.TipoFactor
|
||||
Tra.TasaOCuotaDR = docimp.TasaOCuota
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpuestosDR.RetencionesDR(j) = Tra
|
||||
End If
|
||||
j += 1
|
||||
Next
|
||||
End If
|
||||
End If
|
||||
i += 1
|
||||
Next
|
||||
|
||||
'Estos impuestos aplicarían para anticipos
|
||||
If ObjCFDITimbre.ComplementoPagos.TotalImpuestosRetenidos > 0 OrElse ObjCFDITimbre.ComplementoPagos.TotalImpuestosTrasladados > 0 Then
|
||||
If ObjCFDITimbre.ComplementoPagos.Traslados.Count > 0 Then
|
||||
Dim x As Integer
|
||||
ComPag.Pago(0).ImpuestosP = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosP(0) {}
|
||||
ComPag.Pago(0).ImpuestosP(0) = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosP()
|
||||
'ComPag.Pago(0).ImpuestosP(0).TotalImpuestosRetenidosSpecifiedP = True
|
||||
'ComPag.Pago(0).ImpuestosP(0).TotalImpuestosRetenidos = ObjCFDITimbre.ComplementoPagos.TotalImpuestosRetenidos.ToDecimal
|
||||
'ComPag.Pago(0).ImpuestosP(0).TotalImpuestosTrasladadosSpecified = True
|
||||
'ComPag.Pago(0).ImpuestosP(0).TotalImpuestosTrasladados = ObjCFDITimbre.ComplementoPagos.TotalImpuestosTrasladados.ToDecimal
|
||||
|
||||
If (ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(x) x.TrasladooRetencion = "R").Count > 0 Then
|
||||
Dim x As Integer
|
||||
ComPag.Pago(0).ImpuestosP(0).RetencionesP = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosPRetencionP((ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(w) w.TrasladooRetencion = "R").Count - 1) {}
|
||||
For Each Ret As CFDIConceptosImpuestos In (ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(w) w.TrasladooRetencion = "R")
|
||||
ComPag.Pago(0).ImpuestosP(0).RetencionesP(x) = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosPRetencionP()
|
||||
ComPag.Pago(0).ImpuestosP(0).RetencionesP(x).ImpuestoP = Ret.Impuesto
|
||||
ComPag.Pago(0).ImpuestosP(0).RetencionesP(x).ImporteP = Ret.Importe
|
||||
x += 1
|
||||
Next
|
||||
End If
|
||||
If (ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(x) x.TrasladooRetencion = "T").Count > 0 Then
|
||||
Dim x As Integer
|
||||
ComPag.Pago(0).ImpuestosP(0).TrasladosP = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosPTrasladoP((ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(w) w.TrasladooRetencion = "T").Count - 1) {}
|
||||
For Each Tra As CFDIConceptosImpuestos In (ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(w) w.TrasladooRetencion = "T")
|
||||
ComPag.Pago(0).ImpuestosP(0).TrasladosP(x) = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosPTrasladoP()
|
||||
ComPag.Pago(0).ImpuestosP(0).TrasladosP(x).ImpuestoP = Tra.Impuesto
|
||||
ComPag.Pago(0).ImpuestosP(0).TrasladosP(x).TipoFactorP = Tra.TipoFactor
|
||||
ComPag.Pago(0).ImpuestosP(0).TrasladosP(x).TasaOCuotaP = Tra.TasaOCuota
|
||||
ComPag.Pago(0).ImpuestosP(0).TrasladosP(x).ImporteP = Tra.Importe
|
||||
x += 1
|
||||
Next
|
||||
End If
|
||||
ComPag.Pago(0).ImpuestosP(0).TrasladosP = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosPTrasladoP((ObjCFDITimbre.ComplementoPagos.Traslados).Count - 1) {}
|
||||
For Each Tra As CFDITraslados In (ObjCFDITimbre.ComplementoPagos.Traslados)
|
||||
ComPag.Pago(0).ImpuestosP(0).TrasladosP(x) = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosPTrasladoP()
|
||||
ComPag.Pago(0).ImpuestosP(0).TrasladosP(x).ImpuestoP = Tra.Impuesto
|
||||
ComPag.Pago(0).ImpuestosP(0).TrasladosP(x).TipoFactorP = Tra.TipoFactor
|
||||
ComPag.Pago(0).ImpuestosP(0).TrasladosP(x).TasaOCuotaP = Tra.TasaOCuota
|
||||
ComPag.Pago(0).ImpuestosP(0).TrasladosP(x).ImporteP = Tra.Importe
|
||||
ComPag.Pago(0).ImpuestosP(0).TrasladosP(x).BaseP = Tra.Base
|
||||
x += 1
|
||||
Next
|
||||
End If
|
||||
|
||||
If (ObjCFDITimbre.ComplementoPagos.Retenciones).Count > 0 Then
|
||||
Dim x As Integer
|
||||
If ComPag.Pago(0).ImpuestosP(0) Is Nothing Then ComPag.Pago(0).ImpuestosP = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosP(0) {}
|
||||
ComPag.Pago(0).ImpuestosP(0).RetencionesP = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosPRetencionP((ObjCFDITimbre.ComplementoPagos.Retenciones).Count - 1) {}
|
||||
For Each Ret As CFDIRetenciones In ObjCFDITimbre.ComplementoPagos.Retenciones
|
||||
ComPag.Pago(0).ImpuestosP(0).RetencionesP(x) = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosPRetencionP()
|
||||
ComPag.Pago(0).ImpuestosP(0).RetencionesP(x).ImpuestoP = Ret.Impuesto
|
||||
ComPag.Pago(0).ImpuestosP(0).RetencionesP(x).ImporteP = Ret.Importe
|
||||
x += 1
|
||||
Next
|
||||
End If
|
||||
|
||||
|
||||
Dim nsComp As New System.Xml.Serialization.XmlSerializerNamespaces()
|
||||
nsComp.Add("pago20", "http://www.sat.gob.mx/Pagos")
|
||||
Dim xmlComp As String = Profact.TimbraCFDI.XMLUtilerias.SerializaObjeto(ComPag, GetType(Profact.TimbraCFDI33.Complementos.Pagos10.Pagos), nsComp)
|
||||
''Estos impuestos aplicarían para anticipos
|
||||
'If ObjCFDITimbre.ComplementoPagos.tota > 0 OrElse ObjCFDITimbre.ComplementoPagos.TotalImpuestosTrasladados > 0 Then
|
||||
' ComPag.Pago(0).ImpuestosP = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosP(0) {}
|
||||
' ComPag.Pago(0).ImpuestosP(0) = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosP()
|
||||
|
||||
' If (ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(x) x.TrasladooRetencion = "T").Count > 0 Then
|
||||
' Dim x As Integer
|
||||
' ComPag.Pago(0).ImpuestosP(0).TrasladosP = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosPTrasladoP((ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(w) w.TrasladooRetencion = "T").Count - 1) {}
|
||||
' For Each Tra As CFDIConceptosImpuestos In (ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(w) w.TrasladooRetencion = "T")
|
||||
' ComPag.Pago(0).ImpuestosP(0).TrasladosP(x) = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosPTrasladoP()
|
||||
' ComPag.Pago(0).ImpuestosP(0).TrasladosP(x).ImpuestoP = Tra.Impuesto
|
||||
' ComPag.Pago(0).ImpuestosP(0).TrasladosP(x).TipoFactorP = Tra.TipoFactor
|
||||
' ComPag.Pago(0).ImpuestosP(0).TrasladosP(x).TasaOCuotaP = Tra.TasaOCuota
|
||||
' ComPag.Pago(0).ImpuestosP(0).TrasladosP(x).ImporteP = Tra.Importe
|
||||
' x += 1
|
||||
' Next
|
||||
' End If
|
||||
|
||||
' If (ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(x) x.TrasladooRetencion = "R").Count > 0 Then
|
||||
' Dim x As Integer
|
||||
' ComPag.Pago(0).ImpuestosP(0).RetencionesP = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosPRetencionP((ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(w) w.TrasladooRetencion = "R").Count - 1) {}
|
||||
' For Each Ret As CFDIConceptosImpuestos In (ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(w) w.TrasladooRetencion = "R")
|
||||
' ComPag.Pago(0).ImpuestosP(0).RetencionesP(x) = New Profact.TimbraCFDI40.Complementos.Pagos20.PagosPagoImpuestosPRetencionP()
|
||||
' ComPag.Pago(0).ImpuestosP(0).RetencionesP(x).ImpuestoP = Ret.Impuesto
|
||||
' ComPag.Pago(0).ImpuestosP(0).RetencionesP(x).ImporteP = Ret.Importe
|
||||
' x += 1
|
||||
' Next
|
||||
' End If
|
||||
|
||||
|
||||
'End If
|
||||
|
||||
|
||||
Dim nsComp As New System.Xml.Serialization.XmlSerializerNamespaces()
|
||||
nsComp.Add("pago20", "http://www.sat.gob.mx/Pagos20")
|
||||
Dim xmlComp As String = Profact.TimbraCFDI.XMLUtilerias.SerializaObjeto(ComPag, GetType(Profact.TimbraCFDI40.Complementos.Pagos20.Pagos), nsComp)
|
||||
Dim docComp As New XmlDocument()
|
||||
docComp.LoadXml(xmlComp)
|
||||
'comprobante.PagosSpecified = True
|
||||
@@ -4638,7 +4879,6 @@ Public Class Timbrado
|
||||
If FolioFiscal <> "" Then
|
||||
resultadoTimbre.GuardaXml(RutaArchivo, NombreArchivoXML)
|
||||
|
||||
|
||||
If ObjCFDITimbre.Comprobante.TipoComprobante <> "P" Then
|
||||
|
||||
'Actualiza Estatus Factura
|
||||
@@ -4732,6 +4972,7 @@ Public Class Timbrado
|
||||
End If
|
||||
|
||||
End If
|
||||
resultadoTimbre.GuardaXml(RutaArchivo, NombreArchivoXML)
|
||||
Catch ex As Exception
|
||||
Retorno = ex.ToString()
|
||||
End Try
|
||||
@@ -4790,6 +5031,9 @@ Public Class Timbrado
|
||||
#End Region
|
||||
|
||||
#Region "Receptor"
|
||||
If ObjCFDITimbre.Receptor.RFC.ToUpper.Contiene("XAXX010101000", "XEXX010101000") Then 'Condición del SAT. CFDI40149
|
||||
ObjCFDITimbre.Receptor.DomicilioFiscalReceptor = ObjCFDITimbre.Comprobante.LugarExpedicion
|
||||
End If
|
||||
|
||||
cfdi.Receptor(ObjCFDITimbre.Receptor.RFC, ObjCFDITimbre.Receptor.Nombre, ObjCFDITimbre.Receptor.DomicilioFiscalReceptor, ObjCFDITimbre.Receptor.ResidenciaFiscal, ObjCFDITimbre.Receptor.NumeroRegistroTributario, ObjCFDITimbre.Receptor.RegimenFiscalReceptor, ObjCFDITimbre.Receptor.UsoCFDI)
|
||||
|
||||
@@ -5046,7 +5290,19 @@ Public Class Timbrado
|
||||
|
||||
If ObjCFDITimbre.Comprobante.TipoComprobante = "P" Then
|
||||
|
||||
cfdi.Pago(ObjCFDITimbre.ComplementoPagos.FechaPago.ToString("yyyy-MM-ddTHH:mm:ss"),
|
||||
cfdi.Pago20Totales(ObjCFDITimbre.ComplementoPagos.Totales.TotalRetencionesIVA,
|
||||
ObjCFDITimbre.ComplementoPagos.Totales.TotalRetencionesISR,
|
||||
ObjCFDITimbre.ComplementoPagos.Totales.TotalRetencionesIEPS,
|
||||
ObjCFDITimbre.ComplementoPagos.Totales.TotalTrasladosBaseIVA16,
|
||||
ObjCFDITimbre.ComplementoPagos.Totales.TotalTrasladosImpuestoIVA16,
|
||||
ObjCFDITimbre.ComplementoPagos.Totales.TotalTrasladosBaseIVA8,
|
||||
ObjCFDITimbre.ComplementoPagos.Totales.TotalTrasladosImpuestoIVA8,
|
||||
ObjCFDITimbre.ComplementoPagos.Totales.TotalTrasladosBaseIVA0,
|
||||
ObjCFDITimbre.ComplementoPagos.Totales.TotalTrasladosImpuestoIVA0,
|
||||
ObjCFDITimbre.ComplementoPagos.Totales.TotalTrasladosBaseExento,
|
||||
ObjCFDITimbre.ComplementoPagos.Totales.MontoTotalPagos)
|
||||
|
||||
cfdi.Pago20(ObjCFDITimbre.ComplementoPagos.FechaPago.ToString("yyyy-MM-ddTHH:mm:ss"),
|
||||
ObjCFDITimbre.ComplementoPagos.FormaDePagoP,
|
||||
ObjCFDITimbre.ComplementoPagos.MonedaP,
|
||||
ObjCFDITimbre.ComplementoPagos.TipoCambioP,
|
||||
@@ -5067,40 +5323,57 @@ Public Class Timbrado
|
||||
|
||||
|
||||
For Each doc As CFDIComplementoPagosDocsRelacionados In ObjCFDITimbre.ComplementoPagos.DocumentosRelacionados
|
||||
cfdi.PagoDoctoRelacionado(doc.IdDocumento,
|
||||
cfdi.Pago20DoctoRelacionado(doc.IdDocumento,
|
||||
doc.Serie,
|
||||
doc.Folio,
|
||||
doc.MonedaDR,
|
||||
doc.TipoCambioDR,
|
||||
doc.MetodoDePagoDR,
|
||||
doc.NumParcialidad,
|
||||
doc.ImpSaldoAnt,
|
||||
doc.ImpPagado,
|
||||
doc.ImpSaldoInsoluto)
|
||||
doc.ImpSaldoInsoluto,
|
||||
doc.ObjetoImpuesto)
|
||||
If doc.Impuestos IsNot Nothing Then
|
||||
|
||||
''traslados
|
||||
If (doc.Impuestos).Where(Function(x) x.TrasladooRetencion = "T").Count > 0 Then
|
||||
Dim j As Integer = 0
|
||||
For Each docimp As CFDIConceptosImpuestos In doc.Impuestos.Where(Function(x) x.TrasladooRetencion = "T")
|
||||
|
||||
If docimp.TrasladooRetencion = "T" Then
|
||||
cfdi.Pago20TrasladoDR(docimp.Base, docimp.Impuesto, docimp.TipoFactor, docimp.TasaOCuota, docimp.Importe)
|
||||
End If
|
||||
j += 1
|
||||
Next
|
||||
End If
|
||||
|
||||
''retenciones
|
||||
If (doc.Impuestos).Where(Function(x) x.TrasladooRetencion = "R").Count > 0 Then
|
||||
Dim j As Integer = 0
|
||||
For Each docimp As CFDIConceptosImpuestos In doc.Impuestos.Where(Function(x) x.TrasladooRetencion = "R")
|
||||
If docimp.TrasladooRetencion = "R" Then
|
||||
cfdi.Pago20RetencionDR(docimp.Base, docimp.Impuesto, docimp.TipoFactor, docimp.TasaOCuota, docimp.Importe)
|
||||
End If
|
||||
j += 1
|
||||
Next
|
||||
End If
|
||||
End If
|
||||
|
||||
Next
|
||||
|
||||
'Estos impuestos aplicarían para anticipos
|
||||
If ObjCFDITimbre.ComplementoPagos.TotalImpuestosRetenidos > 0 OrElse ObjCFDITimbre.ComplementoPagos.TotalImpuestosTrasladados > 0 Then
|
||||
|
||||
cfdi.PagoImpuestos(ObjCFDITimbre.ComplementoPagos.TotalImpuestosRetenidos, ObjCFDITimbre.ComplementoPagos.TotalImpuestosTrasladados)
|
||||
If (ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(x) x.TrasladooRetencion = "R").Count > 0 Then
|
||||
For Each Ret As CFDIConceptosImpuestos In (ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(x) x.TrasladooRetencion = "R")
|
||||
cfdi.PagoRetencion(Ret.Impuesto, Ret.Importe)
|
||||
Next
|
||||
End If
|
||||
If (ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(x) x.TrasladooRetencion = "T").Count > 0 Then
|
||||
For Each Tra As CFDIConceptosImpuestos In (ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(x) x.TrasladooRetencion = "T")
|
||||
cfdi.PagoTraslado(Tra.Impuesto, Tra.TipoFactor, Tra.TasaOCuota, Tra.Importe)
|
||||
Next
|
||||
End If
|
||||
If ObjCFDITimbre.ComplementoPagos.Traslados.Count > 0 Then
|
||||
|
||||
For Each Tra As CFDITraslados In (ObjCFDITimbre.ComplementoPagos.Traslados)
|
||||
cfdi.Pago20TrasladoP(Tra.Base, Tra.Impuesto, Tra.TipoFactor, Tra.TasaOCuota, Tra.Importe)
|
||||
Next
|
||||
End If
|
||||
|
||||
|
||||
|
||||
If (ObjCFDITimbre.ComplementoPagos.Retenciones).Count > 0 Then
|
||||
For Each Ret As CFDIRetenciones In ObjCFDITimbre.ComplementoPagos.Retenciones
|
||||
cfdi.Pago20RetencionP(Ret.Impuesto, Ret.Importe)
|
||||
Next
|
||||
End If
|
||||
End If
|
||||
|
||||
End If
|
||||
#End Region
|
||||
|
||||
@@ -6036,7 +6309,7 @@ Public Class Timbrado
|
||||
For Each Ret In ObjCFDITimbre.Retenciones
|
||||
comprobante.Impuestos.Retenciones(w) = New Profact.TimbraCFDI33.ComprobanteImpuestosRetencion()
|
||||
comprobante.Impuestos.Retenciones(w).Impuesto = Ret.Impuesto
|
||||
comprobante.Impuestos.Retenciones(w).Importe = Ret.Importe.ToDecimal
|
||||
comprobante.Impuestos.Retenciones(w).Importe = Ret.Importe
|
||||
w += 1
|
||||
Next
|
||||
|
||||
@@ -6260,8 +6533,8 @@ Public Class Timbrado
|
||||
ComPag.Pago(0).FormaDePagoP = ObjCFDITimbre.ComplementoPagos.FormaDePagoP
|
||||
ComPag.Pago(0).MonedaP = ObjCFDITimbre.ComplementoPagos.MonedaP
|
||||
ComPag.Pago(0).TipoCambioPSpecified = If(ObjCFDITimbre.ComplementoPagos.MonedaP = "MXN", False, True)
|
||||
ComPag.Pago(0).TipoCambioP = ObjCFDITimbre.ComplementoPagos.TipoCambioP.ToDecimal
|
||||
ComPag.Pago(0).Monto = ObjCFDITimbre.ComplementoPagos.Monto.ToDecimal
|
||||
ComPag.Pago(0).TipoCambioP = ObjCFDITimbre.ComplementoPagos.TipoCambioP
|
||||
ComPag.Pago(0).Monto = ObjCFDITimbre.ComplementoPagos.Monto
|
||||
If ObjCFDITimbre.ComplementoPagos.NumOperacion <> "" Then
|
||||
ComPag.Pago(0).NumOperacion = ObjCFDITimbre.ComplementoPagos.NumOperacion
|
||||
End If
|
||||
@@ -6312,13 +6585,13 @@ Public Class Timbrado
|
||||
ComPag.Pago(0).DoctoRelacionado(i).NumParcialidad = doc.NumParcialidad.ToString
|
||||
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpSaldoAntSpecified = True
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpSaldoAnt = doc.ImpSaldoAnt.ToDecimal
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpSaldoAnt = doc.ImpSaldoAnt
|
||||
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpPagadoSpecified = True
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpPagado = doc.ImpPagado.ToDecimal
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpPagado = doc.ImpPagado
|
||||
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpSaldoInsolutoSpecified = True
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpSaldoInsoluto = doc.ImpSaldoInsoluto.ToDecimal
|
||||
ComPag.Pago(0).DoctoRelacionado(i).ImpSaldoInsoluto = doc.ImpSaldoInsoluto
|
||||
i += 1
|
||||
Next
|
||||
|
||||
@@ -6327,9 +6600,9 @@ Public Class Timbrado
|
||||
ComPag.Pago(0).Impuestos = New Profact.TimbraCFDI33.Complementos.Pagos10.PagosPagoImpuestos(0) {}
|
||||
ComPag.Pago(0).Impuestos(0) = New Profact.TimbraCFDI33.Complementos.Pagos10.PagosPagoImpuestos()
|
||||
ComPag.Pago(0).Impuestos(0).TotalImpuestosRetenidosSpecified = True
|
||||
ComPag.Pago(0).Impuestos(0).TotalImpuestosRetenidos = ObjCFDITimbre.ComplementoPagos.TotalImpuestosRetenidos.ToDecimal
|
||||
ComPag.Pago(0).Impuestos(0).TotalImpuestosRetenidos = ObjCFDITimbre.ComplementoPagos.TotalImpuestosRetenidos
|
||||
ComPag.Pago(0).Impuestos(0).TotalImpuestosTrasladadosSpecified = True
|
||||
ComPag.Pago(0).Impuestos(0).TotalImpuestosTrasladados = ObjCFDITimbre.ComplementoPagos.TotalImpuestosTrasladados.ToDecimal
|
||||
ComPag.Pago(0).Impuestos(0).TotalImpuestosTrasladados = ObjCFDITimbre.ComplementoPagos.TotalImpuestosTrasladados
|
||||
|
||||
If (ObjCFDITimbre.ComplementoPagos.Impuestos).Where(Function(x) x.TrasladooRetencion = "R").Count > 0 Then
|
||||
Dim x As Integer
|
||||
|
||||
@@ -2622,7 +2622,7 @@ Partial Class Bancos_IE
|
||||
|
||||
If Request("Opcion") IsNot Nothing AndAlso Request("Opcion").ToString = "ANTC" Then
|
||||
If CveCliente > 0 Then
|
||||
CveConceptoCompra = 3 'Clientes
|
||||
CveConceptoCompra = 66 'Clientes
|
||||
CveConceptoContable = 30 'Bancos
|
||||
CvePlantillaPoliza = 12
|
||||
End If
|
||||
|
||||
@@ -101,7 +101,7 @@
|
||||
|
||||
</div>
|
||||
<div class="col-md-1 control-label" >
|
||||
<asp:Label ID="LblSunproyecto" runat="server" Text="SubProyecto:"></asp:Label>
|
||||
<asp:Label ID="LblSubproyecto" runat="server" Text="SubProyecto:"></asp:Label>
|
||||
|
||||
</div>
|
||||
<div class="col-md-3">
|
||||
@@ -664,7 +664,7 @@
|
||||
|
||||
if (textBoxes[i].id.indexOf('C_Tab_TabPago_GvMovAcreedor_TxtComision') >= 0) {
|
||||
if (textBoxes[i].value != '') {
|
||||
Comision = parseFloat(Comision) + parseFloat(textBoxes[i].value.split(',').join(''));
|
||||
Comision = parseFloat(Comision) + ToDouble(textBoxes[i].value);
|
||||
}
|
||||
}
|
||||
|
||||
@@ -673,16 +673,15 @@
|
||||
idd = textBoxes[i].id.replace('C_Tab_TabPago_GvMovAcreedor_TxtAbonar_', '');
|
||||
Facturas = Facturas + (Importe == 0 ? '' : ', ') + $get("C_Tab_TabPago_GvMovAcreedor_HplF_" + idd).innerText;
|
||||
if (CveMoneda == 2 && CveMonedaPago == 1) {
|
||||
Importe = parseFloat(Importe) + (parseFloat($get('TxtTCPago').value) * parseFloat(textBoxes[i].value.split(',').join('')));
|
||||
Importe = parseFloat(Importe) + (parseFloat($get('TxtTCPago').value) * ToDouble(textBoxes[i].value));
|
||||
} else if (CveMoneda == 1 && CveMonedaPago == 2) {
|
||||
Importe = parseFloat(Importe) + (parseFloat($get('TxtTCPago').value) / parseFloat(textBoxes[i].value.split(',').join('')));
|
||||
Importe = parseFloat(Importe) + (ToDouble(textBoxes[i].value) / ToDouble($get('TxtTCPago').value));
|
||||
} else if ((CveMoneda == 1 && CveMonedaPago == 1) || (CveMoneda == 2 && CveMonedaPago == 2)) {
|
||||
Importe = parseFloat(Importe) + parseFloat(textBoxes[i].value.split(',').join(''));
|
||||
}
|
||||
Importe = parseFloat(Importe) + ToDouble(textBoxes[i].value);
|
||||
}
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
if (!Facturas == '') {
|
||||
|
||||
@@ -277,7 +277,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
|
||||
int CveConceptoContablePrestamoComplementario = 202;
|
||||
int CvePlantillaPoliza = 21;
|
||||
int CvePrePoliza = 0;
|
||||
int CveMoneda = get_GlobalDTBancosCuentas(-1, CveEmpresa: UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveMoneda", $"CveEmpresa = {UsuarioActual.CveEmpresa} AND CveCuenta = {DdlCuenta.SelectedValue.ToEntero()}").ToEntero();
|
||||
int CveMonedaPago = get_GlobalDTBancosCuentas(-1, CveEmpresa: UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveMoneda", $"CveEmpresa = {UsuarioActual.CveEmpresa} AND CveCuenta = {DdlCuenta.SelectedValue.ToEntero()}").ToEntero();
|
||||
int FolioFijo = 0;
|
||||
int IDPoliza = 0;
|
||||
StringBuilder Msg = new StringBuilder();
|
||||
@@ -300,7 +300,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
|
||||
// DATOS PREPOLIZA
|
||||
if ( DdlTipoTransaccion.SelectedValue == "1" && UsuarioActual.CveEmpresa != 119) FolioFijo = TxtFolio.Text.ToEntero();
|
||||
|
||||
CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE PAGO ACRREDORES", CvePlantillaPoliza, TxtImporte.Text.Trim().ToDouble(), TxtImporte.Text.Trim().ToDouble(), CveMoneda, TxtFechaDocumento.Text.ToDate(), DdlProveedores.SelectedText.ToString(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, null, UsuarioActual.CveEmpresa), CveTipoPoliza: ObjMov.ObtenerTipoPoliza(DdlTipoTransaccion.SelectedValue, "-1", UsuarioActual.CveEmpresa));
|
||||
CvePrePoliza = ObjMov.AddPrePolizas("Bancos/IE PAGO ACRREDORES", CvePlantillaPoliza, TxtImporte.Text.Trim().ToDouble(), TxtImporte.Text.Trim().ToDouble(), CveMonedaPago, TxtFechaDocumento.Text.ToDate(), DdlProveedores.SelectedText.ToString(), UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, FolioFijo: FolioFijo, ReglaFolioPoliza: ObjComp.ObtenerReglaFolio(DdlTipoTransaccion.SelectedValue, null, UsuarioActual.CveEmpresa), CveTipoPoliza: ObjMov.ObtenerTipoPoliza(DdlTipoTransaccion.SelectedValue, "-1", UsuarioActual.CveEmpresa));
|
||||
|
||||
if (CvePrePoliza > 0)
|
||||
{
|
||||
@@ -311,7 +311,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
|
||||
string Conc = TxtObservaciones.Text == "" ? TxtFolio.Text : TxtObservaciones.Text;
|
||||
string Ref = TxtObservaciones.Text == "" ? TxtFolio.Text : TxtObservaciones.Text;
|
||||
|
||||
CveIE = ObjIE.AddBancos_IE(DdlCuenta.SelectedValue.ToEntero(), DdlTipoTransaccion.SelectedValue.ToEntero(), TxtFechaDocumento.Text.Trim().ToDate(), TxtFolio.Text.Trim(), DdlProveedores.SelectedText.ToString(), ImporteBanco.ToString().ToDouble(), CveMoneda,
|
||||
CveIE = ObjIE.AddBancos_IE(DdlCuenta.SelectedValue.ToEntero(), DdlTipoTransaccion.SelectedValue.ToEntero(), TxtFechaDocumento.Text.Trim().ToDate(), TxtFolio.Text.Trim(), DdlProveedores.SelectedText.ToString(), ImporteBanco.ToString().ToDouble(), CveMonedaPago,
|
||||
TCPago.ToString().ToDouble(), TxtObservaciones.Text.Trim(), "", ChkAbonoCuenta.Checked, false, -1, CvePrePoliza, Comprobante, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa);
|
||||
|
||||
|
||||
@@ -327,6 +327,7 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
|
||||
decimal ImporteMN;
|
||||
decimal ImporteComision;
|
||||
decimal ImporteComisionMN;
|
||||
decimal AcumImporteMN = 0;
|
||||
bool TipoMovtoComision = false;
|
||||
int IdCtaContableOtrosGastos = 0;
|
||||
|
||||
@@ -364,18 +365,18 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
|
||||
if (gvr.FCCheckBox("Chk").Checked)
|
||||
{
|
||||
int tCveMoneda = gvr.DataKey("CveMoneda").ToEntero();
|
||||
if (CveMoneda == 1 && tCveMoneda == 1)
|
||||
if (CveMonedaPago == 1 && tCveMoneda == 1)
|
||||
{
|
||||
ImporteMN = Importe;
|
||||
ImporteComisionMN = ImporteComision;
|
||||
}
|
||||
else if (CveMoneda == 1 && tCveMoneda == 2)
|
||||
else if (CveMonedaPago == 1 && tCveMoneda == 2)
|
||||
{
|
||||
ImporteComisionMN = ImporteComision;
|
||||
if (UsaComplementaria)
|
||||
{
|
||||
ImporteMN = Importe;
|
||||
ImporteComplementaria = Importe * TC - Importe;
|
||||
ImporteComplementaria = (Importe * TC - Importe).RoundSQL();
|
||||
}
|
||||
else
|
||||
{
|
||||
@@ -383,33 +384,32 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
|
||||
ImporteComplementaria = 0;
|
||||
}
|
||||
}
|
||||
else if (CveMoneda == 2 && tCveMoneda == 1)
|
||||
else if (CveMonedaPago == 2 && tCveMoneda == 1)
|
||||
{
|
||||
|
||||
ImporteMN = Importe;
|
||||
ImporteComisionMN = ImporteComision;
|
||||
}
|
||||
else if (CveMoneda == 2 && tCveMoneda == 2)
|
||||
else if (CveMonedaPago == 2 && tCveMoneda == 2)
|
||||
{
|
||||
ImporteComisionMN = ImporteComision;
|
||||
if (UsaComplementaria)
|
||||
{
|
||||
ImporteMN = Importe;
|
||||
ImporteComplementaria = Importe * TC - Importe;
|
||||
ImporteComplementaria = (Importe * TC - Importe).RoundSQL();
|
||||
}
|
||||
else
|
||||
{
|
||||
ImporteMN = Importe * TC;
|
||||
ImporteMN = (Importe * TC).RoundSQL();
|
||||
ImporteComplementaria = 0;
|
||||
}
|
||||
}
|
||||
|
||||
ImporteMN = Math.Round(ImporteMN, 2, MidpointRounding.AwayFromZero);
|
||||
ImporteComplementaria = Math.Round(ImporteComplementaria, 2, MidpointRounding.AwayFromZero);
|
||||
ImporteComisionMN = Math.Round(ImporteComisionMN, 2, MidpointRounding.AwayFromZero);
|
||||
ImporteComision = Math.Round(ImporteComision, 2, MidpointRounding.AwayFromZero);
|
||||
|
||||
|
||||
ImporteMN = ImporteMN.RoundSQL();
|
||||
ImporteComplementaria = ImporteComplementaria.RoundSQL();
|
||||
ImporteComisionMN = ImporteComisionMN.RoundSQL();
|
||||
ImporteComision = ImporteComision.RoundSQL();
|
||||
AcumImporteMN += ImporteMN;
|
||||
|
||||
if (tCveMoneda != 1)
|
||||
{
|
||||
@@ -477,18 +477,19 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
|
||||
|
||||
}
|
||||
|
||||
if (CveMoneda != 1)
|
||||
if (CveMonedaPago != 1)
|
||||
{
|
||||
if (UsaComplementaria)
|
||||
{
|
||||
ImporteMNBanco = ImporteBanco;
|
||||
ImporteComplementaria = ImporteBanco * TCPago - ImporteBanco;
|
||||
ImporteComplementaria = (ImporteBanco * TCPago - ImporteBanco).RoundSQL();
|
||||
}
|
||||
else
|
||||
{
|
||||
ImporteMNBanco = ImporteBanco * TCPago;
|
||||
ImporteMNBanco = (ImporteBanco * TCPago).RoundSQL();
|
||||
ImporteComplementaria = 0;
|
||||
}
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, ImporteBanco, Ref, CveConceptoContableBanco, Conc, DateTime.Now, IDCtaContableBancos, -1, CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), ImporteMX: ImporteMNBanco, ImporteME: ImporteBanco, TipoCambio: TCPago, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero()))
|
||||
@@ -496,12 +497,30 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
|
||||
MsgError = "No se pudo insertar concepto de bancos";
|
||||
}
|
||||
|
||||
if (CveMoneda != 1 && UsaComplementaria)
|
||||
if (CveMonedaPago != 1 && UsaComplementaria)
|
||||
{
|
||||
if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, true, ImporteBanco, Ref, CveConceptoContableBancoComplementario, Conc, DateTime.Now, IDCtaContableBancosComplementario, -1, CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), ImporteMX: ImporteComplementaria, ImporteME: ImporteBanco, TipoCambio: TCPago, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero()))
|
||||
{
|
||||
MsgError = "No se pudo insertar concepto de bancos complementaria";
|
||||
}
|
||||
if (AcumImporteMN!=(ImporteBanco + ImporteComplementaria)) {
|
||||
int tCveConceptoOtIngresos = 0;
|
||||
bool TipoMovtoOt = false;
|
||||
decimal Dif = AcumImporteMN - (ImporteBanco + ImporteComplementaria);
|
||||
if (Dif < 0)
|
||||
{
|
||||
tCveConceptoOtIngresos = 211; TipoMovtoOt = false;
|
||||
}
|
||||
else
|
||||
{
|
||||
tCveConceptoOtIngresos = 78; TipoMovtoOt = true;
|
||||
}
|
||||
|
||||
if (!ObjMov.AddPrePolizasDetalle(CvePrePoliza, TipoMovtoOt, Dif.Abs(), Ref, tCveConceptoOtIngresos, Conc, DateTime.Now, 0, -1, CveIE, CveProveedor: DdlProveedores.SelectedValue.ToEntero(), ImporteMX: Dif.Abs(), ImporteME: Dif.Abs(), TipoCambio: TCPago, TipoCambioPago: TCPago, CveSubProyecto: DdlSubProyecto.SelectedValue.ToEntero()))
|
||||
{
|
||||
MsgError = "No se pudo insertar concepto de ajuste en redondeo";
|
||||
}
|
||||
}
|
||||
}
|
||||
|
||||
}
|
||||
@@ -556,7 +575,8 @@ public partial class Bancos_PagoAcreedor : ClsPaginas
|
||||
{
|
||||
if (Msg.ToString().Equals(""))
|
||||
{
|
||||
Msg.Append("El Documento se guardo correctamente");
|
||||
Msg.AppendFormat("El Documento se guardo correctamente. Folio <b><a href='/Bancos/IE.aspx?CveIE={0}' target='_blank' class='Texto'>{1}</a></b> <br/>", CveIE, ObjIE.Folio);
|
||||
|
||||
}
|
||||
System.IO.FileInfo archivo = null;
|
||||
|
||||
|
||||
@@ -124,6 +124,11 @@
|
||||
<td>
|
||||
<asp:TextBox ID="TxtFolio" CssClass="form-control input-sm " runat="server" MaxLength="14" Width="80px"></asp:TextBox></td>
|
||||
</tr>
|
||||
<tr id="trPagueseA">
|
||||
<td>Paguese</td>
|
||||
<td>
|
||||
<asp:TextBox ID="TxtPaguese" CssClass="form-control input-sm " runat="server" Width="200px"></asp:TextBox></td>
|
||||
</tr>
|
||||
<tr>
|
||||
<td>Observaciones:</td>
|
||||
<td>
|
||||
|
||||
@@ -283,6 +283,14 @@ Partial Class Bancos_Transferencias
|
||||
CveIE = ObjIE.AddBancos_IE(DdlCuentaDestino.SelectedValue.ToEntero, DdlTipoMovto.SelectedValue.ToEntero, TxtFechaDocumento.Text.Trim.ToDate, TxtFolio.Text.Trim, CuentaDestino, ImporteMXOrigen, CveMonedaOrigen, TipoCambio, Observaciones, "", False, False, -1, CvePrePoliza, Comprobante, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
|
||||
CveIEDestino = CveIE
|
||||
Else
|
||||
If UsuarioActual.Empresa.Funcionalidad(558) = "1" Then
|
||||
FolioDestino = TxtFolio.Text.Trim
|
||||
If TxtPaguese.Text.Trim <> "" Then
|
||||
CuentaDestino = TxtPaguese.Text.Trim
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
CveIE = ObjIE.AddBancos_IE(DdlCuentaOrigen.SelectedValue.ToEntero, DdlTipoMovto.SelectedValue.ToEntero, TxtFechaDocumento.Text.Trim.ToDate, TxtFolio.Text.Trim, CuentaDestino, TxtImporte.Text.Trim.ToDouble, CveMonedaOrigen, TipoCambio, TxtObservaciones.Text.Trim, "", False, False, -1, CvePrePoliza, Comprobante, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
|
||||
CveIEDestino = ObjIE.AddBancos_IE(DdlCuentaDestino.SelectedValue.ToEntero, If(DdlTipoMovto.SelectedValue = "2", 8, 3), TxtFechaDocumento.Text.Trim.ToDate, FolioDestino, String.Format("Transferencia Cta: {0}", DdlCuentaOrigen.SelectedItem.Text), ImporteDestino, CveMonedaDestino, TipoCambio, TxtObservaciones.Text.Trim, "", False, False, -1, CvePrePoliza, Comprobante, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa)
|
||||
End If
|
||||
|
||||
BIN
Bin/GoCfdi.dll
BIN
Bin/GoCfdi.dll
Binary file not shown.
@@ -21,8 +21,7 @@
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkPaqueteEgre" runat="server"><i class="fa fa-ad-pdf"></i> Paquete Egresos</asp:LinkButton>
|
||||
</li>
|
||||
|
||||
|
||||
|
||||
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
|
||||
@@ -71,7 +70,7 @@
|
||||
<asp:ListItem Text="Orden" Value="4"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</div>
|
||||
<label class="col-md-1">Segmento: </label>
|
||||
<label class="col-md-1">Centro Costo: </label>
|
||||
<div class="col-md-1">
|
||||
<asp:DropDownList ID="DdlSegmentoNeg" DataTextField="Nombre" DataValueField="Id" CssClass="form-control input-sm select2me" runat="server"></asp:DropDownList>
|
||||
</div>
|
||||
|
||||
@@ -45,14 +45,8 @@ Partial Class Contabilidad_FiltraPolizas
|
||||
|
||||
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
|
||||
|
||||
|
||||
|
||||
If Not Page.IsPostBack Then
|
||||
|
||||
|
||||
ContabilidadSIG = UsuarioActual.Empresa.UsaContabilidadSIG
|
||||
|
||||
|
||||
ViewState("Orden") = ""
|
||||
DdlPeriodo.SelectedValue = Now.Month.ToString
|
||||
TxtFechaICredito.Text = Now.FirstDayOfMonth.ToShortDateString
|
||||
@@ -87,9 +81,6 @@ Partial Class Contabilidad_FiltraPolizas
|
||||
Dim Ejercicio As Integer = DdlEjercicio.SelectedValue.ToString().ToEntero()
|
||||
Dim Periodo As Integer = DdlPeriodo.SelectedValue.ToString().ToEntero()
|
||||
|
||||
|
||||
|
||||
|
||||
If ContabilidadSIG Then
|
||||
|
||||
Dim ObjConta As New ClsContabilidad
|
||||
@@ -103,7 +94,6 @@ Partial Class Contabilidad_FiltraPolizas
|
||||
|
||||
ObjConta.Dispose()
|
||||
|
||||
|
||||
Else
|
||||
|
||||
Dim ObjConta As New ClsContPAQi(UsuarioActual.Empresa)
|
||||
@@ -125,8 +115,6 @@ Partial Class Contabilidad_FiltraPolizas
|
||||
|
||||
End If
|
||||
|
||||
|
||||
|
||||
Gv.DataBind()
|
||||
UpDatos.Update()
|
||||
End Sub
|
||||
@@ -151,7 +139,6 @@ Partial Class Contabilidad_FiltraPolizas
|
||||
|
||||
End If
|
||||
|
||||
|
||||
DdlSegmentoNeg.DataBind()
|
||||
DdlSegmentoNeg.Items.Insert(0, New ListItem("Todos", "-1"))
|
||||
|
||||
@@ -183,7 +170,6 @@ Partial Class Contabilidad_FiltraPolizas
|
||||
|
||||
End If
|
||||
|
||||
|
||||
DdlEjercicio.DataBind()
|
||||
DdlEjercicio.SelectedValueExist(UsuarioActual.Empresa.EjercicioActual.ToString)
|
||||
|
||||
@@ -621,11 +607,12 @@ Partial Class Contabilidad_FiltraPolizas
|
||||
|
||||
e.Row.Cells(2).Text = $"<a href='/Contabilidad/RegPrePolizaS.aspx?CvePrePoliza={e.Row.DataKey("Id")}' class='Texto' Target='_blank' >{e.Row.DataKey("Folio")}</a>"
|
||||
e.Row.Cells(6).Text = $"<a href='/Contabilidad/RegPrePolizaS.aspx?CvePrePoliza={e.Row.DataKey("Id")}' class='Texto' Target='_blank'><i class='fa fa-arrow-right' style='color:#686868;'></i></a>"
|
||||
Else
|
||||
e.Row.Cells(2).Text = $"<a href='/Contabilidad/RegPoliza.aspx?IdPoliza={e.Row.DataKey("Id")}' class='Texto' Target='_blank' >{e.Row.DataKey("Folio")}</a>"
|
||||
e.Row.Cells(6).Text = $"<a href='/Contabilidad/RegPrePolizaS.aspx?CvePrePoliza={e.Row.DataKey("Id")}' class='Texto' Target='_blank'><i class='fa fa-arrow-right' style='color:#686868;'></i></a>"
|
||||
|
||||
End If
|
||||
|
||||
|
||||
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
@@ -9,8 +9,6 @@ Imports Microsoft.Reporting.WebForms
|
||||
Partial Class Contabilidad_PolizasImpresion
|
||||
Inherits ClsPaginas
|
||||
|
||||
|
||||
|
||||
Public Property ContabilidadSIG As Boolean
|
||||
Get
|
||||
If ViewState("ContabilidadSIG") Is Nothing Then
|
||||
@@ -53,26 +51,22 @@ Partial Class Contabilidad_PolizasImpresion
|
||||
CargaCuentas()
|
||||
End If
|
||||
|
||||
|
||||
|
||||
End If
|
||||
|
||||
End Sub
|
||||
Private Sub BtnConsultar_click(sender As Object, args As EventArgs) Handles BtnConsultar.Click
|
||||
|
||||
If ContabilidadSIG Then
|
||||
ConsultaSIIG()
|
||||
ConsultaSIG()
|
||||
Else
|
||||
ConsultaCONTPAQi()
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
#Region "SIG"
|
||||
|
||||
|
||||
#Region "SIIG"
|
||||
|
||||
Private Sub ConsultaSIIG()
|
||||
Private Sub ConsultaSIG()
|
||||
|
||||
Dim foli As Integer = -1
|
||||
Dim folf As Integer = -1
|
||||
@@ -129,9 +123,7 @@ Partial Class Contabilidad_PolizasImpresion
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
|
||||
Private Sub cargaddlpolizasSIG()
|
||||
Private Sub CargaDdlPolizasSIG()
|
||||
Dim objcont As New ClsContabilidad
|
||||
If objcont.GetTiposPoliza(-1, "-1", UsuarioActual.CveEmpresa) Then
|
||||
ddlTipoPoliza.DataSource = objcont.DtResultados
|
||||
@@ -159,8 +151,6 @@ Partial Class Contabilidad_PolizasImpresion
|
||||
DdlCuenta.DataValueField = "CveCuenta"
|
||||
DdlCuenta.DataTextField = "CtaCodigo"
|
||||
|
||||
|
||||
|
||||
Dim objconta As New ClsContabilidad
|
||||
If objconta.GetCuentas(-1, "-1", -1, UsuarioActual.CveEmpresa) Then
|
||||
DdlCuenta.DataSource = objconta.DtResultados
|
||||
@@ -276,7 +266,4 @@ Partial Class Contabilidad_PolizasImpresion
|
||||
#End Region
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
End Class
|
||||
|
||||
@@ -1,6 +1,16 @@
|
||||
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepOrigenAplicacion.aspx.vb" Inherits="Contabilidad_RepOrigenAplicacion" %>
|
||||
|
||||
<asp:Content ID="Content1" ContentPlaceHolderID="H" runat="Server">
|
||||
<asp:UpdatePanel runat="server" ID="UpAcciones">
|
||||
<ContentTemplate>
|
||||
<li>
|
||||
<asp:LinkButton runat="server" ID="LnkExcel" data-toggle="tooltip" OnClick="LnkExcel_Click" data-placement="left" title="Excel" Text="<i class='fa fa-file-excel-o'></i> Excel" Visible="false"></asp:LinkButton>
|
||||
</li>
|
||||
</ContentTemplate>
|
||||
<Triggers>
|
||||
<asp:PostBackTrigger ControlID="LnkExcel" />
|
||||
</Triggers>
|
||||
</asp:UpdatePanel>
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content2" ContentPlaceHolderID="CP" runat="Server">
|
||||
</asp:Content>
|
||||
@@ -233,6 +243,22 @@
|
||||
</ItemTemplate>
|
||||
<ItemStyle Width="400" HorizontalAlign="Left" />
|
||||
</asp:TemplateField>
|
||||
|
||||
<asp:TemplateField HeaderText="" Visible="false">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="LblImporteBase" runat="server" Text='<%# Eval("ImporteBase", "{0:N2}")%>' ></asp:Label>
|
||||
</ItemTemplate>
|
||||
<ItemStyle Width="100" HorizontalAlign="Right" />
|
||||
</asp:TemplateField>
|
||||
|
||||
<asp:TemplateField HeaderText="" Visible="false">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="ImporteActual" runat="server" Text='<%# Eval("ImporteActual", "{0:N2}")%>' ></asp:Label>
|
||||
</ItemTemplate>
|
||||
<ItemStyle Width="100" HorizontalAlign="Right" />
|
||||
</asp:TemplateField>
|
||||
|
||||
|
||||
<asp:TemplateField HeaderText="Origen">
|
||||
<ItemTemplate>
|
||||
<asp:HyperLink ID="HLOrigen" runat="server" Text='<%# Eval("Origen", "{0:N2}")%>' CssClass="Texto" Target="_blank"></asp:HyperLink>
|
||||
|
||||
@@ -81,6 +81,16 @@ Partial Class Contabilidad_RepOrigenAplicacion
|
||||
|
||||
TabContainer_ActiveTabChanged(TabContainer, EventArgs.Empty)
|
||||
|
||||
|
||||
If UsuarioActual.Empresa.UsaContabilidadSIG Then
|
||||
|
||||
TabMensual.Enabled = False
|
||||
TabAnual.Enabled = False
|
||||
TdFI.Visible = False
|
||||
tdTipoReporte.Visible = False
|
||||
|
||||
End If
|
||||
|
||||
End If
|
||||
End Sub
|
||||
|
||||
@@ -139,23 +149,62 @@ Partial Class Contabilidad_RepOrigenAplicacion
|
||||
|
||||
#Region " NORMAL "
|
||||
Private Sub CargaDatos()
|
||||
Dim ObjConta As New ClsContPAQi(UsuarioActual.Empresa)
|
||||
|
||||
Dim FechaInicio = If(TxtFechaDel.Text = "" Or TxtFechaDel.Text = "__/__/____", Date.Now, TxtFechaDel.Text.ToDate)
|
||||
Dim FechaFin = If(TxtFechaAl.Text = "" Or TxtFechaAl.Text = "__/__/____", Date.Now, TxtFechaAl.Text.ToDate)
|
||||
|
||||
If ObjConta.GetOrigenAplicacion(FechaInicio, FechaFin) Then
|
||||
DtDatos = ObjConta.DtResultados
|
||||
LnkExcel.Visible = False
|
||||
|
||||
|
||||
|
||||
|
||||
If UsuarioActual.Empresa.UsaContabilidadSIG Then
|
||||
|
||||
Dim AnioActual As Integer = TxtFechaAl.Text.ToDate.Year
|
||||
Dim AnioAnteior As Integer = AnioActual - 1
|
||||
|
||||
|
||||
GvDatos.Columns(1).Visible = True
|
||||
GvDatos.Columns(2).Visible = True
|
||||
|
||||
GvDatos.Columns(1).HeaderText = AnioAnteior.ToString
|
||||
GvDatos.Columns(2).HeaderText = AnioActual.ToString
|
||||
|
||||
Dim ObjConta As New ClsContabilidad
|
||||
|
||||
If ObjConta.GetRepOrigenAplicacion(TxtFechaAl.Text.ToDate, UsuarioActual.CveEmpresa) Then
|
||||
GvDatos.DataSource = ObjConta.DtResultados
|
||||
|
||||
If ObjConta.DtResultados.Rows.Count > 0 Then
|
||||
LnkExcel.Visible = True
|
||||
End If
|
||||
Else
|
||||
GvDatos.DataSource = Nothing
|
||||
End If
|
||||
ObjConta.Dispose()
|
||||
GvDatos.DataBind()
|
||||
|
||||
Else
|
||||
DtDatos = Nothing
|
||||
Alert("Ocurrio un error al cargar los datos de origen y aplicación", TipoMensaje.MsgError)
|
||||
End If
|
||||
ObjConta.Dispose()
|
||||
|
||||
Dim ObjConta As New ClsContPAQi(UsuarioActual.Empresa)
|
||||
|
||||
Dim FechaInicio = If(TxtFechaDel.Text = "" Or TxtFechaDel.Text = "__/__/____", Date.Now, TxtFechaDel.Text.ToDate)
|
||||
Dim FechaFin = If(TxtFechaAl.Text = "" Or TxtFechaAl.Text = "__/__/____", Date.Now, TxtFechaAl.Text.ToDate)
|
||||
|
||||
If ObjConta.GetOrigenAplicacion(FechaInicio, FechaFin) Then
|
||||
DtDatos = ObjConta.DtResultados
|
||||
|
||||
|
||||
If DtDatos IsNot Nothing Then
|
||||
CargaGrid()
|
||||
Else
|
||||
DtDatos = Nothing
|
||||
Alert("Ocurrio un error al cargar los datos de origen y aplicación", TipoMensaje.MsgError)
|
||||
End If
|
||||
ObjConta.Dispose()
|
||||
|
||||
|
||||
If DtDatos IsNot Nothing Then
|
||||
CargaGrid()
|
||||
End If
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Sub CargaGrid()
|
||||
@@ -334,4 +383,7 @@ Partial Class Contabilidad_RepOrigenAplicacion
|
||||
#End Region
|
||||
|
||||
|
||||
Protected Sub LnkExcel_Click(sender As Object, e As EventArgs)
|
||||
GvDatos.ExportToExcel2("RepOrigenAplicacion.xlsx")
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
@@ -1,116 +0,0 @@
|
||||
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="PolizasImpresion.aspx.vb" Inherits="Contabilidad2_PolizasImpresion" %>
|
||||
|
||||
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content6" ContentPlaceHolderID="C" runat="Server">
|
||||
<asp:Panel ID="Panel1" runat="server" DefaultButton="BtnConsultar">
|
||||
<div class="portlet solid grey-cascade portlet-filter">
|
||||
<div class="portlet-title portlet-filterT smalltitle" style="min-height: 49px;">
|
||||
<div class="tools">
|
||||
<asp:Button ID="BtnConsultar" CssClass="btn btn-default" runat="server" Text="Generar" />
|
||||
</div>
|
||||
<div class="titlefiltros caption ">
|
||||
<div class="row" style="padding-top: 1px;">
|
||||
<label class="col-md-1 truncate">Fecha Inicio:</label>
|
||||
<div class="col-md-2">
|
||||
|
||||
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 120px !important; padding: 0px;">
|
||||
<asp:TextBox ID="TxtFechaInicio" runat="server" CssClass="form-control" CausesValidation="true" Style="width: 118px" MaxLength="10"></asp:TextBox>
|
||||
<span class="input-group-btn ">
|
||||
<asp:LinkButton ID="ImgFechaInicio" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
|
||||
</span>
|
||||
<ajax:MaskedEditExtender ID="MaskedEditExtender1" runat="server" TargetControlID="TxtFechaInicio" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
|
||||
<ajax:CalendarExtender runat="server" ID="CalendarExtender1" TargetControlID="TxtFechaInicio" PopupButtonID="ImgFechaInicio" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
|
||||
<asp:RequiredFieldValidator ID="RFVFechaInicio" runat="server" ControlToValidate="TxtFechaInicio" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
<asp:CompareValidator ID="CVEFechaInicio" runat="server" ControlToValidate="TxtFechaInicio" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> no tiene el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpGuardar"></asp:CompareValidator>
|
||||
<ajax:ValidatorCalloutExtender ID="VcoFechaInicio1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaInicio" Width="350px"></ajax:ValidatorCalloutExtender>
|
||||
<ajax:ValidatorCalloutExtender ID="VcoFechaInicio2" runat="server" HighlightCssClass="vco" TargetControlID="CVEFechaInicio" Width="350px"></ajax:ValidatorCalloutExtender>
|
||||
</div>
|
||||
</div>
|
||||
<label class="col-md-1 truncate">Fecha Fin:</label>
|
||||
<div class="col-md-2 ">
|
||||
|
||||
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 120px !important; padding: 0px;">
|
||||
<asp:TextBox ID="TxtFechaFin" runat="server" CssClass="form-control" CausesValidation="true" Style="width: 118px" MaxLength="10"></asp:TextBox>
|
||||
<span class="input-group-btn ">
|
||||
<asp:LinkButton ID="ImgFechaFin" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
|
||||
</span>
|
||||
<ajax:MaskedEditExtender ID="MEEFecha" runat="server" TargetControlID="TxtFechaFin" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
|
||||
<ajax:CalendarExtender runat="server" ID="CEFecha" TargetControlID="TxtFechaFin" PopupButtonID="ImgFechaFin" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
|
||||
<asp:RequiredFieldValidator ID="RFVFechaFin" runat="server" ControlToValidate="TxtFechaFin" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
|
||||
<asp:CompareValidator ID="CVFechaFin" runat="server" ControlToValidate="TxtFechaFin" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Fecha''</b> no tiene el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpGuardar"></asp:CompareValidator>
|
||||
<ajax:ValidatorCalloutExtender ID="VCOFechaFin1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaFin" Width="350px"></ajax:ValidatorCalloutExtender>
|
||||
<ajax:ValidatorCalloutExtender ID="VCOFechaFin2" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaFin" Width="350px"></ajax:ValidatorCalloutExtender>
|
||||
</div>
|
||||
</div>
|
||||
<label class="col-md-1 truncate">Tipo Póliza:</label>
|
||||
<div class="col-md-2">
|
||||
<asp:DropDownList ID="ddlTipoPoliza" DataTextField="TipoPoliza" DataValueField="CveTipoPoliza" CssClass="form-control input-sm select2-me" runat="server"></asp:DropDownList>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body">
|
||||
|
||||
<div class="row">
|
||||
<label class="col-md-1 truncate">Folio Inicio:</label>
|
||||
<div class="col-md-2">
|
||||
<asp:TextBox ID="FolioInicio" CssClass="form-control input-sm" runat="server" Width="60px"></asp:TextBox>
|
||||
</div>
|
||||
<label class="col-md-1 truncate">Folio Fin:</label>
|
||||
<div class="col-md-2 ">
|
||||
<asp:TextBox ID="FolioFin" CssClass="form-control input-sm" runat="server" Width="60px"></asp:TextBox>
|
||||
</div>
|
||||
<label class="col-md-1 truncate">Registró:</label>
|
||||
<div class="col-md-2 ">
|
||||
<asp:DropDownList ID="DdlUsuarioRegistro" DataTextField="Nombre" DataValueField="CveUsuario" CssClass="form-control input-sm select2me" runat="server"></asp:DropDownList>
|
||||
</div>
|
||||
<label class="col-md-1 truncate" data-toggle="tooltip" data-placement="top" title="Centro de Costo">Centro de costo:</label>
|
||||
<div class="col-md-2 ">
|
||||
<asp:DropDownList ID="DdlSubProyectos" DataTextField="SubProyecto" DataValueField="CveSubProyecto" CssClass="form-control input-sm select2me" runat="server"></asp:DropDownList>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<label class="col-md-1 truncate" data-toggle="tooltip" data-placement="top" title="Segmento de Negocio">Cuenta:</label>
|
||||
<div class="col-md-2 ">
|
||||
<asp:DropDownList ID="DdlCuenta" DataValueField="CveCuenta" DataTextField="CtaCodigo" CssClass="form-control input-sm select2me" runat="server"></asp:DropDownList>
|
||||
</div>
|
||||
<label class="col-md-1 truncate" data-toggle="tooltip" data-placement="top" title="Grupo Plantilla">Grupo Plantilla:</label>
|
||||
<div class="col-md-2 ">
|
||||
<asp:DropDownList ID="DdlGrupoPlantilla" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true">
|
||||
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
|
||||
<asp:ListItem Text="Compras" Value="1"></asp:ListItem>
|
||||
<asp:ListItem Text="Ventas" Value="2"></asp:ListItem>
|
||||
<asp:ListItem Text="Pago Compra" Value="3"></asp:ListItem>
|
||||
<asp:ListItem Text="Pago Venta" Value="4"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</div>
|
||||
|
||||
<label class="col-md-1 truncate">Tipo Proveedor:</label>
|
||||
<div class="col-md-3">
|
||||
<asp:DropDownList ID="DdlTipoProveedor" CssClass="form-control input-sm select2me" Width="260px" runat="server">
|
||||
<asp:ListItem Selected="True" Text="Todos" Value="-1"></asp:ListItem>
|
||||
<asp:ListItem Text="Proveedor" Value="1"></asp:ListItem>
|
||||
<asp:ListItem Text="Acreedor" Value="2"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</div>
|
||||
|
||||
</div>
|
||||
|
||||
</div>
|
||||
</div>
|
||||
</asp:Panel>
|
||||
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content7" ContentPlaceHolderID="JS" runat="Server">
|
||||
</asp:Content>
|
||||
|
||||
@@ -1,111 +0,0 @@
|
||||
Option Explicit On
|
||||
Option Strict On
|
||||
|
||||
Imports System.Data
|
||||
Imports Extensiones
|
||||
Imports System.Activities.Statements
|
||||
Imports Microsoft.Reporting.WebForms
|
||||
|
||||
Partial Class Contabilidad2_PolizasImpresion
|
||||
Inherits ClsPaginas
|
||||
|
||||
|
||||
Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.LoadComplete
|
||||
If Not IsPostBack Then
|
||||
TxtFechaInicio.Text = Now.AddDays(-1).ToShortDateString
|
||||
TxtFechaFin.Text = Now.ToShortDateString
|
||||
|
||||
DdlUsuarioRegistro.DataSource = GlobalDTUsuarios(CveEmpresa:=UsuarioActual.CveEmpresa)
|
||||
DdlUsuarioRegistro.DataBind()
|
||||
cargaddlpolizas()
|
||||
CargaSubProyectos()
|
||||
CargaCuentas()
|
||||
End If
|
||||
End Sub
|
||||
Private Sub BtnConsultar_click(sender As Object, args As EventArgs) Handles BtnConsultar.Click
|
||||
Dim foli As Integer = -1
|
||||
Dim folf As Integer = -1
|
||||
If Not FolioInicio.Text = "" Then
|
||||
foli = FolioInicio.Text.ToEntero()
|
||||
End If
|
||||
If Not FolioFin.Text = "" Then
|
||||
folf = FolioFin.Text.ToEntero()
|
||||
End If
|
||||
|
||||
Dim ArchivoReporte As String = "Empresas/Grales/Formatos/Polizas.rdlc"
|
||||
|
||||
If IO.File.Exists(String.Format("{0}Formatos/Polizas.rdlc", UsuarioActual.Empresa.Ruta)) Then
|
||||
ArchivoReporte = String.Format("{0}Formatos/Polizas.rdlc", UsuarioActual.Empresa.Ruta)
|
||||
End If
|
||||
|
||||
Dim ObjConta As New ClsContabilidad
|
||||
If ObjConta.GetPrePolizasImpresion(UsuarioActual.CveEmpresa, TxtFechaInicio.Text.ToDate, TxtFechaFin.Text.ToDate, CveTipoPoliza:=ddlTipoPoliza.SelectedValue.ToEntero, FolioI:=foli,
|
||||
FolioF:=folf, CveUsuario:=DdlUsuarioRegistro.SelectedValue.ToEntero, CveSubProyecto:=DdlSubProyectos.SelectedValue.ToEntero,
|
||||
CveCuenta:=DdlCuenta.SelectedValue.ToEntero, CvePlantillaPoliza:=DdlGrupoPlantilla.SelectedValue.ToEntero,
|
||||
CveTipoProveedor:=DdlTipoProveedor.SelectedValue.ToEntero) Then
|
||||
If ObjConta.DtResultados.Rows.Count < 10000 Then
|
||||
|
||||
If ObjConta.DtResultados.Rows.Count > 0 Then
|
||||
Dim dr As DataRow
|
||||
dr = ObjConta.DtResultados.Rows(0)
|
||||
Dim params As New List(Of ReportParameter)
|
||||
params.Add(New ReportParameter("Empresa", UsuarioActual.Empresa.Empresa))
|
||||
params.Add(New ReportParameter("TipoPoliza", dr("TipoPoliza").ToString))
|
||||
params.Add(New ReportParameter("Finicio", TxtFechaInicio.Text))
|
||||
params.Add(New ReportParameter("FFin", TxtFechaFin.Text))
|
||||
params.Add(New ReportParameter("Fecha", dr("Fecha").ToString.ToDate.ToShortDateString))
|
||||
'params.Add(New ReportParameter("Nombre", dr("Cuenta").ToString))
|
||||
'params.Add(New ReportParameter("Cuenta", dr("Codigo").ToString))
|
||||
params.Add(New ReportParameter("Numero", dr("Folio").ToString))
|
||||
params.Add(New ReportParameter("Moneda", ""))
|
||||
params.Add(New ReportParameter("CodigoPostal", ""))
|
||||
|
||||
If UsuarioActual.CveEmpresa = 119 Then
|
||||
params.Add(New ReportParameter("UsuarioRegistro", dr("NombreUsuario").ToString))
|
||||
End If
|
||||
|
||||
ImprimirPDF(ArchivoReporte, ObjConta.DtResultados, params)
|
||||
|
||||
Else
|
||||
Alert("Los Filtros Actuales no contienen datos")
|
||||
End If
|
||||
|
||||
Else
|
||||
Alert("Los Filtros Actuales contienen muchos datos")
|
||||
End If
|
||||
End If
|
||||
ObjConta.Dispose()
|
||||
|
||||
End Sub
|
||||
Private Sub cargaddlpolizas()
|
||||
Dim objcont As New ClsContabilidad
|
||||
If objcont.GetTiposPoliza(-1, "-1", UsuarioActual.CveEmpresa) Then
|
||||
ddlTipoPoliza.DataSource = objcont.DtResultados
|
||||
ddlTipoPoliza.DataBind()
|
||||
ddlTipoPoliza.Items.Insert(0, New ListItem("Todos", "-1"))
|
||||
|
||||
End If
|
||||
objcont.Dispose()
|
||||
DdlUsuarioRegistro.Items.Insert(0, New ListItem("Todos", "-1"))
|
||||
End Sub
|
||||
|
||||
Private Sub CargaSubProyectos()
|
||||
DdlSubProyectos.DataSource = GlobalDTSubProyectos(UsuarioActual.CveEmpresa)
|
||||
DdlSubProyectos.DataBind()
|
||||
DdlSubProyectos.Items.Insert(0, New ListItem("Todos", "-1"))
|
||||
DdlSubProyectos.Items.Insert(1, New ListItem("Sin Asignar", "-2"))
|
||||
End Sub
|
||||
|
||||
Private Sub CargaCuentas()
|
||||
|
||||
Dim objconta As New ClsContabilidad
|
||||
If objconta.GetCuentas(-1, "-1", -1, UsuarioActual.CveEmpresa) Then
|
||||
DdlCuenta.DataSource = objconta.DtResultados
|
||||
End If
|
||||
objconta.Dispose()
|
||||
DdlCuenta.DataBind()
|
||||
|
||||
DdlCuenta.Items.Insert(0, New ListItem("Todos", "-1"))
|
||||
End Sub
|
||||
|
||||
End Class
|
||||
@@ -1,92 +1,19 @@
|
||||
<%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="TableroMaterialidad.aspx.cs" Inherits="Documentacion_TableroMaterialidad" %>
|
||||
|
||||
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
|
||||
<asp:Content ID="Content1" ContentPlaceHolderID="CP" Runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
|
||||
<style>
|
||||
#C_Tab_Tlablero tr th:nth-child(1) {
|
||||
text-align: left
|
||||
}
|
||||
|
||||
#C_Tab_Tlablero tr td:nth-child(n+2) {
|
||||
text-align: center
|
||||
}
|
||||
|
||||
.spanfoliofiscal {
|
||||
white-space: nowrap;
|
||||
}
|
||||
th.Modulo5{
|
||||
color:#fff;
|
||||
background-color:#8e44ad;
|
||||
}
|
||||
th.Modulo6{
|
||||
color:#fff;
|
||||
background-color:#3598dc;
|
||||
}
|
||||
th.Modulo7{
|
||||
color:#fff;
|
||||
background-color:#36c6d3;
|
||||
}
|
||||
th:not(.Modulo5) + th.Modulo5,
|
||||
th:not(.Modulo6) + th.Modulo6,
|
||||
th:not(.Modulo7) + th.Modulo7{
|
||||
border-left:1px solid black;
|
||||
}
|
||||
th.Modulo5 + th:not(.Modulo5),
|
||||
th.Modulo6 + th:not(.Modulo6),
|
||||
th.Modulo7 + th:not(.Modulo7){
|
||||
border-left:1px solid black;
|
||||
}
|
||||
.ADScroller-header .trtitle{
|
||||
display:none;
|
||||
}
|
||||
/*
|
||||
tr:first-child th.Modulo5,
|
||||
tr th.Modulo6,
|
||||
tr th.Modulo7{
|
||||
border-left:1px solid black;
|
||||
}
|
||||
tr th.Modulo5:nth-child(1),
|
||||
tr th.Modulo6:nth-child(1),
|
||||
tr th.Modulo7:nth-child(1){
|
||||
border-left:1px solid black;
|
||||
}
|
||||
tr th.Modulo5:nth-last-child(1),
|
||||
tr th.Modulo6:nth-last-child(1),
|
||||
tr th.Modulo7:nth-last-child(1){
|
||||
border-right:1px solid black;
|
||||
}*/
|
||||
</style>
|
||||
<asp:Content ID="Content2" ContentPlaceHolderID="Css" Runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
|
||||
Materialidad
|
||||
<asp:Content ID="Content3" ContentPlaceHolderID="E" Runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
|
||||
<asp:Content ID="Content4" ContentPlaceHolderID="HB" Runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
|
||||
<asp:UpdatePanel runat="server">
|
||||
<ContentTemplate>
|
||||
|
||||
<li>
|
||||
<asp:LinkButton runat="server" ID="BtnAgregarDocumento" OnClick="BtnAgregarDocumento_Click" Text="<i class='fa fa-plus'></i> Agregar Documento"></asp:LinkButton>
|
||||
</li>
|
||||
<li>
|
||||
<asp:LinkButton ID="LckOpModalDoctos" OnClick="LckOpModalDoctos_Click" runat="server"><i class="fa fa-upload" aria-hidden="true"></i>Cargar Doctos</asp:LinkButton>
|
||||
<%--<asp:HyperLink ID="HyperLink1" onclick="$('#ModalDoctos').modal();" NavigateUrl="#" runat="server"><i class="fa fa-upload" aria-hidden="true"></i>Cargar Doctos</asp:HyperLink>--%>
|
||||
</li>
|
||||
<li>
|
||||
<asp:LinkButton ID="LckOpModalDoctosPDFXML" OnClick="LckOpModalDoctosPDFXML_Click" runat="server"><i class="fa fa-upload" aria-hidden="true"></i>Cargar XML PDF</asp:LinkButton>
|
||||
<%--<asp:HyperLink ID="HypopenModal" onclick="$('#ModalDoctosxmlpdf').modal();" NavigateUrl="#" runat="server"><i class="fa fa-upload" aria-hidden="true"></i>Cargar XML PDF</asp:HyperLink>--%>
|
||||
</li>
|
||||
<li><asp:HyperLink ID="hypEnviarDocto" onclick="EnviarCorreo();" CssClass="" runat="server">Enviar</asp:HyperLink></li>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
<asp:Content ID="Content5" ContentPlaceHolderID="H" Runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
|
||||
<asp:Content ID="Content6" ContentPlaceHolderID="HA" Runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
|
||||
|
||||
<asp:UpdatePanel runat="server" ID="upPaneldata" UpdateMode="Conditional">
|
||||
<asp:Content ID="Content7" ContentPlaceHolderID="C" Runat="Server">
|
||||
<asp:UpdatePanel ID="upDatos" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
|
||||
<div class="portlet solid grey-cascade portlet-filter">
|
||||
@@ -98,13 +25,18 @@
|
||||
</div>
|
||||
<div class="titlefiltros caption ">
|
||||
<div class="row">
|
||||
<div class="col-md-1" style="font-size: medium; max-width: 100px!important">Cliente:</div>
|
||||
<div class="col-md-2 " style="max-width: 283px!important">
|
||||
<ADS:Dropdownlost CssClassDdl="form-control input-sm select2me" ID="DdlCliente" Width="100%" data-metodo="getcliente" runat="server"
|
||||
DataTextField="Nombre" DataValueField="CveCliente" CssStyle="width: 100%;"></ADS:Dropdownlost>
|
||||
</div>
|
||||
<div class="col-md-1" style="font-size: medium; max-width: 100px!important">Año:</div>
|
||||
<div class="col-md-2 " style="max-width: 283px!important">
|
||||
<asp:TextBox ID="Txtanio" runat="server" Text="2021" Style="display: inline-block;" type="number" CssClass=" form-control input-sm select2me" CausesValidation="true" MaxLength="30" ValidationGroup="GrpFiltrar" Width="100%"></asp:TextBox>
|
||||
<asp:TextBox ID="Txtanio" runat="server" Text="2021" Style="display: inline-block;" type="number" min="1900" step="1" CssClass=" form-control input-sm select2me" CausesValidation="true" MaxLength="30" ValidationGroup="GrpFiltrar" Width="100%"></asp:TextBox>
|
||||
</div>
|
||||
<div class="col-md-1 " style="font-size: medium; max-width: 100px!important">MES:</div>
|
||||
<div class=" col-md-2 " style="max-width: 283px!important">
|
||||
|
||||
<div class="col-md-1 " style="font-size: medium; max-width: 100px!important">Mes:</div>
|
||||
<div class=" col-md-2 " style="max-width: 180px!important">
|
||||
<asp:DropDownList ID="ddlMes" Width="100%" runat="server" CssClass="form-control select2me">
|
||||
<asp:ListItem Value="01" Text="01 - Enero"></asp:ListItem>
|
||||
<asp:ListItem Value="02" Text="02 - Febrero"></asp:ListItem>
|
||||
@@ -130,707 +62,121 @@
|
||||
</div>
|
||||
|
||||
</div>
|
||||
<table id="tableheader">
|
||||
<asp:Literal ID="LtlThs" runat="server"></asp:Literal>
|
||||
</table>
|
||||
<table class=" table table-striped table-advance table-hover Widthall ScrollAD" data-tableheader="#tableheader"
|
||||
cellspacing="0" data-heighterror="330" data-freezecols="0" data-freezerows="1"
|
||||
id="C_Tab_Tlablero">
|
||||
|
||||
<tbody>
|
||||
<tr>
|
||||
<asp:Repeater ID="RPTTableroHeader" runat="server">
|
||||
<HeaderTemplate>
|
||||
<!-- CvePersonal,CveEmpresa,InicioPeriodo,FinPeriodo,Antiguedad,Ejercicio,FechaIngreso,Dias,DiasDisfrutados,DiasPrima,DiasVacaciones-->
|
||||
|
||||
<th>Cliente</th>
|
||||
</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<th <%# DataBinder.Eval(Container.DataItem, "Modulo","class='Modulo{0}'") %>><%# DataBinder.Eval(Container.DataItem, "Documentacion") %> </th>
|
||||
|
||||
<%-- class='Modulo5'
|
||||
<tr>
|
||||
<td><%# String.Format("{0:dd/MM/yyyy} - {1:dd/MM/yyyy}", DataBinder.Eval(Container.DataItem, "InicioPeriodo"), DataBinder.Eval(Container.DataItem, "FinPeriodo")) %> </td>
|
||||
<td><%# DataBinder.Eval(Container.DataItem, "Antiguedad") %> </td>
|
||||
<td><%# DataBinder.Eval(Container.DataItem, "DiasVacaciones") %> </td>
|
||||
<td><%# DataBinder.Eval(Container.DataItem, "Dias") %> </td>
|
||||
<td><%# DataBinder.Eval(Container.DataItem, "DiasDisfrutados") %> </td>
|
||||
<td><%# DataBinder.Eval(Container.DataItem, "DiasPrima") %> </td>
|
||||
<td></td>
|
||||
</tr>--%>
|
||||
</ItemTemplate>
|
||||
<FooterTemplate>
|
||||
</FooterTemplate>
|
||||
|
||||
</asp:Repeater>
|
||||
<th>XML Timbrados</th>
|
||||
<th>PDF Timbrados</th>
|
||||
<th style="width: 85px;">
|
||||
|
||||
|
||||
|
||||
<asp:TextBox ID="TxtClientescorreo" CssClass="hidden TxtClientescorreo" runat="server"></asp:TextBox>
|
||||
<asp:Button ID="Btnenviardocto" UseSubmitBehavior="false" CssClass="hidden Btnenviardocto" OnClick="Btnenviardocto_Click" runat="server" Text="Button" />
|
||||
|
||||
</th>
|
||||
</tr>
|
||||
|
||||
|
||||
<asp:Repeater ID="RptDatos" runat="server" OnItemDataBound="RptDatos_ItemDataBound">
|
||||
<ItemTemplate>
|
||||
<tr>
|
||||
|
||||
<td><%# string.Format("<a href='/Ventas/Clientes.aspx?CveCliente={0}' target='_blank'>{1}</a>",DataBinder.Eval(Container.DataItem, "CveCliente"),DataBinder.Eval(Container.DataItem, "NombreComercial")) %></td>
|
||||
<asp:Repeater ID="rptdocumentacion" runat="server">
|
||||
<ItemTemplate>
|
||||
<td><%#
|
||||
DataBinder.Eval( ((RepeaterItem)Container.Parent.Parent).DataItem ,string.Format("V_{0}",DataBinder.Eval(Container.DataItem, "CveDocumentacion"))).ToString() =="-1" ? "N/A":
|
||||
string.Format("<a onclick=\"cargarDocto({2},{1},'{4}','{3}')\">{0}</a>",
|
||||
(DataBinder.Eval( ((RepeaterItem)Container.Parent.Parent).DataItem ,string.Format("V_{0}",DataBinder.Eval(Container.DataItem, "CveDocumentacion"))).ToString() =="0"?
|
||||
|
||||
|
||||
"No":
|
||||
|
||||
|
||||
"Si")
|
||||
|
||||
,DataBinder.Eval(Container.DataItem, "CveDocumentacion"),DataBinder.Eval(((RepeaterItem)Container.Parent.Parent).DataItem, "CveCliente")
|
||||
,DataBinder.Eval(Container.DataItem, "Documentacion"),DataBinder.Eval(((RepeaterItem)Container.Parent.Parent).DataItem, "NombreComercial")
|
||||
)
|
||||
|
||||
|
||||
%> </td>
|
||||
|
||||
</ItemTemplate>
|
||||
|
||||
</asp:Repeater>
|
||||
<td>
|
||||
<%# string.Format("<a href=\"/Documentacion/TableroMaterialidadDetalle.ASPX?CveCliente={2}&anio={3}&mes={4}\" >{1}/{0}</a>",DataBinder.Eval(Container.DataItem, "Personal"),DataBinder.Eval(Container.DataItem, "PersonalXML"),DataBinder.Eval(Container.DataItem, "CveCliente"),anio,mes) %>
|
||||
</td>
|
||||
<td>
|
||||
<%# string.Format("<a href=\"/Documentacion/TableroMaterialidadDetalle.ASPX?CveCliente={2}&anio={3}&mes={4}\" >{1}/{0}</a>",DataBinder.Eval(Container.DataItem, "Personal"),DataBinder.Eval(Container.DataItem, "PersonalPDF"),DataBinder.Eval(Container.DataItem, "CveCliente"),anio,mes) %>
|
||||
</td>
|
||||
<td>
|
||||
<asp:CheckBox Checked="true" CssClass="Chkenviardocto" runat="server" data-cvecliente='<%# DataBinder.Eval(Container.DataItem, "CveCliente") %>' />
|
||||
<%-- <%# string.Format("<a class=\"btn btn-primary\" onclick=\"enviarDocto({0})\">Enviar</a>",DataBinder.Eval(Container.DataItem, "CveCliente"),anio,mes) %>--%>
|
||||
</td>
|
||||
</tr>
|
||||
</ItemTemplate>
|
||||
</asp:Repeater>
|
||||
|
||||
|
||||
</tbody>
|
||||
</table>
|
||||
|
||||
<div class="portlet light smmallpadding bordered procesardiv">
|
||||
<div class="portlet light xspadding bordered " id="pnlmaterialidad">
|
||||
<div class="portlet-title">
|
||||
<div class="caption font-green">
|
||||
<i class="fa fa-download font-green"></i>
|
||||
<span class="caption-subject bold uppercase">Historial de envio</span>
|
||||
<div class="caption ">
|
||||
<i class="fa fa-bookmark font-yellow-gold"></i>
|
||||
<span class="caption-subject font-yellow-gold bold uppercase">Materialidad informacion del periodo </span>
|
||||
</div>
|
||||
|
||||
<div class="tools">
|
||||
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
|
||||
<a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>
|
||||
</div>
|
||||
<div class="actions">
|
||||
<div class="btn-group">
|
||||
</div>
|
||||
</div>
|
||||
<div style="float: right;">
|
||||
<asp:TextBox CssClass="TxtBusqueda form-control input-sm" runat="server" onkeyup="FiltrarTablaFreezcol('.TxtBusqueda','.GvNominas')" Style="display: inline-block; margin-right: -20px; width: 150px;"></asp:TextBox>
|
||||
<a href="javascript:;" onclick="FiltrarTablaFreezcol('.TxtBusqueda','.GvNominas')" style="margin-top: -3px;" class="btn btn-circle btn-sm font-bold yellow-gold"><i class="icon-magnifier" style="font-weight: bold;"></i></a>
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body rowpadding ">
|
||||
|
||||
<asp:GridView ID="GvHistorialGral" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD Widthall" AutoGenerateColumns="False"
|
||||
ShowHeaderWhenEmpty="true" EmptyDataText="No se ha enviado documentos"
|
||||
DataKeyNames="Noarchivos,FechaIng,Usuario">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Fecha ">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblfechaIng" runat="server" Text='<%# Eval("FechaIng","{0:dd/MM/yyyy hh}:{0:mm}")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Noarchivos">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblnoarchivos" runat="server" Text='<%# Eval("Noarchivos")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Usuario">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblusuario" runat="server" Text='<%# Eval("Usuario")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</Columns>
|
||||
</asp:GridView>
|
||||
|
||||
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<asp:TextBox ID="TxtcveClienteCorreo" CssClass="hidden TxtcveClienteCorreo" runat="server"></asp:TextBox>
|
||||
<asp:Button ID="BtnEnviarDoctos" UseSubmitBehavior="false" OnClick="BtnEnviarDoctos_Click" runat="server" Text="Enviar" CssClass="btn btn-primary hidden BtnEnviarDoctos" />
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
<div id="ModalDoctosxmlpdf" class="modal ADS fade" role="dialog">
|
||||
<div class="modal-dialog modal-lg">
|
||||
|
||||
<!-- Modal content-->
|
||||
<div class="modal-content">
|
||||
<div class="modal-header ">
|
||||
<button type="button" class="close" data-dismiss="modal">×</button>
|
||||
<h4 class="modal-title">Agregar documentos XML PDF Timbrados.</h4>
|
||||
</div>
|
||||
<div class="modal-body">
|
||||
<asp:UpdatePanel runat="server" ID="Upxmlpdf" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<div class="alert alert-warning" style="padding: 5px; margin-bottom: 5px; padding-right: 25px;">
|
||||
<button type="button" class="close" data-dismiss="alert" style="margin-top: 5px;" aria-hidden="true"></button>
|
||||
<strong style="font-size: 20px; margin-right: 25px;">Información: </strong>
|
||||
Los documentos cargados serán relacionados en el periodo:
|
||||
<asp:Literal runat="server" ID="LtlPeriodoXMLPDF"></asp:Literal>
|
||||
</div>
|
||||
<div class="portlet light smmallpadding bordered procesardiv">
|
||||
<div class="portlet-body nomarginleftright form-horizontal form-row-sepe formnombottom ">
|
||||
<div class="row">
|
||||
<div class="col-md-10 col-md-offset-1">
|
||||
<div class="portlet light xspadding bordered " id="pnldl">
|
||||
<div class="portlet-title">
|
||||
<div class="caption font-green">
|
||||
<i class="fa fa-download font-green"></i>
|
||||
<span class="caption-subject bold uppercase">Paso 1: Procesar 'ZIP'</span>
|
||||
<div class="caption ">
|
||||
<i class="fa fa-bookmark font-yellow-gold"></i>
|
||||
<span class="caption-subject font-yellow-gold bold uppercase">Documentos Generales</span>
|
||||
</div>
|
||||
|
||||
<div class="tools">
|
||||
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
|
||||
<a href="javascript:;" class="fullscreen" data-original-title="" title=""></a>
|
||||
</div>
|
||||
<div class="actions">
|
||||
<div class="btn-group">
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body rowpadding ">
|
||||
<div>
|
||||
<asp:TextBox ID="Anexoxmlpdf" CssClass="ADSdropzone hidden" data-maxfilesize="500" data-maxFile="1" Text="" runat="server"></asp:TextBox>
|
||||
</div>
|
||||
<div class="text-center">
|
||||
<asp:LinkButton ID="LnkCargarZip" CssClass="btn btn-success" OnClick="LnkCargarZip_Click" runat="server">Procesar</asp:LinkButton>
|
||||
</div>
|
||||
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet light smmallpadding bordered guardardiv">
|
||||
<div class="portlet-title">
|
||||
<div class="caption font-green">
|
||||
<i class="fa fa-download font-green"></i>
|
||||
<span class="caption-subject bold uppercase">Paso 2: Guardar</span>
|
||||
</div>
|
||||
<div class="tools">
|
||||
<a href="javascript:;" class="expand" data-original-title="" title=""></a>
|
||||
</div>
|
||||
<div class="actions">
|
||||
<div class="btn-group">
|
||||
</div>
|
||||
<div style="float: right;">
|
||||
<asp:TextBox CssClass="TxtBusqueda form-control input-sm" runat="server" onkeyup="FiltrarTablaFreezcol('.TxtBusqueda','.GvNominas')" Style="display: inline-block; margin-right: -20px; width: 150px;"></asp:TextBox>
|
||||
<a href="javascript:;" onclick="FiltrarTablaFreezcol('.TxtBusqueda','.GvNominas')" style="margin-top: -3px;" class="btn btn-circle btn-sm font-bold yellow-gold"><i class="icon-magnifier" style="font-weight: bold;"></i></a>
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body rowpadding" style="display: none">
|
||||
<div class="portlet-body nomarginleftright form-horizontal form-row-sepe formnombottom ">
|
||||
<div class="row">
|
||||
<div class="col-sm-4 col-sm-offset-4">
|
||||
<div class="dashboard-stat red-intense">
|
||||
<div class="visual"><i class="fa fa-bar-chart-o"></i></div>
|
||||
<div class="details">
|
||||
<div class="number">Documentos</div>
|
||||
<div class="desc">
|
||||
<label class="indicadortipo4 col-md-6 tooltips" data-original-title="XML">
|
||||
<asp:Literal ID="LtlNoXml" runat="server"></asp:Literal></label>
|
||||
<label class="indicadortipo4 col-md-6 tooltips" data-original-title="PDF">
|
||||
<asp:Literal ID="LtlNoPDF" runat="server"></asp:Literal></label>
|
||||
<label class="indicadortipo4 col-md-6 tooltips" data-original-title="Todos">
|
||||
<asp:Literal ID="LtlNoDoctos" runat="server"></asp:Literal></label>
|
||||
<label class="indicadortipo4 col-md-6 tooltips" data-original-title="Otros">
|
||||
<asp:Literal ID="LtlOtrosDoctos" runat="server"></asp:Literal></label>
|
||||
</div>
|
||||
<div class="col-sm-4 ">
|
||||
<div class="indicador2 red">
|
||||
<div class="visual"><i class="fa fa-file"></i></div>
|
||||
<div class="value">
|
||||
<asp:Label ID="LblNumProyectos" ClientIDMode="Static" runat="server" Text="0"></asp:Label>
|
||||
</div>
|
||||
<a class="more" href="javascript:;" data-toggle="dropdown" data-hover="dropdown" data-close-others="true" tabindex="0">Ver Más <i class="m-icon-swapright m-icon-white"></i>
|
||||
</a>
|
||||
<div class="details">Documentos Generales </div>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-sm-4">
|
||||
|
||||
<div class="indicador2 bluesky">
|
||||
<div class="visual"><i class="fa fa-file-archive"></i></div>
|
||||
<div class="value">
|
||||
<asp:Label ID="LblSaldoVigente" ClientIDMode="Static" runat="server" Text="0"></asp:Label>
|
||||
</div>
|
||||
<div class="details">Cargados </div>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-sm-4">
|
||||
|
||||
<div class="indicador2 green">
|
||||
<div class="visual"><i class="fa fa-file-excel"></i></div>
|
||||
<div class="value">
|
||||
<asp:Label ID="LblValorGarantias" ClientIDMode="Static" runat="server" Text="0"></asp:Label>
|
||||
</div>
|
||||
<div class="details">Faltantes </div>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
<asp:Panel runat="server" ID="pnlinconsistencias" Visible="false" CssClass="alert alert-warning" Style="padding: 5px; margin-bottom: 5px; padding-right: 25px;">
|
||||
<button type="button" class="close" data-dismiss="alert" style="margin-top: 5px;" aria-hidden="true"></button>
|
||||
<strong style="font-size: 20px; margin-right: 25px;">Información: </strong>Se encontraron inconsistencias en los documentos cargados, solo se guardaran los archivos sin inconsistencias.
|
||||
</asp:Panel>
|
||||
<ajax:TabContainer ID="Tabsmodal" runat="server" Width="100%" AutoPostBack="True">
|
||||
<ajax:TabPanel ID="TabDoctos" runat="server" HeaderText="Documentos">
|
||||
<ContentTemplate>
|
||||
|
||||
<asp:GridView ID="GVmaterialidadDoctos" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD" AutoGenerateColumns="False" OnRowDataBound="GVmaterialidadDoctos_RowDataBound"
|
||||
DataKeyNames="FolioFiscal,nofiles,archivoXML,archivoPDF,Receptor,RfcReceptor,Emisor,RfcEmisor,SubTotal,Descuento,Total,Serie,Folio,Fecha,FechaPago,FechaInicio,FechaFin,TotalPercepciones,TotalDeducciones,NumDiasPagados,CURP,NSS,TN,NDP,TP,Periodo,PeriodoOk,CvePersonal,CvePeriodo,CveNomina"
|
||||
data-height="250">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Folio Fiscal">
|
||||
<ItemTemplate>
|
||||
<asp:Label CssClass="spanfoliofiscal" runat="server" Text='<%# Eval("FolioFiscal")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Doctos">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("nofiles")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="XML">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("archivoXML").ToString().Length>0?"Si":"No" %>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="PDF">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("archivoPDF").ToString().Length>0?"Si":"No" %>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Empleado">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("Receptor")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="RFC">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("RfcReceptor")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="CURP">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("CURP")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="NSS">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("NSS")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Emisor">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("Emisor")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Neto">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("Total","{0:N2}")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Periodo">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("PeriodoText")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>
|
||||
Fecha<br />
|
||||
inicio
|
||||
</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("FechaInicio","{0:dd/MM/yyyy}")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>
|
||||
Fecha<br />
|
||||
fin
|
||||
</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("FechaFin","{0:dd/MM/yyyy}")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>
|
||||
Fecha<br />
|
||||
pago
|
||||
</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("FechaPago","{0:dd/MM/yyyy}")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>
|
||||
Días<br />
|
||||
pago
|
||||
</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("NumDiasPagados")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</Columns>
|
||||
</asp:GridView>
|
||||
</ContentTemplate>
|
||||
</ajax:TabPanel>
|
||||
<ajax:TabPanel ID="Tabperiodos" runat="server" HeaderText="Periodos sin registrar">
|
||||
<ContentTemplate>
|
||||
|
||||
<asp:GridView ID="GvPeriodo" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD" AutoGenerateColumns="False"
|
||||
DataKeyNames="FechaInicio,FechaFin,TN,TP" data-height="250">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Fecha Inicio">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblfechaInicio" runat="server" Text='<%# Eval("FechaInicio","{0:dd/MM/yyyy}")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Fecha Fin">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblfechaFin" runat="server" Text='<%# Eval("FechaFin","{0:dd/MM/yyyy}")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</Columns>
|
||||
</asp:GridView>
|
||||
</ContentTemplate>
|
||||
</ajax:TabPanel>
|
||||
<ajax:TabPanel ID="TabPersonal" runat="server" HeaderText="Personal sin registrar">
|
||||
<ContentTemplate>
|
||||
|
||||
<asp:GridView ID="GvPersonal" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD" AutoGenerateColumns="False"
|
||||
DataKeyNames="CvePersonal,Receptor,CURP,NombreCompleto,Codigo" data-height="250">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Empleado">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblreceptor" runat="server" Text='<%# Eval("Receptor")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="CURP">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblcURP" runat="server" Text='<%# Eval("CURP")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</Columns>
|
||||
</asp:GridView>
|
||||
</ContentTemplate>
|
||||
</ajax:TabPanel>
|
||||
<ajax:TabPanel ID="TabConceptos" runat="server" HeaderText="Conceptos sin registrar" Visible="false">
|
||||
</ajax:TabPanel>
|
||||
</ajax:TabContainer>
|
||||
|
||||
<div class="text-center">
|
||||
<asp:LinkButton ID="LnkProcesarDoctos" CssClass="btn btn-success" OnClick="LnkProcesarDoctos_Click" runat="server">Guardar</asp:LinkButton>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
<div class="modal-footer">
|
||||
<asp:UpdatePanel runat="server">
|
||||
<ContentTemplate>
|
||||
<%--<asp:Button ID="BtnAddClienteDocumentoxmlpd" UseSubmitBehavior="false" OnClick="BtnAddClienteDocumentoxmlpd_Click" runat="server" Text="Guardar" CssClass="btn btn-primary" />--%>
|
||||
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
|
||||
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
<div id="ModalDoctos" class="modal ADS fade" role="dialog">
|
||||
<div class="modal-dialog">
|
||||
|
||||
<!-- Modal content-->
|
||||
<div class="modal-content" style="width: 700px;">
|
||||
<div class="modal-header ">
|
||||
<button type="button" class="close" data-dismiss="modal">×</button>
|
||||
<h4 class="modal-title">Agregar documento</h4>
|
||||
</div>
|
||||
|
||||
<div class="modal-body">
|
||||
<asp:UpdatePanel runat="server" ID="UpModalDoctos" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
|
||||
<div class="alert alert-warning" style="padding: 5px; margin-bottom: 5px; padding-right: 25px;">
|
||||
<button type="button" class="close" data-dismiss="alert" style="margin-top: 5px;" aria-hidden="true"></button>
|
||||
<strong style="font-size: 20px; margin-right: 25px;">Información: </strong>
|
||||
Los documentos cargados serán relacionados en el periodo:
|
||||
<asp:Literal runat="server" ID="LtlPeriodo"></asp:Literal>
|
||||
</div>
|
||||
|
||||
Tipo documento
|
||||
<asp:DropDownList ID="DdlDocumentacion" DataValueField="CveDocumentacion" DataTextField="Documentacion" Width="100%" runat="server" CssClass="form-control select2me"></asp:DropDownList>
|
||||
<div>
|
||||
<br />
|
||||
<asp:TextBox ID="Anexo" CssClass="ADSdropzone hidden" Text="" runat="server"></asp:TextBox>
|
||||
Observaciones
|
||||
<asp:TextBox ID="TxtObservaciones" TextMode="MultiLine" Rows="4" CssClass="form-control" runat="server"></asp:TextBox>
|
||||
</div>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
<div class="modal-footer">
|
||||
<asp:UpdatePanel runat="server">
|
||||
<ContentTemplate>
|
||||
<asp:Button ID="BtnAddClienteDocumento" UseSubmitBehavior="false" OnClick="BtnAddClienteDocumento_Click" runat="server" Text="Guardar" CssClass="btn btn-primary" />
|
||||
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
|
||||
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
<div id="ModalShowDoctos" class="modal ADS fade" role="dialog">
|
||||
<div class="modal-dialog">
|
||||
|
||||
<!-- Modal content-->
|
||||
<div class="modal-content" style="width: 700px;">
|
||||
<div class="modal-header ">
|
||||
<button type="button" class="close" data-dismiss="modal">×</button>
|
||||
<h4 class="modal-title">Documentos</h4>
|
||||
</div>
|
||||
|
||||
<div class="modal-body">
|
||||
<asp:UpdatePanel runat="server" ID="UpModalshowdoctos" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
|
||||
|
||||
<span class="doctitulo"></span>
|
||||
<asp:TextBox ID="TxtcveCliente" CssClass="hidden TxtcveCliente" runat="server"></asp:TextBox>
|
||||
<asp:TextBox ID="TxtcveDocumentacion" CssClass="hidden TxtcveDocumentacion" runat="server"></asp:TextBox>
|
||||
<asp:Button ID="btnshowdoc" UseSubmitBehavior="false" CssClass="hidden btnshowdoc" OnClick="btnshowdoc_Click" runat="server" Text="Button" />
|
||||
|
||||
<div class="portlet light smmallpadding bordered procesardiv">
|
||||
<div class="portlet-title">
|
||||
<div class="caption font-green">
|
||||
<i class="fa fa-download font-green"></i>
|
||||
<span class="caption-subject bold uppercase">Documentos</span>
|
||||
</div>
|
||||
<div class="tools">
|
||||
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body rowpadding ">
|
||||
<asp:GridView ID="GVdocelect" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD Widthall mysmallbtn" AutoGenerateColumns="False"
|
||||
ShowHeaderWhenEmpty="true"
|
||||
EmptyDataText="No se encontraron documentos"
|
||||
DataKeyNames="CveDocumentacionElectronica,CveDocumentacion,Documentacion,DocumentacionFormato,Orden,Adjunto,CveDocumentacionTipo,Requerido,DocumentacionTipo,SCompleto,Estatus,Observacion,Fecha,FechaIng,FechaLimite,FechaVigencia,Usuario,DiasLimite,CveVenta,Observacion2,AplicaDiasLimite,AplicaFechaVencimiento,Modulo">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Documento">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("Observacion2")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Observacion">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblobservacion" runat="server" Text='<%# Eval("Observacion")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
|
||||
<asp:TemplateField HeaderText="Archivo" ItemStyle-Width="50">
|
||||
<ItemTemplate>
|
||||
<asp:HyperLink ID="HypFile" onclick='<%# string.Format("downfile(\"{0}\",\"{1}\");",Eval("Adjunto"),Eval("Observacion2"))%>' CssClass="btn btn-circle btn-sm blue mysmallbtn" runat="server"><i class="fa fa-download"></i></asp:HyperLink>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="">
|
||||
<ItemTemplate>
|
||||
<asp:LinkButton ID="LnkEliminardocto" OnClick="LnkEliminardocto_Click" CssClass="btn btn-circle btn-sm red mysmallbtn" Text="<i class='icon-trash'></i>" runat="server" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar el documento?" data-btn-ok-label="si" />
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</Columns>
|
||||
</asp:GridView>
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet light smmallpadding bordered procesardiv">
|
||||
<div class="portlet-title">
|
||||
<div class="caption font-green">
|
||||
<i class="fa fa-download font-green"></i>
|
||||
<span class="caption-subject bold uppercase">Historial</span>
|
||||
</div>
|
||||
<div class="tools">
|
||||
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body rowpadding ">
|
||||
|
||||
<asp:GridView ID="GVMaterialidadEnvios" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD Widthall" AutoGenerateColumns="False"
|
||||
DataKeyNames="CveMaterialidadEnvios,CveCliente,Periodo,Noarchivos,Observacion,FechaIng,CveUsuario,CveEmpresa">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Fecha ">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblfechaIng" runat="server" Text='<%# Eval("FechaIng","{0:dd/MM/yyyy hh}:{0:mm}")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Noarchivos">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblnoarchivos" runat="server" Text='<%# Eval("Noarchivos")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Observacion">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblobservacion" runat="server" Text='<%# Eval("Observacion")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Usuario">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblusuario" runat="server" Text='<%# Eval("Usuario")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</Columns>
|
||||
</asp:GridView>
|
||||
|
||||
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
<div class="modal-footer">
|
||||
<asp:UpdatePanel runat="server">
|
||||
<ContentTemplate>
|
||||
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
<div id="divAgregarDocumentacion" class="modal ADS fade" role="dialog">
|
||||
<div class="modal-dialog" style="width: 450px;">
|
||||
<asp:UpdatePanel runat="server" class="modal-content" ID="UpModalDocumentacion" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
|
||||
<div class="modal-header ">
|
||||
<button type="button" class="close" data-dismiss="modal">×</button>
|
||||
<h4 class="modal-title">
|
||||
<h4>
|
||||
<asp:Literal ID="LtlTituloModalDocumentacion" runat="server">Agregar Documento</asp:Literal></h4>
|
||||
</h4>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="modal-body">
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="Txtdocumentacion" CssClass="form-control" MaxLength="100" runat="server"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="rfvTxtdocumentacion" runat="server" ControlToValidate="Txtdocumentacion" ValidationGroup="GrpEscolaridad" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Institución''</b> es necesario, por favor ingréselo."></asp:RequiredFieldValidator>
|
||||
<asp:Label AssociatedControlID="Txtdocumentacion" runat="server" Text="Documento:"></asp:Label>
|
||||
</div>
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:DropDownList ID="DdlDocumentacionTipo" runat="server" Width="100%" CssClass=" select2me form-control " >
|
||||
<asp:ListItem Value="51" Text="Generales" ></asp:ListItem>
|
||||
<asp:ListItem Value="58" Text="Por cliente"></asp:ListItem>
|
||||
<asp:ListItem Value="59" Text="Por cliente(nivel empleado)"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
<asp:RequiredFieldValidator InitialValue="-1" ID="rfvDdlDocumentacionTipo" ControlToValidate="DdlDocumentacionTipo" CssClass="help-block errorimput" ValidationGroup="GrpEscolaridad" runat="server" ErrorMessage="Seleccione una de las opciones"></asp:RequiredFieldValidator>
|
||||
<asp:Label AssociatedControlID="DdlDocumentacionTipo" runat="server" Text="Tipo de documento:"></asp:Label>
|
||||
</div>
|
||||
<div class="hidden">
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtOrden" CssClass="form-control" onkeypress="validate(event)" MaxLength="3" runat="server"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="rfvTxtOrden" runat="server" ControlToValidate="TxtOrden" ValidationGroup="GrpEscolaridad" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Institución''</b> es necesario, por favor ingréselo."></asp:RequiredFieldValidator>
|
||||
<ajax:FilteredTextBoxExtender ID="filTxtOrden" runat="server" TargetControlID="TxtOrden" FilterType="Numbers" ValidChars="" />
|
||||
<asp:Label AssociatedControlID="TxtOrden" runat="server" Text="Orden:"></asp:Label>
|
||||
</div>
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtDiasLimite" CssClass="form-control" onkeypress="validate(event)" MaxLength="2" runat="server"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="rfvTxtDiasLimite" runat="server" ControlToValidate="TxtDiasLimite" ValidationGroup="GrpEscolaridad" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo es necesario, por favor ingréselo."></asp:RequiredFieldValidator>
|
||||
<ajax:FilteredTextBoxExtender ID="FilTxtDiasLimite" runat="server" TargetControlID="TxtDiasLimite" FilterType="Numbers" ValidChars="" />
|
||||
<asp:Label AssociatedControlID="TxtDiasLimite" runat="server" Text="Dias Limite:"></asp:Label>
|
||||
</div>
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtPeriodicidad" CssClass="form-control" onkeypress="validate(event)" MaxLength="2" runat="server"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtPeriodicidad" runat="server" ControlToValidate="TxtPeriodicidad" ValidationGroup="GrpEscolaridad" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo es necesario, por favor ingréselo."></asp:RequiredFieldValidator>
|
||||
<ajax:FilteredTextBoxExtender ID="FILTxtPeriodicidad" runat="server" TargetControlID="TxtPeriodicidad" FilterType="Numbers" ValidChars="" />
|
||||
<asp:Label AssociatedControlID="TxtPeriodicidad" runat="server" Text="Periodicidad:"></asp:Label>
|
||||
</div>
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:CheckBox ID="ChkAplicaDiasLimite" runat="server" Text="Aplica Dias Limite" />
|
||||
</div>
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:CheckBox ID="ChkAplicaFechaVencimiento" runat="server" Text="Aplica Fecha de Vencimiento" />
|
||||
</div>
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:CheckBox ID="chkRequerido" runat="server" Text="Requerido" />
|
||||
</div>
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:CheckBox ID="chkEstatus" runat="server" Text="Activo" />
|
||||
</div>
|
||||
|
||||
<div class="">
|
||||
<asp:TextBox ID="TxtFileDocumentacion" CssClass="ADSdropzone hidden" data-maxFile="1" Text="" runat="server"></asp:TextBox>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
</div>
|
||||
|
||||
<div class="modal-footer">
|
||||
<asp:Button ID="BtnAgregarDocumentoModal" runat="server" OnClick="BtnAgregarDocumentoModal_Click" class="btn btn-success" Text="Agregar" ValidationGroup="GrpEscolaridad" />
|
||||
<button type="button" class="btn default" data-dismiss="modal">Cancelar</button>
|
||||
</div>
|
||||
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
|
||||
</div>
|
||||
</div>
|
||||
<asp:TextBox ID="TxtDoctoName" CssClass="hidden TxtDoctoName" runat="server"></asp:TextBox>
|
||||
<asp:TextBox ID="TxtCveDocumentacionElectronica" CssClass="hidden TxtCveDocumentacionElectronica" runat="server"></asp:TextBox>
|
||||
<asp:Button ID="BtnDocumentacionElectronica" UseSubmitBehavior="false" CssClass="hidden BtnDocumentacionElectronica" OnClick="BtnDocumentacionElectronica_Click" runat="server" Text="Button" />
|
||||
<ajax:TabContainer ID="TabCGeneral" runat="server">
|
||||
<ajax:TabPanel ID="TabClientes" runat="server" HeaderText="Clientes">
|
||||
<ContentTemplate>
|
||||
</ContentTemplate>
|
||||
</ajax:TabPanel>
|
||||
<ajax:TabPanel ID="TaDocumentacion" runat="server" HeaderText="Documentos">
|
||||
<ContentTemplate>
|
||||
<ajax:TabContainer ID="TabCDoctos" runat="server">
|
||||
<ajax:TabPanel ID="TabDoctosFaltantes" runat="server" HeaderText="Faltantes">
|
||||
<ContentTemplate>
|
||||
</ContentTemplate>
|
||||
</ajax:TabPanel>
|
||||
<ajax:TabPanel ID="TabDoctosGenerales" runat="server" HeaderText="Generales">
|
||||
<ContentTemplate>
|
||||
</ContentTemplate>
|
||||
</ajax:TabPanel>
|
||||
<ajax:TabPanel ID="TabDoctosPorCliente" runat="server" HeaderText="por cliente">
|
||||
<ContentTemplate>
|
||||
</ContentTemplate>
|
||||
</ajax:TabPanel>
|
||||
<ajax:TabPanel ID="Tab" runat="server" HeaderText="por empleado">
|
||||
<ContentTemplate>
|
||||
</ContentTemplate>
|
||||
</ajax:TabPanel>
|
||||
</ajax:TabContainer>
|
||||
</ContentTemplate>
|
||||
</ajax:TabPanel>
|
||||
</ajax:TabContainer>
|
||||
</div>
|
||||
</div>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
|
||||
<script>
|
||||
var showhideprocesarguardar = 0;
|
||||
function openguardar() {
|
||||
if (showhideprocesarguardar == 1) {
|
||||
materialidadshowhide('.guardardiv', 1)
|
||||
materialidadshowhide('.procesardiv', 0)
|
||||
} else {
|
||||
materialidadshowhide('.guardardiv', 0)
|
||||
materialidadshowhide('.procesardiv', 1)
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
function EnviarCorreo() {
|
||||
let clientes = '';
|
||||
let coma = ''
|
||||
$('.Chkenviardocto').each(
|
||||
function () {
|
||||
if ($(this).find('input').is(':checked')) {
|
||||
clientes += coma + $(this).data("cvecliente");
|
||||
coma = ',';
|
||||
}
|
||||
}
|
||||
)
|
||||
$('.TxtClientescorreo').val(clientes);
|
||||
$('.Btnenviardocto').click();
|
||||
}
|
||||
function downfile(file, DoctoName) {
|
||||
|
||||
$('.TxtDoctoName').val(DoctoName);
|
||||
$('.TxtCveDocumentacionElectronica').val(file);
|
||||
$('.BtnDocumentacionElectronica').click();
|
||||
}
|
||||
function materialidadshowhide(porlet, showhide) {
|
||||
var collapseexpand = $(porlet + ' >.portlet-title .collapse,' + porlet + ' >.portlet-title .expand')
|
||||
collapseexpand.removeClass('collapse')
|
||||
collapseexpand.removeClass('expand')
|
||||
if (showhide == 1) {
|
||||
collapseexpand.addClass('collapse')
|
||||
$(porlet + ' >.portlet-body').show();
|
||||
} else {
|
||||
collapseexpand.addClass('expand')
|
||||
$(porlet + ' >.portlet-body').hide();
|
||||
}
|
||||
}
|
||||
function cargarDocto(cveCliente, cveDocumentacion, cliente, documentacion) {
|
||||
$('.TxtcveCliente').val(cveCliente);
|
||||
$('.TxtcveDocumentacion').val(cveDocumentacion);
|
||||
$('.doctitulo').html(cliente + ' - ' + documentacion);
|
||||
$('.btnshowdoc').click();
|
||||
|
||||
//
|
||||
}
|
||||
function enviarDocto(cveCliente) {
|
||||
$('.TxtcveClienteCorreo').val(cveCliente);
|
||||
$('.BtnEnviarDoctos').click();
|
||||
|
||||
}
|
||||
|
||||
function ADSBegin() {
|
||||
openguardar();
|
||||
}
|
||||
</script>
|
||||
<asp:Content ID="Content8" ContentPlaceHolderID="JS" Runat="Server">
|
||||
</asp:Content>
|
||||
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
836
Documentacion/TableroMaterialidad2.aspx
Normal file
836
Documentacion/TableroMaterialidad2.aspx
Normal file
@@ -0,0 +1,836 @@
|
||||
<%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="TableroMaterialidad2.aspx.cs" Inherits="Documentacion_TableroMaterialidad2" %>
|
||||
|
||||
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content2" ContentPlaceHolderID="Css" runat="Server">
|
||||
<style>
|
||||
#C_Tab_Tlablero tr th:nth-child(1) {
|
||||
text-align: left
|
||||
}
|
||||
|
||||
#C_Tab_Tlablero tr td:nth-child(n+2) {
|
||||
text-align: center
|
||||
}
|
||||
|
||||
.spanfoliofiscal {
|
||||
white-space: nowrap;
|
||||
}
|
||||
th.Modulo5{
|
||||
color:#fff;
|
||||
background-color:#8e44ad;
|
||||
}
|
||||
th.Modulo6{
|
||||
color:#fff;
|
||||
background-color:#3598dc;
|
||||
}
|
||||
th.Modulo7{
|
||||
color:#fff;
|
||||
background-color:#36c6d3;
|
||||
}
|
||||
th:not(.Modulo5) + th.Modulo5,
|
||||
th:not(.Modulo6) + th.Modulo6,
|
||||
th:not(.Modulo7) + th.Modulo7{
|
||||
border-left:1px solid black;
|
||||
}
|
||||
th.Modulo5 + th:not(.Modulo5),
|
||||
th.Modulo6 + th:not(.Modulo6),
|
||||
th.Modulo7 + th:not(.Modulo7){
|
||||
border-left:1px solid black;
|
||||
}
|
||||
.ADScroller-header .trtitle{
|
||||
display:none;
|
||||
}
|
||||
/*
|
||||
tr:first-child th.Modulo5,
|
||||
tr th.Modulo6,
|
||||
tr th.Modulo7{
|
||||
border-left:1px solid black;
|
||||
}
|
||||
tr th.Modulo5:nth-child(1),
|
||||
tr th.Modulo6:nth-child(1),
|
||||
tr th.Modulo7:nth-child(1){
|
||||
border-left:1px solid black;
|
||||
}
|
||||
tr th.Modulo5:nth-last-child(1),
|
||||
tr th.Modulo6:nth-last-child(1),
|
||||
tr th.Modulo7:nth-last-child(1){
|
||||
border-right:1px solid black;
|
||||
}*/
|
||||
</style>
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content3" ContentPlaceHolderID="E" runat="Server">
|
||||
Materialidad
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content4" ContentPlaceHolderID="HB" runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content5" ContentPlaceHolderID="H" runat="Server">
|
||||
<asp:UpdatePanel runat="server">
|
||||
<ContentTemplate>
|
||||
|
||||
<li>
|
||||
<asp:LinkButton runat="server" ID="BtnAgregarDocumento" OnClick="BtnAgregarDocumento_Click" Text="<i class='fa fa-plus'></i> Agregar tipo documento"></asp:LinkButton>
|
||||
</li>
|
||||
<li>
|
||||
<asp:LinkButton ID="LckOpModalDoctos" OnClick="LckOpModalDoctos_Click" runat="server"><i class="fa fa-upload" aria-hidden="true"></i>Cargar Doctos</asp:LinkButton>
|
||||
<%--<asp:HyperLink ID="HyperLink1" onclick="$('#ModalDoctos').modal();" NavigateUrl="#" runat="server"><i class="fa fa-upload" aria-hidden="true"></i>Cargar Doctos</asp:HyperLink>--%>
|
||||
</li>
|
||||
<li>
|
||||
<asp:LinkButton ID="LckOpModalDoctosPDFXML" OnClick="LckOpModalDoctosPDFXML_Click" runat="server"><i class="fa fa-upload" aria-hidden="true"></i>Cargar XML PDF</asp:LinkButton>
|
||||
<%--<asp:HyperLink ID="HypopenModal" onclick="$('#ModalDoctosxmlpdf').modal();" NavigateUrl="#" runat="server"><i class="fa fa-upload" aria-hidden="true"></i>Cargar XML PDF</asp:HyperLink>--%>
|
||||
</li>
|
||||
<li><asp:HyperLink ID="hypEnviarDocto" onclick="EnviarCorreo();" CssClass="" runat="server">Enviar</asp:HyperLink></li>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content7" ContentPlaceHolderID="C" runat="Server">
|
||||
|
||||
<asp:UpdatePanel runat="server" ID="upPaneldata" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
|
||||
<div class="portlet solid grey-cascade portlet-filter">
|
||||
<div class="portlet-title portlet-filterT portletfiltrostitlee">
|
||||
<div class="tools">
|
||||
<asp:Button ID="BtnConsultar" runat="server" OnClick="BtnConsultar_Click" CausesValidation="true" CssClass=" btn btn-primary " Text="Consultar" ValidationGroup="GrpFiltrar"></asp:Button>
|
||||
|
||||
|
||||
</div>
|
||||
<div class="titlefiltros caption ">
|
||||
<div class="row">
|
||||
<div class="col-md-1" style="font-size: medium; max-width: 100px!important">Año:</div>
|
||||
<div class="col-md-2 " style="max-width: 283px!important">
|
||||
<asp:TextBox ID="Txtanio" runat="server" Text="2021" Style="display: inline-block;" type="number" CssClass=" form-control input-sm select2me" CausesValidation="true" MaxLength="30" ValidationGroup="GrpFiltrar" Width="100%"></asp:TextBox>
|
||||
</div>
|
||||
|
||||
<div class="col-md-1 " style="font-size: medium; max-width: 100px!important">Mes:</div>
|
||||
<div class=" col-md-2 " style="max-width: 180px!important">
|
||||
<asp:DropDownList ID="ddlMes" Width="100%" runat="server" CssClass="form-control select2me">
|
||||
<asp:ListItem Value="01" Text="01 - Enero"></asp:ListItem>
|
||||
<asp:ListItem Value="02" Text="02 - Febrero"></asp:ListItem>
|
||||
<asp:ListItem Value="03" Text="03 - Marzo"></asp:ListItem>
|
||||
<asp:ListItem Value="04" Text="04 - Abril"></asp:ListItem>
|
||||
<asp:ListItem Value="05" Text="05 - Mayo"></asp:ListItem>
|
||||
<asp:ListItem Value="06" Text="06 - Junio"></asp:ListItem>
|
||||
<asp:ListItem Value="07" Text="07 - Julio"></asp:ListItem>
|
||||
<asp:ListItem Value="08" Text="08 - Agosto"></asp:ListItem>
|
||||
<asp:ListItem Value="09" Text="09 - Septiembre"></asp:ListItem>
|
||||
<asp:ListItem Value="10" Text="10 - Octubre"></asp:ListItem>
|
||||
<asp:ListItem Value="11" Selected="true" Text="11 - Noviembre"></asp:ListItem>
|
||||
<asp:ListItem Value="12" Text="12 - Diciembre"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
</div>
|
||||
|
||||
</div>
|
||||
</div>
|
||||
|
||||
</div>
|
||||
|
||||
<div class="portlet-body">
|
||||
</div>
|
||||
|
||||
</div>
|
||||
<table id="tableheader">
|
||||
<asp:Literal ID="LtlThs" runat="server"></asp:Literal>
|
||||
</table>
|
||||
<table class=" table table-striped table-advance table-hover Widthall ScrollAD" data-tableheader="#tableheader"
|
||||
cellspacing="0" data-heighterror="330" data-freezecols="0" data-freezerows="1"
|
||||
id="C_Tab_Tlablero">
|
||||
|
||||
<tbody>
|
||||
<tr>
|
||||
<asp:Repeater ID="RPTTableroHeader" runat="server">
|
||||
<HeaderTemplate>
|
||||
<!-- CvePersonal,CveEmpresa,InicioPeriodo,FinPeriodo,Antiguedad,Ejercicio,FechaIngreso,Dias,DiasDisfrutados,DiasPrima,DiasVacaciones-->
|
||||
|
||||
<th>Cliente</th>
|
||||
</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<th <%# DataBinder.Eval(Container.DataItem, "Modulo","class='Modulo{0}'") %>><%# DataBinder.Eval(Container.DataItem, "Documentacion") %> </th>
|
||||
|
||||
<%-- class='Modulo5'
|
||||
<tr>
|
||||
<td><%# String.Format("{0:dd/MM/yyyy} - {1:dd/MM/yyyy}", DataBinder.Eval(Container.DataItem, "InicioPeriodo"), DataBinder.Eval(Container.DataItem, "FinPeriodo")) %> </td>
|
||||
<td><%# DataBinder.Eval(Container.DataItem, "Antiguedad") %> </td>
|
||||
<td><%# DataBinder.Eval(Container.DataItem, "DiasVacaciones") %> </td>
|
||||
<td><%# DataBinder.Eval(Container.DataItem, "Dias") %> </td>
|
||||
<td><%# DataBinder.Eval(Container.DataItem, "DiasDisfrutados") %> </td>
|
||||
<td><%# DataBinder.Eval(Container.DataItem, "DiasPrima") %> </td>
|
||||
<td></td>
|
||||
</tr>--%>
|
||||
</ItemTemplate>
|
||||
<FooterTemplate>
|
||||
</FooterTemplate>
|
||||
|
||||
</asp:Repeater>
|
||||
<th>XML Timbrados</th>
|
||||
<th>PDF Timbrados</th>
|
||||
<th style="width: 85px;">
|
||||
|
||||
|
||||
|
||||
<asp:TextBox ID="TxtClientescorreo" CssClass="hidden TxtClientescorreo" runat="server"></asp:TextBox>
|
||||
<asp:Button ID="Btnenviardocto" UseSubmitBehavior="false" CssClass="hidden Btnenviardocto" OnClick="Btnenviardocto_Click" runat="server" Text="Button" />
|
||||
|
||||
</th>
|
||||
</tr>
|
||||
|
||||
|
||||
<asp:Repeater ID="RptDatos" runat="server" OnItemDataBound="RptDatos_ItemDataBound">
|
||||
<ItemTemplate>
|
||||
<tr>
|
||||
|
||||
<td><%# string.Format("<a href='/Ventas/Clientes.aspx?CveCliente={0}' target='_blank'>{1}</a>",DataBinder.Eval(Container.DataItem, "CveCliente"),DataBinder.Eval(Container.DataItem, "NombreComercial")) %></td>
|
||||
<asp:Repeater ID="rptdocumentacion" runat="server">
|
||||
<ItemTemplate>
|
||||
<td><%#
|
||||
DataBinder.Eval( ((RepeaterItem)Container.Parent.Parent).DataItem ,string.Format("V_{0}",DataBinder.Eval(Container.DataItem, "CveDocumentacion"))).ToString() =="-1" ? "N/A":
|
||||
string.Format("<a onclick=\"cargarDocto({2},{1},'{4}','{3}')\">{0}</a>",
|
||||
(DataBinder.Eval( ((RepeaterItem)Container.Parent.Parent).DataItem ,string.Format("V_{0}",DataBinder.Eval(Container.DataItem, "CveDocumentacion"))).ToString() =="0"?
|
||||
|
||||
|
||||
"No":
|
||||
|
||||
|
||||
"Si")
|
||||
|
||||
,DataBinder.Eval(Container.DataItem, "CveDocumentacion"),DataBinder.Eval(((RepeaterItem)Container.Parent.Parent).DataItem, "CveCliente")
|
||||
,DataBinder.Eval(Container.DataItem, "Documentacion"),DataBinder.Eval(((RepeaterItem)Container.Parent.Parent).DataItem, "NombreComercial")
|
||||
)
|
||||
|
||||
|
||||
%> </td>
|
||||
|
||||
</ItemTemplate>
|
||||
|
||||
</asp:Repeater>
|
||||
<td>
|
||||
<%# string.Format("<a href=\"/Documentacion/TableroMaterialidadDetalle.ASPX?CveCliente={2}&anio={3}&mes={4}\" >{1}/{0}</a>",DataBinder.Eval(Container.DataItem, "Personal"),DataBinder.Eval(Container.DataItem, "PersonalXML"),DataBinder.Eval(Container.DataItem, "CveCliente"),anio,mes) %>
|
||||
</td>
|
||||
<td>
|
||||
<%# string.Format("<a href=\"/Documentacion/TableroMaterialidadDetalle.ASPX?CveCliente={2}&anio={3}&mes={4}\" >{1}/{0}</a>",DataBinder.Eval(Container.DataItem, "Personal"),DataBinder.Eval(Container.DataItem, "PersonalPDF"),DataBinder.Eval(Container.DataItem, "CveCliente"),anio,mes) %>
|
||||
</td>
|
||||
<td>
|
||||
<asp:CheckBox Checked="true" CssClass="Chkenviardocto" runat="server" data-cvecliente='<%# DataBinder.Eval(Container.DataItem, "CveCliente") %>' />
|
||||
<%-- <%# string.Format("<a class=\"btn btn-primary\" onclick=\"enviarDocto({0})\">Enviar</a>",DataBinder.Eval(Container.DataItem, "CveCliente"),anio,mes) %>--%>
|
||||
</td>
|
||||
</tr>
|
||||
</ItemTemplate>
|
||||
</asp:Repeater>
|
||||
|
||||
|
||||
</tbody>
|
||||
</table>
|
||||
|
||||
<div class="portlet light smmallpadding bordered procesardiv">
|
||||
<div class="portlet-title">
|
||||
<div class="caption font-green">
|
||||
<i class="fa fa-download font-green"></i>
|
||||
<span class="caption-subject bold uppercase">Historial de envio</span>
|
||||
</div>
|
||||
<div class="tools">
|
||||
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body rowpadding ">
|
||||
|
||||
<asp:GridView ID="GvHistorialGral" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD Widthall" AutoGenerateColumns="False"
|
||||
ShowHeaderWhenEmpty="true" EmptyDataText="No se ha enviado documentos"
|
||||
DataKeyNames="Noarchivos,FechaIng,Usuario">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Fecha ">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblfechaIng" runat="server" Text='<%# Eval("FechaIng","{0:dd/MM/yyyy hh}:{0:mm}")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Noarchivos">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblnoarchivos" runat="server" Text='<%# Eval("Noarchivos")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Usuario">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblusuario" runat="server" Text='<%# Eval("Usuario")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</Columns>
|
||||
</asp:GridView>
|
||||
|
||||
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<asp:TextBox ID="TxtcveClienteCorreo" CssClass="hidden TxtcveClienteCorreo" runat="server"></asp:TextBox>
|
||||
<asp:Button ID="BtnEnviarDoctos" UseSubmitBehavior="false" OnClick="BtnEnviarDoctos_Click" runat="server" Text="Enviar" CssClass="btn btn-primary hidden BtnEnviarDoctos" />
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
<div id="ModalDoctosxmlpdf" class="modal ADS fade" role="dialog">
|
||||
<div class="modal-dialog modal-lg">
|
||||
|
||||
<!-- Modal content-->
|
||||
<div class="modal-content">
|
||||
<div class="modal-header ">
|
||||
<button type="button" class="close" data-dismiss="modal">×</button>
|
||||
<h4 class="modal-title">Agregar documentos XML PDF Timbrados.</h4>
|
||||
</div>
|
||||
<div class="modal-body">
|
||||
<asp:UpdatePanel runat="server" ID="Upxmlpdf" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<div class="alert alert-warning" style="padding: 5px; margin-bottom: 5px; padding-right: 25px;">
|
||||
<button type="button" class="close" data-dismiss="alert" style="margin-top: 5px;" aria-hidden="true"></button>
|
||||
<strong style="font-size: 20px; margin-right: 25px;">Información: </strong>
|
||||
Los documentos cargados serán relacionados en el periodo:
|
||||
<asp:Literal runat="server" ID="LtlPeriodoXMLPDF"></asp:Literal>
|
||||
</div>
|
||||
<div class="portlet light smmallpadding bordered procesardiv">
|
||||
<div class="portlet-title">
|
||||
<div class="caption font-green">
|
||||
<i class="fa fa-download font-green"></i>
|
||||
<span class="caption-subject bold uppercase">Paso 1: Procesar 'ZIP'</span>
|
||||
</div>
|
||||
<div class="tools">
|
||||
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
|
||||
</div>
|
||||
<div class="actions">
|
||||
<div class="btn-group">
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body rowpadding ">
|
||||
<div>
|
||||
<asp:TextBox ID="Anexoxmlpdf" CssClass="ADSdropzone hidden" data-maxfilesize="500" data-maxFile="1" Text="" runat="server"></asp:TextBox>
|
||||
</div>
|
||||
<div class="text-center">
|
||||
<asp:LinkButton ID="LnkCargarZip" CssClass="btn btn-success" OnClick="LnkCargarZip_Click" runat="server">Procesar</asp:LinkButton>
|
||||
</div>
|
||||
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet light smmallpadding bordered guardardiv">
|
||||
<div class="portlet-title">
|
||||
<div class="caption font-green">
|
||||
<i class="fa fa-download font-green"></i>
|
||||
<span class="caption-subject bold uppercase">Paso 2: Guardar</span>
|
||||
</div>
|
||||
<div class="tools">
|
||||
<a href="javascript:;" class="expand" data-original-title="" title=""></a>
|
||||
</div>
|
||||
<div class="actions">
|
||||
<div class="btn-group">
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body rowpadding" style="display: none">
|
||||
<div class="row">
|
||||
<div class="col-sm-4 col-sm-offset-4">
|
||||
<div class="dashboard-stat red-intense">
|
||||
<div class="visual"><i class="fa fa-bar-chart-o"></i></div>
|
||||
<div class="details">
|
||||
<div class="number">Documentos</div>
|
||||
<div class="desc">
|
||||
<label class="indicadortipo4 col-md-6 tooltips" data-original-title="XML">
|
||||
<asp:Literal ID="LtlNoXml" runat="server"></asp:Literal></label>
|
||||
<label class="indicadortipo4 col-md-6 tooltips" data-original-title="PDF">
|
||||
<asp:Literal ID="LtlNoPDF" runat="server"></asp:Literal></label>
|
||||
<label class="indicadortipo4 col-md-6 tooltips" data-original-title="Todos">
|
||||
<asp:Literal ID="LtlNoDoctos" runat="server"></asp:Literal></label>
|
||||
<label class="indicadortipo4 col-md-6 tooltips" data-original-title="Otros">
|
||||
<asp:Literal ID="LtlOtrosDoctos" runat="server"></asp:Literal></label>
|
||||
</div>
|
||||
</div>
|
||||
<a class="more" href="javascript:;" data-toggle="dropdown" data-hover="dropdown" data-close-others="true" tabindex="0">Ver Más <i class="m-icon-swapright m-icon-white"></i>
|
||||
</a>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
<asp:Panel runat="server" ID="pnlinconsistencias" Visible="false" CssClass="alert alert-warning" Style="padding: 5px; margin-bottom: 5px; padding-right: 25px;">
|
||||
<button type="button" class="close" data-dismiss="alert" style="margin-top: 5px;" aria-hidden="true"></button>
|
||||
<strong style="font-size: 20px; margin-right: 25px;">Información: </strong>Se encontraron inconsistencias en los documentos cargados, solo se guardaran los archivos sin inconsistencias.
|
||||
</asp:Panel>
|
||||
<ajax:TabContainer ID="Tabsmodal" runat="server" Width="100%" AutoPostBack="True">
|
||||
<ajax:TabPanel ID="TabDoctos" runat="server" HeaderText="Documentos">
|
||||
<ContentTemplate>
|
||||
|
||||
<asp:GridView ID="GVmaterialidadDoctos" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD" AutoGenerateColumns="False" OnRowDataBound="GVmaterialidadDoctos_RowDataBound"
|
||||
DataKeyNames="FolioFiscal,nofiles,archivoXML,archivoPDF,Receptor,RfcReceptor,Emisor,RfcEmisor,SubTotal,Descuento,Total,Serie,Folio,Fecha,FechaPago,FechaInicio,FechaFin,TotalPercepciones,TotalDeducciones,NumDiasPagados,CURP,NSS,TN,NDP,TP,Periodo,PeriodoOk,CvePersonal,CvePeriodo,CveNomina"
|
||||
data-height="250">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Folio Fiscal">
|
||||
<ItemTemplate>
|
||||
<asp:Label CssClass="spanfoliofiscal" runat="server" Text='<%# Eval("FolioFiscal")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Doctos">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("nofiles")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="XML">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("archivoXML").ToString().Length>0?"Si":"No" %>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="PDF">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("archivoPDF").ToString().Length>0?"Si":"No" %>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Empleado">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("Receptor")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="RFC">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("RfcReceptor")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="CURP">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("CURP")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="NSS">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("NSS")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Emisor">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("Emisor")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Neto">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("Total","{0:N2}")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Periodo">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("PeriodoText")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>
|
||||
Fecha<br />
|
||||
inicio
|
||||
</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("FechaInicio","{0:dd/MM/yyyy}")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>
|
||||
Fecha<br />
|
||||
fin
|
||||
</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("FechaFin","{0:dd/MM/yyyy}")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>
|
||||
Fecha<br />
|
||||
pago
|
||||
</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("FechaPago","{0:dd/MM/yyyy}")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField>
|
||||
<HeaderTemplate>
|
||||
Días<br />
|
||||
pago
|
||||
</HeaderTemplate>
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("NumDiasPagados")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</Columns>
|
||||
</asp:GridView>
|
||||
</ContentTemplate>
|
||||
</ajax:TabPanel>
|
||||
<ajax:TabPanel ID="Tabperiodos" runat="server" HeaderText="Periodos sin registrar">
|
||||
<ContentTemplate>
|
||||
|
||||
<asp:GridView ID="GvPeriodo" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD" AutoGenerateColumns="False"
|
||||
DataKeyNames="FechaInicio,FechaFin,TN,TP" data-height="250">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Fecha Inicio">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblfechaInicio" runat="server" Text='<%# Eval("FechaInicio","{0:dd/MM/yyyy}")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Fecha Fin">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblfechaFin" runat="server" Text='<%# Eval("FechaFin","{0:dd/MM/yyyy}")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</Columns>
|
||||
</asp:GridView>
|
||||
</ContentTemplate>
|
||||
</ajax:TabPanel>
|
||||
<ajax:TabPanel ID="TabPersonal" runat="server" HeaderText="Personal sin registrar">
|
||||
<ContentTemplate>
|
||||
|
||||
<asp:GridView ID="GvPersonal" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD" AutoGenerateColumns="False"
|
||||
DataKeyNames="CvePersonal,Receptor,CURP,NombreCompleto,Codigo" data-height="250">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Empleado">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblreceptor" runat="server" Text='<%# Eval("Receptor")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="CURP">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblcURP" runat="server" Text='<%# Eval("CURP")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</Columns>
|
||||
</asp:GridView>
|
||||
</ContentTemplate>
|
||||
</ajax:TabPanel>
|
||||
<ajax:TabPanel ID="TabConceptos" runat="server" HeaderText="Conceptos sin registrar" Visible="false">
|
||||
</ajax:TabPanel>
|
||||
</ajax:TabContainer>
|
||||
|
||||
<div class="text-center">
|
||||
<asp:LinkButton ID="LnkProcesarDoctos" CssClass="btn btn-success" OnClick="LnkProcesarDoctos_Click" runat="server">Guardar</asp:LinkButton>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
<div class="modal-footer">
|
||||
<asp:UpdatePanel runat="server">
|
||||
<ContentTemplate>
|
||||
<%--<asp:Button ID="BtnAddClienteDocumentoxmlpd" UseSubmitBehavior="false" OnClick="BtnAddClienteDocumentoxmlpd_Click" runat="server" Text="Guardar" CssClass="btn btn-primary" />--%>
|
||||
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
|
||||
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
<div id="ModalDoctos" class="modal ADS fade" role="dialog">
|
||||
<div class="modal-dialog">
|
||||
|
||||
<!-- Modal content-->
|
||||
<div class="modal-content" style="width: 700px;">
|
||||
<div class="modal-header ">
|
||||
<button type="button" class="close" data-dismiss="modal">×</button>
|
||||
<h4 class="modal-title">Agregar documento</h4>
|
||||
</div>
|
||||
|
||||
<div class="modal-body">
|
||||
<asp:UpdatePanel runat="server" ID="UpModalDoctos" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
|
||||
<div class="alert alert-warning" style="padding: 5px; margin-bottom: 5px; padding-right: 25px;">
|
||||
<button type="button" class="close" data-dismiss="alert" style="margin-top: 5px;" aria-hidden="true"></button>
|
||||
<strong style="font-size: 20px; margin-right: 25px;">Información: </strong>
|
||||
Los documentos cargados serán relacionados en el periodo:
|
||||
<asp:Literal runat="server" ID="LtlPeriodo"></asp:Literal>
|
||||
</div>
|
||||
|
||||
Tipo documento
|
||||
<asp:DropDownList ID="DdlDocumentacion" DataValueField="CveDocumentacion" DataTextField="Documentacion" Width="100%" runat="server" CssClass="form-control select2me"></asp:DropDownList>
|
||||
<div>
|
||||
<br />
|
||||
<asp:TextBox ID="Anexo" CssClass="ADSdropzone hidden" Text="" runat="server"></asp:TextBox>
|
||||
Observaciones
|
||||
<asp:TextBox ID="TxtObservaciones" TextMode="MultiLine" Rows="4" CssClass="form-control" runat="server"></asp:TextBox>
|
||||
</div>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
<div class="modal-footer">
|
||||
<asp:UpdatePanel runat="server">
|
||||
<ContentTemplate>
|
||||
<asp:Button ID="BtnAddClienteDocumento" UseSubmitBehavior="false" OnClick="BtnAddClienteDocumento_Click" runat="server" Text="Guardar" CssClass="btn btn-primary" />
|
||||
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
|
||||
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
<div id="ModalShowDoctos" class="modal ADS fade" role="dialog">
|
||||
<div class="modal-dialog">
|
||||
|
||||
<!-- Modal content-->
|
||||
<div class="modal-content" style="width: 700px;">
|
||||
<div class="modal-header ">
|
||||
<button type="button" class="close" data-dismiss="modal">×</button>
|
||||
<h4 class="modal-title">Documentos</h4>
|
||||
</div>
|
||||
|
||||
<div class="modal-body">
|
||||
<asp:UpdatePanel runat="server" ID="UpModalshowdoctos" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
|
||||
|
||||
<span class="doctitulo"></span>
|
||||
<asp:TextBox ID="TxtcveCliente" CssClass="hidden TxtcveCliente" runat="server"></asp:TextBox>
|
||||
<asp:TextBox ID="TxtcveDocumentacion" CssClass="hidden TxtcveDocumentacion" runat="server"></asp:TextBox>
|
||||
<asp:Button ID="btnshowdoc" UseSubmitBehavior="false" CssClass="hidden btnshowdoc" OnClick="btnshowdoc_Click" runat="server" Text="Button" />
|
||||
|
||||
<div class="portlet light smmallpadding bordered procesardiv">
|
||||
<div class="portlet-title">
|
||||
<div class="caption font-green">
|
||||
<i class="fa fa-download font-green"></i>
|
||||
<span class="caption-subject bold uppercase">Documentos</span>
|
||||
</div>
|
||||
<div class="tools">
|
||||
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body rowpadding ">
|
||||
<asp:GridView ID="GVdocelect" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD Widthall mysmallbtn" AutoGenerateColumns="False"
|
||||
ShowHeaderWhenEmpty="true"
|
||||
EmptyDataText="No se encontraron documentos"
|
||||
DataKeyNames="CveDocumentacionElectronica,CveDocumentacion,Documentacion,DocumentacionFormato,Orden,Adjunto,CveDocumentacionTipo,Requerido,DocumentacionTipo,SCompleto,Estatus,Observacion,Fecha,FechaIng,FechaLimite,FechaVigencia,Usuario,DiasLimite,CveVenta,Observacion2,AplicaDiasLimite,AplicaFechaVencimiento,Modulo">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Documento">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("Observacion2")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Observacion">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblobservacion" runat="server" Text='<%# Eval("Observacion")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
|
||||
<asp:TemplateField HeaderText="Archivo" ItemStyle-Width="50">
|
||||
<ItemTemplate>
|
||||
<asp:HyperLink ID="HypFile" onclick='<%# string.Format("downfile(\"{0}\",\"{1}\");",Eval("Adjunto"),Eval("Observacion2"))%>' CssClass="btn btn-circle btn-sm blue mysmallbtn" runat="server"><i class="fa fa-download"></i></asp:HyperLink>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="">
|
||||
<ItemTemplate>
|
||||
<asp:LinkButton ID="LnkEliminardocto" OnClick="LnkEliminardocto_Click" CssClass="btn btn-circle btn-sm red mysmallbtn" Text="<i class='icon-trash'></i>" runat="server" data-toggle="confirmation" data-popout="true" data-original-title="¿Está seguro que desea eliminar el documento?" data-btn-ok-label="si" />
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</Columns>
|
||||
</asp:GridView>
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet light smmallpadding bordered procesardiv">
|
||||
<div class="portlet-title">
|
||||
<div class="caption font-green">
|
||||
<i class="fa fa-download font-green"></i>
|
||||
<span class="caption-subject bold uppercase">Historial</span>
|
||||
</div>
|
||||
<div class="tools">
|
||||
<a href="javascript:;" class="collapse" data-original-title="" title=""></a>
|
||||
</div>
|
||||
</div>
|
||||
<div class="portlet-body rowpadding ">
|
||||
|
||||
<asp:GridView ID="GVMaterialidadEnvios" runat="server" GridLines="None" CssClass="table table-hover table-striped ScrollAD Widthall" AutoGenerateColumns="False"
|
||||
DataKeyNames="CveMaterialidadEnvios,CveCliente,Periodo,Noarchivos,Observacion,FechaIng,CveUsuario,CveEmpresa">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Fecha ">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblfechaIng" runat="server" Text='<%# Eval("FechaIng","{0:dd/MM/yyyy hh}:{0:mm}")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Noarchivos">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblnoarchivos" runat="server" Text='<%# Eval("Noarchivos")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Observacion">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblobservacion" runat="server" Text='<%# Eval("Observacion")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Usuario">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblusuario" runat="server" Text='<%# Eval("Usuario")%>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</Columns>
|
||||
</asp:GridView>
|
||||
|
||||
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
<div class="modal-footer">
|
||||
<asp:UpdatePanel runat="server">
|
||||
<ContentTemplate>
|
||||
<button type="button" class="btn btn-danger" data-dismiss="modal">Cancelar</button>
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
<div id="divAgregarDocumentacion" class="modal ADS fade" role="dialog">
|
||||
<div class="modal-dialog" style="width: 450px;">
|
||||
<asp:UpdatePanel runat="server" class="modal-content" ID="UpModalDocumentacion" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
|
||||
<div class="modal-header ">
|
||||
<button type="button" class="close" data-dismiss="modal">×</button>
|
||||
<h4 class="modal-title">
|
||||
<h4>
|
||||
<asp:Literal ID="LtlTituloModalDocumentacion" runat="server">Agregar tipo documento</asp:Literal></h4>
|
||||
</h4>
|
||||
</div>
|
||||
|
||||
<div class="modal-body">
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="Txtdocumentacion" CssClass="form-control" MaxLength="100" runat="server"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="rfvTxtdocumentacion" runat="server" ControlToValidate="Txtdocumentacion" ValidationGroup="GrpEscolaridad" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Institución''</b> es necesario, por favor ingréselo."></asp:RequiredFieldValidator>
|
||||
<asp:Label AssociatedControlID="Txtdocumentacion" runat="server" Text="Documento:"></asp:Label>
|
||||
</div>
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:DropDownList ID="DdlDocumentacionTipo" runat="server" Width="100%" CssClass=" select2me form-control " >
|
||||
<asp:ListItem Value="51" Text="Generales" ></asp:ListItem>
|
||||
<asp:ListItem Value="58" Text="Por cliente"></asp:ListItem>
|
||||
<asp:ListItem Value="59" Text="Por cliente(nivel empleado)"></asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
<asp:RequiredFieldValidator InitialValue="-1" ID="rfvDdlDocumentacionTipo" ControlToValidate="DdlDocumentacionTipo" CssClass="help-block errorimput" ValidationGroup="GrpEscolaridad" runat="server" ErrorMessage="Seleccione una de las opciones"></asp:RequiredFieldValidator>
|
||||
<asp:Label AssociatedControlID="DdlDocumentacionTipo" runat="server" Text="Tipo de documento:"></asp:Label>
|
||||
</div>
|
||||
<div class="hidden">
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtOrden" CssClass="form-control" onkeypress="validate(event)" MaxLength="3" runat="server"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="rfvTxtOrden" runat="server" ControlToValidate="TxtOrden" ValidationGroup="GrpEscolaridad" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Institución''</b> es necesario, por favor ingréselo."></asp:RequiredFieldValidator>
|
||||
<ajax:FilteredTextBoxExtender ID="filTxtOrden" runat="server" TargetControlID="TxtOrden" FilterType="Numbers" ValidChars="" />
|
||||
<asp:Label AssociatedControlID="TxtOrden" runat="server" Text="Orden:"></asp:Label>
|
||||
</div>
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtDiasLimite" CssClass="form-control" onkeypress="validate(event)" MaxLength="2" runat="server"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="rfvTxtDiasLimite" runat="server" ControlToValidate="TxtDiasLimite" ValidationGroup="GrpEscolaridad" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo es necesario, por favor ingréselo."></asp:RequiredFieldValidator>
|
||||
<ajax:FilteredTextBoxExtender ID="FilTxtDiasLimite" runat="server" TargetControlID="TxtDiasLimite" FilterType="Numbers" ValidChars="" />
|
||||
<asp:Label AssociatedControlID="TxtDiasLimite" runat="server" Text="Dias Limite:"></asp:Label>
|
||||
</div>
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:TextBox ID="TxtPeriodicidad" CssClass="form-control" onkeypress="validate(event)" MaxLength="2" runat="server"></asp:TextBox>
|
||||
<asp:RequiredFieldValidator ID="RfvTxtPeriodicidad" runat="server" ControlToValidate="TxtPeriodicidad" ValidationGroup="GrpEscolaridad" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo es necesario, por favor ingréselo."></asp:RequiredFieldValidator>
|
||||
<ajax:FilteredTextBoxExtender ID="FILTxtPeriodicidad" runat="server" TargetControlID="TxtPeriodicidad" FilterType="Numbers" ValidChars="" />
|
||||
<asp:Label AssociatedControlID="TxtPeriodicidad" runat="server" Text="Periodicidad:"></asp:Label>
|
||||
</div>
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:CheckBox ID="ChkAplicaDiasLimite" runat="server" Text="Aplica Dias Limite" />
|
||||
</div>
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:CheckBox ID="ChkAplicaFechaVencimiento" runat="server" Text="Aplica Fecha de Vencimiento" />
|
||||
</div>
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:CheckBox ID="chkRequerido" runat="server" Text="Requerido" />
|
||||
</div>
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:CheckBox ID="chkEstatus" runat="server" Text="Activo" />
|
||||
</div>
|
||||
|
||||
<div class="">
|
||||
<asp:TextBox ID="TxtFileDocumentacion" CssClass="ADSdropzone hidden" data-maxFile="1" Text="" runat="server"></asp:TextBox>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
</div>
|
||||
|
||||
<div class="modal-footer">
|
||||
<asp:Button ID="BtnAgregarDocumentoModal" runat="server" OnClick="BtnAgregarDocumentoModal_Click" class="btn btn-success" Text="Agregar" ValidationGroup="GrpEscolaridad" />
|
||||
<button type="button" class="btn default" data-dismiss="modal">Cancelar</button>
|
||||
</div>
|
||||
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
|
||||
</div>
|
||||
</div>
|
||||
<asp:TextBox ID="TxtDoctoName" CssClass="hidden TxtDoctoName" runat="server"></asp:TextBox>
|
||||
<asp:TextBox ID="TxtCveDocumentacionElectronica" CssClass="hidden TxtCveDocumentacionElectronica" runat="server"></asp:TextBox>
|
||||
<asp:Button ID="BtnDocumentacionElectronica" UseSubmitBehavior="false" CssClass="hidden BtnDocumentacionElectronica" OnClick="BtnDocumentacionElectronica_Click" runat="server" Text="Button" />
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
|
||||
<script>
|
||||
var showhideprocesarguardar = 0;
|
||||
function openguardar() {
|
||||
if (showhideprocesarguardar == 1) {
|
||||
materialidadshowhide('.guardardiv', 1)
|
||||
materialidadshowhide('.procesardiv', 0)
|
||||
} else {
|
||||
materialidadshowhide('.guardardiv', 0)
|
||||
materialidadshowhide('.procesardiv', 1)
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
function EnviarCorreo() {
|
||||
let clientes = '';
|
||||
let coma = ''
|
||||
$('.Chkenviardocto').each(
|
||||
function () {
|
||||
if ($(this).find('input').is(':checked')) {
|
||||
clientes += coma + $(this).data("cvecliente");
|
||||
coma = ',';
|
||||
}
|
||||
}
|
||||
)
|
||||
$('.TxtClientescorreo').val(clientes);
|
||||
$('.Btnenviardocto').click();
|
||||
}
|
||||
function downfile(file, DoctoName) {
|
||||
|
||||
$('.TxtDoctoName').val(DoctoName);
|
||||
$('.TxtCveDocumentacionElectronica').val(file);
|
||||
$('.BtnDocumentacionElectronica').click();
|
||||
}
|
||||
function materialidadshowhide(porlet, showhide) {
|
||||
var collapseexpand = $(porlet + ' >.portlet-title .collapse,' + porlet + ' >.portlet-title .expand')
|
||||
collapseexpand.removeClass('collapse')
|
||||
collapseexpand.removeClass('expand')
|
||||
if (showhide == 1) {
|
||||
collapseexpand.addClass('collapse')
|
||||
$(porlet + ' >.portlet-body').show();
|
||||
} else {
|
||||
collapseexpand.addClass('expand')
|
||||
$(porlet + ' >.portlet-body').hide();
|
||||
}
|
||||
}
|
||||
function cargarDocto(cveCliente, cveDocumentacion, cliente, documentacion) {
|
||||
$('.TxtcveCliente').val(cveCliente);
|
||||
$('.TxtcveDocumentacion').val(cveDocumentacion);
|
||||
$('.doctitulo').html(cliente + ' - ' + documentacion);
|
||||
$('.btnshowdoc').click();
|
||||
|
||||
//
|
||||
}
|
||||
function enviarDocto(cveCliente) {
|
||||
$('.TxtcveClienteCorreo').val(cveCliente);
|
||||
$('.BtnEnviarDoctos').click();
|
||||
|
||||
}
|
||||
|
||||
function ADSBegin() {
|
||||
openguardar();
|
||||
}
|
||||
</script>
|
||||
</asp:Content>
|
||||
|
||||
1779
Documentacion/TableroMaterialidad2.aspx.cs
Normal file
1779
Documentacion/TableroMaterialidad2.aspx.cs
Normal file
File diff suppressed because it is too large
Load Diff
@@ -84,12 +84,12 @@
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Codigo">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblcodigo" runat="server" Text='<%# Eval("Codigo")%>'> </asp:Label>
|
||||
<asp:literal ID="lblcodigo" runat="server" Text='<%# string.Format("<a href=\"/RH/Personal.aspx?CvePersonal={0}\">{1}</a>", Eval("CvePersonal"), Eval("Codigo"))%>'> </asp:literal>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Nombre Completo">
|
||||
<ItemTemplate>
|
||||
<asp:Label ID="lblnombreCompleto" runat="server" Text='<%# Eval("NombreCompleto")%>'> </asp:Label>
|
||||
<asp:Label ID="lblnombreCompleto" runat="server" Text='<%# string.Format("<a href=\"/RH/Personal.aspx?CvePersonal={0}\">{1}</a>", Eval("CvePersonal"), Eval("NombreCompleto")) %>'> </asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="XML" Visible="false">
|
||||
|
||||
@@ -2193,36 +2193,44 @@ Partial Class OC
|
||||
Dim TotalPS As Double = If(txtPrecioUnitario.Text.ToDouble > 0, (txtPrecioUnitario.Text.ToDouble * TxtCant.Text.ToDouble) - TxtDescuentoAdd.Text.ToDouble, 0)
|
||||
Dim ImportePS As Double = If(txtPrecioUnitario.Text.ToDouble > 0, txtPrecioUnitario.Text.ToDouble, 0)
|
||||
Dim CveOrdenCompraDetalle As Integer = DtDetalle.MAX("CveOrdenCompraDetalle").ToEntero + 100
|
||||
Dim CantidadVentaMinima As Decimal = DrPS("VentaMinima").ToString.ToDecimal
|
||||
|
||||
If CantidadVentaMinima > 0 AndAlso TxtCant.Text.ToDecimal > 0 Then
|
||||
If TxtCant.Text.ToDecimal Mod CantidadVentaMinima <> 0 Then
|
||||
Alert(String.Format("El producto se vende solo en cantidades de <b>{0:####.####}</b>", CantidadVentaMinima))
|
||||
Exit Sub
|
||||
End If
|
||||
End If
|
||||
|
||||
'Si es Proveedor Extranjero el IVA es 0%
|
||||
If GlobalDTCompProveedores(CveEmpresaActual).FiltraParametros($"CveProveedor = {DdlProveedores.SelectedValue} AND RFC = 'XEXX010101000'").Rows.Count = 1 Then
|
||||
IvaPS = 0
|
||||
End If
|
||||
IvaPS = 0
|
||||
End If
|
||||
|
||||
AddPS(TxtCant.Text, DdlP2.SelectedValue.ToEntero, DdlP2.SelectedText, TxtObsPS.Text, ImportePS, TxtDescuentoAdd.Text.ToDouble, TotalPS,
|
||||
AddPS(TxtCant.Text, DdlP2.SelectedValue.ToEntero, DdlP2.SelectedText, TxtObsPS.Text, ImportePS, TxtDescuentoAdd.Text.ToDouble, TotalPS,
|
||||
CboUnidadMedida.SelectedValue.ToEntero, IvaPS, IEPSPS, IEPSPSIVA, DdlClasificacion.SelectedValue.ToEntero, CboUnidadMedida.SelectedItem.Text, DdlClasificacion.SelectedItem.Text, DdlProyecto.SelectedValue.ToEntero, Proyecto,
|
||||
DdlSubProyecto.SelectedValue.ToEntero, SubProyecto, LblCodigo.Text, HdnCveActivoFijo.Value.ToEntero, 0, CveOrdenCompraDetalle, CveOrdenCompra, IdCuentaPorEjercer,
|
||||
IdCuentaComprometido, DdlACGeneral1.SelectedValue.ToEntero, DdlACGeneral2.SelectedValue.ToEntero, DdlACGeneral3.SelectedValue.ToEntero, DdlACGeneral4.SelectedValue.ToEntero,
|
||||
DdlACGeneral5.SelectedValue.ToEntero, RetIVA, RetISR, CveCultivoCuadroDetalle:=DdlCultivosCuadro.SelectedValue.ToEntero, Cuadro:=DdlCultivosCuadro.SelectedItem.Text)
|
||||
|
||||
TxtCant.Text = ""
|
||||
CboUnidadMedida.SelectedIndex = 0
|
||||
DdlClasificacion.SelectedIndex = 0
|
||||
DdlP2.SelectedValue = "-1"
|
||||
DdlP2.SelectedText = "Seleccione un producto o servicio"
|
||||
txtPrecioUnitario.Text = ""
|
||||
TxtObsPS.Text = ""
|
||||
HdnCveActivoFijo.Value = ""
|
||||
LblCodigo.Text = ""
|
||||
LblCvePOA.Text = ""
|
||||
TxtCant.Focus()
|
||||
TxtCant.Text = ""
|
||||
CboUnidadMedida.SelectedIndex = 0
|
||||
DdlClasificacion.SelectedIndex = 0
|
||||
DdlP2.SelectedValue = "-1"
|
||||
DdlP2.SelectedText = "Seleccione un producto o servicio"
|
||||
txtPrecioUnitario.Text = ""
|
||||
TxtObsPS.Text = ""
|
||||
HdnCveActivoFijo.Value = ""
|
||||
LblCodigo.Text = ""
|
||||
LblCvePOA.Text = ""
|
||||
TxtCant.Focus()
|
||||
|
||||
Total.Text = "0.00"
|
||||
TxtDescuentoAdd.Text = "0.00"
|
||||
Total.Text = "0.00"
|
||||
TxtDescuentoAdd.Text = "0.00"
|
||||
|
||||
End If
|
||||
End If
|
||||
|
||||
CargaSuperior()
|
||||
CargaSuperior()
|
||||
CargaDatosDetalles()
|
||||
|
||||
UPPDetalle.Update()
|
||||
|
||||
@@ -1508,7 +1508,7 @@
|
||||
</asp:Panel>
|
||||
|
||||
</asp:Panel>
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<div class="form-group form-md-line-input input-iconright hidden">
|
||||
<asp:TextBox CssClass="form-control" ID="TxtBono" runat="server" MaxLength="10" Text="0"></asp:TextBox>
|
||||
<asp:Label runat="server" AssociatedControlID="TxtBono" Text="Bono:"></asp:Label>
|
||||
<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>
|
||||
|
||||
@@ -32635,13 +32635,13 @@ Partial Class Ventas
|
||||
If resp(0)("Codigo").ToString().Contiene("500", "501", "502", "503", "504", "505", "506", "507", "508", "510") Then
|
||||
Retorno = True
|
||||
Dim ObjAcum As New ClsAcumuladores
|
||||
If ObjAcum.UpdateEnvioPolizaVirutal(CvePolizaVirtual, True, Now, obj.product_unique_code) Then
|
||||
If ObjAcum.UpdateEnvioPolizaVirtual(CvePolizaVirtual, True, Now, obj.product_unique_code, resp(0)("Descripcion").ToString()) Then
|
||||
Alert(Msg.ToString(), TipoMensaje.MsgInformacion)
|
||||
End If
|
||||
ObjAcum.Dispose()
|
||||
Else
|
||||
Dim ObjAcum As New ClsAcumuladores
|
||||
If ObjAcum.UpdateEnvioPolizaVirutal(CvePolizaVirtual, False, Now, obj.product_unique_code) Then
|
||||
If ObjAcum.UpdateEnvioPolizaVirtual(CvePolizaVirtual, False, Now, obj.product_unique_code, resp(0)("Descripcion").ToString()) Then
|
||||
Alert(Msg.ToString(), TipoMensaje.MsgAdvertencia)
|
||||
End If
|
||||
ObjAcum.Dispose()
|
||||
|
||||
@@ -440,6 +440,8 @@
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
Reference in New Issue
Block a user