Merge branch 'master' of http://192.168.10.111:8383/SIG
This commit is contained in:
JORGE LUIS CAUDILLO ESPARZA
@@ -172,6 +172,7 @@ Public Class ClsClientes
|
||||
|
||||
Public Property CodigoRegimenFiscal As String
|
||||
Public Property RegimenFiscal As String
|
||||
Public Property RepresentanteLegal As String
|
||||
|
||||
#End Region
|
||||
|
||||
@@ -429,6 +430,7 @@ Public Class ClsClientes
|
||||
|
||||
_RegimenFiscal = Data(0)("RegimenFiscal").ToString
|
||||
_CodigoRegimenFiscal = Data(0)("CodigoRegimenFiscal").ToString
|
||||
_RepresentanteLegal = Data(0)("RepresentanteLegal").ToString
|
||||
|
||||
End If
|
||||
Retorno = True
|
||||
@@ -586,7 +588,8 @@ Public Class ClsClientes
|
||||
Optional AplicaComercioExterior As Boolean = False, Optional CveTipoOperacion As Integer = -1, Optional CvePedimento As Integer = -1, Optional CveIncoterm As Integer = -1, Optional CvePais As Integer = -1, Optional CveEstado As Integer = -1, Optional CveMunicipio As Integer = -1, Optional CveColonia As Integer = -1,
|
||||
Optional CveMotivoTraslado As Integer = 0, Optional NumRegIdTrib As String = "", Optional ComExtEstado As String = "-1", Optional ComExtMunicipio As String = "-1", Optional ComExtColonia As String = "-1", Optional RequiereOC As Boolean = False,
|
||||
Optional LT As String = "0", Optional LG As String = "0", Optional EsDistribuidor As Boolean = False, Optional TipoCliente As Integer = 1, Optional CargoUsado As Boolean = False, Optional BonificacionUsado As Boolean = False, Optional CveTipoRetencion As Integer = 0,
|
||||
Optional CorreoEntregaCompras As String = "-1", Optional CorreoEntregaAlmacen As String = "-1", Optional CveSATEstado As Integer = -1, Optional CveAdminTrayecto As Integer = -1, Optional CveRegimenFiscal As Integer = 0, Optional RegimenSociedad As String = "-1", Optional TipoPersona As Boolean = False) As Boolean
|
||||
Optional CorreoEntregaCompras As String = "-1", Optional CorreoEntregaAlmacen As String = "-1", Optional CveSATEstado As Integer = -1, Optional CveAdminTrayecto As Integer = -1, Optional CveRegimenFiscal As Integer = 0, Optional RegimenSociedad As String = "-1", Optional TipoPersona As Boolean = False,
|
||||
Optional RepresentanteLegal As String = "") As Boolean
|
||||
Dim Retorno As Boolean = False
|
||||
|
||||
|
||||
@@ -731,6 +734,9 @@ Public Class ClsClientes
|
||||
|
||||
.Add("@RegimenSociedad", SqlDbType.VarChar).Value = RegimenSociedad
|
||||
.Add("@TipoPersona", SqlDbType.Bit).Value = TipoPersona
|
||||
.Add("@RepresentanteLegal", SqlDbType.VarChar).Value = RepresentanteLegal
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
@@ -782,7 +788,8 @@ Public Class ClsClientes
|
||||
Optional CveMotivoTraslado As Integer = 0, Optional NumRegIdTrib As String = "-1", Optional ComExtEstado As String = "-1", Optional ComExtMunicipio As String = "-1", Optional ComExtColonia As String = "-1",
|
||||
Optional ApellidoPaternoPF As String = "-1", Optional ApellidoMaternoPF As String = "-1", Optional NombresPF As String = "-1", Optional RequiereOC As Boolean = False,
|
||||
Optional LT As String = "0", Optional LG As String = "0", Optional EsDistribuidor As Boolean = False, Optional TipoCliente As Integer = 1, Optional CargoUsado As Boolean = False, Optional BonificacionUsado As Boolean = False, Optional CveTipoRetencion As Integer = 0, Optional CorreoEntregaCompras As String = "-1", Optional CorreoEntregaAlmacen As String = "-1",
|
||||
Optional CveSATEstado As Integer = -1, Optional CveAdminTrayecto As Integer = -1, Optional NoDesglosaIVA As Boolean = False, Optional CveRegimenFiscal As Integer = 0, Optional RegimenSociedad As String = "-1", Optional TipoPersona As Boolean = False) As Boolean
|
||||
Optional CveSATEstado As Integer = -1, Optional CveAdminTrayecto As Integer = -1, Optional NoDesglosaIVA As Boolean = False, Optional CveRegimenFiscal As Integer = 0, Optional RegimenSociedad As String = "-1", Optional TipoPersona As Boolean = False,
|
||||
Optional RepresentanteLegal As String = "") As Boolean
|
||||
|
||||
Dim Retorno As Boolean = False
|
||||
|
||||
@@ -943,6 +950,7 @@ Public Class ClsClientes
|
||||
|
||||
.Add("@RegimenSociedad", SqlDbType.VarChar).Value = RegimenSociedad
|
||||
.Add("@TipoPersona", SqlDbType.Bit).Value = TipoPersona
|
||||
.Add("@RepresentanteLegal", SqlDbType.VarChar).Value = RepresentanteLegal
|
||||
|
||||
|
||||
|
||||
|
||||
@@ -30,6 +30,10 @@ Public Class ClsNominas
|
||||
Public Property FolioFiscal As String
|
||||
Public Property Serie As String
|
||||
Public Property Folio As Integer
|
||||
|
||||
Public Property FolioSolicitud As Integer
|
||||
|
||||
|
||||
Public Property RegistroPatronal As String
|
||||
Public Property SerieFolio As String
|
||||
Public Property NominaFolio As String
|
||||
@@ -3269,7 +3273,21 @@ Public Class ClsNominas
|
||||
|
||||
Public Function SolicitudesAdd2(CveSolicitudCFDI As Integer, CveSolicitudMetadata As Integer, estatus As Integer, observaciones As String, fechaInicio As DateTime, fechaFin As DateTime, cveUsuarioIng As Int32, cveEmpresa As Int32, Optional CveTipoSolicitud As Integer = 1) As Integer
|
||||
|
||||
'CveTipoSolicitud
|
||||
'1 Nominas CFDI y Metadata
|
||||
'101 Nominas CFDI
|
||||
'201 Nominas Metadata
|
||||
|
||||
'2 eFacturas CFDI y Metadata
|
||||
'102 eFacturas CFDI
|
||||
'202 eFacturas Metadata
|
||||
|
||||
'3 Ingresos CFDI y Metadata
|
||||
'103 Ingresos CFDI
|
||||
'203 Ingresos Metadata
|
||||
|
||||
Dim CveSolictudAgregada As Integer = -1
|
||||
FolioSolicitud = -1
|
||||
|
||||
Try
|
||||
DataAdapter("PA_Gral_SAT_SolicitudesAdd2", CommandType.StoredProcedure)
|
||||
@@ -3285,11 +3303,13 @@ Public Class ClsNominas
|
||||
|
||||
With SqlAdapter.SelectCommand.Parameters
|
||||
.Add("@CveSolicitud", SqlDbType.Int).Direction = ParameterDirection.Output
|
||||
.Add("@Folio", SqlDbType.Int).Direction = ParameterDirection.Output
|
||||
End With
|
||||
|
||||
|
||||
SqlAdapter.Fill(Data)
|
||||
CveSolictudAgregada = SqlAdapter.SelectCommand.Parameters("@CveSolicitud").Value.ToString.ToEntero
|
||||
FolioSolicitud = SqlAdapter.SelectCommand.Parameters("@Folio").Value.ToString.ToEntero
|
||||
|
||||
Catch ex As Exception
|
||||
CveSolictudAgregada = -1
|
||||
|
||||
@@ -9368,6 +9368,9 @@ Public Class ClsPaginas
|
||||
Dim ErrorMovtos As Boolean = False
|
||||
Dim PorcentajePago As Decimal = Pago.ImportePago / CompraActual.Total
|
||||
Dim ImporteMovimiento As Decimal = 0
|
||||
Dim ImporteMN As Decimal = 0
|
||||
Dim ImporteME As Decimal = 0
|
||||
Dim TCValuacion As Decimal = CompraActual.TC
|
||||
Dim tImportePago, tImporteCompra As Decimal
|
||||
Dim CveConceptoContableComplementaria As Integer = 206
|
||||
|
||||
@@ -9390,49 +9393,53 @@ Public Class ClsPaginas
|
||||
If UsuarioActual.Empresa.Funcionalidad(703) = "1" AndAlso UltimaFluctuacion IsNot Nothing Then
|
||||
If UltimaFluctuacion.FechaFluctuacion <= tFecha Then
|
||||
'FechaUltimaFluctuacion = UltimaFluctuacion.FechaFluctuacion
|
||||
CompraActual.TC = UltimaFluctuacion.TCFluctuacion
|
||||
TCValuacion = UltimaFluctuacion.TCFluctuacion
|
||||
End If
|
||||
End If
|
||||
|
||||
If CompraActual.CveMoneda = 1 And Pago.CveMonedaPago <> 1 Then 'factura pesos, pago en dolares
|
||||
tImportePago = ((Pago.ImportePago * CompraActual.TC / Pago.TCPago).RoundSQL * Pago.TCPago).RoundSQL
|
||||
tImportePago = ((Pago.ImportePago * TCValuacion / Pago.TCPago).RoundSQL * Pago.TCPago).RoundSQL
|
||||
ElseIf CompraActual.CveMoneda <> 1 And Pago.CveMonedaPago <> 1 Then 'factura dolares, pago en dolares
|
||||
tImporteCompra = (Pago.ImportePago * CompraActual.TC).RoundSQL
|
||||
tImporteCompra = (Pago.ImportePago * TCValuacion).RoundSQL
|
||||
tImportePago = (Pago.ImportePago * Pago.TCPago).RoundSQL
|
||||
ElseIf CompraActual.CveMoneda <> 1 And Pago.CveMonedaPago = 1 Then 'factura dolares, pago en pesos
|
||||
tImporteCompra = (Pago.ImportePago * CompraActual.TC).RoundSQL
|
||||
tImporteCompra = (Pago.ImportePago * TCValuacion).RoundSQL
|
||||
tImportePago = (Pago.ImportePago * Pago.TCPago).RoundSQL
|
||||
End If
|
||||
If CompraActual.CveMoneda > 1 Then ImporteME = Pago.ImportePago
|
||||
|
||||
'movimiento de pago proveedor
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, Pago.ImportePago, Pago.ImportePago, Pago.CveConceptoPago, CompraActual.SerieFolio, Concepto, CompraActual.IdCtaContableProv, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal, CveCompraAmortizacion:=Pago.CveCompraAmortizacion, TipoCambio:=CompraActual.TC) Then
|
||||
ErrorMovtos = True
|
||||
End If
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, Pago.ImportePago, Pago.ImportePago, Pago.CveConceptoPago, CompraActual.SerieFolio, Concepto, CompraActual.IdCtaContableProv, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal, CveCompraAmortizacion:=Pago.CveCompraAmortizacion, TipoCambio:=TCValuacion, TipoCambioPago:=Pago.TCPago, ImporteME:=ImporteME) Then ErrorMovtos = True
|
||||
|
||||
|
||||
'movimiento de pago proveedor Complementaria
|
||||
If Not ErrorMovtos AndAlso CompraActual.CveMoneda > 1 Then
|
||||
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, Pago.ImportePago, (Pago.ImportePago * CompraActual.TC - Pago.ImportePago).RoundSQL, CveConceptoContableComplementaria, CompraActual.SerieFolio, Concepto, CompraActual.IdCtaContableProv, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal, CveCompraAmortizacion:=Pago.CveCompraAmortizacion, TipoCambio:=CompraActual.TC, ImporteME:=Pago.ImportePago) Then
|
||||
ErrorMovtos = True
|
||||
End If
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, Pago.ImportePago, (ImporteME * TCValuacion - ImporteME).RoundSQL, CveConceptoContableComplementaria, CompraActual.SerieFolio, Concepto, CompraActual.IdCtaContableProv, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal, CveCompraAmortizacion:=Pago.CveCompraAmortizacion, TipoCambio:=TCValuacion, TipoCambioPago:=Pago.TCPago, ImporteME:=ImporteME) Then ErrorMovtos = True
|
||||
|
||||
End If
|
||||
|
||||
'si tiene iva y su proporcion
|
||||
If Not ErrorMovtos AndAlso CompraActual.IVA <> 0 Then
|
||||
ImporteMovimiento = (PorcentajePago * CompraActual.IVA).RoundSQL
|
||||
ImporteMN = (ImporteMovimiento * CompraActual.TC).RoundSQL
|
||||
If CompraActual.CveMoneda > 1 Then ImporteME = ImporteMovimiento
|
||||
|
||||
Dim Ret As CompraRetenciones = CompraActual.ConceptoPrePolizaIVA
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteMovimiento, ImporteMovimiento, Ret.CveConceptoxAcreditar, CompraActual.SerieFolio, Concepto, Ret.IdCtaContablexAcreditar, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, PorcentajeImpuesto:=CompraActual.PorcentajeIVA, CvePersonal:=Pago.CvePersonal) Then ErrorMovtos = True
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteMovimiento, ImporteMN, Ret.CveConceptoxAcreditar, CompraActual.SerieFolio, Concepto, Ret.IdCtaContablexAcreditar, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, PorcentajeImpuesto:=CompraActual.PorcentajeIVA, CvePersonal:=Pago.CvePersonal, TipoCambio:=CompraActual.TC, TipoCambioPago:=Pago.TCPago, ImporteME:=ImporteME) Then ErrorMovtos = True
|
||||
|
||||
'si tiene funcionalidad para tomar el TC de pago. se recalcula el importe
|
||||
If FuncionalidadFluctuacionImpuestos Then ImporteMovimiento = ((PorcentajePago * CompraActual.IVA).RoundSQL * Pago.TCPago).RoundSQL
|
||||
If FuncionalidadFluctuacionImpuestos Then ImporteMovimiento = (ImporteMovimiento.RoundSQL * Pago.TCPago).RoundSQL
|
||||
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, ImporteMovimiento, ImporteMovimiento, Ret.CveConceptoAcreditable, CompraActual.SerieFolio, Concepto, Ret.IdCtaContableAcreditable, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, PorcentajeImpuesto:=CompraActual.PorcentajeIVA, CvePersonal:=Pago.CvePersonal) Then ErrorMovtos = True
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, ImporteMovimiento, ImporteMN, Ret.CveConceptoAcreditable, CompraActual.SerieFolio, Concepto, Ret.IdCtaContableAcreditable, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, PorcentajeImpuesto:=CompraActual.PorcentajeIVA, CvePersonal:=Pago.CvePersonal, TipoCambio:=CompraActual.TC, TipoCambioPago:=Pago.TCPago, ImporteME:=ImporteME) Then ErrorMovtos = True
|
||||
|
||||
If CompraActual.IVANoDeducible > 0 Then
|
||||
|
||||
Dim ImporteNOIVA As Decimal = CompraActual.IVANoDeducible * PorcentajePago
|
||||
ImporteMovimiento = (CompraActual.IVANoDeducible * PorcentajePago).RoundSQL
|
||||
ImporteMN = (ImporteMovimiento * CompraActual.TC).RoundSQL
|
||||
If CompraActual.CveMoneda > 1 Then ImporteME = ImporteMovimiento
|
||||
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, ImporteNOIVA, ImporteNOIVA, 280, CompraActual.SerieFolio, Concepto, Ret.IdCtaContIVANoAcreditable, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, PorcentajeImpuesto:=CompraActual.PorcentajeIVA, CvePersonal:=Pago.CvePersonal) Then ErrorMovtos = True
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, ImporteMovimiento, ImporteMN, 280, CompraActual.SerieFolio, Concepto, Ret.IdCtaContIVANoAcreditable, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, PorcentajeImpuesto:=CompraActual.PorcentajeIVA, CvePersonal:=Pago.CvePersonal, TipoCambioPago:=Pago.TCPago, ImporteME:=ImporteME) Then ErrorMovtos = True
|
||||
|
||||
End If
|
||||
|
||||
@@ -9441,32 +9448,41 @@ Public Class ClsPaginas
|
||||
'si tiene RET IVA y su proporcion
|
||||
If Not ErrorMovtos AndAlso CompraActual.RetIVA > 0 Then
|
||||
ImporteMovimiento = (PorcentajePago * CompraActual.RetIVA).RoundSQL
|
||||
ImporteMN = (ImporteMovimiento * CompraActual.TC).RoundSQL
|
||||
If CompraActual.CveMoneda > 1 Then ImporteME = ImporteMovimiento
|
||||
|
||||
Dim Ret As CompraRetenciones = CompraActual.ConceptoPrePolizaRetIVA
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, ImporteMovimiento, ImporteMovimiento, Ret.CveConceptoxAcreditar, CompraActual.SerieFolio, Concepto, Ret.IdCtaContablexAcreditar, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal) Then ErrorMovtos = True
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, ImporteMovimiento, ImporteMN, Ret.CveConceptoxAcreditar, CompraActual.SerieFolio, Concepto, Ret.IdCtaContablexAcreditar, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal, TipoCambioPago:=Pago.TCPago, ImporteME:=ImporteME) Then ErrorMovtos = True
|
||||
|
||||
'si tiene funcionalidad para tomar el TC de pago. se recalcula el importe
|
||||
If FuncionalidadFluctuacionImpuestos Then ImporteMovimiento = ((PorcentajePago * CompraActual.RetIVA).RoundSQL * Pago.TCPago).RoundSQL
|
||||
If FuncionalidadFluctuacionImpuestos Then ImporteMN = (ImporteMovimiento * Pago.TCPago).RoundSQL
|
||||
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteMovimiento, ImporteMovimiento, Ret.CveConceptoAcreditable, CompraActual.SerieFolio, Concepto, Ret.IdCtaContableAcreditable, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal) Then ErrorMovtos = True
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteMovimiento, ImporteMN, Ret.CveConceptoAcreditable, CompraActual.SerieFolio, Concepto, Ret.IdCtaContableAcreditable, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal, TipoCambioPago:=Pago.TCPago, ImporteME:=ImporteME) Then ErrorMovtos = True
|
||||
|
||||
End If
|
||||
|
||||
'si tiene Ret ISR y su proporcion
|
||||
If Not ErrorMovtos AndAlso CompraActual.RetISR > 0 Then
|
||||
ImporteMovimiento = (PorcentajePago * CompraActual.RetISR).RoundSQL
|
||||
ImporteMN = (ImporteMovimiento * CompraActual.TC).RoundSQL
|
||||
If CompraActual.CveMoneda > 1 Then ImporteME = ImporteMovimiento
|
||||
|
||||
Dim Ret As CompraRetenciones = CompraActual.ConceptoPrePolizaRetISR
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, ImporteMovimiento, ImporteMovimiento, Ret.CveConceptoxAcreditar, CompraActual.SerieFolio, Concepto, Ret.IdCtaContablexAcreditar, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal) Then ErrorMovtos = True
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, ImporteMovimiento, ImporteMN, Ret.CveConceptoxAcreditar, CompraActual.SerieFolio, Concepto, Ret.IdCtaContablexAcreditar, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal, TipoCambioPago:=Pago.TCPago, ImporteME:=ImporteME) Then ErrorMovtos = True
|
||||
|
||||
'si tiene funcionalidad para tomar el TC de pago. se recalcula el importe
|
||||
If FuncionalidadFluctuacionImpuestos Then ImporteMovimiento = ((PorcentajePago * CompraActual.RetISR).RoundSQL * Pago.TCPago).RoundSQL
|
||||
If FuncionalidadFluctuacionImpuestos Then ImporteMN = (ImporteMovimiento * Pago.TCPago).RoundSQL
|
||||
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteMovimiento, ImporteMovimiento, Ret.CveConceptoAcreditable, CompraActual.SerieFolio, Concepto, Ret.IdCtaContableAcreditable, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal) Then ErrorMovtos = True
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteMovimiento, ImporteMN, Ret.CveConceptoAcreditable, CompraActual.SerieFolio, Concepto, Ret.IdCtaContableAcreditable, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal, TipoCambioPago:=Pago.TCPago, ImporteME:=ImporteME) Then ErrorMovtos = True
|
||||
|
||||
End If
|
||||
|
||||
'si tiene IEPS y su proporcion
|
||||
If Not ErrorMovtos AndAlso CompraActual.IEPS > 0 Then
|
||||
ImporteMovimiento = (PorcentajePago * CompraActual.IEPS).RoundSQL
|
||||
ImporteMN = (ImporteMovimiento * CompraActual.TC).RoundSQL
|
||||
If CompraActual.CveMoneda > 1 Then ImporteME = ImporteMovimiento
|
||||
|
||||
Dim Ret As New CompraRetenciones
|
||||
If UsuarioActual.Empresa.TipoContabilidad = 2 Then
|
||||
If ObjConta.GetRetCuenta(26, UsuarioActual.CveEmpresa) AndAlso ObjConta.DtResultados.Rows.Count > 0 Then Ret.IdCtaContableAcreditable = ObjConta.DtResultados.Rows(0)("IdCuentaIEPSAcreditable").ToString.ToEntero
|
||||
@@ -9475,12 +9491,12 @@ Public Class ClsPaginas
|
||||
|
||||
End If
|
||||
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteMovimiento, ImporteMovimiento, 25, CompraActual.SerieFolio, Concepto, Ret.IdCtaContablexAcreditar, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal) Then ErrorMovtos = True
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, True, ImporteMovimiento, ImporteMN, 25, CompraActual.SerieFolio, Concepto, Ret.IdCtaContablexAcreditar, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal, TipoCambioPago:=Pago.TCPago, ImporteME:=ImporteME) Then ErrorMovtos = True
|
||||
|
||||
'si tiene funcionalidad para tomar el TC de pago. se recalcula el importe
|
||||
If FuncionalidadFluctuacionImpuestos Then ImporteMovimiento = ((PorcentajePago * CompraActual.IEPS).RoundSQL * Pago.TCPago).RoundSQL
|
||||
If FuncionalidadFluctuacionImpuestos Then ImporteMN = (ImporteMovimiento * Pago.TCPago).RoundSQL
|
||||
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, ImporteMovimiento, ImporteMovimiento, 26, CompraActual.SerieFolio, Concepto, Ret.IdCtaContableAcreditable, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal) Then ErrorMovtos = True
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, False, ImporteMovimiento, ImporteMN, 26, CompraActual.SerieFolio, Concepto, Ret.IdCtaContableAcreditable, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal, TipoCambioPago:=Pago.TCPago, ImporteME:=ImporteME) Then ErrorMovtos = True
|
||||
|
||||
End If
|
||||
|
||||
@@ -9493,8 +9509,7 @@ Public Class ClsPaginas
|
||||
tOtTipoMovto = True : tOtCveCon = 78
|
||||
ImporteMovimiento = Math.Abs(ImporteMovimiento)
|
||||
End If
|
||||
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, tOtTipoMovto, ImporteMovimiento, ImporteMovimiento, tOtCveCon, CompraActual.SerieFolio, Concepto, 0, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal, CveSubProyecto:=CompraActual.CveSubProyecto) Then ErrorMovtos = True
|
||||
If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, tOtTipoMovto, ImporteMovimiento, ImporteMovimiento, tOtCveCon, CompraActual.SerieFolio, Concepto, 0, CveCompra:=CompraActual.CveCompra, CveProveedor:=CompraActual.CveProveedor, CveIE:=Pago.CveIE, CvePersonal:=Pago.CvePersonal, CveSubProyecto:=CompraActual.CveSubProyecto, TipoCambioPago:=Pago.TCPago, ImporteME:=ImporteME) Then ErrorMovtos = True
|
||||
|
||||
End If
|
||||
|
||||
|
||||
@@ -611,8 +611,6 @@ public partial class Bancos_PrestamoPersonal : ClsPaginas
|
||||
MsgError = "No se pudo insertar concepto de acreedor complementaria";
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
}
|
||||
else
|
||||
{
|
||||
@@ -663,11 +661,13 @@ public partial class Bancos_PrestamoPersonal : ClsPaginas
|
||||
|
||||
if (MsgError.Equals(""))
|
||||
{
|
||||
ObjIE.Commit();
|
||||
if (Msg.ToString().Equals(""))
|
||||
{
|
||||
Msg.Append("El Documento se guardo correctamente");
|
||||
}
|
||||
System.IO.FileInfo archivo = null;
|
||||
System.IO.FileInfo archivo = null;
|
||||
|
||||
|
||||
if (DdlTipoTransanccionPrestamo.SelectedValue.ToEntero().Contiene(2, 8, 9))
|
||||
{
|
||||
@@ -691,7 +691,7 @@ public partial class Bancos_PrestamoPersonal : ClsPaginas
|
||||
{
|
||||
Msg.AppendFormat(@"<br/><br/><a class=""Texto"" target='_blank' href=""/Contabilidad/RegPoliza.aspx?IdPoliza={0}"">Ver Póliza</a>", IDPoliza);
|
||||
}
|
||||
ObjIE.Commit();
|
||||
|
||||
}
|
||||
else
|
||||
{
|
||||
|
||||
@@ -369,7 +369,7 @@
|
||||
<asp:UpdatePanel ID="UPCompras" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<asp:GridView ID="GvCxP" runat="server" AutoGenerateColumns="False" EmptyDataText="No se encontraron Cuentas X Pagar Pendientes"
|
||||
DataKeyNames="CveCompra,ImporteProgramo,Saldo,SubTotal,IVA,IVADeducible,IVANoDeducible,IEPS,RetIVA,RetISR,Original,UUID,RFC,CveFactura,SerieFolio,Descripcion,CvePrePoliza,Fecha,EstatusInventario,CveProveedor,TipoCambio,TipoCambioOriginal, CveMoneda,CveRetIVAConcepto,IVAPorPagar,IVAPorPagarDeducible,IVAPorPagarNoDeducible,IEPSPorPagar,CveRetISRConcepto,PorcentajeIVA,CveTipoConcepto,CveSubProyecto,TotalOriginal,EsImportacion"
|
||||
DataKeyNames="CveCompra,ImporteProgramo,Saldo,SubTotal,IVA,IVADeducible,IVANoDeducible,IEPS,RetIVA,RetISR,Total,UUID,RFC,CveFactura,SerieFolio,Descripcion,CvePrePoliza,Fecha,EstatusInventario,CveProveedor,TipoCambio,TipoCambioOriginal, CveMoneda,CveRetIVAConcepto,IVAPorPagar,IVAPorPagarDeducible,IVAPorPagarNoDeducible,IEPSPorPagar,CveRetISRConcepto,PorcentajeIVA,CveTipoConcepto,CveSubProyecto,TotalOriginal,EsImportacion"
|
||||
Width="100%" CssClass="table table-striped table-advance table-hover Widthall ScrollAD" Style="text-align: center;" GridLines="None">
|
||||
<Columns>
|
||||
<asp:TemplateField>
|
||||
|
||||
File diff suppressed because it is too large
Load Diff
@@ -223,7 +223,28 @@ Partial Class PopUpVerFactura
|
||||
End If
|
||||
End If
|
||||
|
||||
End If
|
||||
End Sub
|
||||
|
||||
|
||||
Private Sub DescargaArchivoDirecto(RutaArchivo As String)
|
||||
If RutaArchivo <> "" Then
|
||||
|
||||
'Dim Path As String = String.Format("{0}\{1}", UsuarioActual.Empresa.Ruta, RutaArchivo)
|
||||
Dim Archivo As New System.IO.FileInfo(RutaArchivo)
|
||||
|
||||
If Archivo.Exists Then
|
||||
HttpContext.Current.Response.Clear()
|
||||
HttpContext.Current.Response.ClearContent()
|
||||
HttpContext.Current.Response.ContentType = "application/octet-stream"
|
||||
HttpContext.Current.Response.AppendHeader("Content-disposition", String.Format("attachment; filename={0}", Archivo.Name))
|
||||
HttpContext.Current.Response.AddHeader("Content-Length", Archivo.Length.ToString())
|
||||
HttpContext.Current.Response.TransmitFile(RutaArchivo)
|
||||
'HttpContext.Current.Response.Flush()
|
||||
HttpContext.Current.Response.End()
|
||||
End If
|
||||
Archivo = Nothing
|
||||
End If
|
||||
End Sub
|
||||
|
||||
Private Sub ReciboAgropecuaria()
|
||||
@@ -972,6 +993,12 @@ Partial Class PopUpVerFactura
|
||||
DescargaFactura(UrlParametros)
|
||||
End If
|
||||
|
||||
If UrlParametros("OP").ToString = "File" Then
|
||||
|
||||
DescargaArchivoDirecto(UrlParametros("FILE").ToString)
|
||||
|
||||
End If
|
||||
|
||||
'DESCARGA DOCUMENTO XML O PDF DE LA FACTURA VENTA
|
||||
If UrlParametros("OP").ToString = "FactVta" Then
|
||||
DescargaFacturaVenta(UrlParametros)
|
||||
@@ -1258,6 +1285,13 @@ Partial Class PopUpVerFactura
|
||||
End If
|
||||
End If
|
||||
|
||||
'IMPRIME ENTREGAS POR REALIZAR
|
||||
If UrlParametros("OP").ToString = "FILE" Then
|
||||
If UrlParametros("CVEASIGNACIONENTREGA") IsNot Nothing And UrlParametros("USUARIOENTREGA") IsNot Nothing Then
|
||||
ImprimeEntregasPorRealizar(UrlParametros("CVEASIGNACIONENTREGA").ToString.ToLong, UrlParametros("USUARIOENTREGA").ToString)
|
||||
End If
|
||||
End If
|
||||
|
||||
End Sub
|
||||
|
||||
Private Function Parametros(Cadena As String) As Hashtable
|
||||
@@ -3048,6 +3082,16 @@ Partial Class PopUpVerFactura
|
||||
CartaPorte = New Modelos.MSubReportData()
|
||||
CartaPorte.Parametros.Add(New ReportParameter($"TieneCartaPorte", "False"))
|
||||
End If
|
||||
Else
|
||||
If UsuarioActual.CveEmpresa = 13 AndAlso Vta.TipoDocto = "Egs" Then
|
||||
CartaPorte = New Modelos.MSubReportData()
|
||||
CartaPorte.Parametros.Add(New ReportParameter($"TieneCartaPorte", "False"))
|
||||
End If
|
||||
End If
|
||||
Else
|
||||
If UsuarioActual.CveEmpresa = 13 AndAlso Vta.TipoDocto = "Egs" Then
|
||||
CartaPorte = New Modelos.MSubReportData()
|
||||
CartaPorte.Parametros.Add(New ReportParameter($"TieneCartaPorte", "False"))
|
||||
End If
|
||||
End If
|
||||
|
||||
|
||||
@@ -1537,23 +1537,27 @@ Partial Class Compras_eFacturas
|
||||
Dim sOnlyFilename As String
|
||||
|
||||
For Each filePath In fileEntries
|
||||
|
||||
ArchivoExtension = IO.Path.GetExtension(String.Format("{0}", filePath)).Replace(".", "")
|
||||
sOnlyFilename = System.IO.Path.GetFileName(filePath)
|
||||
If ArchivoExtension.ToUpper = "RAR" Or ArchivoExtension.ToUpper = "ZIP" Then
|
||||
ListaComprimidos.Add(filePath)
|
||||
'CREO DIRECTORIO ALEATORIO
|
||||
Dim Aleatorio As New Random
|
||||
Dim TempDirectorio As String = String.Format("{0}{1}\{2}{3}", UsuarioActual.Empresa.Ruta, "Temp\Facturas", Date.Now.Ticks, Aleatorio.Next(100, 999))
|
||||
Directory.CreateDirectory(TempDirectorio)
|
||||
ListaDirectoriosTemporales.Add(TempDirectorio)
|
||||
'AGREGA DIRECTORIO A LA LISTA
|
||||
ListDirectorios.Add(TempDirectorio)
|
||||
'DESCOMPRIME RAR
|
||||
DescomprimeFacturas(filePath, TempDirectorio)
|
||||
'AGREGA XML A LA LISTA
|
||||
ListXML.AddRange(Directory.GetFiles(TempDirectorio))
|
||||
End If
|
||||
|
||||
If ArchivoExtension.ToUpper = "RAR" Or ArchivoExtension.ToUpper = "ZIP" Then
|
||||
'ListaComprimidos.Add(filePath)
|
||||
''CREO DIRECTORIO ALEATORIO
|
||||
'Dim Aleatorio As New Random
|
||||
'Dim TempDirectorio As String = String.Format("{0}{1}\{2}{3}", UsuarioActual.Empresa.Ruta, "Temp\Facturas", Date.Now.Ticks, Aleatorio.Next(100, 999))
|
||||
'Directory.CreateDirectory(TempDirectorio)
|
||||
'ListaDirectoriosTemporales.Add(TempDirectorio)
|
||||
''AGREGA DIRECTORIO A LA LISTA
|
||||
'ListDirectorios.Add(TempDirectorio)
|
||||
''DESCOMPRIME RAR
|
||||
'DescomprimeFacturas(filePath, TempDirectorio)
|
||||
''AGREGA XML A LA LISTA
|
||||
'ListXML.AddRange(Directory.GetFiles(TempDirectorio))
|
||||
|
||||
ListXML.Add(filePath)
|
||||
|
||||
End If
|
||||
|
||||
Next
|
||||
|
||||
|
||||
@@ -548,10 +548,10 @@ Partial Class ContabilidadC_RegPrePolizaS
|
||||
|
||||
Dim CveConceptoContable As Integer = e.Row.DataKey("CveConceptoContable").ToEntero
|
||||
|
||||
If CveConceptoContable.Contiene(1, 2, 13, 38, 207, 203, 39, 61, 62, 63, 4, 291, 292) Then e.Row.FCHyperLink("HlReferencia").NavigateUrl = String.Format("/Ventas/Ventas.aspx?CveVenta={0}", e.Row.DataKey("CveVenta"))
|
||||
If CveConceptoContable.Contiene(1, 2, 13, 38, 207, 203, 39, 61, 62, 63, 4, 278, 291, 292, 272) Then e.Row.FCHyperLink("HlReferencia").NavigateUrl = String.Format("/Ventas/Ventas.aspx?CveVenta={0}", e.Row.DataKey("CveVenta"))
|
||||
If CveConceptoContable.Contiene(5, 6, 17, 18, 14, 19, 25, 26, 60, 234, 235, 240, 305, 306, 307, 308, 309, 310, 311, 312) Then e.Row.FCHyperLink("HlReferencia").NavigateUrl = String.Format("/Compras/Compras.aspx?CveCompra={0}", e.Row.DataKey("CveCompra"))
|
||||
If CveConceptoContable.Contiene(68) Then e.Row.FCHyperLink("HlReferencia").NavigateUrl = String.Format("/Inventarios/EntradasSalidas.aspx?CveMovimiento={0}", e.Row.DBCampo("CveMovimientoAlmacen"))
|
||||
If CveConceptoContable.Contiene(30, 204) Then e.Row.FCHyperLink("HlReferencia").NavigateUrl = String.Format("/Bancos/IE.aspx?CveIE={0}", e.Row.DBCampo("CveIE"))
|
||||
If CveConceptoContable.Contiene(30, 204, 66, 92) Then e.Row.FCHyperLink("HlReferencia").NavigateUrl = String.Format("/Bancos/IE.aspx?CveIE={0}", e.Row.DBCampo("CveIE"))
|
||||
|
||||
'e.Row.FCHyperLink("HlReferencia").NavigateUrl = CveConceptoContable
|
||||
If e.Row.DBCampo("Modificado") Then
|
||||
|
||||
@@ -23,7 +23,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox3</rd:DefaultName>
|
||||
<Top>0.92083in</Top>
|
||||
<Left>5.662in</Left>
|
||||
<Left>5.79542in</Left>
|
||||
<Height>0.5cm</Height>
|
||||
<Width>2.24597in</Width>
|
||||
<Style>
|
||||
@@ -74,7 +74,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox3</rd:DefaultName>
|
||||
<Top>0.47805in</Top>
|
||||
<Left>5.662in</Left>
|
||||
<Left>5.79542in</Left>
|
||||
<Height>0.5cm</Height>
|
||||
<Width>2.24597in</Width>
|
||||
<ZIndex>1</ZIndex>
|
||||
@@ -110,7 +110,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox3</rd:DefaultName>
|
||||
<Top>0.23846in</Top>
|
||||
<Left>5.662in</Left>
|
||||
<Left>5.79542in</Left>
|
||||
<Height>0.60856cm</Height>
|
||||
<Width>2.24597in</Width>
|
||||
<ZIndex>2</ZIndex>
|
||||
@@ -146,7 +146,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox3</rd:DefaultName>
|
||||
<Top>0.07652cm</Top>
|
||||
<Left>5.662in</Left>
|
||||
<Left>5.79542in</Left>
|
||||
<Height>0.5cm</Height>
|
||||
<Width>2.24597in</Width>
|
||||
<ZIndex>3</ZIndex>
|
||||
@@ -250,7 +250,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox4</rd:DefaultName>
|
||||
<Top>0.03532cm</Top>
|
||||
<Left>1.58787in</Left>
|
||||
<Left>1.72129in</Left>
|
||||
<Height>1.10377in</Height>
|
||||
<Width>4.01898in</Width>
|
||||
<ZIndex>4</ZIndex>
|
||||
@@ -269,7 +269,7 @@
|
||||
<Value>=Parameters!QR.Value</Value>
|
||||
<Sizing>FitProportional</Sizing>
|
||||
<Top>6.00738in</Top>
|
||||
<Left>0.04026in</Left>
|
||||
<Left>0.17368in</Left>
|
||||
<Height>0.95455in</Height>
|
||||
<Width>1.49755in</Width>
|
||||
<ZIndex>5</ZIndex>
|
||||
@@ -302,7 +302,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox3</rd:DefaultName>
|
||||
<Top>0.6749in</Top>
|
||||
<Left>5.662in</Left>
|
||||
<Left>5.79542in</Left>
|
||||
<Height>0.25114in</Height>
|
||||
<Width>2.24597in</Width>
|
||||
<ZIndex>6</ZIndex>
|
||||
@@ -340,7 +340,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox3</rd:DefaultName>
|
||||
<Top>1.11755in</Top>
|
||||
<Left>5.662in</Left>
|
||||
<Left>5.79542in</Left>
|
||||
<Height>0.25635in</Height>
|
||||
<Width>2.24597in</Width>
|
||||
<ZIndex>7</ZIndex>
|
||||
@@ -375,7 +375,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox19</rd:DefaultName>
|
||||
<Top>1.15168in</Top>
|
||||
<Left>0.14361cm</Left>
|
||||
<Left>0.48249cm</Left>
|
||||
<Height>0.22222in</Height>
|
||||
<Width>0.81128in</Width>
|
||||
<ZIndex>8</ZIndex>
|
||||
@@ -418,7 +418,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox19</rd:DefaultName>
|
||||
<Top>1.15168in</Top>
|
||||
<Left>0.86782in</Left>
|
||||
<Left>1.00124in</Left>
|
||||
<Height>0.22222in</Height>
|
||||
<Width>4.79418in</Width>
|
||||
<ZIndex>9</ZIndex>
|
||||
@@ -463,7 +463,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox19</rd:DefaultName>
|
||||
<Top>1.36869in</Top>
|
||||
<Left>0.05654in</Left>
|
||||
<Left>0.18996in</Left>
|
||||
<Height>0.23611in</Height>
|
||||
<Width>0.81128in</Width>
|
||||
<ZIndex>10</ZIndex>
|
||||
@@ -507,7 +507,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox19</rd:DefaultName>
|
||||
<Top>1.3739in</Top>
|
||||
<Left>0.86782in</Left>
|
||||
<Left>1.00124in</Left>
|
||||
<Height>0.2309in</Height>
|
||||
<Width>7.0427in</Width>
|
||||
<ZIndex>11</ZIndex>
|
||||
@@ -552,7 +552,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox19</rd:DefaultName>
|
||||
<Top>1.6048in</Top>
|
||||
<Left>0.05654in</Left>
|
||||
<Left>0.18996in</Left>
|
||||
<Height>0.23611in</Height>
|
||||
<Width>0.81128in</Width>
|
||||
<ZIndex>12</ZIndex>
|
||||
@@ -596,7 +596,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox19</rd:DefaultName>
|
||||
<Top>1.6048in</Top>
|
||||
<Left>0.86782in</Left>
|
||||
<Left>1.00124in</Left>
|
||||
<Height>0.23611in</Height>
|
||||
<Width>4.79418in</Width>
|
||||
<ZIndex>13</ZIndex>
|
||||
@@ -642,7 +642,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox54</rd:DefaultName>
|
||||
<Top>5.98523in</Top>
|
||||
<Left>1.64412in</Left>
|
||||
<Left>1.77754in</Left>
|
||||
<Height>0.18056in</Height>
|
||||
<Width>4.03672in</Width>
|
||||
<ZIndex>14</ZIndex>
|
||||
@@ -692,7 +692,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox54</rd:DefaultName>
|
||||
<Top>6.17968in</Top>
|
||||
<Left>1.64412in</Left>
|
||||
<Left>1.77754in</Left>
|
||||
<Height>0.18056in</Height>
|
||||
<Width>4.03672in</Width>
|
||||
<ZIndex>15</ZIndex>
|
||||
@@ -730,7 +730,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox54</rd:DefaultName>
|
||||
<Top>6.37823in</Top>
|
||||
<Left>1.64412in</Left>
|
||||
<Left>1.77754in</Left>
|
||||
<Height>0.19444in</Height>
|
||||
<Width>4.03672in</Width>
|
||||
<ZIndex>16</ZIndex>
|
||||
@@ -768,7 +768,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox54</rd:DefaultName>
|
||||
<Top>6.58384in</Top>
|
||||
<Left>1.64412in</Left>
|
||||
<Left>1.77754in</Left>
|
||||
<Height>0.19445in</Height>
|
||||
<Width>4.03672in</Width>
|
||||
<ZIndex>17</ZIndex>
|
||||
@@ -805,7 +805,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox58</rd:DefaultName>
|
||||
<Top>5.97273in</Top>
|
||||
<Left>5.70142in</Left>
|
||||
<Left>5.83484in</Left>
|
||||
<Height>0.18056in</Height>
|
||||
<Width>2.22448in</Width>
|
||||
<ZIndex>18</ZIndex>
|
||||
@@ -840,7 +840,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox59</rd:DefaultName>
|
||||
<Top>6.16989in</Top>
|
||||
<Left>5.69622in</Left>
|
||||
<Left>5.82964in</Left>
|
||||
<Height>0.16667in</Height>
|
||||
<Width>2.22969in</Width>
|
||||
<ZIndex>19</ZIndex>
|
||||
@@ -874,7 +874,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox60</rd:DefaultName>
|
||||
<Top>6.3769in</Top>
|
||||
<Left>5.69622in</Left>
|
||||
<Left>5.82964in</Left>
|
||||
<Height>0.16939in</Height>
|
||||
<Width>2.22714in</Width>
|
||||
<ZIndex>20</ZIndex>
|
||||
@@ -908,7 +908,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox61</rd:DefaultName>
|
||||
<Top>6.58655in</Top>
|
||||
<Left>5.70142in</Left>
|
||||
<Left>5.83484in</Left>
|
||||
<Height>0.17784in</Height>
|
||||
<Width>2.22193in</Width>
|
||||
<ZIndex>21</ZIndex>
|
||||
@@ -990,7 +990,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox62</rd:DefaultName>
|
||||
<Top>6.78501in</Top>
|
||||
<Left>1.53781in</Left>
|
||||
<Left>1.67123in</Left>
|
||||
<Height>0.29498in</Height>
|
||||
<Width>6.38809in</Width>
|
||||
<ZIndex>22</ZIndex>
|
||||
@@ -1022,10 +1022,10 @@
|
||||
</Paragraph>
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox63</rd:DefaultName>
|
||||
<Top>7.14943in</Top>
|
||||
<Left>2.5423in</Left>
|
||||
<Top>8.14943in</Top>
|
||||
<Left>2.67572in</Left>
|
||||
<Height>0.25in</Height>
|
||||
<Width>3.69856in</Width>
|
||||
<Width>3.61523in</Width>
|
||||
<ZIndex>23</ZIndex>
|
||||
<Style>
|
||||
<Border>
|
||||
@@ -1804,8 +1804,8 @@
|
||||
</Line>
|
||||
</ReportItems>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Top>18.94447cm</Top>
|
||||
<Left>0.04721cm</Left>
|
||||
<Top>21.48447cm</Top>
|
||||
<Left>0.38609cm</Left>
|
||||
<Height>4.04843cm</Height>
|
||||
<Width>20.06179cm</Width>
|
||||
<ZIndex>24</ZIndex>
|
||||
@@ -2195,7 +2195,6 @@
|
||||
<PaddingBottom>2pt</PaddingBottom>
|
||||
</Style>
|
||||
</Textbox>
|
||||
<rd:Selected>true</rd:Selected>
|
||||
</CellContents>
|
||||
</TablixCell>
|
||||
<TablixCell>
|
||||
@@ -2442,7 +2441,7 @@
|
||||
</TablixRowHierarchy>
|
||||
<DataSetName>DsOC</DataSetName>
|
||||
<Top>4.59222cm</Top>
|
||||
<Left>0.11468cm</Left>
|
||||
<Left>0.45356cm</Left>
|
||||
<Height>1.01949cm</Height>
|
||||
<Width>20.01064cm</Width>
|
||||
<ZIndex>25</ZIndex>
|
||||
@@ -2481,7 +2480,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox19</rd:DefaultName>
|
||||
<Top>1.6173in</Top>
|
||||
<Left>5.662in</Left>
|
||||
<Left>5.79542in</Left>
|
||||
<Height>0.20317in</Height>
|
||||
<Width>2.26391in</Width>
|
||||
<ZIndex>26</ZIndex>
|
||||
@@ -2770,7 +2769,7 @@
|
||||
</TablixRowHierarchy>
|
||||
<DataSetName>DataSet3</DataSetName>
|
||||
<Top>2.54983in</Top>
|
||||
<Left>5.73412in</Left>
|
||||
<Left>5.86754in</Left>
|
||||
<Height>0.34081in</Height>
|
||||
<Width>2.19818in</Width>
|
||||
<ZIndex>27</ZIndex>
|
||||
@@ -2889,7 +2888,7 @@
|
||||
</TablixRowHierarchy>
|
||||
<DataSetName>DataSet1</DataSetName>
|
||||
<Top>5.75282cm</Top>
|
||||
<Left>14.56464cm</Left>
|
||||
<Left>14.90352cm</Left>
|
||||
<Height>0.6cm</Height>
|
||||
<Width>5.58343cm</Width>
|
||||
<ZIndex>28</ZIndex>
|
||||
@@ -3438,7 +3437,7 @@
|
||||
</TablixRowHierarchy>
|
||||
<DataSetName>DsOC</DataSetName>
|
||||
<Top>5.75282cm</Top>
|
||||
<Left>0.11468cm</Left>
|
||||
<Left>0.45356cm</Left>
|
||||
<Height>5.16188cm</Height>
|
||||
<Width>14.34413cm</Width>
|
||||
<ZIndex>29</ZIndex>
|
||||
@@ -3483,7 +3482,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox18</rd:DefaultName>
|
||||
<Top>4.59585in</Top>
|
||||
<Left>0.04404in</Left>
|
||||
<Left>0.17746in</Left>
|
||||
<Height>0.36457in</Height>
|
||||
<Width>7.87931in</Width>
|
||||
<ZIndex>30</ZIndex>
|
||||
@@ -3519,7 +3518,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox1</rd:DefaultName>
|
||||
<Top>10.95026cm</Top>
|
||||
<Left>0.13016cm</Left>
|
||||
<Left>0.46904cm</Left>
|
||||
<Height>0.6cm</Height>
|
||||
<Width>19.96256cm</Width>
|
||||
<ZIndex>31</ZIndex>
|
||||
@@ -3611,7 +3610,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox5</rd:DefaultName>
|
||||
<Top>12.7053cm</Top>
|
||||
<Left>10.16136cm</Left>
|
||||
<Left>10.50025cm</Left>
|
||||
<Height>2.37271cm</Height>
|
||||
<Width>9.55228cm</Width>
|
||||
<ZIndex>32</ZIndex>
|
||||
@@ -3702,7 +3701,7 @@
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox5</rd:DefaultName>
|
||||
<Top>12.7053cm</Top>
|
||||
<Left>0.50677cm</Left>
|
||||
<Left>0.84566cm</Left>
|
||||
<Height>2.37271cm</Height>
|
||||
<Width>9.55228cm</Width>
|
||||
<ZIndex>33</ZIndex>
|
||||
@@ -3716,11 +3715,523 @@
|
||||
<PaddingBottom>2pt</PaddingBottom>
|
||||
</Style>
|
||||
</Textbox>
|
||||
<Textbox Name="Textbox8">
|
||||
<CanGrow>true</CanGrow>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Paragraphs>
|
||||
<Paragraph>
|
||||
<TextRuns>
|
||||
<TextRun>
|
||||
<Value>VERSION </Value>
|
||||
<Style>
|
||||
<FontFamily>MYRiad Pro</FontFamily>
|
||||
<FontSize>9.16pt</FontSize>
|
||||
<FontWeight>Bold</FontWeight>
|
||||
<Color>DimGray</Color>
|
||||
</Style>
|
||||
</TextRun>
|
||||
<TextRun>
|
||||
<Value>=Parameters!CFDIVersion.Value</Value>
|
||||
<Style>
|
||||
<FontFamily>MYRiad Pro</FontFamily>
|
||||
<FontSize>9.16pt</FontSize>
|
||||
<FontWeight>Bold</FontWeight>
|
||||
<Color>DimGray</Color>
|
||||
</Style>
|
||||
</TextRun>
|
||||
</TextRuns>
|
||||
<Style>
|
||||
<TextAlign>Center</TextAlign>
|
||||
</Style>
|
||||
</Paragraph>
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox5</rd:DefaultName>
|
||||
<Top>20.52317cm</Top>
|
||||
<Left>16.8018cm</Left>
|
||||
<Height>0.65292cm</Height>
|
||||
<Width>3.68516cm</Width>
|
||||
<ZIndex>34</ZIndex>
|
||||
<Style>
|
||||
<Border>
|
||||
<Style>None</Style>
|
||||
</Border>
|
||||
<PaddingLeft>2pt</PaddingLeft>
|
||||
<PaddingRight>2pt</PaddingRight>
|
||||
<PaddingTop>2pt</PaddingTop>
|
||||
<PaddingBottom>2pt</PaddingBottom>
|
||||
</Style>
|
||||
</Textbox>
|
||||
<Rectangle Name="Rectangle5">
|
||||
<ReportItems>
|
||||
<Textbox Name="Textbox41">
|
||||
<CanGrow>true</CanGrow>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Paragraphs>
|
||||
<Paragraph>
|
||||
<TextRuns>
|
||||
<TextRun>
|
||||
<Value>CFDI Relacionados</Value>
|
||||
<Style>
|
||||
<FontFamily>Calibri</FontFamily>
|
||||
<FontSize>10.16pt</FontSize>
|
||||
<FontWeight>Bold</FontWeight>
|
||||
<Color>White</Color>
|
||||
</Style>
|
||||
</TextRun>
|
||||
</TextRuns>
|
||||
<Style>
|
||||
<TextAlign>Center</TextAlign>
|
||||
</Style>
|
||||
</Paragraph>
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox5</rd:DefaultName>
|
||||
<Top>0.14926cm</Top>
|
||||
<Left>0.07193cm</Left>
|
||||
<Height>0.54004cm</Height>
|
||||
<Width>20.01791cm</Width>
|
||||
<Style>
|
||||
<Border>
|
||||
<Style>None</Style>
|
||||
</Border>
|
||||
<BackgroundColor>#bdd7ee</BackgroundColor>
|
||||
<PaddingLeft>2pt</PaddingLeft>
|
||||
<PaddingRight>2pt</PaddingRight>
|
||||
<PaddingTop>2pt</PaddingTop>
|
||||
<PaddingBottom>2pt</PaddingBottom>
|
||||
</Style>
|
||||
</Textbox>
|
||||
<Textbox Name="Textbox42">
|
||||
<CanGrow>true</CanGrow>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Paragraphs>
|
||||
<Paragraph>
|
||||
<TextRuns>
|
||||
<TextRun>
|
||||
<Value>Tipo Relación:</Value>
|
||||
<Style>
|
||||
<FontFamily>Myriad Pro</FontFamily>
|
||||
<FontSize>8pt</FontSize>
|
||||
<FontWeight>Bold</FontWeight>
|
||||
<Color>DimGray</Color>
|
||||
</Style>
|
||||
</TextRun>
|
||||
</TextRuns>
|
||||
<Style>
|
||||
<TextAlign>Right</TextAlign>
|
||||
</Style>
|
||||
</Paragraph>
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox29</rd:DefaultName>
|
||||
<Top>0.83025cm</Top>
|
||||
<Left>4.78817cm</Left>
|
||||
<Height>0.41981cm</Height>
|
||||
<Width>5.31841cm</Width>
|
||||
<ZIndex>1</ZIndex>
|
||||
<Style>
|
||||
<Border>
|
||||
<Style>None</Style>
|
||||
</Border>
|
||||
<PaddingLeft>2pt</PaddingLeft>
|
||||
<PaddingRight>2pt</PaddingRight>
|
||||
<PaddingTop>2pt</PaddingTop>
|
||||
<PaddingBottom>2pt</PaddingBottom>
|
||||
</Style>
|
||||
</Textbox>
|
||||
<Textbox Name="Textbox43">
|
||||
<CanGrow>true</CanGrow>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Paragraphs>
|
||||
<Paragraph>
|
||||
<TextRuns>
|
||||
<TextRun>
|
||||
<Value>=Parameters!TipoRelacionTexto.Value</Value>
|
||||
<Style>
|
||||
<FontFamily>Myriad Pro</FontFamily>
|
||||
<FontSize>8pt</FontSize>
|
||||
</Style>
|
||||
</TextRun>
|
||||
</TextRuns>
|
||||
<Style />
|
||||
</Paragraph>
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox29</rd:DefaultName>
|
||||
<Top>0.83025cm</Top>
|
||||
<Left>10.10658cm</Left>
|
||||
<Height>0.41981cm</Height>
|
||||
<Width>7.14985cm</Width>
|
||||
<ZIndex>2</ZIndex>
|
||||
<Style>
|
||||
<Border>
|
||||
<Style>None</Style>
|
||||
</Border>
|
||||
<PaddingLeft>2pt</PaddingLeft>
|
||||
<PaddingRight>2pt</PaddingRight>
|
||||
<PaddingTop>2pt</PaddingTop>
|
||||
<PaddingBottom>2pt</PaddingBottom>
|
||||
</Style>
|
||||
</Textbox>
|
||||
<Tablix Name="Tablix3">
|
||||
<TablixBody>
|
||||
<TablixColumns>
|
||||
<TablixColumn>
|
||||
<Width>2.42456cm</Width>
|
||||
</TablixColumn>
|
||||
<TablixColumn>
|
||||
<Width>2.05585cm</Width>
|
||||
</TablixColumn>
|
||||
<TablixColumn>
|
||||
<Width>3.03631cm</Width>
|
||||
</TablixColumn>
|
||||
<TablixColumn>
|
||||
<Width>7.7847cm</Width>
|
||||
</TablixColumn>
|
||||
</TablixColumns>
|
||||
<TablixRows>
|
||||
<TablixRow>
|
||||
<Height>0.44125cm</Height>
|
||||
<TablixCells>
|
||||
<TablixCell>
|
||||
<CellContents>
|
||||
<Textbox Name="Textbox10">
|
||||
<CanGrow>true</CanGrow>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Paragraphs>
|
||||
<Paragraph>
|
||||
<TextRuns>
|
||||
<TextRun>
|
||||
<Value>Folio</Value>
|
||||
<Style>
|
||||
<FontFamily>Calibri</FontFamily>
|
||||
<FontSize>9pt</FontSize>
|
||||
<FontWeight>Bold</FontWeight>
|
||||
<Color>White</Color>
|
||||
</Style>
|
||||
</TextRun>
|
||||
</TextRuns>
|
||||
<Style>
|
||||
<TextAlign>Center</TextAlign>
|
||||
</Style>
|
||||
</Paragraph>
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox10</rd:DefaultName>
|
||||
<Style>
|
||||
<Border>
|
||||
<Style>None</Style>
|
||||
</Border>
|
||||
<BackgroundColor>#bdd7ee</BackgroundColor>
|
||||
<PaddingLeft>2pt</PaddingLeft>
|
||||
<PaddingRight>2pt</PaddingRight>
|
||||
<PaddingTop>2pt</PaddingTop>
|
||||
<PaddingBottom>2pt</PaddingBottom>
|
||||
</Style>
|
||||
</Textbox>
|
||||
</CellContents>
|
||||
</TablixCell>
|
||||
<TablixCell>
|
||||
<CellContents>
|
||||
<Textbox Name="Textbox14">
|
||||
<CanGrow>true</CanGrow>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Paragraphs>
|
||||
<Paragraph>
|
||||
<TextRuns>
|
||||
<TextRun>
|
||||
<Value>Fecha</Value>
|
||||
<Style>
|
||||
<FontFamily>Calibri</FontFamily>
|
||||
<FontSize>9pt</FontSize>
|
||||
<FontWeight>Bold</FontWeight>
|
||||
<Color>White</Color>
|
||||
</Style>
|
||||
</TextRun>
|
||||
</TextRuns>
|
||||
<Style>
|
||||
<TextAlign>Center</TextAlign>
|
||||
</Style>
|
||||
</Paragraph>
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox12</rd:DefaultName>
|
||||
<Style>
|
||||
<Border>
|
||||
<Style>None</Style>
|
||||
</Border>
|
||||
<BackgroundColor>#bdd7ee</BackgroundColor>
|
||||
<PaddingLeft>2pt</PaddingLeft>
|
||||
<PaddingRight>2pt</PaddingRight>
|
||||
<PaddingTop>2pt</PaddingTop>
|
||||
<PaddingBottom>2pt</PaddingBottom>
|
||||
</Style>
|
||||
</Textbox>
|
||||
</CellContents>
|
||||
</TablixCell>
|
||||
<TablixCell>
|
||||
<CellContents>
|
||||
<Textbox Name="Textbox21">
|
||||
<CanGrow>true</CanGrow>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Paragraphs>
|
||||
<Paragraph>
|
||||
<TextRuns>
|
||||
<TextRun>
|
||||
<Value>Importe</Value>
|
||||
<Style>
|
||||
<FontFamily>Calibri</FontFamily>
|
||||
<FontSize>9pt</FontSize>
|
||||
<FontWeight>Bold</FontWeight>
|
||||
<Color>White</Color>
|
||||
</Style>
|
||||
</TextRun>
|
||||
</TextRuns>
|
||||
<Style>
|
||||
<TextAlign>Center</TextAlign>
|
||||
</Style>
|
||||
</Paragraph>
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox21</rd:DefaultName>
|
||||
<Style>
|
||||
<Border>
|
||||
<Style>None</Style>
|
||||
</Border>
|
||||
<BackgroundColor>#bdd7ee</BackgroundColor>
|
||||
<PaddingLeft>2pt</PaddingLeft>
|
||||
<PaddingRight>2pt</PaddingRight>
|
||||
<PaddingTop>2pt</PaddingTop>
|
||||
<PaddingBottom>2pt</PaddingBottom>
|
||||
</Style>
|
||||
</Textbox>
|
||||
</CellContents>
|
||||
</TablixCell>
|
||||
<TablixCell>
|
||||
<CellContents>
|
||||
<Textbox Name="Textbox11">
|
||||
<CanGrow>true</CanGrow>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Paragraphs>
|
||||
<Paragraph>
|
||||
<TextRuns>
|
||||
<TextRun>
|
||||
<Value>Folio Fiscal</Value>
|
||||
<Style>
|
||||
<FontFamily>Calibri</FontFamily>
|
||||
<FontSize>9pt</FontSize>
|
||||
<FontWeight>Bold</FontWeight>
|
||||
<Color>White</Color>
|
||||
</Style>
|
||||
</TextRun>
|
||||
</TextRuns>
|
||||
<Style>
|
||||
<TextAlign>Center</TextAlign>
|
||||
</Style>
|
||||
</Paragraph>
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox11</rd:DefaultName>
|
||||
<Style>
|
||||
<Border>
|
||||
<Style>None</Style>
|
||||
</Border>
|
||||
<BackgroundColor>#bdd7ee</BackgroundColor>
|
||||
<PaddingLeft>2pt</PaddingLeft>
|
||||
<PaddingRight>2pt</PaddingRight>
|
||||
<PaddingTop>2pt</PaddingTop>
|
||||
<PaddingBottom>2pt</PaddingBottom>
|
||||
</Style>
|
||||
</Textbox>
|
||||
</CellContents>
|
||||
</TablixCell>
|
||||
</TablixCells>
|
||||
</TablixRow>
|
||||
<TablixRow>
|
||||
<Height>0.41479cm</Height>
|
||||
<TablixCells>
|
||||
<TablixCell>
|
||||
<CellContents>
|
||||
<Textbox Name="SerieFolio">
|
||||
<CanGrow>true</CanGrow>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Paragraphs>
|
||||
<Paragraph>
|
||||
<TextRuns>
|
||||
<TextRun>
|
||||
<Value>=Fields!SerieFolio.Value</Value>
|
||||
<Style>
|
||||
<FontFamily>myriad pro</FontFamily>
|
||||
<FontSize>7.5pt</FontSize>
|
||||
</Style>
|
||||
</TextRun>
|
||||
</TextRuns>
|
||||
<Style />
|
||||
</Paragraph>
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>SerieFolio</rd:DefaultName>
|
||||
<Style>
|
||||
<Border>
|
||||
<Style>None</Style>
|
||||
</Border>
|
||||
<PaddingLeft>2pt</PaddingLeft>
|
||||
<PaddingRight>2pt</PaddingRight>
|
||||
<PaddingTop>2pt</PaddingTop>
|
||||
<PaddingBottom>2pt</PaddingBottom>
|
||||
</Style>
|
||||
</Textbox>
|
||||
</CellContents>
|
||||
</TablixCell>
|
||||
<TablixCell>
|
||||
<CellContents>
|
||||
<Textbox Name="Fecha">
|
||||
<CanGrow>true</CanGrow>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Paragraphs>
|
||||
<Paragraph>
|
||||
<TextRuns>
|
||||
<TextRun>
|
||||
<Value>=Fields!Fecha.Value</Value>
|
||||
<Style>
|
||||
<FontFamily>myriad pro</FontFamily>
|
||||
<FontSize>7.5pt</FontSize>
|
||||
<Format>dd/MM/yyyy</Format>
|
||||
</Style>
|
||||
</TextRun>
|
||||
</TextRuns>
|
||||
<Style>
|
||||
<TextAlign>Center</TextAlign>
|
||||
</Style>
|
||||
</Paragraph>
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Fecha</rd:DefaultName>
|
||||
<Style>
|
||||
<Border>
|
||||
<Style>None</Style>
|
||||
</Border>
|
||||
<PaddingLeft>2pt</PaddingLeft>
|
||||
<PaddingRight>2pt</PaddingRight>
|
||||
<PaddingTop>2pt</PaddingTop>
|
||||
<PaddingBottom>2pt</PaddingBottom>
|
||||
</Style>
|
||||
</Textbox>
|
||||
</CellContents>
|
||||
</TablixCell>
|
||||
<TablixCell>
|
||||
<CellContents>
|
||||
<Textbox Name="Importe1">
|
||||
<CanGrow>true</CanGrow>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Paragraphs>
|
||||
<Paragraph>
|
||||
<TextRuns>
|
||||
<TextRun>
|
||||
<Value>=Fields!Importe.Value</Value>
|
||||
<Style>
|
||||
<FontFamily>myriad pro</FontFamily>
|
||||
<FontSize>7.5pt</FontSize>
|
||||
<Format>#,0.00;-#,0.00;'-'</Format>
|
||||
</Style>
|
||||
</TextRun>
|
||||
</TextRuns>
|
||||
<Style>
|
||||
<TextAlign>Right</TextAlign>
|
||||
</Style>
|
||||
</Paragraph>
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Importe1</rd:DefaultName>
|
||||
<Style>
|
||||
<Border>
|
||||
<Style>None</Style>
|
||||
</Border>
|
||||
<PaddingLeft>2pt</PaddingLeft>
|
||||
<PaddingRight>2pt</PaddingRight>
|
||||
<PaddingTop>2pt</PaddingTop>
|
||||
<PaddingBottom>2pt</PaddingBottom>
|
||||
</Style>
|
||||
</Textbox>
|
||||
</CellContents>
|
||||
</TablixCell>
|
||||
<TablixCell>
|
||||
<CellContents>
|
||||
<Textbox Name="FolioFiscal">
|
||||
<CanGrow>true</CanGrow>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Paragraphs>
|
||||
<Paragraph>
|
||||
<TextRuns>
|
||||
<TextRun>
|
||||
<Value>=Fields!FolioFiscal.Value</Value>
|
||||
<Style>
|
||||
<FontFamily>myriad pro</FontFamily>
|
||||
<FontSize>7.5pt</FontSize>
|
||||
</Style>
|
||||
</TextRun>
|
||||
</TextRuns>
|
||||
<Style />
|
||||
</Paragraph>
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>FolioFiscal</rd:DefaultName>
|
||||
<Style>
|
||||
<Border>
|
||||
<Style>None</Style>
|
||||
</Border>
|
||||
<PaddingLeft>2pt</PaddingLeft>
|
||||
<PaddingRight>2pt</PaddingRight>
|
||||
<PaddingTop>2pt</PaddingTop>
|
||||
<PaddingBottom>2pt</PaddingBottom>
|
||||
</Style>
|
||||
</Textbox>
|
||||
</CellContents>
|
||||
</TablixCell>
|
||||
</TablixCells>
|
||||
</TablixRow>
|
||||
</TablixRows>
|
||||
</TablixBody>
|
||||
<TablixColumnHierarchy>
|
||||
<TablixMembers>
|
||||
<TablixMember />
|
||||
<TablixMember />
|
||||
<TablixMember />
|
||||
<TablixMember />
|
||||
</TablixMembers>
|
||||
</TablixColumnHierarchy>
|
||||
<TablixRowHierarchy>
|
||||
<TablixMembers>
|
||||
<TablixMember>
|
||||
<KeepWithGroup>After</KeepWithGroup>
|
||||
</TablixMember>
|
||||
<TablixMember>
|
||||
<Group Name="Details2" />
|
||||
</TablixMember>
|
||||
</TablixMembers>
|
||||
</TablixRowHierarchy>
|
||||
<DataSetName>DataSet4</DataSetName>
|
||||
<Top>1.39643cm</Top>
|
||||
<Left>3.28643cm</Left>
|
||||
<Height>0.85604cm</Height>
|
||||
<Width>15.30142cm</Width>
|
||||
<ZIndex>3</ZIndex>
|
||||
<Style>
|
||||
<Border>
|
||||
<Style>None</Style>
|
||||
</Border>
|
||||
</Style>
|
||||
</Tablix>
|
||||
</ReportItems>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Top>18.09605cm</Top>
|
||||
<Left>0.39712cm</Left>
|
||||
<Height>2.25247cm</Height>
|
||||
<Width>20.08984cm</Width>
|
||||
<ZIndex>35</ZIndex>
|
||||
<Visibility>
|
||||
<Hidden>=Microsoft.VisualBasic.Interaction.IIF(First(Fields!SerieFolio.Value, "DataSet4") <> "", False, True)</Hidden>
|
||||
</Visibility>
|
||||
<Style>
|
||||
<Border>
|
||||
<Style>None</Style>
|
||||
</Border>
|
||||
</Style>
|
||||
</Rectangle>
|
||||
</ReportItems>
|
||||
<Height>22.9929cm</Height>
|
||||
<Height>25.5329cm</Height>
|
||||
<Style />
|
||||
</Body>
|
||||
<Width>20.22041cm</Width>
|
||||
<Width>20.48696cm</Width>
|
||||
<Page>
|
||||
<PageHeight>27.94cm</PageHeight>
|
||||
<PageWidth>21.59cm</PageWidth>
|
||||
@@ -3975,6 +4486,74 @@
|
||||
<rd:TableAdapterName />
|
||||
</rd:DataSetInfo>
|
||||
</DataSet>
|
||||
<DataSet Name="DataSet4">
|
||||
<Query>
|
||||
<DataSourceName>DsDesgloseImpuestos</DataSourceName>
|
||||
<CommandText>/* Local Query */</CommandText>
|
||||
</Query>
|
||||
<Fields>
|
||||
<Field Name="SerieFolio">
|
||||
<DataField>SerieFolio</DataField>
|
||||
<rd:TypeName>System.String</rd:TypeName>
|
||||
</Field>
|
||||
<Field Name="Fecha">
|
||||
<DataField>Fecha</DataField>
|
||||
<rd:TypeName>System.String</rd:TypeName>
|
||||
</Field>
|
||||
<Field Name="Importe">
|
||||
<DataField>Importe</DataField>
|
||||
<rd:TypeName>System.String</rd:TypeName>
|
||||
</Field>
|
||||
<Field Name="FolioFiscal">
|
||||
<DataField>FolioFiscal</DataField>
|
||||
<rd:TypeName>System.String</rd:TypeName>
|
||||
</Field>
|
||||
</Fields>
|
||||
<rd:DataSetInfo>
|
||||
<rd:DataSetName>DsDocumentosRelacionados</rd:DataSetName>
|
||||
<rd:SchemaPath>C:\Users\Jesus Murua\Documents\Visual Studio 2015\WebSites\WebSite2\App_Code\DsFirmas.xsd</rd:SchemaPath>
|
||||
<rd:TableName>DataTable1</rd:TableName>
|
||||
<rd:TableAdapterFillMethod />
|
||||
<rd:TableAdapterGetDataMethod />
|
||||
<rd:TableAdapterName />
|
||||
</rd:DataSetInfo>
|
||||
</DataSet>
|
||||
<DataSet Name="DataSet5">
|
||||
<Query>
|
||||
<DataSourceName>DsDesgloseImpuestos</DataSourceName>
|
||||
<CommandText>/* Local Query */</CommandText>
|
||||
</Query>
|
||||
<Fields>
|
||||
<Field Name="SerieFolio">
|
||||
<DataField>SerieFolio</DataField>
|
||||
<rd:TypeName>System.String</rd:TypeName>
|
||||
</Field>
|
||||
<Field Name="Fecha">
|
||||
<DataField>Fecha</DataField>
|
||||
<rd:TypeName>System.String</rd:TypeName>
|
||||
</Field>
|
||||
<Field Name="SubTotal">
|
||||
<DataField>SubTotal</DataField>
|
||||
<rd:TypeName>System.String</rd:TypeName>
|
||||
</Field>
|
||||
<Field Name="Importe">
|
||||
<DataField>Importe</DataField>
|
||||
<rd:TypeName>System.String</rd:TypeName>
|
||||
</Field>
|
||||
<Field Name="Moneda">
|
||||
<DataField>Moneda</DataField>
|
||||
<rd:TypeName>System.String</rd:TypeName>
|
||||
</Field>
|
||||
</Fields>
|
||||
<rd:DataSetInfo>
|
||||
<rd:DataSetName>DsNCVinculadas</rd:DataSetName>
|
||||
<rd:SchemaPath>C:\Users\Jesus Murua\Documents\Visual Studio 2015\WebSites\WebSite2\App_Code\DsFirmas.xsd</rd:SchemaPath>
|
||||
<rd:TableName>DataTable1</rd:TableName>
|
||||
<rd:TableAdapterFillMethod />
|
||||
<rd:TableAdapterGetDataMethod />
|
||||
<rd:TableAdapterName />
|
||||
</rd:DataSetInfo>
|
||||
</DataSet>
|
||||
</DataSets>
|
||||
<ReportParameters>
|
||||
<ReportParameter Name="ClienteCodigo">
|
||||
@@ -4501,6 +5080,18 @@
|
||||
<AllowBlank>true</AllowBlank>
|
||||
<Prompt>ReportParameter1</Prompt>
|
||||
</ReportParameter>
|
||||
<ReportParameter Name="CFDIVersion">
|
||||
<DataType>String</DataType>
|
||||
<Nullable>true</Nullable>
|
||||
<AllowBlank>true</AllowBlank>
|
||||
<Prompt>ReportParameter1</Prompt>
|
||||
</ReportParameter>
|
||||
<ReportParameter Name="RegimenFiscalCodigo">
|
||||
<DataType>String</DataType>
|
||||
<Nullable>true</Nullable>
|
||||
<AllowBlank>true</AllowBlank>
|
||||
<Prompt>ReportParameter1</Prompt>
|
||||
</ReportParameter>
|
||||
</ReportParameters>
|
||||
<EmbeddedImages>
|
||||
<EmbeddedImage Name="Logo1">
|
||||
|
||||
Binary file not shown.
@@ -4003,48 +4003,11 @@
|
||||
</Border>
|
||||
</Style>
|
||||
</Tablix>
|
||||
<Textbox Name="Textbox72">
|
||||
<CanGrow>true</CanGrow>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Paragraphs>
|
||||
<Paragraph>
|
||||
<TextRuns>
|
||||
<TextRun>
|
||||
<Value>VERSION 3.3</Value>
|
||||
<Style>
|
||||
<FontFamily>MYRiad Pro</FontFamily>
|
||||
<FontSize>9.16pt</FontSize>
|
||||
<FontWeight>Bold</FontWeight>
|
||||
<Color>DimGray</Color>
|
||||
</Style>
|
||||
</TextRun>
|
||||
</TextRuns>
|
||||
<Style>
|
||||
<TextAlign>Right</TextAlign>
|
||||
</Style>
|
||||
</Paragraph>
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox5</rd:DefaultName>
|
||||
<Top>2.28775cm</Top>
|
||||
<Left>17.08931cm</Left>
|
||||
<Height>0.6cm</Height>
|
||||
<Width>3.06609cm</Width>
|
||||
<ZIndex>4</ZIndex>
|
||||
<Style>
|
||||
<Border>
|
||||
<Style>None</Style>
|
||||
</Border>
|
||||
<PaddingLeft>2pt</PaddingLeft>
|
||||
<PaddingRight>2pt</PaddingRight>
|
||||
<PaddingTop>2pt</PaddingTop>
|
||||
<PaddingBottom>2pt</PaddingBottom>
|
||||
</Style>
|
||||
</Textbox>
|
||||
</ReportItems>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Top>19.72306cm</Top>
|
||||
<Left>0.04112cm</Left>
|
||||
<Height>2.97096cm</Height>
|
||||
<Height>2.25247cm</Height>
|
||||
<Width>20.1554cm</Width>
|
||||
<ZIndex>31</ZIndex>
|
||||
<Visibility>
|
||||
@@ -4289,11 +4252,57 @@
|
||||
</Border>
|
||||
</Style>
|
||||
</Image>
|
||||
<Textbox Name="Textbox8">
|
||||
<CanGrow>true</CanGrow>
|
||||
<KeepTogether>true</KeepTogether>
|
||||
<Paragraphs>
|
||||
<Paragraph>
|
||||
<TextRuns>
|
||||
<TextRun>
|
||||
<Value>VERSION </Value>
|
||||
<Style>
|
||||
<FontFamily>MYRiad Pro</FontFamily>
|
||||
<FontSize>9.16pt</FontSize>
|
||||
<FontWeight>Bold</FontWeight>
|
||||
<Color>DimGray</Color>
|
||||
</Style>
|
||||
</TextRun>
|
||||
<TextRun>
|
||||
<Value>=Parameters!CFDIVersion.Value</Value>
|
||||
<Style>
|
||||
<FontFamily>MYRiad Pro</FontFamily>
|
||||
<FontSize>9.16pt</FontSize>
|
||||
<FontWeight>Bold</FontWeight>
|
||||
<Color>DimGray</Color>
|
||||
</Style>
|
||||
</TextRun>
|
||||
</TextRuns>
|
||||
<Style>
|
||||
<TextAlign>Center</TextAlign>
|
||||
</Style>
|
||||
</Paragraph>
|
||||
</Paragraphs>
|
||||
<rd:DefaultName>Textbox5</rd:DefaultName>
|
||||
<Top>22.07758cm</Top>
|
||||
<Left>16.48898cm</Left>
|
||||
<Height>0.56043cm</Height>
|
||||
<Width>3.68516cm</Width>
|
||||
<ZIndex>36</ZIndex>
|
||||
<Style>
|
||||
<Border>
|
||||
<Style>None</Style>
|
||||
</Border>
|
||||
<PaddingLeft>2pt</PaddingLeft>
|
||||
<PaddingRight>2pt</PaddingRight>
|
||||
<PaddingTop>2pt</PaddingTop>
|
||||
<PaddingBottom>2pt</PaddingBottom>
|
||||
</Style>
|
||||
</Textbox>
|
||||
</ReportItems>
|
||||
<Height>27.07124cm</Height>
|
||||
<Style />
|
||||
</Body>
|
||||
<Width>20.23764cm</Width>
|
||||
<Width>20.19652cm</Width>
|
||||
<Page>
|
||||
<PageFooter>
|
||||
<Height>0.74083cm</Height>
|
||||
@@ -5212,6 +5221,18 @@
|
||||
<AllowBlank>true</AllowBlank>
|
||||
<Prompt>ReportParameter1</Prompt>
|
||||
</ReportParameter>
|
||||
<ReportParameter Name="CFDIVersion">
|
||||
<DataType>String</DataType>
|
||||
<Nullable>true</Nullable>
|
||||
<AllowBlank>true</AllowBlank>
|
||||
<Prompt>ReportParameter1</Prompt>
|
||||
</ReportParameter>
|
||||
<ReportParameter Name="RegimenFiscalCodigo">
|
||||
<DataType>String</DataType>
|
||||
<Nullable>true</Nullable>
|
||||
<AllowBlank>true</AllowBlank>
|
||||
<Prompt>ReportParameter1</Prompt>
|
||||
</ReportParameter>
|
||||
</ReportParameters>
|
||||
<EmbeddedImages>
|
||||
<EmbeddedImage Name="logo">
|
||||
|
||||
@@ -102,6 +102,7 @@ Catalogo Documentacion Tipo
|
||||
<asp:ListItem Value="1">Recursos Humanos</asp:ListItem>
|
||||
<asp:ListItem Value="2">Clientes</asp:ListItem>
|
||||
<asp:ListItem Value="4">Proveedor</asp:ListItem> <%-- Nota: EL tipo Tres es tipo Auditoria de documentos de proveedor usadon el portal prveedor y --%>
|
||||
<asp:ListItem Value="8">Inicio</asp:ListItem>
|
||||
</asp:DropDownList>
|
||||
<asp:RequiredFieldValidator ID="RfvEdocmodulo" InitialValue="-1" runat="server" ControlToValidate="DdlEdocmodulo" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Modulo''</b> es necesario, por favor ingréselo." ValidationGroup="VGMEdoc"></asp:RequiredFieldValidator>
|
||||
<ajax:ValidatorCalloutExtender ID="VcoEdocmodulo" runat="server" HighlightCssClass="vco" TargetControlID="RfvEdocmodulo"></ajax:ValidatorCalloutExtender>
|
||||
|
||||
179
Inicio.aspx
179
Inicio.aspx
@@ -510,136 +510,27 @@
|
||||
|
||||
<asp:UpdatePanel runat="server" ID="UpDocumentos" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc1" NavigateUrl="Empresas\140\DocElectronica\Precios\AMERICA.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> AMERICA</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc2" NavigateUrl="Empresas\140\DocElectronica\Precios\CRONOS.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> CRONOS</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc3" NavigateUrl="Empresas\140\DocElectronica\Precios\DIENER.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> DIENER</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc4" NavigateUrl="Empresas\140\DocElectronica\Precios\FULLPOWER.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> FULL POWER</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc5" NavigateUrl="Empresas\140\DocElectronica\Precios\LTHAGM.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> LTH AGM</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc6" NavigateUrl="Empresas\140\DocElectronica\Precios\LTHESPECIALES.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> LTH ESPECIALES</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc7" NavigateUrl="Empresas\140\DocElectronica\Precios\LTHHEAVYDUTY.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> LTH HEAVY DUTY</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc8" NavigateUrl="Empresas\140\DocElectronica\Precios\LTHHI-TEC.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> LTH HI-TEC</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc9" NavigateUrl="Empresas\140\DocElectronica\Precios\LTHSUV-VAN-MINIVAN.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> LTH SUV-VAN-MINIVAN</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc10" NavigateUrl="Empresas\140\DocElectronica\Precios\LTHTAXI.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> LTH TAXI</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc11" NavigateUrl="Empresas\140\DocElectronica\Precios\LTH.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> LTH</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc12" NavigateUrl="Empresas\140\DocElectronica\Precios\OPTIMA.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> OPTIMA</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc14" NavigateUrl="Empresas\140\DocElectronica\Precios\FiltrosPisos.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> FILTROS PISOS
|
||||
</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc15" NavigateUrl="Empresas\140\DocElectronica\Precios\FiltrosMayoreo.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> FILTROS MAYOREO
|
||||
</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc16" NavigateUrl="Empresas\140\DocElectronica\Precios\MOTOBATERIASLTH.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> MOTOBATERIAS LTH
|
||||
</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc17" NavigateUrl="Empresas\140\DocElectronica\Precios\MOTOBATERIASAMERICA.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> MOTOBATERIAS AMERICA
|
||||
</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc18" NavigateUrl="Empresas\140\DocElectronica\Precios\ALCALINASPISOS.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> ALCALINAS PISOS
|
||||
</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc19" NavigateUrl="Empresas\140\DocElectronica\Precios\ALCALINASMAYOREO.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> ALCALINAS MAYOREO
|
||||
</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc13" NavigateUrl="Empresas\140\DocElectronica\Precios\CatAPSAGM-HT-LTH-CR 2021.pdf" runat="server" Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> Cat APS AGM-HT-LTH-CR 2021</asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
<asp:GridView ID="GvDoc" runat="server" GridLines="None" OnRowDataBound="GvDoc_RowDataBound" CssClass="table " AutoGenerateColumns="False" ShowHeader="False" Width="100%">
|
||||
<Columns>
|
||||
<asp:TemplateField>
|
||||
<ItemTemplate>
|
||||
<div>
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm">
|
||||
<asp:HyperLink ID="LnkDoc1" runat="server" NavigateUrl='<%# Eval("Liga") %>' Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> <%# Eval("Nombre") %> </asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
<div class="well well-sm" id="divdoc20" runat="server" visible="false">
|
||||
<asp:HyperLink ID="LnkDoc2" runat="server" NavigateUrl='<%# Eval("Liga2") %>' Target="_blank"><i class="fa fa-download" aria-hidden="true"></i> <%# Eval("Nombre2") %> </asp:HyperLink>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</Columns>
|
||||
</asp:GridView>
|
||||
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
@@ -1481,14 +1372,6 @@
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
<div id="DVModalPSPorCaducar" class="modal ADS fade" role="dialog">
|
||||
<div class="modal-dialog">
|
||||
|
||||
@@ -1528,9 +1411,6 @@
|
||||
</div>
|
||||
</div>
|
||||
|
||||
|
||||
|
||||
|
||||
<div class="modal-footer">
|
||||
<asp:UpdatePanel runat="server">
|
||||
<ContentTemplate>
|
||||
@@ -1541,7 +1421,6 @@
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
</div>
|
||||
|
||||
|
||||
@@ -1599,22 +1478,6 @@
|
||||
|
||||
</div>
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content4" ContentPlaceHolderID="JS" runat="Server">
|
||||
|
||||
|
||||
@@ -236,9 +236,7 @@ Partial Class Inicio
|
||||
'Evaluacion del proveedor
|
||||
CargaEvaluacionProveedor()
|
||||
|
||||
If UsuarioActual.CveEmpresa = 140 Then
|
||||
DVDescargasBDH.Visible = True
|
||||
End If
|
||||
CargaDocumentacion()
|
||||
|
||||
End If
|
||||
|
||||
@@ -1298,37 +1296,61 @@ Partial Class Inicio
|
||||
RegistraScript("$('#DvUnoaUno').modal('hide')")
|
||||
End Sub
|
||||
|
||||
'Protected Sub LnkDecargaDoc_Click(sender As Object, e As EventArgs)
|
||||
|
||||
' Dim NombreArchivo As String = DirectCast(sender, LinkButton).Attributes("NombreArchivo")
|
||||
' Dim filePath As String = $"{Server.MapPath("~")}\Documentacion\140\{DirectCast(sender, LinkButton).Attributes("NombreArchivo")}"
|
||||
#Region "DOCUMENTACION"
|
||||
|
||||
Private Sub CargaDocumentacion()
|
||||
If UsuarioActual.CveEmpresa = 140 Then
|
||||
DVDescargasBDH.Visible = True
|
||||
|
||||
' Dim Archivo As New System.IO.FileInfo(filePath)
|
||||
Dim TmpDT = New DataTable()
|
||||
|
||||
Dim ObjDoc As New ClsEdocumentacion
|
||||
If ObjDoc.DocumentacionGet(-1, -1, 1, UsuarioActual.Empresa.CveEmpresa, Modulo:=8) Then
|
||||
Dim dtt As New DataTable
|
||||
dtt = ObjDoc.DtResultados
|
||||
If dtt IsNot Nothing AndAlso dtt.Rows.Count > 0 Then
|
||||
|
||||
' Dim mimeType As String = Nothing
|
||||
TmpDT.Columns.Add(New DataColumn("Nombre", GetType(String)))
|
||||
TmpDT.Columns.Add(New DataColumn("Liga", GetType(String)))
|
||||
TmpDT.Columns.Add(New DataColumn("Nombre2", GetType(String)))
|
||||
TmpDT.Columns.Add(New DataColumn("Liga2", GetType(String)))
|
||||
'Dim i As Integer = 0
|
||||
'Dim Nombre As String = ""
|
||||
'Dim Liga As String = ""
|
||||
Dim drr As DataRow
|
||||
For Each dr As DataRow In dtt.Rows
|
||||
|
||||
' If Archivo.Exists Then
|
||||
If (dr("Consec").ToString.ToEntero Mod 2) = 1 Then 'primer renglón
|
||||
drr = TmpDT.NewRow
|
||||
drr("Nombre") = dr("Documentacion").ToString
|
||||
drr("Liga") = String.Format("/Compras/PopUpVerFactura.aspx?p={0}", Encripta(String.Format("op=File&File={0}\Formatos\{1}_{2}", UsuarioActual.Empresa.Ruta, dr("CveDocumentacion"), dr("DocumentacionFormato")).Replace("\", "/").Replace("//", "/")))
|
||||
TmpDT.Rows.Add(drr)
|
||||
Else
|
||||
TmpDT.Rows((dr("Consec").ToString.ToEntero / 2) - 1)("Nombre2") = dr("Documentacion").ToString
|
||||
TmpDT.Rows((dr("Consec").ToString.ToEntero / 2) - 1)("Liga2") = String.Format("/Compras/PopUpVerFactura.aspx?p={0}", Encripta(String.Format("op=File&File={0}\Formatos\{1}_{2}", UsuarioActual.Empresa.Ruta, dr("CveDocumentacion"), dr("DocumentacionFormato")).Replace("\", "/").Replace("//", "/")))
|
||||
End If
|
||||
Next
|
||||
|
||||
' HttpContext.Current.Response.Buffer = True
|
||||
' HttpContext.Current.Response.Clear()
|
||||
' HttpContext.Current.Response.ClearContent()
|
||||
' HttpContext.Current.Response.ContentType = mimeType
|
||||
' HttpContext.Current.Response.AppendHeader("Content-disposition", "inline; filename=" & NombreArchivo)
|
||||
' HttpContext.Current.Response.AddHeader("Content-Length", Archivo.Length.ToString())
|
||||
' HttpContext.Current.Response.TransmitFile(filePath)
|
||||
' HttpContext.Current.Response.Flush()
|
||||
' HttpContext.Current.Response.SuppressContent = True
|
||||
' HttpContext.Current.ApplicationInstance.CompleteRequest()
|
||||
' HttpContext.Current.Response.End()
|
||||
End If
|
||||
End If
|
||||
ObjDoc.Dispose()
|
||||
|
||||
' Archivo = Nothing
|
||||
' End If
|
||||
GvDoc.DataSource = TmpDT
|
||||
GvDoc.DataBind()
|
||||
|
||||
End If
|
||||
End Sub
|
||||
Protected Sub GvDoc_RowDataBound(sender As Object, e As GridViewRowEventArgs)
|
||||
If e.Row.RowType = DataControlRowType.DataRow Then
|
||||
If e.Row.DBCampo("Nombre2") <> "" Then
|
||||
e.Row.FindControl("divdoc20").Visible = True
|
||||
End If
|
||||
|
||||
End If
|
||||
End Sub
|
||||
|
||||
#End Region
|
||||
|
||||
'End Sub
|
||||
|
||||
End Class
|
||||
|
||||
@@ -141,8 +141,8 @@
|
||||
<asp:DropDownList ID="DdlCConcepto" DataTextField="Concepto" CssClass="form-control input-sm" DataValueField="CveConcepto" runat="server" Style="max-width: 200px"></asp:DropDownList>
|
||||
</div>
|
||||
<label class="col-md-1 truncate">Folio:</label>
|
||||
<div class="col-md-2">
|
||||
<asp:TextBox ID="TxtCFolio" runat="server" Style="max-width: 120px"></asp:TextBox>
|
||||
<div class="col-md-2 ">
|
||||
<asp:TextBox ID="TxtCFolio" runat="server" Style="max-width: 120px" ></asp:TextBox>
|
||||
</div>
|
||||
</div>
|
||||
</div>
|
||||
@@ -219,7 +219,7 @@
|
||||
</div>
|
||||
<label class="col-md-1 truncate" style="width: 110px" id="DivFolio1" runat="server">Folio:</label>
|
||||
<div class="col-md-2" id="DivFolio2" runat="server">
|
||||
<asp:TextBox ID="TxtFolio" runat="server" Style="" Width="100%"></asp:TextBox>
|
||||
<asp:TextBox ID="TxtFolio" runat="server" style="text-align:left;" CssClass="TextBoxAsLabel" Font-Bold="true" Width="100%"></asp:TextBox>
|
||||
<ajax:FilteredTextBoxExtender ID="SoloNumerosFolio" runat="server" TargetControlID="TxtFolio" FilterType="Numbers" />
|
||||
</div>
|
||||
</div>
|
||||
|
||||
@@ -94,14 +94,15 @@
|
||||
</li>
|
||||
<asp:UpdatePanel ID="UpdatePanel1" runat="server" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<li>
|
||||
|
||||
<asp:LinkButton runat="server" ID="LnkProyectado" OnClick="LnkProyectado_Click" Text="Cargar Proyecciones" />
|
||||
|
||||
<li>
|
||||
<asp:LinkButton runat="server" ID="LnkProyectado" OnClick="LnkProyectado_Click" Text="Cargar Proyecciones" />
|
||||
</li>
|
||||
|
||||
</ContentTemplate>
|
||||
</asp:UpdatePanel>
|
||||
|
||||
<li>
|
||||
<asp:LinkButton runat="server" ID="LnkPOG" OnClick="LnkProyectado_Click" Visible="false"><i class="fa fa-ad-excel"></i> POG</asp:LinkButton>
|
||||
</li>
|
||||
</asp:Content>
|
||||
|
||||
<asp:Content ID="Content6" ContentPlaceHolderID="HA" runat="Server">
|
||||
@@ -298,6 +299,59 @@
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div id="DivPOG" class="modal ADS fade" role="dialog">
|
||||
<div class="modal-dialog" style="width: 450px;">
|
||||
<asp:UpdatePanel runat="server" class="modal-content" ID="UpdatePanel2" UpdateMode="Conditional">
|
||||
<ContentTemplate>
|
||||
<div class="modal-header ">
|
||||
<button type="button" class="close" data-dismiss="modal">×</button>
|
||||
<h4 class="modal-title">
|
||||
<asp:Literal ID="Literal1" runat="server">POG:</asp:Literal></h4>
|
||||
</div>
|
||||
<div class="modal-body">
|
||||
<div class="row" style="width: 100%; text-align: center">
|
||||
<asp:Label runat="server" ID="Label2" />
|
||||
<asp:RadioButtonList ID="RBLPOG" runat="server" RepeatDirection="Horizontal" Width="50%" Style="margin: 0 15% 0 15%">
|
||||
<asp:ListItem Text="Ventas" Value="0" />
|
||||
<asp:ListItem Text="Existencias" Value="1" Selected="True"/>
|
||||
</asp:RadioButtonList>
|
||||
|
||||
</div>
|
||||
<div class="row">
|
||||
<div class="col-md-2 truncate">
|
||||
Fecha:
|
||||
</div>
|
||||
<div class="input-group input-sm input-small date date-picker " data-date-format="dd/mm/yyyy" style="width: 100px !important; padding: 0px;">
|
||||
<asp:TextBox Width="80px" ID="txtFechaI" runat="server" CssClass="form-control" CausesValidation="true" MaxLength="10"></asp:TextBox>
|
||||
<span class="input-group-btn ">
|
||||
<asp:LinkButton ID="imgCalendario" class="btn default " Text="<i class='fa fa-calendar'></i>" runat="server"></asp:LinkButton>
|
||||
</span>
|
||||
</div>
|
||||
<ajax:MaskedEditExtender ID="MEEFechaI" runat="server" TargetControlID="txtFechaI" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
|
||||
<ajax:CalendarExtender runat="server" ID="Calendario" TargetControlID="txtFechaI" PopupButtonID="ImgCalendario" PopupPosition="BottomRight" Enabled="True"></ajax:CalendarExtender>
|
||||
<asp:RequiredFieldValidator ID="rfvFechaI" runat="server" ControlToValidate="txtFechaI" Display="None" ErrorMessage="El campo <b>''Fecha Inicial''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="Valida"></asp:RequiredFieldValidator>
|
||||
<asp:CompareValidator ID="cvFechaI" runat="server" ControlToValidate="txtFechaI" Display="None" ErrorMessage="El campo <b>''Fecha Inicial''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="Valida"></asp:CompareValidator>
|
||||
<ajax:ValidatorCalloutExtender ID="vcoFfvFI" runat="server" HighlightCssClass="vco" TargetControlID="rfvFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
|
||||
<ajax:ValidatorCalloutExtender ID="vcoCvFI" runat="server" HighlightCssClass="vco" TargetControlID="cvFechaI" Width="350px"></ajax:ValidatorCalloutExtender>
|
||||
|
||||
</div>
|
||||
|
||||
|
||||
<br />
|
||||
</div>
|
||||
<div class="modal-footer">
|
||||
<asp:Button ID="BtnDescargarPOG" OnClick="BtnDescargarPOG_Click" runat="server" class="btn btn-success" Text="Agregar" ValidationGroup="GrpTiposD" />
|
||||
<button id="Button4" runat="server" type="button" class="btn default" data-dismiss="modal">Cancelar</button>
|
||||
</div>
|
||||
</ContentTemplate>
|
||||
<Triggers>
|
||||
<asp:PostBackTrigger ControlID="BtnDescargarPOG" />
|
||||
</Triggers>
|
||||
</asp:UpdatePanel>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
</asp:Content>
|
||||
<asp:Content ID="Content8" ContentPlaceHolderID="JS" runat="Server">
|
||||
</asp:Content>
|
||||
|
||||
@@ -24,6 +24,12 @@ Partial Class Inventarios_KardexAlmacen
|
||||
DdlMarca.Visible = True
|
||||
DdlOrden.SelectedValue = 2
|
||||
End If
|
||||
|
||||
If UsuarioActual.CveEmpresa = 119 Then
|
||||
LnkPOG.Visible = True
|
||||
txtFechaI.Text = Now.ToShortDateString
|
||||
End If
|
||||
|
||||
If IfNull(Request("CvePS"), "-1").ToString.ToEntero > 0 Then CargarKardex(Request("CvePS").ToString.ToEntero)
|
||||
ddlProducto2.SelectedValue = If(Request("CvePS") IsNot Nothing, Request("CvePS").ToString, "-1")
|
||||
End If
|
||||
@@ -436,57 +442,78 @@ Partial Class Inventarios_KardexAlmacen
|
||||
|
||||
End Sub
|
||||
|
||||
Private Function ReadExcelFile(ByVal flatFilePath As String, ByVal firstRowHasHeaders As Boolean) As DataTable
|
||||
SpreadsheetInfo.SetLicense(ModExtensiones.SerialGemBoxSpreadsheet)
|
||||
Dim excelFile As ExcelFile = ExcelFile.Load(flatFilePath)
|
||||
'Private Function ReadExcelFile(ByVal flatFilePath As String, ByVal firstRowHasHeaders As Boolean) As DataTable
|
||||
' SpreadsheetInfo.SetLicense(ModExtensiones.SerialGemBoxSpreadsheet)
|
||||
' Dim excelFile As ExcelFile = ExcelFile.Load(flatFilePath)
|
||||
|
||||
Dim unnamed As Integer = 0
|
||||
Dim cols As Integer
|
||||
Dim columns As String()
|
||||
Dim curRow As Integer = 0
|
||||
Dim curCol As Integer = 0
|
||||
Dim dataTable As DataTable = New DataTable()
|
||||
Dim worksheet As ExcelWorksheet = excelFile.Worksheets(0)
|
||||
' Dim unnamed As Integer = 0
|
||||
' Dim cols As Integer
|
||||
' Dim columns As String()
|
||||
' Dim curRow As Integer = 0
|
||||
' Dim curCol As Integer = 0
|
||||
' Dim dataTable As DataTable = New DataTable()
|
||||
' Dim worksheet As ExcelWorksheet = excelFile.Worksheets(0)
|
||||
|
||||
For cols = 0 To worksheet.Rows(0).AllocatedCells.Count - 1
|
||||
' For cols = 0 To worksheet.Rows(0).AllocatedCells.Count - 1
|
||||
|
||||
If firstRowHasHeaders Then
|
||||
' If firstRowHasHeaders Then
|
||||
|
||||
If worksheet.Rows(0).Cells(cols).Value IsNot Nothing Then
|
||||
dataTable.Columns.Add(worksheet.Rows(0).Cells(cols).Value.ToString().Trim)
|
||||
Else
|
||||
dataTable.Columns.Add("Unnamed Column " & (System.Threading.Interlocked.Increment(unnamed)))
|
||||
End If
|
||||
' If worksheet.Rows(0).Cells(cols).Value IsNot Nothing Then
|
||||
' dataTable.Columns.Add(worksheet.Rows(0).Cells(cols).Value.ToString().Trim)
|
||||
' Else
|
||||
' dataTable.Columns.Add("Unnamed Column " & (System.Threading.Interlocked.Increment(unnamed)))
|
||||
' End If
|
||||
|
||||
curRow = 1
|
||||
Else
|
||||
dataTable.Columns.Add("Column " & (cols + 1))
|
||||
End If
|
||||
' curRow = 1
|
||||
' Else
|
||||
' dataTable.Columns.Add("Column " & (cols + 1))
|
||||
' End If
|
||||
|
||||
Next
|
||||
' Next
|
||||
|
||||
While curRow < worksheet.Rows.Count
|
||||
' While curRow < worksheet.Rows.Count
|
||||
|
||||
columns = New String(cols - 1) {}
|
||||
' columns = New String(cols - 1) {}
|
||||
|
||||
For curCol = 0 To cols - 1
|
||||
' For curCol = 0 To cols - 1
|
||||
|
||||
If worksheet.Rows(curRow).Cells(curCol).Value Is Nothing Then
|
||||
columns(curCol) = ""
|
||||
Else
|
||||
columns(curCol) = worksheet.Rows(curRow).Cells(curCol).Value.ToString()
|
||||
End If
|
||||
' If worksheet.Rows(curRow).Cells(curCol).Value Is Nothing Then
|
||||
' columns(curCol) = ""
|
||||
' Else
|
||||
' columns(curCol) = worksheet.Rows(curRow).Cells(curCol).Value.ToString()
|
||||
' End If
|
||||
|
||||
Next
|
||||
' Next
|
||||
|
||||
dataTable.Rows.Add(columns)
|
||||
curRow += 1
|
||||
' dataTable.Rows.Add(columns)
|
||||
' curRow += 1
|
||||
|
||||
End While
|
||||
' End While
|
||||
|
||||
Return dataTable
|
||||
' Return dataTable
|
||||
|
||||
End Function
|
||||
'End Function
|
||||
Public Overrides Sub VerifyRenderingInServerForm(ByVal control As Control)
|
||||
End Sub
|
||||
End Sub
|
||||
|
||||
Private Sub LnkPOG_Click(sender As Object, e As EventArgs) Handles LnkPOG.Click
|
||||
|
||||
RegistraScript(String.Format("$('#{0}').modal();", "DivPOG"))
|
||||
|
||||
End Sub
|
||||
|
||||
Protected Sub BtnDescargarPOG_Click(sender As Object, e As EventArgs)
|
||||
|
||||
Dim Fecha As Date = txtFechaI.Text.ToDate
|
||||
Dim Nombre As String = IIf(RBLPOG.SelectedValue = "0", "Ventas-", "Existencias-")
|
||||
|
||||
Using ObjInventario As New ClsInventarios
|
||||
|
||||
If ObjInventario.GetJAM_BASF_POG(Fecha) AndAlso ObjInventario.DataSetResultados IsNot Nothing Then
|
||||
ObjInventario.DataSetResultados.Tables(RBLPOG.SelectedValue.ToEntero).ExportToExcel(Nombre & Fecha.ToShortDateString)
|
||||
|
||||
End If
|
||||
End Using
|
||||
|
||||
End Sub
|
||||
End Class
|
||||
|
||||
@@ -2691,7 +2691,7 @@ Partial Class Inventarios_RecepcionAlmacen
|
||||
PU = ((TotalCompraOC * If(TipoCambio > 1, TipoCambio, 1)).RoundSQL - (SumaTotal - (Dr("Cantidad").ToString.ToDecimal * (PU)))) / Dr("Cantidad").ToString.ToDecimal
|
||||
End If
|
||||
End If
|
||||
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoSalidaTraspaso, Dr("Cantidad").ToString.ToDouble, gvr.DataKey("CveUM").ToEntero, gvr.DataKey("CvePS").ToEntero, PU, -1, PUTC:=If(DdlMonedaTC.SelectedValue.ToEntero = 1, -1, PUExtranjero), Lote:=Dr("Lote").ToString, FechaCaducidad:=Dr("FechaCaducidad").ToString.ToDate, CveCompraDetalle:=gvr.DataKey("CveCompraDetalle").ToEntero, CveOrdenCompraDetalle:=gvr.DataKey("CveOrdenCompraDetalle").ToEntero, CveVentaDetalle:=gvr.DataKey("CveVentaDetalle").ToEntero, CostoIndirecto:=CostoIndirecto, CveUsuarioModifico:=UsuarioActual.CveUsuario, CveSeccionAlmacen:=If(CBool(gvr.DataKey("AplicaSeccion")), gvr.FCDropDownList("DdlSeccionAlmacen").SelectedValue.ToEntero, -1)) Then
|
||||
If Not ObjInventario.AddMovimientoDetalle(CveMovimientoSalidaTraspaso, Dr("Cantidad").ToString.ToDouble, gvr.DataKey("CveUM").ToEntero, gvr.DataKey("CvePS").ToEntero, PU, -1, PUTC:=If(DdlMonedaTC.SelectedValue.ToEntero = 1, -1, PUExtranjero), Lote:=Dr("Lote").ToString, FechaCaducidad:=If(CBool(gvr.DataKey("AplicaCaducidad")), gvr.FCTextBox("TxtCaducidad").Text.ToDate, MinFecha), CveCompraDetalle:=gvr.DataKey("CveCompraDetalle").ToEntero, CveOrdenCompraDetalle:=gvr.DataKey("CveOrdenCompraDetalle").ToEntero, CveVentaDetalle:=gvr.DataKey("CveVentaDetalle").ToEntero, CostoIndirecto:=CostoIndirecto, CveUsuarioModifico:=UsuarioActual.CveUsuario, CveSeccionAlmacen:=If(CBool(gvr.DataKey("AplicaSeccion")), gvr.FCDropDownList("DdlSeccionAlmacen").SelectedValue.ToEntero, -1)) Then
|
||||
ErrorMovInv = True
|
||||
Exit For
|
||||
End If
|
||||
@@ -2794,7 +2794,7 @@ Partial Class Inventarios_RecepcionAlmacen
|
||||
PU = ((TotalCompraOC * If(TipoCambio > 1, TipoCambio, 1)).RoundSQL - (SumaTotal - (Dr("Cantidad").ToString.ToDecimal * (PU)))) / Dr("Cantidad").ToString.ToDecimal
|
||||
End If
|
||||
End If
|
||||
If Not ObjInventario.AddMovimientoDetalle(CveMovimiento, Dr("Cantidad").ToString.ToDouble, gvr.DataKey("CveUM").ToEntero, gvr.DataKey("CvePS").ToEntero, PU, -1, PUTC:=If(DdlMonedaTC.SelectedValue.ToEntero = 1, -1, PUExtranjero), Lote:=Dr("Lote").ToString, FechaCaducidad:=Dr("FechaCaducidad").ToString.ToDate, CveCompraDetalle:=gvr.DataKey("CveCompraDetalle").ToEntero, CveOrdenCompraDetalle:=gvr.DataKey("CveOrdenCompraDetalle").ToEntero, CveVentaDetalle:=gvr.DataKey("CveVentaDetalle").ToEntero, CostoIndirecto:=CostoIndirecto, CveUsuarioModifico:=UsuarioActual.CveUsuario, CveSeccionAlmacen:=If(CBool(gvr.DataKey("AplicaSeccion")), gvr.FCDropDownList("DdlSeccionAlmacen").SelectedValue.ToEntero, -1)) Then
|
||||
If Not ObjInventario.AddMovimientoDetalle(CveMovimiento, Dr("Cantidad").ToString.ToDouble, gvr.DataKey("CveUM").ToEntero, gvr.DataKey("CvePS").ToEntero, PU, -1, PUTC:=If(DdlMonedaTC.SelectedValue.ToEntero = 1, -1, PUExtranjero), Lote:=Dr("Lote").ToString, FechaCaducidad:=If(CBool(gvr.DataKey("AplicaCaducidad")), gvr.FCTextBox("TxtCaducidad").Text.ToDate, MinFecha), CveCompraDetalle:=gvr.DataKey("CveCompraDetalle").ToEntero, CveOrdenCompraDetalle:=gvr.DataKey("CveOrdenCompraDetalle").ToEntero, CveVentaDetalle:=gvr.DataKey("CveVentaDetalle").ToEntero, CostoIndirecto:=CostoIndirecto, CveUsuarioModifico:=UsuarioActual.CveUsuario, CveSeccionAlmacen:=If(CBool(gvr.DataKey("AplicaSeccion")), gvr.FCDropDownList("DdlSeccionAlmacen").SelectedValue.ToEntero, -1)) Then
|
||||
ErrorMovInv = True
|
||||
Exit For
|
||||
End If
|
||||
|
||||
@@ -2037,7 +2037,7 @@ Partial Class Inventarios_RecepcionUsados
|
||||
End Sub
|
||||
Private Sub CambiaCliente(Optional CargaSucursales As Boolean = True, Optional CargaFacturas As Boolean = True)
|
||||
If DdlClientes.SelectedValue.ToEntero > 0 Then
|
||||
Me.EsDistribuidor = CBool(GlobalDTCliente(UsuarioActual.CveEmpresa, CveCliente:=DdlClientes.SelectedValue.ToEntero()).FiltroPrimeroValor("EsDistribuidor", ""))
|
||||
Me.EsDistribuidor = CBool(GlobalDTCliente(UsuarioActual.CveEmpresa, CveCliente:=DdlClientes.SelectedValue.ToEntero(), Estatus:=-1).FiltroPrimeroValor("EsDistribuidor", ""))
|
||||
If CargaSucursales Then
|
||||
DivClienteSucursal.Visible = False
|
||||
DdlClientesSucursales.Items.Clear()
|
||||
|
||||
@@ -2182,8 +2182,8 @@ Partial Class Inventarios_TraspasoAlmacen
|
||||
Dim FolioVirtualEntrada, FolioVirtualSalida As Integer
|
||||
If RealizarMovimientoVirtual AndAlso Not ErrorMovInv Then
|
||||
|
||||
Dim CveAlmacenVirtualSalida As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveAlmacen:=CveAlmacenEntrada).FiltroPrimeroValor("CveAlmacenVirtual", "").ToEntero()
|
||||
Dim CveAlmacenVirtualEntrada As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveAlmacen:=CveAlmacenSalida).FiltroPrimeroValor("CveAlmacenVirtual", "").ToEntero()
|
||||
Dim CveAlmacenVirtualSalida As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveAlmacen:=CveAlmacenSalida).FiltroPrimeroValor("CveAlmacenVirtual", "").ToEntero()
|
||||
Dim CveAlmacenVirtualEntrada As Integer = GlobalDTAlmacen(UsuarioActual.CveEmpresa, CveAlmacen:=CveAlmacenEntrada).FiltroPrimeroValor("CveAlmacenVirtual", "").ToEntero()
|
||||
|
||||
If CveAlmacenVirtualSalida > 0 Then
|
||||
|
||||
|
||||
@@ -178,19 +178,25 @@
|
||||
<label for="<%= Txtdocumentacion.ClientID.ToString()%>">Documento:</label>
|
||||
</div>
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:DropDownList ID="DdlDocumentacionTipo" runat="server" Width="150" CssClass=" select2me form-control " DataValueField="CveDocumentacionTipo" DataTextField="DocumentacionTipo">
|
||||
</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>
|
||||
<label for="<%= DdlDocumentacionTipo.ClientID.ToString()%>">Tipo de documento:</label>
|
||||
</div>
|
||||
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:DropDownList ID="DdlDocumentacionTipo" runat="server" Width="100%" CssClass=" select2me form-control " DataValueField="CveDocumentacionTipo" DataTextField="DocumentacionTipo">
|
||||
</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>
|
||||
<label for="<%= DdlDocumentacionTipo.ClientID.ToString()%>">Tipo de documento:</label>
|
||||
</div>
|
||||
</div>
|
||||
<div class="col-md-6">
|
||||
<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="" />
|
||||
<label for="<%= TxtOrden.ClientID.ToString()%>">Orden:</label>
|
||||
</div>
|
||||
</div>
|
||||
</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>
|
||||
@@ -198,22 +204,23 @@
|
||||
<ajax:FilteredTextBoxExtender ID="FilTxtDiasLimite" runat="server" TargetControlID="TxtDiasLimite" FilterType="Numbers" ValidChars="" />
|
||||
<label for="<%= TxtOrden.ClientID.ToString()%>">Días Limite:</label>
|
||||
</div>
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright">
|
||||
<asp:CheckBox ID="ChkAplicaDiasLimite" runat="server" Text="Aplica Días Límite" />
|
||||
</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 class="row">
|
||||
<div class="form-group form-md-line-input input-iconright col-md-6">
|
||||
<asp:CheckBox ID="ChkAplicaDiasLimite" runat="server" Text="Aplica Días Límite" />
|
||||
</div>
|
||||
<div class="form-group form-md-line-input input-iconright col-md-6">
|
||||
<asp:CheckBox ID="ChkAplicaFechaVencimiento" runat="server" Text="Aplica Fecha de Vencimiento" />
|
||||
</div>
|
||||
</div>
|
||||
<div class="row">
|
||||
<div class="form-group form-md-line-input input-iconright col-md-6">
|
||||
<asp:CheckBox ID="chkEstatus" runat="server" Text="Activo" />
|
||||
</div>
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright col-md-6">
|
||||
<asp:CheckBox ID="chkRequerido" runat="server" Text="Requerido" />
|
||||
</div>
|
||||
</div>
|
||||
<div class="form-group form-md-line-input input-iconright ">
|
||||
<div class="row ">
|
||||
<div class="col-md-12">
|
||||
@@ -246,7 +253,7 @@
|
||||
<ContentTemplate>
|
||||
|
||||
<asp:GridView ID="GvParametros" runat="server" AutoGenerateColumns="False"
|
||||
DataKeyNames="CveDocumentacionParametro,CveDocumentacion,Parametro,Descripcion " CssClass="table table-hover table-advance Widthall" GridLines="None">
|
||||
DataKeyNames="CveDocumentacionParametro,CveDocumentacion,Parametro,Descripcion " CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn" GridLines="None">
|
||||
<Columns>
|
||||
|
||||
<asp:TemplateField ItemStyle-HorizontalAlign="Left" ItemStyle-Width="60px" HeaderText="Parámetro">
|
||||
|
||||
@@ -430,7 +430,7 @@ Partial Class RH_CatDocumentos
|
||||
|
||||
If DocumetacionFormato.Trim.Length > 0 Then
|
||||
|
||||
Dim linkDescarga = "/Empresas/" & UsuarioActual.Empresa.CveEmpresa & "/Formatos/" & _CveDocumentacion & "_" & DocumetacionFormato
|
||||
Dim linkDescarga = UsuarioActual.Empresa.Ruta & "/Formatos/" & _CveDocumentacion & "_" & DocumetacionFormato
|
||||
Dim linkDescargaArchivo = UsuarioActual.Empresa.Ruta & "\Formatos\" & _CveDocumentacion & "_" & DocumetacionFormato
|
||||
If File.Exists(linkDescargaArchivo) Then
|
||||
ImgDownLoad.Visible = True
|
||||
|
||||
@@ -227,10 +227,10 @@
|
||||
<ContentTemplate>
|
||||
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkDownloadExcel" OnClick="LnkDownloadExcel_Click" runat="server"><i class="fa fa-download"></i>Descargar</asp:LinkButton>
|
||||
<asp:LinkButton ID="LnkDownloadExcel" OnClick="LnkDownloadExcel_Click" runat="server"><i class="fa fa-file-excel-o"></i>Excel</asp:LinkButton>
|
||||
</li>
|
||||
<li>
|
||||
<asp:LinkButton ID="LnkShowSolicitudes" OnClick="LnkShowSolicitudes_Click" runat="server"> Solicitudes</asp:LinkButton>
|
||||
<asp:LinkButton ID="LnkShowSolicitudes" OnClick="LnkShowSolicitudes_Click" runat="server"> <i class="fa fa-external-link"></i> Solicitudes</asp:LinkButton>
|
||||
</li>
|
||||
|
||||
</ContentTemplate>
|
||||
@@ -371,11 +371,14 @@
|
||||
</asp:TemplateField>
|
||||
|
||||
|
||||
<asp:TemplateField HeaderText="SIG">
|
||||
<asp:HyperLinkField HeaderText="Sistema" DataNavigateUrlFields="CveVenta" DataNavigateUrlFormatString = "/Ventas/Ventas.aspx?CveVenta={0}" DataTextField="Sistema" ControlStyle-CssClass='Texto' target='_blank' ></asp:HyperLinkField>
|
||||
|
||||
|
||||
<%-- <asp:TemplateField HeaderText="SIG">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" ID="LblEnSistema" Text='<%# Eval("Sistema")%>'></asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</asp:TemplateField>--%>
|
||||
|
||||
|
||||
<asp:TemplateField HeaderText="SAT" ItemStyle-HorizontalAlign="Right">
|
||||
@@ -384,12 +387,13 @@
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
|
||||
<asp:HyperLinkField HeaderText="LnkSerieFolio" DataNavigateUrlFields="CveVenta" DataNavigateUrlFormatString = "/Ventas/Ventas.aspx?CveVenta={0}" DataTextField="VSerieFolio" ControlStyle-CssClass='Texto' target='_blank'></asp:HyperLinkField>
|
||||
|
||||
<asp:TemplateField HeaderText="Serie Folio" ItemStyle-HorizontalAlign="Right">
|
||||
<%-- <asp:TemplateField HeaderText="Serie Folio" ItemStyle-HorizontalAlign="Right">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" ID="LblVSerieFolio" Text='<%# Eval("VSerieFolio")%>'></asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</asp:TemplateField>--%>
|
||||
|
||||
<asp:TemplateField HeaderText="Total" ItemStyle-HorizontalAlign="Right">
|
||||
<ItemTemplate>
|
||||
@@ -537,11 +541,11 @@
|
||||
<div class="col-md-12">
|
||||
<asp:GridView ID="GVSolicitudesPendientes" runat="server" GridLines="None" CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn" AutoGenerateColumns="False"
|
||||
ShowHeaderWhenEmpty="true" EmptyDataText="No se encontraron registros"
|
||||
DataKeyNames="CveSolicitud,CveSolicitudCFDI,CveSolicitudMetadata,Estatus,Observaciones,FechaInicio,FechaFin,FechaIng,CveUsuarioIng,CveEmpresa,ArchivoXML,idSolicitud,CveSolicitudDetalle">
|
||||
DataKeyNames="CveSolicitud,CveSolicitudCFDI,CveSolicitudMetadata,Estatus,Observaciones,FechaInicio,FechaFin,FechaIng,CveUsuarioIng,CveEmpresa,ArchivoXML,idSolicitud,CveSolicitudDetalle,Folio,CveTipoSolicitud">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Folio">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("CveSolicitud")%>'></asp:Label>
|
||||
<asp:Label runat="server" Text='<%# Eval("Folio")%>'></asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Fecha Inicio">
|
||||
@@ -564,14 +568,21 @@
|
||||
<asp:Label ID="lblobservaciones" runat="server" Text='<%# Eval("Observaciones")%>'></asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
|
||||
|
||||
<asp:TemplateField HeaderText="Tipo" ItemStyle-HorizontalAlign="Center">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" ID="lBLTipoDescarga" Text='<%# Eval("TipoDescarga")%>'></asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
|
||||
|
||||
|
||||
<asp:TemplateField HeaderText="Fecha solicitud">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("FechaIng","{0:dd/MM/yyyy}")%>'></asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
|
||||
|
||||
|
||||
<asp:TemplateField HeaderText="Solicitó">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("UsuarioIng")%>'></asp:Label>
|
||||
@@ -606,11 +617,11 @@
|
||||
<div class="col-md-12">
|
||||
<asp:GridView ID="GVSolicitudesNominas" runat="server" GridLines="None" CssClass="table table-striped table-hover Widthall ScrollAD mysmallbtn" AutoGenerateColumns="False" OnRowDataBound="GVSolicitudesNominas_RowDataBound"
|
||||
ShowHeaderWhenEmpty="true" EmptyDataText="No se encontraron registros"
|
||||
DataKeyNames="CveSolicitudDetalle,CveSolicitud,idSolicitudCFDI,idSolicitudMetadata,Estatus,Observaciones,FechaInicio,FechaFin,FechaIng,CveUsuarioIng,CveEmpresa,ArchivoXML">
|
||||
DataKeyNames="CveSolicitudDetalle,CveSolicitud,idSolicitudCFDI,idSolicitudMetadata,Estatus,Observaciones,FechaInicio,FechaFin,FechaIng,CveUsuarioIng,CveEmpresa,ArchivoXML,Folio,CveTipoSolicitud">
|
||||
<Columns>
|
||||
<asp:TemplateField HeaderText="Folio">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("CveSolicitud")%>'></asp:Label>
|
||||
<asp:Label runat="server" Text='<%# Eval("Folio")%>'></asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Fecha Inicio">
|
||||
@@ -633,16 +644,23 @@
|
||||
<asp:Label ID="lblobservaciones" runat="server" Text='<%# Eval("Observaciones")%>' ItemStyle-Width="150px" ControlStyle-Width="150px" CssClass="truncate" ></asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Tipo" ItemStyle-HorizontalAlign="Center">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" ID="lBLTipoDescarga" Text='<%# Eval("TipoDescarga")%>'></asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
<asp:TemplateField HeaderText="Fecha solicitud">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("FechaIng","{0:dd/MM/yyyy}")%>'></asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
</asp:TemplateField>
|
||||
|
||||
<asp:TemplateField HeaderText="Solicitó" ItemStyle-Width="100px" ControlStyle-Width="100px">
|
||||
<ItemTemplate>
|
||||
<asp:Label runat="server" Text='<%# Eval("UsuarioIng")%>' CssClass="truncate"></asp:Label>
|
||||
</ItemTemplate>
|
||||
</asp:TemplateField>
|
||||
|
||||
<asp:TemplateField ItemStyle-HorizontalAlign="Right" ItemStyle-Width="50px" HeaderText="XML">
|
||||
<ItemTemplate>
|
||||
<asp:LinkButton ID="LnkDescargaXML" CssClass="btn btn-circle btn-sm blue" OnClick="LnkDescargaXML_Click" runat="server" ToolTip="Descargar archivo"
|
||||
@@ -703,7 +721,7 @@
|
||||
<div class="modal-body">
|
||||
|
||||
<div class="row">
|
||||
<div class="col-md-6">
|
||||
<div class="col-md-4">
|
||||
<div class="form-group form-md-line-input input-iconright" style="width: 125px!important;height:28px!important">
|
||||
<asp:TextBox ID="txtFechaIAdd" CssClass="form-control" MaxLength="20" runat="server" Width="100px" Height="28px"></asp:TextBox>
|
||||
<span class="input-group-btn " style="position: absolute; right: 41px; top: -5px;">
|
||||
@@ -719,7 +737,7 @@
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="col-md-6">
|
||||
<div class="col-md-4">
|
||||
<div class="form-group form-md-line-input input-iconright" style="width: 125px!important">
|
||||
<asp:TextBox ID="txtFechaFAdd" CssClass="form-control" MaxLength="20" runat="server" Width="100px" Height="28px"></asp:TextBox>
|
||||
<span class="input-group-btn " style="position: absolute; right: 41px; top: -5px;">
|
||||
@@ -734,6 +752,11 @@
|
||||
<label for="<%= txtFechaFAdd.ClientID.ToString() %>" style="margin-top: -6px">Fecha Fin:</label>
|
||||
</div>
|
||||
</div>
|
||||
|
||||
<div class="col-md-4">
|
||||
<asp:CheckBox runat="server" ID="ChkMetaDatos" Text="Validación de Estatus" />
|
||||
</div>
|
||||
|
||||
</div>
|
||||
|
||||
|
||||
|
||||
@@ -64,7 +64,7 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
TxtRpdFechaFin.Text = string.Format("{0:dd/MM/yyyy}", DateTime.Now.AddMonths(-1).LastDayOfMonth());
|
||||
LnkConsultar_Click(null, null);
|
||||
|
||||
//if(UsuarioActual.CveRol == 1)
|
||||
//if (UsuarioActual.CveRol == 1)
|
||||
//{
|
||||
// GVSolicitudesNominas.Columns[8].Visible = true;
|
||||
//}
|
||||
@@ -86,14 +86,8 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
}
|
||||
protected void LnkConsultar_Click(object sender, EventArgs e)
|
||||
{
|
||||
|
||||
|
||||
//GvResumen.DataSource = null;
|
||||
//GvDatos.DataSource = null;
|
||||
|
||||
DvDatos1.Visible = false;
|
||||
DvDatos2.Visible = false;
|
||||
|
||||
DVResumen1.Visible = false;
|
||||
DVResumen2.Visible = false;
|
||||
|
||||
@@ -103,26 +97,18 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
|
||||
if (DdlReporte.SelectedValue.ToEntero() == 1)
|
||||
{
|
||||
|
||||
DVResumen1.Visible = true;
|
||||
DVResumen2.Visible = true;
|
||||
|
||||
DvDatos1.Visible = false;
|
||||
DvDatos2.Visible = false;
|
||||
|
||||
|
||||
DvDatos2.Visible = false;
|
||||
}
|
||||
else
|
||||
{
|
||||
|
||||
DVResumen1.Visible = false;
|
||||
DVResumen2.Visible = false;
|
||||
|
||||
DvDatos1.Visible = true;
|
||||
DvDatos2.Visible = true;
|
||||
}
|
||||
|
||||
|
||||
}
|
||||
|
||||
using (ClsNominas ObjNom = new ClsNominas())
|
||||
{
|
||||
@@ -143,20 +129,12 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
|
||||
|
||||
GvResumen.DataBind();
|
||||
GvDatos.DataBind();
|
||||
|
||||
UpDatos.Update();
|
||||
UpAcciones.Update();
|
||||
|
||||
|
||||
}
|
||||
|
||||
|
||||
|
||||
private void cargasolicitudes()
|
||||
{
|
||||
LnkverificarSolicitudes.Visible = false;
|
||||
@@ -170,20 +148,14 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
{
|
||||
LnkverificarSolicitudes.Visible = true;
|
||||
}
|
||||
GVSolicitudesPendientes.DataBind();
|
||||
|
||||
|
||||
GVSolicitudesPendientes.DataBind();
|
||||
}
|
||||
|
||||
|
||||
if (nom.SolicitudesGet(-1, UsuarioActual.CveEmpresa, CveTipoSolicitud: 3, Estatus:1,Top:50))
|
||||
{
|
||||
|
||||
GVSolicitudesNominas.DataSource = nom.DtResultados;
|
||||
GVSolicitudesNominas.DataBind();
|
||||
}
|
||||
|
||||
|
||||
}
|
||||
UPModalViewSolicitudes.Update();
|
||||
}
|
||||
@@ -208,22 +180,26 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
int cveUsuarioIng = UsuarioActual.CveUsuario;
|
||||
int cveEmpresa = UsuarioActual.CveEmpresa;
|
||||
int CveSolicitudAgregada = -1;
|
||||
|
||||
int Folio = -1;
|
||||
|
||||
using (ClsNominas nom = new ClsNominas())
|
||||
{
|
||||
CveSolicitudAgregada = nom.SolicitudesAdd2(idSolicitudCFDI, idSolicitudMetadata, estatus, observaciones, fechaInicio, fechaFin, cveUsuarioIng, cveEmpresa, CveTipoSolicitud: 3);
|
||||
int CveTipoSolicitud = ChkMetaDatos.Checked ? 203 :3;
|
||||
CveSolicitudAgregada = nom.SolicitudesAdd2(idSolicitudCFDI, idSolicitudMetadata, estatus, observaciones, fechaInicio, fechaFin, cveUsuarioIng, cveEmpresa, CveTipoSolicitud: CveTipoSolicitud);
|
||||
|
||||
if(CveSolicitudAgregada > 0)
|
||||
{
|
||||
Folio = nom.FolioSolicitud;
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
if (CveSolicitudAgregada > 0)
|
||||
{
|
||||
|
||||
var api = new GeneralesAPII();
|
||||
JToken ObjApiSolicitud = (JToken)api.GeneraSolicitud(UsuarioActual.CveEmpresa, 3, CveSolicitudAgregada);
|
||||
List<string> resultSolicitud = new List<string>();
|
||||
List<string> resultVerificacion = new List<string>();
|
||||
//var ResultadoVerificaionOK = false;
|
||||
//var SeVerifico = false;
|
||||
|
||||
var TipoMensaje = ModExtensiones.TipoMensaje.MsgInformacion;
|
||||
var ResultadoSolicitudOK = false;
|
||||
|
||||
@@ -240,11 +216,20 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
|
||||
if (ResultadoSolicitudOK)
|
||||
{
|
||||
sbResultado.Append($"Solicitud registrada correctamente y solicitada a SAT.<br> Folio: { CveSolicitudAgregada}");
|
||||
sbResultado.Append($"Solicitud registrada. {resultSolicitud[1]}<br> Folio: {Folio}");
|
||||
}
|
||||
else {
|
||||
else{
|
||||
|
||||
|
||||
if(ObjApiSolicitud != null && resultSolicitud.Count == 4)
|
||||
{
|
||||
sbResultado.Append($"Solicitud registrada, pendiente de verificar en SAT <br> Folio: {Folio} <br>({resultSolicitud[1]})<br>");
|
||||
}
|
||||
else
|
||||
{
|
||||
sbResultado.Append($"Solicitud registrada, pendiente de verificar en SAT <br> Folio: {Folio}");
|
||||
}
|
||||
|
||||
sbResultado.Append($"Solicitud registrada, pendiente de verificar en SAT <br> Folio: {CveSolicitudAgregada} <br>({resultSolicitud[1] })<br>");
|
||||
TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia;
|
||||
}
|
||||
|
||||
@@ -262,18 +247,16 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
{
|
||||
txtFechaIAdd.Text = "";
|
||||
txtFechaFAdd.Text = "";
|
||||
ChkMetaDatos.Checked = false;
|
||||
this.RegistraScript("$('#ModalAgregarSolicitud').modal('hide');");
|
||||
cargasolicitudes();
|
||||
|
||||
}
|
||||
}
|
||||
|
||||
|
||||
protected void LnkverificarSolicitudes_Click(object sender, EventArgs e)
|
||||
{
|
||||
//var api = new GeneralesAPI();
|
||||
//api.GeneraSolicitud();
|
||||
//api.VerificaSolicitudesNominas();
|
||||
|
||||
|
||||
try
|
||||
{
|
||||
@@ -288,27 +271,29 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
|
||||
int CveSolicitudActual = GvRow.DataKey("CveSolicitud").ToEntero();
|
||||
string idSolicitud = GvRow.DataKey("idSolicitud").Trim();
|
||||
int CveTipoSolicitud = GvRow.DataKey("CveTipoSolicitud").ToEntero();
|
||||
int Folio = GvRow.DataKey("Folio").ToEntero();
|
||||
|
||||
|
||||
|
||||
List<string> resultSolicitud = new List<string>();
|
||||
List<string> resultVerificacion = new List<string>();
|
||||
var ResultadoVerificaionOK = false;
|
||||
var SeVerifico = false;
|
||||
var TipoMensaje = ModExtensiones.TipoMensaje.MsgInformacion;
|
||||
var ResultadoSolicitudOK = false;
|
||||
|
||||
|
||||
|
||||
var api = new GeneralesAPII();
|
||||
|
||||
|
||||
if (idSolicitud.Length == 0)
|
||||
{
|
||||
JToken ObjApiSolicitud = (JToken)api.GeneraSolicitud(UsuarioActual.CveEmpresa, 3, CveSolicitudActual);
|
||||
JToken ObjApiSolicitud = (JToken)api.GeneraSolicitud(UsuarioActual.CveEmpresa, CveTipoSolicitud, CveSolicitudActual);
|
||||
if (!(ObjApiSolicitud == null))
|
||||
{
|
||||
resultSolicitud = ObjApiSolicitud.Select(token => token.Values().Aggregate((i, j) => $"{i}|{j}").Value<string>()).ToList();
|
||||
ResultadoSolicitudOK = bool.Parse(resultSolicitud[0]);
|
||||
sbResultado.Append($"Solicitud {CveSolicitudActual} solicitada a SAT.<br>");
|
||||
sbResultado.Append($"Solicitud {Folio} solicitada a SAT.<br>");
|
||||
}
|
||||
else
|
||||
{
|
||||
@@ -331,7 +316,7 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
if (ResultadoSolicitudOK)
|
||||
{
|
||||
|
||||
JToken ObjApiVerificacion = (JToken)api.VerificaSolicitudesNominas(UsuarioActual.CveEmpresa, 3, CveSolicitudActual);
|
||||
JToken ObjApiVerificacion = (JToken)api.VerificaSolicitudesNominas(UsuarioActual.CveEmpresa, CveTipoSolicitud, CveSolicitudActual);
|
||||
|
||||
|
||||
if (!(ObjApiVerificacion == null))
|
||||
@@ -348,7 +333,16 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
}
|
||||
else
|
||||
{
|
||||
sbResultado.Append($"Solicitud pendiente de verificar en SAT <br> Folio:{CveSolicitudActual} ({resultSolicitud[1]})<br>");
|
||||
|
||||
if(resultSolicitud.Count == 4)
|
||||
{
|
||||
sbResultado.Append($"({resultSolicitud[1]})<br> Folio:{Folio} <br> ");
|
||||
}
|
||||
else
|
||||
{
|
||||
sbResultado.Append($"Solicitud pendiente de verificar en SAT <br> Folio:{Folio} <br>");
|
||||
}
|
||||
|
||||
TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia;
|
||||
}
|
||||
|
||||
@@ -357,17 +351,17 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
{
|
||||
if (ResultadoVerificaionOK)
|
||||
{
|
||||
sbResultado.Append($"Solicitud procesada.<br> Folio: {CveSolicitudActual}");
|
||||
sbResultado.Append($"Solicitud procesada.<br> Folio: {Folio} <br> {resultVerificacion[1]}");
|
||||
}
|
||||
else
|
||||
{
|
||||
sbResultado.Append($"Solicitud no verificada <br> Folio: {CveSolicitudActual}{resultVerificacion[1]}.<br>");
|
||||
sbResultado.Append($"Solicitud no verificada <br> Folio: {Folio}{resultVerificacion[1]}.<br>");
|
||||
TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia;
|
||||
}
|
||||
}
|
||||
else
|
||||
{
|
||||
sbResultado.Append($"Se presento un error al verificar la solicitud <br> Folio: {CveSolicitudActual}.");
|
||||
sbResultado.Append($"Se presento un error al verificar la solicitud <br> Folio: {Folio}.");
|
||||
TipoMensaje = ModExtensiones.TipoMensaje.MsgAdvertencia;
|
||||
}
|
||||
|
||||
@@ -395,12 +389,11 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
|
||||
txtFechaIAdd.Text = "";
|
||||
txtFechaFAdd.Text = "";
|
||||
ChkMetaDatos.Checked = false;
|
||||
UPModalViewSolicitudesAgregar.Update();
|
||||
this.RegistraScript("$('#ModalAgregarSolicitud').modal('show');");
|
||||
}
|
||||
|
||||
|
||||
|
||||
protected void GvResumen_RowDataBound(object sender, GridViewRowEventArgs e)
|
||||
{
|
||||
if(e.Row.RowType == DataControlRowType.DataRow)
|
||||
@@ -483,11 +476,11 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
LnkCFDIData.PostBackUrl = "#";
|
||||
}
|
||||
|
||||
if(e.Row.DataKey("CveVenta").ToEntero() > 0)
|
||||
{
|
||||
e.Row.Cells[1].Text = $"<a href='/Ventas/Ventas.aspx?CveVenta={e.Row.DataKey("CveVenta").ToEntero()}'class='Texto' target='_blank' >Si</a>";
|
||||
e.Row.Cells[3].Text = $"<a href='/Ventas/Ventas.aspx?CveVenta={e.Row.DataKey("CveVenta").ToEntero()}'class='Texto' target='_blank' >{e.Row.DataKey("VSerieFolio")}</a>";
|
||||
}
|
||||
//if(e.Row.DataKey("CveVenta").ToEntero() > 0)
|
||||
//{
|
||||
// e.Row.Cells[1].Text = $"<a href='/Ventas/Ventas.aspx?CveVenta={e.Row.DataKey("CveVenta").ToEntero()}'class='Texto' target='_blank' >Si</a>";
|
||||
// e.Row.Cells[3].Text = $"<a href='/Ventas/Ventas.aspx?CveVenta={e.Row.DataKey("CveVenta").ToEntero()}'class='Texto' target='_blank' >{e.Row.DataKey("VSerieFolio")}</a>";
|
||||
//}
|
||||
}
|
||||
}
|
||||
|
||||
@@ -696,8 +689,6 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
return o.Value;
|
||||
}
|
||||
|
||||
|
||||
|
||||
protected void LnkRenombrarArchivos_Click(object sender, EventArgs e)
|
||||
{
|
||||
GridViewRow GvRow = (GridViewRow)((LinkButton)sender).NamingContainer;
|
||||
@@ -707,8 +698,6 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
|
||||
}
|
||||
|
||||
|
||||
|
||||
protected void LnkCFDIData_Click(object sender, EventArgs e)
|
||||
{
|
||||
GridViewRow GvRow = (GridViewRow)((LinkButton)sender).NamingContainer;
|
||||
@@ -729,6 +718,13 @@ public partial class SAT_SolicitudesIngresoSat : ClsPaginas
|
||||
Response.TransmitFile(ArchivoXML.FullName);
|
||||
Response.End();
|
||||
}
|
||||
else
|
||||
{
|
||||
//if(UsuarioActual.CveRol == 1)
|
||||
//{
|
||||
// Alert(UrlDescargaXML);
|
||||
//}
|
||||
}
|
||||
|
||||
}
|
||||
|
||||
|
||||
@@ -689,6 +689,13 @@
|
||||
<label for="<%= DdlTipoCliente.ClientID.ToString()%>">Tipo de Cliente:</label>
|
||||
</div>
|
||||
|
||||
<div class="form-group form-md-line-input input-iconright" id="DivRepresentanteLegal" runat="server" visible="false">
|
||||
<asp:TextBox runat="server" ID="TxtRepresentanteLegal" CssClass="form-control" MaxLength="100" />
|
||||
<label for="<%= TxtRepresentanteLegal.ClientID.ToString()%>">Representante Legal:</label>
|
||||
</div>
|
||||
|
||||
|
||||
|
||||
|
||||
<div class="row">
|
||||
<div runat="server" id="DivEsDistribuidor" visible="false" class="col-md-4 form-group form-md-line-input input-iconright">
|
||||
|
||||
@@ -751,6 +751,10 @@ Partial Class Clientes
|
||||
|
||||
If UsuarioActual.Empresa.Funcionalidad(350).Contiene("1", "2") Then
|
||||
divRegimen.Visible = True
|
||||
End If
|
||||
|
||||
If UsuarioActual.CveEmpresa.Contiene(1) Or UsuarioActual.Empresa.Funcionalidad(531) = "1" Then
|
||||
DivRepresentanteLegal.Visible = True
|
||||
End If
|
||||
|
||||
If Request("CveCliente") IsNot Nothing AndAlso IsNumeric(Request("CveCliente")) AndAlso Request("CveCliente").ToEntero() > 0 Then
|
||||
@@ -1873,6 +1877,8 @@ Partial Class Clientes
|
||||
RdTipoPersona.SelectedValue = If(ObjClientes.TipoPersona, "1", "0")
|
||||
RdTipoPersona_SelectedIndexChanged(Nothing, Nothing)
|
||||
|
||||
TxtRepresentanteLegal.Text = ObjClientes.RepresentanteLegal
|
||||
|
||||
End If
|
||||
UpActivacionPortal.Update()
|
||||
UpModalPersonaFisica.Update()
|
||||
@@ -2686,7 +2692,7 @@ Partial Class Clientes
|
||||
CvePais:=DdlPais.SelectedValue.ToEntero(), CveEstado:=DdlEstado.SelectedValue.ToEntero(), CveMunicipio:=DdlMunicipio.SelectedValue.ToEntero(), CveColonia:=DdlColonia.SelectedValue.ToEntero(), CveMotivoTraslado:=IIf(DdlMotivoTraslado.SelectedValue = "-1", "0", DdlMotivoTraslado.SelectedValue).ToString().ToEntero(), NumRegIdTrib:=IIf(TxtNumRegIdTrib.Text = "", "-1", TxtNumRegIdTrib.Text).ToString(),
|
||||
ComExtEstado:=IIf(TxtComExtEstado.Text = "", "-1", TxtComExtEstado.Text).ToString(), ComExtMunicipio:=IIf(TxtComExtMunicipio.Text = "", "-1", TxtComExtMunicipio.Text).ToString(), ComExtColonia:=IIf(TxtComExtColonia.Text = "", "-1", TxtComExtColonia.Text).ToString(), RequiereOC:=ChkRequiereOC.Checked, LT:=LT, LG:=LG, EsDistribuidor:=ChkEsDistribuidor.Checked,
|
||||
TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero(), CargoUsado:=ChkCargoUsado.Checked, BonificacionUsado:=ChkBonificacionUsado.Checked, CveTipoRetencion:=DdlTipoRetencion.SelectedValue.ToEntero(), CorreoEntregaCompras:=TxtCorreoEntregaCompras.Text, CorreoEntregaAlmacen:=TxtCorreoEntregaAlmacen.Text, CveSATEstado:=DdlEstadoSAT.SelectedValue.ToEntero(), CveAdminTrayecto:=If(DdlAdminTrayecto.SelectedValue.ToEntero() <= 0, 0, DdlAdminTrayecto.SelectedValue.ToEntero()),
|
||||
CveRegimenFiscal:=DdlRegimenFiscal.SelectedValue.ToEntero, RegimenSociedad:=TxtRegimenSociedad.Text, TipoPersona:=TipoPersona) Then
|
||||
CveRegimenFiscal:=DdlRegimenFiscal.SelectedValue.ToEntero, RegimenSociedad:=TxtRegimenSociedad.Text, TipoPersona:=TipoPersona, RepresentanteLegal:=TxtRepresentanteLegal.Text) Then
|
||||
|
||||
ViewState("CveCliente") = ObjClientes.CveCliente
|
||||
|
||||
@@ -2783,7 +2789,7 @@ Partial Class Clientes
|
||||
ApellidoPaternoPF:=IIf(TxtApellidoPaterno.Text = "", "-1", TxtApellidoPaterno.Text).ToString(), ApellidoMaternoPF:=IIf(TxtApellidoMaterno.Text = "", "-1", TxtApellidoMaterno.Text).ToString(), NombresPF:=IIf(TxtNombres.Text = "", "-1", TxtNombres.Text).ToString(),
|
||||
RequiereOC:=ChkRequiereOC.Checked, LT:=LT, LG:=LG, EsDistribuidor:=ChkEsDistribuidor.Checked, TipoCliente:=DdlTipoCliente.SelectedValue.ToEntero(), CargoUsado:=ChkCargoUsado.Checked, BonificacionUsado:=ChkBonificacionUsado.Checked, CveTipoRetencion:=DdlTipoRetencion.SelectedValue.ToEntero(), CorreoEntregaCompras:=TxtCorreoEntregaCompras.Text, CorreoEntregaAlmacen:=TxtCorreoEntregaAlmacen.Text, CveSATEstado:=DdlEstadoSAT.SelectedValue.ToEntero(),
|
||||
CveAdminTrayecto:=If(DdlAdminTrayecto.SelectedValue.ToEntero() <= 0, 0, DdlAdminTrayecto.SelectedValue.ToEntero()),
|
||||
NoDesglosaIVA:=ChkNoDesglosaIVA.Checked, CveRegimenFiscal:=DdlRegimenFiscal.SelectedValue.ToEntero, RegimenSociedad:=TxtRegimenSociedad.Text, TipoPersona:=TipoPersona) Then
|
||||
NoDesglosaIVA:=ChkNoDesglosaIVA.Checked, CveRegimenFiscal:=DdlRegimenFiscal.SelectedValue.ToEntero, RegimenSociedad:=TxtRegimenSociedad.Text, TipoPersona:=TipoPersona, RepresentanteLegal:=TxtRepresentanteLegal.Text) Then
|
||||
|
||||
|
||||
ObjClientes.LimpiaImpuestosLocales(CveCliente)
|
||||
@@ -4210,8 +4216,22 @@ Partial Class Clientes
|
||||
<br />
|
||||
Gracias por la atención brindada al presente.<br /> Reciba un cordial saludo.<br />
|
||||
<br />
|
||||
<b>ESTE CORREO SE GENERO EN FORMA AUTOMATICA.</b>", TxtNombreComercial.Text, UsuarioActual.Empresa.Empresa)
|
||||
Dim Hilo As New System.Threading.Thread(Sub() MandaCorreoEstadoCuenta(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, Me.CveCliente, File, TxtCobranzaCorreo.Text, $"Estado Actual de Cartera {UsuarioActual.Empresa.Empresa}", Cuerpo, GuardarBitacora:=True))
|
||||
<b>ESTE CORREO SE GENERO EN FORMA AUTOMATICA.</b>", TxtNombreComercial.Text, UsuarioActual.Empresa.Empresa)
|
||||
|
||||
If UsuarioActual.CveEmpresa = 140 Then
|
||||
Cuerpo = String.Format("Estimado cliente <u>{0}</u>, se anexa su estado de cuenta con adeudo actual en {1}.<br />
|
||||
<br />
|
||||
Quedamos a sus ordenes para cualquier duda o aclaración: con su asesor comercial, al teléfono celular del área de Crédito y Cobranza 6624 52 99 64 o a los correos:<br /><br />
|
||||
credito@bdhbaterias.com<br />
|
||||
cobranza@bdhbaterias.com<br />
|
||||
<br />
|
||||
Gracias por la atención brindada al presente.<br />
|
||||
Reciba un cordial saludo.<br />
|
||||
<br />
|
||||
|
||||
<b>ESTE CORREO SE GENERO EN FORMA AUTOMATICA, FAVOR DE NO RESPONDERLO.</b>", TxtNombreComercial.Text, UsuarioActual.Empresa.Empresa)
|
||||
End If
|
||||
Dim Hilo As New System.Threading.Thread(Sub() MandaCorreoEstadoCuenta(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, Me.CveCliente, File, TxtCobranzaCorreo.Text, $"Estado Actual de Cartera en {UsuarioActual.Empresa.Empresa}", Cuerpo, GuardarBitacora:=True))
|
||||
Hilo.Start()
|
||||
Alert("El correo se envió con éxito", TipoMensaje.MsgInformacion)
|
||||
Catch ex As Exception
|
||||
@@ -7475,7 +7495,10 @@ Partial Class Clientes
|
||||
Tags.Add(New TagsDocumentos("{DireccionAval}", TxtDireccionAval.Text))
|
||||
Tags.Add(New TagsDocumentos("{CiudadAval}", TxtCiudadAval.Text))
|
||||
Tags.Add(New TagsDocumentos("{TelefonoAval}", TxtTelefonoAval.Text))
|
||||
|
||||
Tags.Add(New TagsDocumentos("{RepresentanteLegal}", TxtRepresentanteLegal.Text))
|
||||
|
||||
|
||||
|
||||
If Not ObjClientes.AddClientePagare(CveCliente, UsuarioActual.CveEmpresa, TxtAval.Text, TxtDireccionAval.Text) Then
|
||||
Alert("no se pudo registrar el pagare")
|
||||
Exit Sub
|
||||
|
||||
@@ -693,7 +693,7 @@
|
||||
if (textBoxes[i].value != '') {
|
||||
idd = textBoxes[i].id.replace('C_GvCxC_TxtAbonar_', '');
|
||||
Ventas = Ventas + (Importe == 0 ? '' : ', ') + $get("C_GvCxC_HplF_" + idd).innerText;
|
||||
abono = parseFloat(textBoxes[i].value.split(',').join(''));
|
||||
abono = ToDouble(textBoxes[i].value);
|
||||
moneda = $get("C_GvCxC_LtlMoneda_" + idd).innerText;
|
||||
|
||||
if (monedaPago == 1 && moneda == 'USD') {
|
||||
@@ -708,7 +708,7 @@
|
||||
}
|
||||
if (textBoxes[i].id.indexOf('C_GvCxC_TxtComision') >= 0) {
|
||||
if (textBoxes[i].value != '') {
|
||||
abonoComision = parseFloat(textBoxes[i].value.split(',').join(''));
|
||||
abonoComision = ToDouble(textBoxes[i].value);
|
||||
moneda = $get("C_GvCxC_LtlMoneda_" + idd).innerText;
|
||||
if (monedaPago == 1 && moneda == 'USD') {
|
||||
facDolares = true
|
||||
@@ -954,6 +954,7 @@
|
||||
|
||||
let Total = 0.0;
|
||||
let Anticipos = 0.0;
|
||||
debugger;
|
||||
|
||||
$( ClsSelLiqVenta).each(function () {
|
||||
|
||||
@@ -966,11 +967,10 @@
|
||||
|
||||
});
|
||||
|
||||
Total = Total + Anticipos;
|
||||
|
||||
Total = Total + Anticipos;
|
||||
|
||||
$(ClsSelLiqVentaTotal).each(function () {
|
||||
$(this).val(Total);
|
||||
$(this).val(Total.toFixed(2));
|
||||
FormatoMoneda2($(this));
|
||||
});
|
||||
|
||||
@@ -979,6 +979,7 @@
|
||||
var Suma = SumaValores(pagoMultiple, monedaPago);
|
||||
$get('TxtImporte').value = FormatoNumero(Suma, 2);
|
||||
|
||||
|
||||
}
|
||||
|
||||
function disablekeys()
|
||||
|
||||
@@ -1070,8 +1070,10 @@ Partial Class Ventas_ClientesAbonar
|
||||
|
||||
If gvr.FCDropDownList("DdlAnti").SelectedValue.ToEntero > 0 Then
|
||||
Dim TCP As Decimal = 0
|
||||
Dim FolioPago As String = " "
|
||||
If DtIngresos IsNot Nothing Then
|
||||
TCP = DtIngresos.FiltroPrimeroValor("TipoCambio", String.Format("CveIE={0}", gvr.FCDropDownList("DdlAnti").SelectedValue))
|
||||
FolioPago = DtIngresos.FiltroPrimeroValor("Folio", String.Format("CveIE={0}", gvr.FCDropDownList("DdlAnti2").SelectedValue))
|
||||
Dim tTCPFecha As Date = DtIngresos.FiltroPrimeroValor("FechaDocumento", String.Format("CveIE={0}", gvr.FCDropDownList("DdlAnti").SelectedValue)).ToDate
|
||||
'considera fluctuación
|
||||
If UsuarioActual.Empresa.Funcionalidad(703) = "1" AndAlso UltimaFluctuacion IsNot Nothing Then
|
||||
@@ -1083,13 +1085,15 @@ Partial Class Ventas_ClientesAbonar
|
||||
End If
|
||||
'se calcula la fluctuación de la aplicación del anticipo, para sumarla en el concepto de fluctuación más abajo
|
||||
FluctuacionAnticipo = ((TCP - tipoCambioVentaValuacion) * gvr.FCTextBox("TxtAmort").Text.ToDecimal).RoundSQL
|
||||
MsgError = RegistraAmortizacionAnticipo(ObjMov, CvePrePoliza, gvr.FCDropDownList("DdlAnti").SelectedValue.ToEntero, gvr.FCTextBox("TxtAmort").Text.ToDecimal, TCP, tipoCambioVentaValuacion, gvr.DataKey("SerieFolio").ToString)
|
||||
MsgError = RegistraAmortizacionAnticipo(ObjMov, CvePrePoliza, gvr.FCDropDownList("DdlAnti").SelectedValue.ToEntero, gvr.FCTextBox("TxtAmort").Text.ToDecimal, TCP, tipoCambioVentaValuacion, gvr.DataKey("CveVenta").ToEntero, gvr.DataKey("SerieFolio").ToString, FolioPago)
|
||||
End If
|
||||
|
||||
If gvr.FCDropDownList("DdlAnti2").SelectedValue.ToEntero > 0 Then
|
||||
Dim TCP As Decimal = 0
|
||||
Dim FolioPago As String = " "
|
||||
If DtIngresos IsNot Nothing Then
|
||||
TCP = DtIngresos.FiltroPrimeroValor("TipoCambio", String.Format("CveIE={0}", gvr.FCDropDownList("DdlAnti2").SelectedValue))
|
||||
FolioPago = DtIngresos.FiltroPrimeroValor("Folio", String.Format("CveIE={0}", gvr.FCDropDownList("DdlAnti2").SelectedValue))
|
||||
Dim tTCPFecha As Date = DtIngresos.FiltroPrimeroValor("FechaDocumento", String.Format("CveIE={0}", gvr.FCDropDownList("DdlAnti2").SelectedValue)).ToDate
|
||||
'considera fluctuación
|
||||
If UsuarioActual.Empresa.Funcionalidad(703) = "1" AndAlso UltimaFluctuacion IsNot Nothing Then
|
||||
@@ -1102,7 +1106,7 @@ Partial Class Ventas_ClientesAbonar
|
||||
End If
|
||||
'se calcula la fluctuación de la aplicación del anticipo, para sumarla en el concepto de fluctuación más abajo
|
||||
FluctuacionAnticipo += ((TCP - tipoCambioVentaValuacion) * gvr.FCTextBox("TxtAmort2").Text.ToDecimal).RoundSQL
|
||||
MsgError = RegistraAmortizacionAnticipo(ObjMov, CvePrePoliza, gvr.FCDropDownList("DdlAnti2").SelectedValue.ToEntero, gvr.FCTextBox("TxtAmort2").Text.ToDecimal, TCP, tipoCambioVentaValuacion, gvr.DataKey("SerieFolio").ToString)
|
||||
MsgError = RegistraAmortizacionAnticipo(ObjMov, CvePrePoliza, gvr.FCDropDownList("DdlAnti2").SelectedValue.ToEntero, gvr.FCTextBox("TxtAmort2").Text.ToDecimal, TCP, tipoCambioVentaValuacion, gvr.DataKey("CveVenta").ToEntero, gvr.DataKey("SerieFolio").ToString, FolioPago)
|
||||
End If
|
||||
|
||||
End If
|
||||
@@ -1500,7 +1504,7 @@ Partial Class Ventas_ClientesAbonar
|
||||
|
||||
If RblTipoPago.SelectedValue = "3" AndAlso MsgError = "" Then
|
||||
|
||||
MsgError = RegistraAmortizacionAnticipo(ObjMov, CvePrePoliza, CveIE, TxtImporte.Text.ToDecimal, tipoCambioPago, tipoCambioVenta, TxtObservaciones.Text)
|
||||
MsgError = RegistraAmortizacionAnticipo(ObjMov, CvePrePoliza, CveIE, TxtImporte.Text.ToDecimal, tipoCambioPago, tipoCambioVenta, -1, TxtObservaciones.Text, DdlIngreso.SelectedItem.Text)
|
||||
|
||||
End If
|
||||
|
||||
@@ -1696,33 +1700,21 @@ Partial Class Ventas_ClientesAbonar
|
||||
|
||||
End Sub
|
||||
|
||||
Private Function RegistraAmortizacionAnticipo(ByRef ObjMov As ClsContabilidad, CvePrePoliza As Integer, CveIE As Integer, Importe As Decimal, tipoCambioPago As Decimal, tipoCambioVenta As Decimal, Referencia As String) As String
|
||||
Private Function RegistraAmortizacionAnticipo(ByRef ObjMov As ClsContabilidad, CvePrePoliza As Integer, CveIE As Integer, Importe As Decimal, tipoCambioPago As Decimal, tipoCambioVenta As Decimal, CveVenta As Integer, ReferenciaVenta As String, ReferenciaPago As String) As String
|
||||
Dim MsgError As String = ""
|
||||
If CveMonedaPago = 2 Then
|
||||
'rmf faltan las cuentas
|
||||
|
||||
'If CveMonedaPago = 2 AndAlso CveMonedaFiltro = 1 Then 'Si la venta viene en pesos y se va a pagar en DOLARES
|
||||
' tipoCambioPago = TxtTCDolares.Text.ToDecimal
|
||||
'ElseIf CveMonedaPago = 2 AndAlso CveMonedaFiltro = 2 Then
|
||||
' tipoCambioPago = TxtTCDolaresDolares.Text.ToDecimal
|
||||
'End If
|
||||
|
||||
If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, False, Importe, TxtObservaciones.Text, 92, Referencia, TxtFechaDocumento.Text, IdCtaContMonedaExtranjeraAnticipo, -1, CveIE, -1, -1, -1, CveCliente, ImporteMX:=Importe, TipoCambio:=tipoCambioPago, TipoCambioPago:=tipoCambioPago) Then
|
||||
If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, False, Importe, ReferenciaVenta, 92, ReferenciaVenta, TxtFechaDocumento.Text, IdCtaContMonedaExtranjeraAnticipo, -1, CveIE, CveCliente:=CveCliente, ImporteMX:=Importe, CveVenta:=CveVenta, TipoCambio:=tipoCambioPago, TipoCambioPago:=tipoCambioPago) Then
|
||||
MsgError = "No se pudo insertar la póliza"
|
||||
End If
|
||||
|
||||
If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, False, If(CveMoneda = 1 AndAlso TxtTC.Visible, Importe / TxtTC.Text.ToDecimal, Importe), Referencia, 227, TxtObservaciones.Text + If(TxtTC.Visible, $" TC:{TxtTC.Text}", If(CveMoneda = 2, $" TC:{tipoCambioPago}", "")), TxtFechaDocumento.Text, IdCtaContMonedaComplementariaAnticipo, -1, CveIE, -1, -1, -1, ViewState("CveCliente").ToString.ToEntero, ImporteMX:=If(CveMoneda = 2, (Importe * tipoCambioPago) - Importe, Importe), ImporteME:=If(CveMoneda = 2, Importe, 0), TipoCambio:=tipoCambioPago, TipoCambioPago:=tipoCambioPago) Then
|
||||
If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, False, If(CveMoneda = 1 AndAlso TxtTC.Visible, Importe / TxtTC.Text.ToDecimal, Importe), ReferenciaVenta, 227, TxtObservaciones.Text + If(TxtTC.Visible, $" TC:{TxtTC.Text}", If(CveMoneda = 2, $" TC:{tipoCambioPago}", "")), TxtFechaDocumento.Text, IdCtaContMonedaComplementariaAnticipo, -1, CveIE, CveCliente:=ViewState("CveCliente").ToString.ToEntero, ImporteMX:=If(CveMoneda = 2, (Importe * tipoCambioPago) - Importe, Importe), ImporteME:=If(CveMoneda = 2, Importe, 0), CveVenta:=CveVenta, TipoCambio:=tipoCambioPago, TipoCambioPago:=tipoCambioPago) Then
|
||||
MsgError = "No se pudo insertar la póliza"
|
||||
End If
|
||||
|
||||
Else
|
||||
'If CveMoneda = 2 AndAlso CveMonedaFiltro = 1 Then 'Si la venta viene en pesos y se va a pagar en DOLARES
|
||||
' tipoCambioPago = TxtTCDolares.Text.ToDecimal
|
||||
'ElseIf CveMoneda = 2 AndAlso CveMonedaFiltro = 2 Then
|
||||
' tipoCambioPago = TxtTCDolaresDolares.Text.ToDecimal
|
||||
'End If
|
||||
|
||||
If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, False, Importe, TxtObservaciones.Text, 92, TxtObservaciones.Text + If(CveMoneda = 2, $" TC:{tipoCambioPago}", ""), TxtFechaDocumento.Text, IdCtaAnticipo, -1, CveIE, -1, -1, -1, ViewState("CveCliente").ToString.ToEntero, ImporteMX:=If(CveMoneda = 2, Importe * tipoCambioPago, Importe), ImporteME:=If(CveMoneda = 2, Importe, 0), TipoCambio:=tipoCambioPago, TipoCambioPago:=tipoCambioPago) Then
|
||||
If Not ObjMov.AddPrePolizasDetalle(CvePrePoliza, False, Importe, ReferenciaVenta, 92, ReferenciaVenta, TxtFechaDocumento.Text, IdCtaAnticipo, -1, CveIE, CveCliente:=ViewState("CveCliente").ToString.ToEntero, ImporteMX:=If(CveMoneda = 2, Importe * tipoCambioPago, Importe), ImporteME:=If(CveMoneda = 2, Importe, 0), CveVenta:=CveVenta, TipoCambio:=tipoCambioPago, TipoCambioPago:=tipoCambioPago) Then
|
||||
MsgError = "No se pudo insertar la póliza"
|
||||
End If
|
||||
End If
|
||||
|
||||
@@ -182,6 +182,9 @@ Partial Class Ventas_RepProductosServiciosDetalle
|
||||
End Sub
|
||||
|
||||
Private Sub SetValues()
|
||||
txtFechaI.Text = Now.ToShortDateString
|
||||
txtFechaF.Text = Now.ToShortDateString
|
||||
|
||||
'Cargo Proyectos
|
||||
DdlProyecto.DataSource = GlobalDTProyectosUsuarios(UsuarioActual.CveUsuario, -1, UsuarioActual.CveEmpresa, -1)
|
||||
DdlProyecto.DataBind()
|
||||
|
||||
@@ -4426,7 +4426,7 @@ Partial Class Ventas
|
||||
End If
|
||||
|
||||
If DbRowVenta IsNot Nothing Then
|
||||
If ObjVentas.GetVentasRelacionadas(CveVenta, UsuarioActual.CveEmpresa) Then
|
||||
If ObjVentas.GetVentasRelacionadas(CveVenta, 1, UsuarioActual.CveEmpresa) Then
|
||||
DtAntRelacionados = ObjVentas.DtResultados.FiltraParametros("TipoDocto IN ('Ing','Ant','Egs','Dev')")
|
||||
End If
|
||||
|
||||
@@ -9443,6 +9443,8 @@ Partial Class Ventas
|
||||
'ContPAQ El movimiento 1 es el de Venta
|
||||
Dim AutoConta As Boolean = UsuarioActual.Empresa.Funcionalidad(200) = "1"
|
||||
|
||||
AutoConta = AutocontaMatriz(AutoConta)
|
||||
|
||||
If UsuarioActual.CveEmpresa = 119 AndAlso DdlTipoComprobante.SelectedValue.Contiene("Ant", "Rem", "RNC", "Cot", "Ped", "Pd2", "PA", "Egs", "Dev") Then
|
||||
AutoConta = False
|
||||
End If
|
||||
@@ -12983,7 +12985,11 @@ Partial Class Ventas
|
||||
If ObjFactura.CveMoneda = 2 AndAlso ObjFactura.TipoCambio > 0 Then
|
||||
tipoCambio = ObjFactura.TipoCambio
|
||||
ElseIf ObjFactura.CveMoneda = 2 AndAlso ObjFactura.TipoCambio <= 1 Then
|
||||
tipoCambio = GlobalTipoCambio(ObjFactura.Fecha).ToString().ToDecimal
|
||||
If UsuarioActual.CveEmpresa.Contiene(13, 83) Then
|
||||
tipoCambio = GlobalTipoCambio(ObjFactura.Fecha.AddDays(-1)).ToString().ToDecimal
|
||||
Else
|
||||
tipoCambio = GlobalTipoCambio(ObjFactura.Fecha).ToString().ToDecimal
|
||||
End If
|
||||
Else
|
||||
tipoCambio = 1
|
||||
End If
|
||||
@@ -13194,7 +13200,13 @@ Partial Class Ventas
|
||||
If tipoCambio > 1 Then
|
||||
TipoCambioNC = tipoCambio
|
||||
Else
|
||||
TipoCambioNC = GlobalTipoCambio(TxtFecha.Text.ToDate).ToDecimal
|
||||
|
||||
If UsuarioActual.CveEmpresa.Contiene(13, 83) Then
|
||||
TipoCambioNC = GlobalTipoCambio(TxtFecha.Text.ToDate.AddDays(-1)).ToDecimal
|
||||
Else
|
||||
TipoCambioNC = GlobalTipoCambio(TxtFecha.Text.ToDate).ToDecimal
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
'APLICA NC SALDOS DIRECTOS
|
||||
@@ -13228,7 +13240,11 @@ Partial Class Ventas
|
||||
|
||||
Dim TCFluctuacion As Decimal = Dr("TCCambioValuacion").ToString().ToDecimal
|
||||
If TCFluctuacion = 1 AndAlso TipoCambioNC > 1 Then
|
||||
TCFluctuacion = GlobalTipoCambio(TxtFecha.Text.ToDate).ToDecimal
|
||||
If UsuarioActual.CveEmpresa.Contiene(13, 83) Then
|
||||
TCFluctuacion = GlobalTipoCambio(TxtFecha.Text.ToDate.AddDays(-1)).ToDecimal
|
||||
Else
|
||||
TCFluctuacion = GlobalTipoCambio(TxtFecha.Text.ToDate).ToDecimal
|
||||
End If
|
||||
End If
|
||||
|
||||
If DdlMoneda.SelectedValue.ToEntero() = 2 AndAlso Not Dr("TCCambioValuacion").ToString().ToDecimal > 1 Then
|
||||
@@ -13299,8 +13315,13 @@ Partial Class Ventas
|
||||
|
||||
'SI LA NC ES EN DOLARES Y PERO VIENE DE UN ANTICIPO EN PESOS
|
||||
If (Not UsuarioActual.CveEmpresa.Contiene(72, 80, 146)) AndAlso ObjFactura.CveMoneda = 2 Then
|
||||
|
||||
Dim tipoCambioAnticipo = GlobalTipoCambio(row2.DataKey("Fecha").ToString().ToDate).ToDecimal
|
||||
|
||||
If UsuarioActual.CveEmpresa.Contiene(13, 83) Then
|
||||
tipoCambioAnticipo = GlobalTipoCambio(row2.DataKey("Fecha").ToString().ToDate.AddDays(-1)).ToDecimal
|
||||
End If
|
||||
|
||||
If row2.DataKey("CveMoneda").ToString.ToEntero = 2 Then
|
||||
IdCtaContable = IdCtaContAnticiposExtranjera
|
||||
End If
|
||||
@@ -14836,7 +14857,11 @@ Partial Class Ventas
|
||||
If ObjFactura.CveMoneda = 2 AndAlso ObjFactura.TipoCambio > 0 Then
|
||||
tipoCambio = Factura.TipoCambio
|
||||
ElseIf ObjFactura.CveMoneda = 2 AndAlso ObjFactura.TipoCambio <= 1 Then
|
||||
tipoCambio = GlobalTipoCambio(Factura.Fecha).ToString().ToDecimal
|
||||
If UsuarioActual.CveEmpresa.Contiene(13, 83) Then
|
||||
tipoCambio = GlobalTipoCambio(Factura.Fecha.AddDays(-1)).ToString().ToDecimal
|
||||
Else
|
||||
tipoCambio = GlobalTipoCambio(Factura.Fecha).ToString().ToDecimal
|
||||
End If
|
||||
Else
|
||||
tipoCambio = 1
|
||||
End If
|
||||
@@ -15523,6 +15548,7 @@ Partial Class Ventas
|
||||
|
||||
Dim UltimaFluctuacion As MTipoCambioFluctuacion = GlobalTipoCambioUltimaFluctuacion(tFecha)
|
||||
|
||||
|
||||
If UsuarioActual.Empresa.Funcionalidad(703) = "1" AndAlso UltimaFluctuacion IsNot Nothing Then
|
||||
If UltimaFluctuacion.FechaFluctuacion <= tFecha Then
|
||||
FechaUltimaFluctuacion = UltimaFluctuacion.FechaFluctuacion
|
||||
@@ -20252,6 +20278,8 @@ Partial Class Ventas
|
||||
If GenerarPrePolizaNueva Then
|
||||
Dim AutoConta As Boolean = UsuarioActual.Empresa.Funcionalidad(200) = "1"
|
||||
|
||||
AutoConta = AutocontaMatriz(AutoConta)
|
||||
|
||||
If UsuarioActual.CveEmpresa = 119 AndAlso DdlTipoComprobante.SelectedValue.Contiene("Ant", "Rem", "RNC", "Cot", "Ped", "Pd2", "PA", "Egs", "Dev") Then
|
||||
AutoConta = False
|
||||
End If
|
||||
@@ -21654,11 +21682,20 @@ Partial Class Ventas
|
||||
ChkConvertirDolares.Enabled = Not UsuarioActual.TienePermisoProceso(324)
|
||||
Case "2"
|
||||
TxtTipoCambioDlls.Text = "1"
|
||||
TxtTipoCambio.Text = GlobalTipoCambio(TxtFecha.Text.ToDate).ToString()
|
||||
If UsuarioActual.CveEmpresa.Contiene(13, 83) Then
|
||||
TxtTipoCambio.Text = GlobalTipoCambio(TxtFecha.Text.ToDate.AddDays(-1)).ToString()
|
||||
Else
|
||||
TxtTipoCambio.Text = GlobalTipoCambio(TxtFecha.Text.ToDate).ToString()
|
||||
End If
|
||||
TrConversionTipoCambio.Visible = True
|
||||
ChkConvertirDoctoPesos.Enabled = Not UsuarioActual.TienePermisoProceso(324)
|
||||
|
||||
Case Else
|
||||
TxtTipoCambio.Text = GlobalTipoCambio(TxtFecha.Text.ToDate).ToString()
|
||||
If UsuarioActual.CveEmpresa.Contiene(13, 83) Then
|
||||
TxtTipoCambio.Text = GlobalTipoCambio(TxtFecha.Text.ToDate.AddDays(-1)).ToString()
|
||||
Else
|
||||
TxtTipoCambio.Text = GlobalTipoCambio(TxtFecha.Text.ToDate).ToString()
|
||||
End If
|
||||
TrConversionTipoCambio.Visible = True
|
||||
End Select
|
||||
|
||||
@@ -28059,8 +28096,16 @@ Partial Class Ventas
|
||||
|
||||
'verifica el tipo de cambio que se actualice
|
||||
If DdlMoneda.SelectedValue <> "1" Then
|
||||
TxtTipoCambio.Text = GlobalTipoCambio(Now).ToString()
|
||||
|
||||
|
||||
If UsuarioActual.CveEmpresa.Contiene(13, 83) Then
|
||||
TxtTipoCambio.Text = GlobalTipoCambio(Now.AddDays(-1)).ToString()
|
||||
Else
|
||||
TxtTipoCambio.Text = GlobalTipoCambio(Now).ToString()
|
||||
End If
|
||||
|
||||
End If
|
||||
|
||||
Else
|
||||
If DdlTipoComprobante.SelectedValue = "Ant" Then CveAnticipo = CveVenta
|
||||
|
||||
@@ -28146,7 +28191,13 @@ Partial Class Ventas
|
||||
|
||||
'verifica el tipo de cambio que se actualice
|
||||
If DdlMoneda.SelectedValue <> "1" Then
|
||||
TxtTipoCambio.Text = GlobalTipoCambio(Now).ToString()
|
||||
|
||||
If UsuarioActual.CveEmpresa.Contiene(13, 83) Then
|
||||
TxtTipoCambio.Text = GlobalTipoCambio(Now.AddDays(-1)).ToString()
|
||||
Else
|
||||
TxtTipoCambio.Text = GlobalTipoCambio(Now).ToString()
|
||||
End If
|
||||
|
||||
End If
|
||||
LblTCValuacion.Visible = False
|
||||
UpPS.Update()
|
||||
@@ -29254,7 +29305,13 @@ Partial Class Ventas
|
||||
TipoCambioFactura = 1
|
||||
End If
|
||||
|
||||
TxtTipoCambio.Text = GlobalTipoCambio(Now).ToString()
|
||||
|
||||
If UsuarioActual.CveEmpresa.Contiene(13, 83) Then
|
||||
TxtTipoCambio.Text = GlobalTipoCambio(Now.AddDays(-1)).ToString()
|
||||
Else
|
||||
TxtTipoCambio.Text = GlobalTipoCambio(Now).ToString()
|
||||
End If
|
||||
|
||||
DivEstatusFac.Visible = False
|
||||
|
||||
'REINICIALIZA TABS
|
||||
@@ -35139,5 +35196,27 @@ Partial Class Ventas
|
||||
Alert(sb.ToString(), TipoMensaje.MsgInformacion)
|
||||
|
||||
End Sub
|
||||
|
||||
|
||||
Private Function AutocontaMatriz(AutoConta As Boolean) As Boolean
|
||||
Dim Respuesta As Boolean = False
|
||||
|
||||
If UsuarioActual.CveEmpresa.Contiene(13, 83) Then
|
||||
Dim DTSubproyectoActual As DataTable = GlobalDTSubProyectos(-1, DdlSubProyectoDatos.SelectedValue.ToEntero)
|
||||
|
||||
If (DTSubproyectoActual.Rows(0)("TipoSucursal").ToString.ToEntero = 1) Then
|
||||
Respuesta = True
|
||||
Else
|
||||
Respuesta = False
|
||||
End If
|
||||
|
||||
Else
|
||||
Respuesta = AutoConta
|
||||
End If
|
||||
|
||||
Return Respuesta
|
||||
|
||||
End Function
|
||||
|
||||
End Class
|
||||
|
||||
|
||||
Reference in New Issue
Block a user