This commit is contained in:
2022-02-01 17:57:15 -07:00
28 changed files with 8262 additions and 681 deletions

View File

@@ -33,6 +33,13 @@ Public Class CFDITimbre
End Get End Get
End Property End Property
Public ReadOnly Property AplicaImpuestosTraslados As Boolean 'detecte si va la etiqueta de impuestos, aunque sea en cero
Get
Return (From c In Conceptos
Select c.Impuestos.Where(Function(tra) tra.TrasladooRetencion = "T" And tra.TipoFactor = "Tasa")).Count() > 0
End Get
End Property
Public ReadOnly Property Retenciones As List(Of CFDIRetenciones) Public ReadOnly Property Retenciones As List(Of CFDIRetenciones)
Get Get
Dim tRetorno As New List(Of CFDIRetenciones) Dim tRetorno As New List(Of CFDIRetenciones)
@@ -272,8 +279,8 @@ End Class
Public Class CFDIReceptor Public Class CFDIReceptor
Public Property RFC As String Public Property RFC As String
Public Property Nombre As String Public Property Nombre As String
Public Property RegimenFiscalReceptor As String = "601" Public Property RegimenFiscalReceptor As String = ""
Public Property DomicilioFiscalReceptor As String = "601" Public Property DomicilioFiscalReceptor As String = ""
Public Property ResidenciaFiscal As String = "" Public Property ResidenciaFiscal As String = ""
Public Property NumeroRegistroTributario As String = "" Public Property NumeroRegistroTributario As String = ""
Public Property UsoCFDI As String Public Property UsoCFDI As String

View File

@@ -125,6 +125,7 @@ Public Class ClsClientes
Public Property Celular As String Public Property Celular As String
Public Property ExtOtros As String Public Property ExtOtros As String
Public Property CveUsoCFDI As Integer Public Property CveUsoCFDI As Integer
Public Property CveRegimenFiscal As Integer
Public Property CveFormaPago33 As Integer Public Property CveFormaPago33 As Integer
Public Property CveMetodoPago33 As Integer Public Property CveMetodoPago33 As Integer
Public Property CveClienteCorporativo As String Public Property CveClienteCorporativo As String
@@ -384,6 +385,8 @@ Public Class ClsClientes
_CveFormaPago33 = Data(0)("CveFormaPago33").ToString.ToEntero _CveFormaPago33 = Data(0)("CveFormaPago33").ToString.ToEntero
_CveMetodoPago33 = Data(0)("CveMetodoPago33").ToString.ToEntero _CveMetodoPago33 = Data(0)("CveMetodoPago33").ToString.ToEntero
_CveRegimenFiscal = Data(0)("CveRegimenFiscal").ToString.ToEntero
_CveClienteCorporativo = Data(0)("CveClienteCorporativo").ToString _CveClienteCorporativo = Data(0)("CveClienteCorporativo").ToString
_DesglosaIEPS = CType(Data(0)("DesglosaIEPS"), Boolean) _DesglosaIEPS = CType(Data(0)("DesglosaIEPS"), Boolean)
_NoDesglosaIVA = CType(Data(0)("NoDesglosaIVA"), Boolean) _NoDesglosaIVA = CType(Data(0)("NoDesglosaIVA"), Boolean)
@@ -573,7 +576,7 @@ 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 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 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 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) 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) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
@@ -714,7 +717,7 @@ Public Class ClsClientes
.Add("@CveSATEstado", SqlDbType.Int).Value = CveSATEstado .Add("@CveSATEstado", SqlDbType.Int).Value = CveSATEstado
.Add("@CveAdminTrayecto", SqlDbType.TinyInt).Value = CveAdminTrayecto .Add("@CveAdminTrayecto", SqlDbType.TinyInt).Value = CveAdminTrayecto
.Add("@CveRegimenFiscal", SqlDbType.TinyInt).Value = CveRegimenFiscal
End With End With
Try Try
@@ -763,7 +766,7 @@ 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 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 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 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) As Boolean Optional CveSATEstado As Integer = -1, Optional CveAdminTrayecto As Integer = -1, Optional NoDesglosaIVA As Boolean = False, Optional CveRegimenFiscal As Integer = 0) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
@@ -920,6 +923,7 @@ Public Class ClsClientes
.Add("@CveSATEstado", SqlDbType.Int).Value = CveSATEstado .Add("@CveSATEstado", SqlDbType.Int).Value = CveSATEstado
.Add("@CveAdminTrayecto", SqlDbType.TinyInt).Value = CveAdminTrayecto .Add("@CveAdminTrayecto", SqlDbType.TinyInt).Value = CveAdminTrayecto
.Add("@CveRegimenFiscal", SqlDbType.TinyInt).Value = CveRegimenFiscal
End With End With
Try Try

View File

@@ -73,6 +73,8 @@ Public Class ClsContabilidad
Public Property YaEstabaUnifida As Boolean = False Public Property YaEstabaUnifida As Boolean = False
Public Property EstaContabilizada As Boolean = False Public Property EstaContabilizada As Boolean = False
Public Property FolioPoliza As Integer
#End Region #End Region
Public Function IniciaTransacSQL() As SqlTransaction Public Function IniciaTransacSQL() As SqlTransaction
@@ -191,8 +193,9 @@ Public Class ClsContabilidad
Return Retorno Return Retorno
End Function End Function
Public Function AddPrePolizas(Modulo As String, CvePlantillaPoliza As Integer, Cargos As Double, Abonos As Double, CveMoneda As Integer, Fecha As Date, Concepto As String, CveUsuario As Integer, CveEmpresa As Integer, Optional FolioFijo As Integer = 0, Optional ReglaFolioPoliza As String = "", Optional CveTipoPoliza As Integer = -1) As Integer Public Function AddPrePolizas(Modulo As String, CvePlantillaPoliza As Integer, Cargos As Double, Abonos As Double, CveMoneda As Integer, Fecha As Date, Concepto As String, CveUsuario As Integer, CveEmpresa As Integer, Optional FolioFijo As Integer = 0, Optional ReglaFolioPoliza As String = "", Optional CveTipoPoliza As Integer = -1,
Optional AgregarFolio As Boolean = False) As Integer
FolioPoliza = -1
Dim Retorno As Integer = -1 Dim Retorno As Integer = -1
DataAdapter("PA_Conta_PrePolizasAdd") DataAdapter("PA_Conta_PrePolizasAdd")
@@ -210,12 +213,16 @@ Public Class ClsContabilidad
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
.Add("@FolioFijo", SqlDbType.Int).Value = FolioFijo .Add("@FolioFijo", SqlDbType.Int).Value = FolioFijo
.Add("@CvePrePoliza", SqlDbType.Int).Direction = ParameterDirection.Output .Add("@CvePrePoliza", SqlDbType.Int).Direction = ParameterDirection.Output
.Add("@FolioPoliza", SqlDbType.Int).Direction = ParameterDirection.Output
.Add("@ReglaFolioPoliza", SqlDbType.VarChar).Value = ReglaFolioPoliza .Add("@ReglaFolioPoliza", SqlDbType.VarChar).Value = ReglaFolioPoliza
.Add("@AgregarFolio", SqlDbType.Bit).Value = AgregarFolio
End With End With
Try Try
SqlAdapter.Fill(Data) SqlAdapter.Fill(Data)
Retorno = SqlAdapter.SelectCommand.Parameters("@CvePrePoliza").Value.ToString.ToEntero Retorno = SqlAdapter.SelectCommand.Parameters("@CvePrePoliza").Value.ToString.ToEntero
FolioPoliza = SqlAdapter.SelectCommand.Parameters("@FolioPoliza").Value.ToString.ToEntero
Catch ex As Exception Catch ex As Exception
If ex.Message.Contains("50015;") Then If ex.Message.Contains("50015;") Then

View File

@@ -2947,6 +2947,24 @@ Public Class ClsGenerales
Return Retorno Return Retorno
End Function End Function
Public Function GetSATObjetoImpuesto() As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Gral_SAT_ObjetosImpuestos")
Try
SqlAdapter.Fill(Data)
If Data.Rows.Count > 0 Then
Retorno = True
End If
Catch ex As Exception
OnError("Ocurrió un error al obtener los objetos de impuestos.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
#Region "P A Q U E T E R I A S G U I A S" #Region "P A Q U E T E R I A S G U I A S"
Public Function AddPaqueteriasGuias(CvePaqueteria As Integer, CvePaqueteriaGuiaTipo As Integer, CveEstatus As Integer, CveSubProyecto As Integer, Fecha As String, Rastreo As String, Guia As String, NumCajas As Integer, Public Function AddPaqueteriasGuias(CvePaqueteria As Integer, CvePaqueteriaGuiaTipo As Integer, CveEstatus As Integer, CveSubProyecto As Integer, Fecha As String, Rastreo As String, Guia As String, NumCajas As Integer,
Peso As Double, Dimensiones As String, FechaEstimada As String, Observaciones As String, CveUsuario As Integer, CveEmpresa As Integer, Optional ImplicaCosto As Boolean = True, Peso As Double, Dimensiones As String, FechaEstimada As String, Observaciones As String, CveUsuario As Integer, CveEmpresa As Integer, Optional ImplicaCosto As Boolean = True,

View File

@@ -716,6 +716,23 @@ Public Class ClsPaginas
Application("GlobalDTNomSatRegimenContratacion") = value Application("GlobalDTNomSatRegimenContratacion") = value
End Set End Set
End Property End Property
Property GlobalDTRegimenesFiscales() As DataTable
Get
Dim AppNombre As String = String.Format("GlobalDTRegimenesFiscales")
'sino existe, recarga los datos
If Application(AppNombre) Is Nothing Then
Dim ObjGral As New ClsSisEmpresas
If ObjGral.GetRegimenFiscal(-1) Then Application(AppNombre) = ObjGral.DtResultados
ObjGral.Dispose()
End If
GlobalDTRegimenesFiscales = DirectCast(Application(AppNombre), DataTable)
End Get
Set(value As DataTable)
Dim AppNombre As String = String.Format("GlobalDTRegimenesFiscales")
Application(AppNombre) = value
End Set
End Property
Property GlobalDTNomSatRiesgoPuesto() As DataTable Property GlobalDTNomSatRiesgoPuesto() As DataTable
Get Get
GlobalDTNomSatRiesgoPuesto = DirectCast(Application("GlobalDTNomSatRiesgoPuesto"), DataTable) GlobalDTNomSatRiesgoPuesto = DirectCast(Application("GlobalDTNomSatRiesgoPuesto"), DataTable)
@@ -1170,6 +1187,25 @@ Public Class ClsPaginas
End Set End Set
End Property End Property
Public Shared Property GlobalDTSATObjetosImpuestos() As DataTable
Get
Dim AppNombre As String = "GlobalDTSATObjetosImpuestos"
If HttpContext.Current.Application(AppNombre) Is Nothing Then
Dim ObjGral As New ClsGenerales()
If ObjGral.GetSATObjetoImpuesto() Then
HttpContext.Current.Application(AppNombre) = ObjGral.DtResultados
End If
ObjGral.Dispose()
End If
Return CType(HttpContext.Current.Application(AppNombre), DataTable)
End Get
Set(value As DataTable)
Dim AppNombre As String = "GlobalDTSATObjetosImpuestos"
HttpContext.Current.Application(AppNombre) = value
End Set
End Property
Public Shared Property GlobalDTMotivosCancelacionEmpresa(CveEmpresa As Integer, Optional CveMotivoCancelacion As Integer = -1, Optional CveSATMotivoCancelacion As Integer = -1) As DataTable Public Shared Property GlobalDTMotivosCancelacionEmpresa(CveEmpresa As Integer, Optional CveMotivoCancelacion As Integer = -1, Optional CveSATMotivoCancelacion As Integer = -1) As DataTable
Get Get
Dim AppNombre As String = String.Format("GlobalDTMotivosCancelacionEmpresa-{0}", CveEmpresa) Dim AppNombre As String = String.Format("GlobalDTMotivosCancelacionEmpresa-{0}", CveEmpresa)
@@ -6933,7 +6969,7 @@ Public Class ClsPaginas
Dim TC As Decimal = ValorNodoXML(XmlDoc.DocumentElement, "TC").ToDecimal Dim TC As Decimal = ValorNodoXML(XmlDoc.DocumentElement, "TC").ToDecimal
If TC <= 0 Then TC = 1 If TC <= 0 Then TC = 1
If ValorNodoXML(XmlDoc.DocumentElement, "version") = "3.3" Then If ValorNodoXML(XmlDoc.DocumentElement, "version").Contiene("3.3", "4.0") Then
Vta.FechaEmision = ValorNodoXML(XmlDoc.DocumentElement, "fecha").ToDate Vta.FechaEmision = ValorNodoXML(XmlDoc.DocumentElement, "fecha").ToDate
Vta.NoSerieCertificadoContribuyente = ValorNodoXML(XmlDoc.DocumentElement, "NoCertificado") Vta.NoSerieCertificadoContribuyente = ValorNodoXML(XmlDoc.DocumentElement, "NoCertificado")
@@ -7039,7 +7075,7 @@ Public Class ClsPaginas
'Dim CadenaOriginals As String = "||1.0|" + Vta.FolioFiscal + "|" + Vta.FechaCertificacion.ToString("yyyy-MM-dd") + "T" + Vta.FechaCertificacion.ToString("HH:mm:ss") + "|" + Vta.SelloCFDi + "|" + Vta.NoSerieCertificado + "||" 'Dim CadenaOriginals As String = "||1.0|" + Vta.FolioFiscal + "|" + Vta.FechaCertificacion.ToString("yyyy-MM-dd") + "T" + Vta.FechaCertificacion.ToString("HH:mm:ss") + "|" + Vta.SelloCFDi + "|" + Vta.NoSerieCertificado + "||"
Dim CadenaOriginals As String = String.Format("||{0}|{1}|{2}T{3}|{4}|{5}||", If(Vta.Version = "3.3", "1.1", "1.0"), Vta.FolioFiscal, Vta.FechaCertificacion.ToString("yyyy-MM-dd"), Vta.FechaCertificacion.ToString("HH:mm:ss"), Vta.SelloCFDi, Vta.NoSerieCertificado) Dim CadenaOriginals As String = String.Format("||{0}|{1}|{2}T{3}|{4}|{5}||", If(Vta.Version.Contiene("3.3", "4.0"), "1.1", "1.0"), Vta.FolioFiscal, Vta.FechaCertificacion.ToString("yyyy-MM-dd"), Vta.FechaCertificacion.ToString("HH:mm:ss"), Vta.SelloCFDi, Vta.NoSerieCertificado)
If Not ImagenCBB.Exists Then ImgCBB = "" If Not ImagenCBB.Exists Then ImgCBB = ""
Dim RutaFormato As String = "" Dim RutaFormato As String = ""
Dim RutaFormatoDefault As String = "" Dim RutaFormatoDefault As String = ""
@@ -7162,7 +7198,7 @@ Public Class ClsPaginas
params.Add(New ReportParameter("MetodoPago", Vta.ClaveMetodoPagoSAT.ToString)) params.Add(New ReportParameter("MetodoPago", Vta.ClaveMetodoPagoSAT.ToString))
End If End If
If Vta.Version = "3.3" Then If Vta.Version.Contiene("3.3", "4.0") Then
params.Add(New ReportParameter("FormaPago", Vta.FormaPago33.ToString)) params.Add(New ReportParameter("FormaPago", Vta.FormaPago33.ToString))
params.Add(New ReportParameter("MetodoPago", Vta.MetodoPago33.ToString)) params.Add(New ReportParameter("MetodoPago", Vta.MetodoPago33.ToString))
params.Add(New ReportParameter("UsoCFDI", Vta.UsoCFDI)) params.Add(New ReportParameter("UsoCFDI", Vta.UsoCFDI))
@@ -8342,7 +8378,7 @@ Public Class ClsPaginas
'XmlDoc.Load(Ruta & "XML\\Nomina\NOM A-3845.xml") 'XmlDoc.Load(Ruta & "XML\\Nomina\NOM A-3845.xml")
XmlDoc.Load(PathXML) XmlDoc.Load(PathXML)
If ValorNodoXML(XmlDoc.DocumentElement, "version") = "3.3" Then If ValorNodoXML(XmlDoc.DocumentElement, "version").Contiene("3.3", "4.0") Then
FechaEmision = XmlDoc.DocumentElement.Attributes("Fecha").InnerText.ToDate FechaEmision = XmlDoc.DocumentElement.Attributes("Fecha").InnerText.ToDate
NoSerieCertificadoContribuyente = XmlDoc.DocumentElement.Attributes("NoCertificado").InnerText NoSerieCertificadoContribuyente = XmlDoc.DocumentElement.Attributes("NoCertificado").InnerText

View File

@@ -418,7 +418,7 @@ Public Class ClsProductosServicios
Optional CveModelo As Integer = -1, Optional CveMedida As Integer = -1, Optional CveRinTamaño As Integer = -1, Optional ClaveImpuestoEmpaque As String = "", Optional ClaveImpuestoUM As String = "", Optional CveModelo As Integer = -1, Optional CveMedida As Integer = -1, Optional CveRinTamaño As Integer = -1, Optional ClaveImpuestoEmpaque As String = "", Optional ClaveImpuestoUM As String = "",
Optional ClaveCategoriaToxicidad As String = "", Optional ClaveImpuestoTipoProducto As String = "", Optional Litraje As Double = -1, Optional EsOutSourcing As Boolean = False, Optional AplicaSerie As Boolean = False, Optional AplicaLote As Boolean = False, Optional ClaveCategoriaToxicidad As String = "", Optional ClaveImpuestoTipoProducto As String = "", Optional Litraje As Double = -1, Optional EsOutSourcing As Boolean = False, Optional AplicaSerie As Boolean = False, Optional AplicaLote As Boolean = False,
Optional AplicaCaducidad As Boolean = False, Optional AplicaSeccion As Boolean = False, Optional TiempoCaducidad As Integer = -1, Optional CvePSAdicionalVigencia As Integer = -1, Optional PrecioLibre As Boolean = False, Optional AplicaCaducidad As Boolean = False, Optional AplicaSeccion As Boolean = False, Optional TiempoCaducidad As Integer = -1, Optional CvePSAdicionalVigencia As Integer = -1, Optional PrecioLibre As Boolean = False,
Optional CveMaterialPeligroso As Integer = -1, Optional CveEmbalaje As Integer = -1, Optional PesoKg As Decimal = -1, Optional Dimensiones As String = "") As Integer Optional CveMaterialPeligroso As Integer = -1, Optional CveEmbalaje As Integer = -1, Optional PesoKg As Decimal = -1, Optional Dimensiones As String = "", Optional CveObjetoImpuesto As Integer = 0) As Integer
Dim Retorno As Integer = -1 Dim Retorno As Integer = -1
DataAdapter("PA_ProductosServiciosAdd") DataAdapter("PA_ProductosServiciosAdd")
@@ -506,6 +506,7 @@ Public Class ClsProductosServicios
.Add("@CveEmbalaje", SqlDbType.Int).Value = CveEmbalaje .Add("@CveEmbalaje", SqlDbType.Int).Value = CveEmbalaje
.Add("@PesoKg", SqlDbType.SmallMoney).Value = PesoKg .Add("@PesoKg", SqlDbType.SmallMoney).Value = PesoKg
.Add("@Dimensiones", SqlDbType.VarChar).Value = Dimensiones .Add("@Dimensiones", SqlDbType.VarChar).Value = Dimensiones
.Add("@CveObjetoImpuesto", SqlDbType.TinyInt).Value = CveObjetoImpuesto
End With End With
@@ -654,7 +655,7 @@ Public Class ClsProductosServicios
Optional CveClasificacionDetalle As Integer = -1, Optional CveTamaño As Integer = -1, Optional CveModelo As Integer = -1, Optional CveMedida As Integer = -1, Optional CveRinTamaño As Integer = -1, Optional ClaveImpuestoEmpaque As String = "", Optional ClaveImpuestoUM As String = "", Optional CveClasificacionDetalle As Integer = -1, Optional CveTamaño As Integer = -1, Optional CveModelo As Integer = -1, Optional CveMedida As Integer = -1, Optional CveRinTamaño As Integer = -1, Optional ClaveImpuestoEmpaque As String = "", Optional ClaveImpuestoUM As String = "",
Optional ClaveCategoriaToxicidad As String = "", Optional ClaveImpuestoTipoProducto As String = "", Optional Litraje As Double = -1, Optional EsOutSourcing As Boolean = False, Optional ClaveCategoriaToxicidad As String = "", Optional ClaveImpuestoTipoProducto As String = "", Optional Litraje As Double = -1, Optional EsOutSourcing As Boolean = False,
Optional AplicaSerie As Boolean = False, Optional AplicaLote As Boolean = False, Optional AplicaCaducidad As Boolean = False, Optional AplicaSeccion As Boolean = False, Optional TiempoCaducidad As Integer = -1, Optional CvePSAdicionalVigencia As Integer = -1, Optional PrecioLibre As Boolean = False, Optional AplicaSerie As Boolean = False, Optional AplicaLote As Boolean = False, Optional AplicaCaducidad As Boolean = False, Optional AplicaSeccion As Boolean = False, Optional TiempoCaducidad As Integer = -1, Optional CvePSAdicionalVigencia As Integer = -1, Optional PrecioLibre As Boolean = False,
Optional CveMaterialPeligroso As Integer = -1, Optional CveEmbalaje As Integer = -1, Optional PesoKg As Decimal = -1, Optional Dimensiones As String = "") As Boolean Optional CveMaterialPeligroso As Integer = -1, Optional CveEmbalaje As Integer = -1, Optional PesoKg As Decimal = -1, Optional Dimensiones As String = "", Optional CveObjetoImpuesto As Integer = 0) As Boolean
Dim Retorno As Boolean = False Dim Retorno As Boolean = False
@@ -744,6 +745,7 @@ Public Class ClsProductosServicios
.Add("@CveEmbalaje", SqlDbType.Int).Value = CveEmbalaje .Add("@CveEmbalaje", SqlDbType.Int).Value = CveEmbalaje
.Add("@PesoKg", SqlDbType.SmallMoney).Value = PesoKg .Add("@PesoKg", SqlDbType.SmallMoney).Value = PesoKg
.Add("@Dimensiones", SqlDbType.VarChar).Value = Dimensiones .Add("@Dimensiones", SqlDbType.VarChar).Value = Dimensiones
.Add("@CveObjetoImpuesto", SqlDbType.TinyInt).Value = CveObjetoImpuesto
End With End With

View File

@@ -868,7 +868,7 @@ Public Class Timbrado
Timbre.Comprobante.FormadePago = "" Timbre.Comprobante.FormadePago = ""
Timbre.Comprobante.CondicionesdePago = "" Timbre.Comprobante.CondicionesdePago = ""
Timbre.Comprobante.MetodoPago = "" Timbre.Comprobante.MetodoPago = ""
Timbre.Comprobante.Subtotal = 0 Timbre.Comprobante.SubTotal = 0
Timbre.Comprobante.Descuentos = 0 Timbre.Comprobante.Descuentos = 0
Timbre.Comprobante.Moneda = "XXX" Timbre.Comprobante.Moneda = "XXX"
Timbre.Comprobante.TipoCambio = "" Timbre.Comprobante.TipoCambio = ""
@@ -1016,7 +1016,7 @@ Public Class Timbrado
Retorno = TimbrarFacturaProFact(UsuarioActual, Ventas) Retorno = TimbrarFacturaProFact(UsuarioActual, Ventas)
'Retorno = TimbrarFacturaProFact(UsuarioActual, Ventas, TmpDTConceptos, TmpDTImpuestos, TmpDTComplementos, Ruta, LstFordASN, FordGSDBM, ObjV) 'Retorno = TimbrarFacturaProFact(UsuarioActual, Ventas, TmpDTConceptos, TmpDTImpuestos, TmpDTComplementos, Ruta, LstFordASN, FordGSDBM, ObjV)
Case 4 Case 4
If Ventas.Version = "4.0" Then If UsuarioActual.Empresa.Funcionalidad(350) = "1" Then
Dim Ret As String = TimbrarFacturaGoCFDIv40(Ventas, UsuarioActual, CvePACEspecial) Dim Ret As String = TimbrarFacturaGoCFDIv40(Ventas, UsuarioActual, CvePACEspecial)
If Ret <> "" Then MensajeErrorCFDI = Ret If Ret <> "" Then MensajeErrorCFDI = Ret
Retorno = If(Ret = "", True, False) Retorno = If(Ret = "", True, False)
@@ -1094,7 +1094,7 @@ Public Class Timbrado
ObjCFDITimbre.Comprobante.Fecha, ObjCFDITimbre.Comprobante.Fecha,
ObjCFDITimbre.Comprobante.FormadePago, ObjCFDITimbre.Comprobante.FormadePago,
ObjCFDITimbre.Comprobante.CondicionesdePago, ObjCFDITimbre.Comprobante.CondicionesdePago,
ObjCFDITimbre.Comprobante.Subtotal, ObjCFDITimbre.Comprobante.SubTotal,
ObjCFDITimbre.Comprobante.Descuentos, ObjCFDITimbre.Comprobante.Descuentos,
ObjCFDITimbre.Comprobante.TipoCambio.ToDecimal, ObjCFDITimbre.Comprobante.TipoCambio.ToDecimal,
ObjCFDITimbre.Comprobante.Moneda, ObjCFDITimbre.Comprobante.Moneda,
@@ -1513,7 +1513,7 @@ Public Class Timbrado
ObjCFDITimbre.Comprobante.Fecha.ToString("yyyy-MM-ddTHH:mm:ss"), ObjCFDITimbre.Comprobante.Fecha.ToString("yyyy-MM-ddTHH:mm:ss"),
ObjCFDITimbre.Comprobante.FormadePago, ObjCFDITimbre.Comprobante.FormadePago,
ObjCFDITimbre.Comprobante.CondicionesdePago, ObjCFDITimbre.Comprobante.CondicionesdePago,
ObjCFDITimbre.Comprobante.Subtotal, ObjCFDITimbre.Comprobante.SubTotal,
ObjCFDITimbre.Comprobante.Descuentos, ObjCFDITimbre.Comprobante.Descuentos,
ObjCFDITimbre.Comprobante.Moneda, ObjCFDITimbre.Comprobante.Moneda,
ObjCFDITimbre.Comprobante.TipoCambio.ToString, ObjCFDITimbre.Comprobante.TipoCambio.ToString,
@@ -2106,7 +2106,7 @@ Public Class Timbrado
ObjCFDITimbre.Comprobante.Fecha.ToString("yyyy-MM-ddTHH:mm:ss"), ObjCFDITimbre.Comprobante.Fecha.ToString("yyyy-MM-ddTHH:mm:ss"),
ObjCFDITimbre.Comprobante.FormadePago, ObjCFDITimbre.Comprobante.FormadePago,
ObjCFDITimbre.Comprobante.CondicionesdePago, ObjCFDITimbre.Comprobante.CondicionesdePago,
ObjCFDITimbre.Comprobante.Subtotal, ObjCFDITimbre.Comprobante.SubTotal,
ObjCFDITimbre.Comprobante.Descuentos, ObjCFDITimbre.Comprobante.Descuentos,
ObjCFDITimbre.Comprobante.Moneda, ObjCFDITimbre.Comprobante.Moneda,
ObjCFDITimbre.Comprobante.TipoCambio.ToString, ObjCFDITimbre.Comprobante.TipoCambio.ToString,
@@ -2161,7 +2161,7 @@ Public Class Timbrado
#Region "Impuestos" #Region "Impuestos"
'SI NO ES FACTURA EN 0 AGREGA LOS IMPUESTOS 'SI NO ES FACTURA EN 0 AGREGA LOS IMPUESTOS
If Ventas.Total <> 0 And (ObjCFDITimbre.TotalImpuestosRetenidos > 0 OrElse ObjCFDITimbre.TotalImpuestosTrasladados > 0) Then If Ventas.Total <> 0 And (ObjCFDITimbre.TotalImpuestosRetenidos > 0 OrElse ObjCFDITimbre.AplicaImpuestosTraslados) Then
cfdi.Impuestos(ObjCFDITimbre.TotalImpuestosRetenidos, ObjCFDITimbre.TotalImpuestosTrasladados) cfdi.Impuestos(ObjCFDITimbre.TotalImpuestosRetenidos, ObjCFDITimbre.TotalImpuestosTrasladados)
End If End If
#End Region #End Region
@@ -2175,8 +2175,8 @@ Public Class Timbrado
Next Next
End If End If
'' si el importe de impuestos es mayor a cero o si es tasa con importe = 0, debe de ir el atributo
If ObjCFDITimbre.Traslados.Sum(Function(x) x.Importe) > 0 Then If ObjCFDITimbre.AplicaImpuestosTraslados Then
''se acumulan los importes ''se acumulan los importes
For Each Tras In ObjCFDITimbre.Traslados For Each Tras In ObjCFDITimbre.Traslados
cfdi.Traslado(Tras.Impuesto, Tras.TipoFactor, Tras.TasaOCuota, Tras.Importe) cfdi.Traslado(Tras.Impuesto, Tras.TipoFactor, Tras.TasaOCuota, Tras.Importe)

View File

@@ -369,9 +369,14 @@ Partial Class PopUpVerFactura
Dim Envase As String = "" Dim Envase As String = ""
Dim Tamano As String = "" Dim Tamano As String = ""
Dim Cultivo As String = "" Dim Cultivo As String = ""
Dim Cultivoingles As String = ""
Dim noPallet As String = "" Dim noPallet As String = ""
Dim FormatoImpresion As String = "" Dim FormatoImpresion As String = ""
Dim Consecutivo As String = ""
Dim Fecha As String = ""
Dim NoCajas As String = ""
Dim NumberOfCode As String = ""
Dim CvetypeImpresion As Integer
'Envase = "1 1/9" 'Envase = "1 1/9"
'Tamano = "Small" 'Tamano = "Small"
'Cultivo = "Tomate" 'Cultivo = "Tomate"
@@ -382,22 +387,46 @@ Partial Class PopUpVerFactura
Envase = row("Envase").ToString() Envase = row("Envase").ToString()
Tamano = row("Tamaño").ToString() Tamano = row("Tamaño").ToString()
Cultivo = row("Cultivo").ToString() Cultivo = row("Cultivo").ToString()
Cultivoingles = row("Cultivoingles").ToString()
noPallet = row("Codigo").ToString() noPallet = row("Codigo").ToString()
FormatoImpresion = row("FormatoImpresion").ToString() FormatoImpresion = row("FormatoImpresion").ToString()
Consecutivo = row("Consecutivo").ToString()
NoCajas = row("NoCajas").ToString()
Fecha = String.Format("{0:MMM dd}", row("Fecha")).Replace(".", "").ToUpper()
CvetypeImpresion = row("CvetypeImpresion").ToString().ToEntero()
NumberOfCode = String.Format("(01)00856977005186(13){0:ddMMyy}(10){0}01", Regex.Match(row("Cuadro").ToString(), "\\d+"), row("Fecha"))
End If End If
End Using End Using
Dim params As New List(Of ReportParameter) Dim params As New List(Of ReportParameter)
params.Add(New ReportParameter("Envase", Envase))
params.Add(New ReportParameter("Tamano", Tamano)) params.Add(New ReportParameter("Tamano", Tamano))
params.Add(New ReportParameter("Cultivo", Cultivo))
params.Add(New ReportParameter("noPallet", noPallet)) params.Add(New ReportParameter("noPallet", noPallet))
params.Add(New ReportParameter("FormatoImpresion", FormatoImpresion)) params.Add(New ReportParameter("FormatoImpresion", FormatoImpresion))
params.Add(New ReportParameter("Consecutivo", Consecutivo))
params.Add(New ReportParameter("Fecha", Fecha))
params.Add(New ReportParameter("CveFormato", If(Cultivo.ToLower() = "tomate", "3", CvetypeImpresion.ToString())))
params.Add(New ReportParameter("NoCajas", NoCajas))
params.Add(New ReportParameter("NumberOfCode", NumberOfCode))
params.Add(New ReportParameter("Cultivo", If(CvetypeImpresion = 2, Cultivoingles, Cultivo)))
params.Add(New ReportParameter("Envase", If(CvetypeImpresion = 2, "PLU 4062", Envase)))
Dim tablaReporte As New DataTable Dim tablaReporte As New DataTable
tablaReporte.Columns.Add(New DataColumn("Codigo", GetType(String)))
tablaReporte.Rows.Add(tablaReporte.NewRow)
tablaReporte.Rows.Add(tablaReporte.NewRow)
Dim lrds As New List(Of ReportDataSource)
Dim rds As New ReportDataSource With {.Name = "DataSet1", .Value = tablaReporte}
lrds.Add(rds)
'"Empresas/Grales/Formatos/EquiposGPS.rdlc" '"Empresas/Grales/Formatos/EquiposGPS.rdlc"
'"D:\\ADSistemas\\Proyectos\\SIG\\SIGIT\\GPS\\PalletEtiqueta.rdlc" '"D:\\ADSistemas\\Proyectos\\SIG\\SIGIT\\GPS\\PalletEtiqueta.rdlc"
ImprimirPDF("GPS/PalletEtiqueta.rdlc", (New List(Of ReportDataSource)), params, "Pallet Caja") Dim ruta As String = "GPS/PalletEtiquetaCaja.rdlc"
'If CvetypeImpresion = 2 Then
' ruta = "GPS/PalletEtiqueta_2.rdlc"
'End If
ImprimirPDF(ruta, lrds, params, "Pallet Caja")
End Sub End Sub
#Region "U S U A R I O - T O K E N" #Region "U S U A R I O - T O K E N"

View File

@@ -1,4 +1,4 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RegPrePolizaS.aspx.vb" Inherits="ContabilidadC_RegPrePolizaS" %> <%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RegPrePolizaS.aspx.vb" Inherits="ContabilidadC_RegPrePolizaS" EnableEventValidation="false" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server"> <asp:Content ID="Content1" ContentPlaceHolderID="CP" runat="Server">
</asp:Content> </asp:Content>
@@ -82,8 +82,12 @@
<asp:UpdatePanel runat="server"> <asp:UpdatePanel runat="server">
<ContentTemplate> <ContentTemplate>
<li> <li>
<asp:LinkButton ID="LnkAddConcepto" runat="server" OnClick="LnkAddConcepto_Click" Visible="true"><i class="fa fa-plus" ></i> Agregar Concepto</asp:LinkButton> <asp:LinkButton ID="LnkAddConcepto" runat="server" OnClick="LnkAddConcepto_Click" Visible="true"><i class="fa fa-plus" ></i> Agregar Concepto</asp:LinkButton>
</li> </li>
<li>
<asp:LinkButton ID="LnkCrearAPartirDe" runat="server" Visible="false" OnClick="LnkCrearAPartirDe_Click" Style="color: #686868;"><i class="fa fa-plus" style="color:#686868;" ></i>Crear a partir de</asp:LinkButton>
</li>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</asp:Content> </asp:Content>
@@ -93,10 +97,172 @@
<tr> <tr>
<td align="left" style="width: 665px;"> <td align="left" style="width: 665px;">
<asp:UpdatePanel ID="UpPoliza" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="row" runat="server" id="DivDatosPoliza">
<div class="col-md-8" style="margin-top: 20px;">
<div class="portlet light bordered xspadding ">
<div class="portlet-title">
<div class="caption font-green">
<i class="fa fa-bookmark font-green"></i>
<span class="caption-subject bold uppercase"></span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
</div>
<div class="portlet-body form">
<div class="row">
<div class="col-md-4">
<div class="form-group form-md-line-input input-group input-small date date-picker" data-date-format="dd/mm/yyyy">
<asp:TextBox ID="TxtFechaDocumento" runat="server" CssClass="form-control" Width="100px"></asp:TextBox>
<span class="input-group-btn ">
<asp:LinkButton runat="server" ID="ImgCalendarioPoliza" class="btn default"><i class="fa fa-calendar"></i></asp:LinkButton>
</span>
<ajax:MaskedEditExtender ID="MaskedEditExtender1" runat="server" TargetControlID="TxtFechaDocumento" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender ID="CalendarExtender1" runat="server" TargetControlID="TxtFechaDocumento" PopupButtonID="ImgCalendarioPoliza" PopupPosition="Left" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="RFVFechaPoliza" runat="server" ControlToValidate="TxtFechaDocumento" Display="None" ErrorMessage="El campo <b>''FechaDocumento''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CVFechaPoliza" runat="server" ControlToValidate="TxtFechaDocumento" Display="None" ErrorMessage="El campo <b>''FechaDocumento''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpGuardar"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaPoliza" Width="350px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender2" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaPoliza" Width="350px"></ajax:ValidatorCalloutExtender>
<label for="<%= TxtFechaDocumento.ClientID.ToString()%>">Fecha:</label>
</div>
</div>
<div class="col-md-4">
<div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlTipoPoliza" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" Width="100%" ValidationGroup="GrpGuardar">
<asp:ListItem Text="Ingreso" Value="1"></asp:ListItem>
<asp:ListItem Text="Egreso" Value="2"></asp:ListItem>
<asp:ListItem Text="Diario" Value="3"></asp:ListItem>
</asp:DropDownList>
<label for="<%= DdlTipoPoliza.ClientID.ToString()%>">Tipo Póliza:</label>
</div>
</div>
<div class="col-md-4">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox CssClass="form-control" ID="TxtFolio" runat="server" MaxLength="15" Enabled="false"></asp:TextBox>
<label for="<%= TxtFolio.ClientID.ToString()%>">Folio: </label>
</div>
</div>
</div>
<div class="row">
<div class="col-md-12">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtConcepto" runat="server" Width="100%" CssClass="form-control" Enabled="false"></asp:TextBox>
<label for="<%= TxtConcepto.ClientID.ToString()%>">Concepto:</label>
</div>
</div>
</div>
</div>
</div>
</div>
<div class="col-md-4" style="margin-top: 20px;">
<div class="portlet light bordered xspadding">
<div class="portlet-title">
<div class="caption font-green">
<i class="fa fa-bookmark font-green"></i>
<span class="caption-subject bold uppercase"></span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
</div>
<div class="portlet-body form">
<div class="row">
<div class="col-md-6">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox CssClass="form-control" ID="TxtFechaelaboracion" runat="server" MaxLength="15" Enabled="false"></asp:TextBox>
<label for="<%= TxtFechaelaboracion.ClientID.ToString()%>">Fecha Elaboración: </label>
</div>
</div>
<div class="col-md-6">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox CssClass="form-control" ID="TxtUsuarioElaboro" runat="server" MaxLength="15" Enabled="false"></asp:TextBox>
<label for="<%= TxtUsuarioElaboro.ClientID.ToString()%>">Usuario Elaboró: </label>
</div>
</div>
</div>
<div class="row" runat="server" visible="false" id="DvPlantilla">
<div class="col-md-6">
<div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlPlantilla" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" AutoPostBack="True" DataTextField="PlantillaPoliza" DataValueField="CvePlantillaPoliza" Width="250px" ValidationGroup="GrpGuardar"></asp:DropDownList>
<label for="<%= DdlPlantilla.ClientID.ToString()%>">Movimiento:</label>
</div>
</div>
</div>
</div>
</div>
</div>
</div>
<div class="row" visible="false" runat="server" id="divContabilizada">
<label class="col-md-1">Contabilizada:</label>
<div class="col-md-2">
<asp:HyperLink ID="HplContabilizada" runat="server" Target="_blank">Si</asp:HyperLink>
</div>
<label class="col-md-1">Folio:</label>
<div class="col-md-1">
<asp:Label ID="LblFolio" Font-Bold="true" Font-Size="Large" runat="server"></asp:Label>
</div>
</div>
<div class="row" visible="false" runat="server" id="DivTipoGasto">
<label class="col-md-1">Tipo Gasto:</label>
<div class="col-md-2">
<asp:DropDownList ID="DdlTipoGasto" AutoPostBack="true" OnSelectedIndexChanged="DdlTipoGasto_SelectedIndexChanged" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" Width="100%" ValidationGroup="GrpGuardar" DataTextField="TipoGasto" DataValueField="CveTipoGasto">
</asp:DropDownList>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
<asp:UpdatePanel ID="UPPDocumento" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UPPDocumento" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<div id="DivConceptoPrePoliza" runat="server" class="chequesie22"> <div id="DivConceptoPrePoliza" runat="server" class="chequesie22">
<div class="chequesie12" runat="server" id="divDatosPrincipales"> <%-- <div class="chequesie12" runat="server" id="divDatosPrincipales">
<div class="row"> <div class="row">
<label class="col-md-2 control-label text-left">Fecha: </label> <label class="col-md-2 control-label text-left">Fecha: </label>
<div class="col-md-4"> <div class="col-md-4">
@@ -134,13 +300,10 @@
</asp:DropDownList> </asp:DropDownList>
</div> </div>
</div> </div>
</div> </div>--%>
<div class="chequesie22" runat="server" id="divObservaciones">
<%-- <div class="chequesie22" runat="server" id="divObservaciones">
<div class="row">
<div class="col-md-6">
</div>
</div>
<div class="row"> <div class="row">
<label class="col-md-2">Observaciones:</label> <label class="col-md-2">Observaciones:</label>
@@ -150,18 +313,13 @@
<label class="col-md-1">Movimiento:</label> <label class="col-md-1">Movimiento:</label>
<div class="col-md-4"> <div class="col-md-4">
<asp:DropDownList ID="DdlPlantilla" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" AutoPostBack="True" DataTextField="PlantillaPoliza" DataValueField="CvePlantillaPoliza" Width="250px" ValidationGroup="GrpGuardar">
</asp:DropDownList>
</div> </div>
</div> </div>
<div class="row" id="trNotificar" runat="server" visible="False">
<label class="col-md-2">Notificar:</label>
<div class="col-md-10">
<asp:TextBox ID="TxtNotificarA" CssClass="form-control input-sm" runat="server" MaxLength="100" Width="400px" Rows="1" TextMode="MultiLine" ClientIDMode="Static"></asp:TextBox>
</div>
</div>
<div class="row" id="trCuentaDeposito" runat="server" visible="False"> <div class="row" id="trCuentaDeposito" runat="server" visible="False">
<label class="col-md-2">Cuenta Depósito:</label> <label class="col-md-2">Cuenta Depósito:</label>
<div class="col-md-10"> <div class="col-md-10">
@@ -171,13 +329,14 @@
</div> </div>
</div> </div>
</div> </div>--%>
<div class="row">
<div class="col-md-6">
<br />
</div>
</div>
<div class="chequesie22"> <div class="chequesie22">
<div class="row" id="DivAgregarConceptos" runat="server" visible="true"> <div class="row" id="DivAgregarConceptos" runat="server" visible="true">
<div class="col-md-12"> <div class="col-md-12">
@@ -240,160 +399,18 @@
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
<asp:UpdatePanel ID="UpPoliza" runat="server" UpdateMode="Conditional">
<ContentTemplate>
<div class="row" visible="false" runat="server" id="DivDatosPoliza">
<div class="col-md-6" style="margin-top: 20px;">
<div class="portlet light bordered xspadding">
<div class="portlet-title">
<div class="caption font-green">
<i class="fa fa-bookmark font-green"></i>
<span class="caption-subject bold uppercase"></span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
</div>
<div class="portlet-body form">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox CssClass="form-control" ID="TxtFolio" runat="server" MaxLength="15" Enabled="false"></asp:TextBox>
<label for="<%= TxtFolio.ClientID.ToString()%>">Folio: </label>
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlTipoPoliza" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" Width="100%" ValidationGroup="GrpGuardar">
<asp:ListItem Text="Ingreso" Value="1"></asp:ListItem>
<asp:ListItem Text="Egreso" Value="2"></asp:ListItem>
<asp:ListItem Text="Diario" Value="3"></asp:ListItem>
</asp:DropDownList>
<label for="<%= DdlTipoPoliza.ClientID.ToString()%>">Tipo Póliza:</label>
</div>
<%--<div class="form-group form-md-line-input input-iconright">--%>
<div class="form-group form-md-line-input input-group input-small date date-picker" data-date-format="dd/mm/yyyy">
<br />
<asp:TextBox ID="TxtFechaDocumento" runat="server" CssClass="form-control" Width="100px"></asp:TextBox>
<span class="input-group-btn ">
<asp:LinkButton runat="server" ID="ImgCalendarioPoliza" class="btn default" style="margin-top:15px!important"><i class="fa fa-calendar"></i></asp:LinkButton>
</span>
<ajax:MaskedEditExtender ID="MaskedEditExtender1" runat="server" TargetControlID="TxtFechaDocumento" Mask="99/99/9999" MaskType="Date" DisplayMoney="Left" AcceptNegative="Left"></ajax:MaskedEditExtender>
<ajax:CalendarExtender ID="CalendarExtender1" runat="server" TargetControlID="TxtFechaDocumento" PopupButtonID="ImgCalendarioPoliza" PopupPosition="Left" Enabled="True"></ajax:CalendarExtender>
<asp:RequiredFieldValidator ID="RFVFechaPoliza" runat="server" ControlToValidate="TxtFechaDocumento" Display="None" ErrorMessage="El campo <b>''FechaDocumento''</b> es requerido por la aplicación, por favor ingrese una fecha." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<asp:CompareValidator ID="CVFechaPoliza" runat="server" ControlToValidate="TxtFechaDocumento" Display="None" ErrorMessage="El campo <b>''FechaDocumento''</b> no tienes el formato correcto, por favor intente de nuevo con el siguiente formato: (dd/mm/yyyy)." Operator="DataTypeCheck" Type="Date" ValidationGroup="GrpGuardar"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender1" runat="server" HighlightCssClass="vco" TargetControlID="RFVFechaPoliza" Width="350px"></ajax:ValidatorCalloutExtender>
<ajax:ValidatorCalloutExtender ID="ValidatorCalloutExtender2" runat="server" HighlightCssClass="vco" TargetControlID="CVFechaPoliza" Width="350px"></ajax:ValidatorCalloutExtender>
<label for="<%= TxtFechaDocumento.ClientID.ToString()%>">Fecha:</label>
</div>
<%--</div>--%>
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox ID="TxtConcepto" runat="server" Width="100%" CssClass="form-control" Enabled="false"></asp:TextBox>
<label for="<%= TxtConcepto.ClientID.ToString()%>">Concepto:</label>
</div>
</div>
</div>
</div>
<div class="col-md-6" style="margin-top: 20px;">
<div class="portlet light bordered xspadding">
<div class="portlet-title">
<div class="caption font-green">
<i class="fa fa-bookmark font-green"></i>
<span class="caption-subject bold uppercase"></span>
</div>
<div class="actions">
<div class="btn-group">
</div>
</div>
</div>
<div class="portlet-body form">
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox CssClass="form-control" ID="TxtEstatus" runat="server" MaxLength="15" Enabled="false"></asp:TextBox>
<label for="<%= TxtEstatus.ClientID.ToString()%>">Estatus: </label>
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox CssClass="form-control" ID="TxtFechaelaboracion" runat="server" MaxLength="15" Enabled="false"></asp:TextBox>
<label for="<%= TxtFechaelaboracion.ClientID.ToString()%>">Fecha Elaboracion: </label>
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:TextBox CssClass="form-control" ID="TxtUsuarioElaboro" runat="server" MaxLength="15" Enabled="false"></asp:TextBox>
<label for="<%= TxtUsuarioElaboro.ClientID.ToString()%>">Usuario Elaboro: </label>
</div>
</div>
</div>
</div>
</div>
<div class="row" visible="false" runat="server" id="divContabilizada">
<label class="col-md-1">Contabilizada:</label>
<div class="col-md-2">
<asp:HyperLink ID="HplContabilizada" runat="server" Target="_blank">Si</asp:HyperLink>
</div>
<label class="col-md-1">Folio:</label>
<div class="col-md-1">
<asp:Label ID="LblFolio" Font-Bold="true" Font-Size="Large" runat="server"></asp:Label>
</div>
</div>
<div class="row" visible="false" runat="server" id="DivTipoGasto">
<label class="col-md-1">Tipo Gasto:</label>
<div class="col-md-2">
<asp:DropDownList ID="DdlTipoGasto" AutoPostBack="true" OnSelectedIndexChanged="DdlTipoGasto_SelectedIndexChanged" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" Width="100%" ValidationGroup="GrpGuardar" DataTextField="TipoGasto" DataValueField="CveTipoGasto">
</asp:DropDownList>
</div>
</div>
</ContentTemplate>
</asp:UpdatePanel>
</td> </td>
</tr> </tr>
</table> </table>
<asp:UpdatePanel ID="UPMovs" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UPMovs" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<input id="HdnCveCuenta" runat="server" type="hidden" value="-1" clientidmode="Static" /> <input id="HdnCveCuenta" runat="server" type="hidden" value="-1" clientidmode="Static" />
<table style="width: 100%;" class="table GvSize table-striped table-advance table-hover"> <table style="width: 100%;" class="table GvSize table-striped table-advance table-hover">
<tr class="Titulos"> <tr class="Titulos">
@@ -414,7 +431,7 @@
<div style="width: 100%; min-height: 200px; overflow-scrolling: auto;"> <div style="width: 100%; min-height: 200px; overflow-scrolling: auto;">
<div class="portlet light xspadding bordered " id="pnldl"> <div class="portlet light xspadding bordered " id="pnldl2">
<div class="portlet-title"> <div class="portlet-title">
<div class="caption "> <div class="caption ">
<i class="fa fa-bookmark font-green"></i> <i class="fa fa-bookmark font-green"></i>
@@ -553,18 +570,12 @@
<div class="portlet-body nomarginleftright form-horizontal form-row-sepe formnombottom "> <div class="portlet-body nomarginleftright form-horizontal form-row-sepe formnombottom ">
<asp:GridView ID="GvPrePoliza" runat="server" AutoGenerateColumns="False" CssClass="table table-striped table-advance table-hover mysmallbtn GvPrePoliza" GridLines="None" <asp:GridView ID="GvPrePoliza" runat="server" AutoGenerateColumns="False" CssClass="table table-striped table-advance table-hover mysmallbtn GvPrePoliza" GridLines="None"
DataKeyNames="CvePrePolizaDetalle, CveConceptoContable, IdCtaContable, CveSubProyecto, CveTipoGasto,Referencia,CveVenta,CveCompra, CveProveedor, CveCliente, CvePersonal, CveCuenta, PorcentajeImpuesto" Width="100%" > DataKeyNames="CvePrePolizaDetalle, CveConceptoContable, IdCtaContable, CveSubProyecto, CveTipoGasto,Referencia,CveVenta,CveCompra, CveProveedor, CveCliente, CvePersonal, CveCuenta, PorcentajeImpuesto,TipoMovto,EsComplementaria,Concepto,CveClasificacion,ContadoCuenta,ContadoTipoTransaccion,ContadoNumeroFolio,ContadoBeneficiario,ContadoObservaciones,ContadoImporte,TC" Width="100%" >
<Columns> <Columns>
<asp:TemplateField> <asp:TemplateField>
<HeaderTemplate>Movimiento</HeaderTemplate> <HeaderTemplate>Movimiento</HeaderTemplate>
<ItemTemplate> <ItemTemplate>
<asp:Literal ID="LtlConceptoContable" runat="server" Text='<%# Eval("ConceptoContable") %>'></asp:Literal><br /> <asp:Literal ID="LtlConceptoContable" runat="server" Text='<%# Eval("ConceptoContable") %>'></asp:Literal><br />
<%-- <asp:HiddenField ID="HdnConceptoContable" runat="server" Value='<%# Eval("CveConceptoContable") %>' />
<asp:HiddenField ID="HdnProveedor" runat="server" Value='<%# Eval("CveProveedor") %>' />
<asp:HiddenField ID="HdnCompra" runat="server" Value='<%# Eval("CveCompra") %>' />
<asp:HiddenField ID="HdnPersonal" runat="server" Value='<%# Eval("CvePersonal") %>' />
<asp:HiddenField ID="HdnCliente" runat="server" Value='<%# Eval("CveCliente") %>' />
<asp:HiddenField ID="HdnVenta" runat="server" Value='<%# Eval("CveVenta") %>' />--%>
</ItemTemplate> </ItemTemplate>
<ItemStyle HorizontalAlign="Left" Width="150px" /> <ItemStyle HorizontalAlign="Left" Width="150px" />
</asp:TemplateField> </asp:TemplateField>
@@ -652,8 +663,10 @@
<asp:TemplateField > <asp:TemplateField >
<ItemTemplate> <ItemTemplate>
<asp:LinkButton ID="LnkEdit" runat="server" AlternateText="Actualizar" CausesValidation="True" CommandName="Update" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" /> <asp:LinkButton ID="LnkEdit" runat="server" AlternateText="Actualizar" CausesValidation="True" CommandName="Update" CssClass="btn btn-circle btn-sm green" Text="<i class='fa fa-pencil'></i>" />
<asp:LinkButton ID="LnkGvPrePolizaEliminar" OnClick="LnkGvPrePolizaEliminar_Click" runat="server" AlternateText="Eliminar" CssClass="btn btn-circle btn-sm red" Text="<i class='icon-trash'></i>"
data-toggle="confirmation" data-popout="true" data-original-title="Confirmar" data-btn-ok-label="si" />
</ItemTemplate> </ItemTemplate>
<ItemStyle HorizontalAlign="Right" Width="20px" /> <ItemStyle HorizontalAlign="Right" Width="80px" />
</asp:TemplateField> </asp:TemplateField>
<asp:TemplateField > <asp:TemplateField >
@@ -703,7 +716,7 @@
<asp:Button ID="BtnIEGuardar" runat="server" Text="Guardar" ValidationGroup="GrpGuardar" CssClass="btn btn-primary" /> <asp:Button ID="BtnIEGuardar" runat="server" Text="Guardar" ValidationGroup="GrpGuardar" CssClass="btn btn-primary" />
<asp:ValidationSummary ID="VS" runat="server" DisplayMode="BulletList" ShowSummary="true" ValidationGroup="GrpGuardar" /> <asp:ValidationSummary ID="VS" runat="server" DisplayMode="BulletList" ShowSummary="true" ValidationGroup="GrpGuardar" />
<asp:Button ID="BtnEliminar" runat="server" Text="Eliminar" class="btn btn-danger" /> <asp:Button ID="BtnEliminar" runat="server" Text="Eliminar" class="btn btn-danger" />
<asp:Button ID="BtnContabilizar" runat="server" Text="Contabilizar" CssClass="btn btn-primary green" Visible="false" /> <%--<asp:Button ID="BtnContabilizar" runat="server" Text="Contabilizar" CssClass="btn btn-primary green" Visible="false" />--%>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</td> </td>
@@ -722,6 +735,7 @@
</div> </div>
<div class="modal-body"> <div class="modal-body">
<asp:Panel ID="PnlContado" runat="server" Visible="False"> <asp:Panel ID="PnlContado" runat="server" Visible="False">
<asp:RadioButtonList ID="RBLContado" runat="server" RepeatDirection="Horizontal" AutoPostBack="True"> <asp:RadioButtonList ID="RBLContado" runat="server" RepeatDirection="Horizontal" AutoPostBack="True">
<asp:ListItem Value="1" Selected="True">Bancos</asp:ListItem> <asp:ListItem Value="1" Selected="True">Bancos</asp:ListItem>
@@ -783,6 +797,9 @@
<asp:TextBox ID="TxtDocumentoObservaciones" CssClass="form-control input-sm" runat="server" MaxLength="500" Rows="3" TextMode="MultiLine"></asp:TextBox> <asp:TextBox ID="TxtDocumentoObservaciones" CssClass="form-control input-sm" runat="server" MaxLength="500" Rows="3" TextMode="MultiLine"></asp:TextBox>
</div> </div>
</div> </div>
</div> </div>
</asp:Panel> </asp:Panel>
@@ -803,9 +820,13 @@
<div id="DivEditConcepto" align="center" class="modal ADS fade" role="dialog"> <div id="DivEditConcepto" align="center" class="modal ADS fade" role="dialog">
<div class="modal-dialog" style="width: 450px;">
<asp:UpdatePanel ID="UpdatePanel1" runat="server" class="modal-content" UpdateMode="Conditional">
<div class="modal-dialog" style="width: 450px;" id="DvMoldalConceptoAncho" >
<asp:UpdatePanel ID="UpModalConcepto" runat="server" class="modal-content" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>
<div class="modal-header "> <div class="modal-header ">
<button type="button" class="close" data-dismiss="modal">×</button> <button type="button" class="close" data-dismiss="modal">×</button>
<h4 class="modal-title"> <h4 class="modal-title">
@@ -814,24 +835,101 @@
</div> </div>
<div class="modal-body" style="margin-left: 20px"> <div class="modal-body" style="margin-left: 20px">
<asp:UpdatePanel ID="UppGrid" runat="server" UpdateMode="Conditional">
<ContentTemplate> <div class="row">
<div class="col-md-12" runat="server" id="DvMoldalConceptoSeccion1">
<br /> <br />
<div class="row"> <div class="row">
<div class="col-xs-2" style="text-align: left">Concepto:</div> <div class="col-xs-2" style="text-align: left">Concepto:</div>
<div class="col-xs-4"> <div class="col-xs-4" style="text-align: left">
<asp:DropDownList ID="DdlConceptosContablesE" CssClass="form-control input-sm select2me" Width="405px" runat="server" DataTextField="ConceptoContable" DataValueField="CveConceptoContable" AutoPostBack="true"> <asp:DropDownList ID="DdlConceptosContablesE" CssClass="form-control input-sm select2me" Width="405px" runat="server" DataTextField="ConceptoContable" DataValueField="CveConceptoContable" AutoPostBack="true">
</asp:DropDownList> </asp:DropDownList>
<asp:DropDownList ID="DdlProveedoresE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="RazonSocial" DataValueField="CveProveedor" Width="160px" Visible="false" AutoPostBack="true"></asp:DropDownList>
<asp:DropDownList ID="DdlComprasE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="SerieFolio" DataValueField="CveCompra" Width="160px" Visible="false"></asp:DropDownList> </div>
<asp:DropDownList ID="DdlPersonalE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="NombreCompleto" DataValueField="CvePersonal" Width="160px" Visible="false"></asp:DropDownList> </div>
<ADS:Dropdownlost ID="DdlClientesE" CssStyle="width: 100%;" CssClassDdl="select2me" runat="server" AppendDataBoundItems="true" DataTextField="NombreComercial" DataValueField="CveCliente" Width="160px" Visible="false" AutoPostBack="true"></ADS:Dropdownlost>
<asp:DropDownList ID="DdlVentasE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Folio" DataValueField="CveVenta" Width="160px" Visible="false"></asp:DropDownList> <div class="row" runat="server" id="DvmodalconceptoProveddor" visible="false">
<asp:DropDownList ID="DdlClasificacionesE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Width="160px" Visible="false"></asp:DropDownList> <div class="col-xs-2" style="text-align: left">Proveedor:</div>
<asp:DropDownList ID="DdlPorcentajeIVAE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" VISIBLE="false" Width="160px" > <div class="col-xs-4" style="text-align: left">
<asp:DropDownList ID="DdlProveedoresE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="RazonSocial" DataValueField="CveProveedor" Width="405px" AutoPostBack="true"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvDdlProveedoresE" InitialValue="-1" runat="server" ControlToValidate="DdlProveedoresE" Display="None" ErrorMessage="El campo <b>''Proveedor''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="CeRfvDdlProveedoresE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlProveedoresE" Width="350px"></ajax:ValidatorCalloutExtender>
<i></i>
</div>
</div>
<div class="row" runat="server" id="DvModalconceptoCompra" visible="false">
<div class="col-xs-2" style="text-align: left">Compra:</div>
<div class="col-xs-4" style="text-align: left">
<asp:DropDownList ID="DdlComprasE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="SerieFolio" DataValueField="CveCompra" Width="405px"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvDdlComprasE" InitialValue="-1" runat="server" ControlToValidate="DdlComprasE" Display="None" ErrorMessage="El campo <b>''Compra''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="CeRfvDdlComprasE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlComprasE" Width="350px"></ajax:ValidatorCalloutExtender>
<i></i>
</div>
</div>
<div class="row " runat="server" id="DvModalconceptoPersonal" visible="false">
<div class="col-xs-2" style="text-align: left">Personal:</div>
<div class="col-xs-4" style="text-align: left">
<asp:DropDownList ID="DdlPersonalE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="NombreCompleto" DataValueField="CvePersonal" Width="405px"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvDdlPersonalE" InitialValue="-1" runat="server" ControlToValidate="DdlPersonalE" Display="None" ErrorMessage="El campo <b>''Personal''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="CrRfvDdlPersonalE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlPersonalE" Width="350px"></ajax:ValidatorCalloutExtender>
<i></i>
</div>
</div>
<div class="row" runat="server" id="DvModalconceptoCliente" visible="false">
<div class="col-xs-2" style="text-align: left">Cliente:</div>
<div class="col-xs-4" style="text-align: left">
<ADS:Dropdownlost ID="DdlClientesE" CssStyle="width: 100%;" CssClassDdl="select2me" runat="server" AppendDataBoundItems="true" DataTextField="NombreComercial" DataValueField="CveCliente" Width="405px" AutoPostBack="true"></ADS:Dropdownlost>
<asp:RequiredFieldValidator ID="RfvDdlClientesE" InitialValue="-1" runat="server" ControlToValidate="DdlClientesE" Display="None" ErrorMessage="El campo <b>''Cliente''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="CeRfvDdlClientesE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlClientesE" Width="350px"></ajax:ValidatorCalloutExtender>
<i></i>
</div>
</div>
<div class="row" runat="server" id="DvModalconceptoVenta" visible="false">
<div class="col-xs-2" style="text-align: left">Venta:</div>
<div class="col-xs-4" style="text-align: left">
<asp:DropDownList ID="DdlVentasE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Folio" DataValueField="CveVenta" Width="405px"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvDdlVentasE" InitialValue="-1" runat="server" ControlToValidate="DdlVentasE" Display="None" ErrorMessage="El campo <b>''Venta''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="CeRfvDdlVentasE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlVentasE" Width="350px"></ajax:ValidatorCalloutExtender>
<i></i>
</div>
</div>
<div class="row" runat="server" id="DvModalconceptoClasificacion" visible="false">
<div class="col-xs-2" style="text-align: left">Clasificación:</div>
<div class="col-xs-4" style="text-align: left">
<asp:DropDownList ID="DdlClasificacionesE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="Clasificacion" DataValueField="CveClasificacion" Width="405px"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvDdlClasificacionesE" InitialValue="-1" runat="server" ControlToValidate="DdlClasificacionesE" Display="None" ErrorMessage="El campo <b>''Venta''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="CeRfvDdlClasificacionesE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlClasificacionesE" Width="350px"></ajax:ValidatorCalloutExtender>
<i></i>
</div>
</div>
<div class="row" runat="server" id="DvModalconceptoProcentajeIVA" visible="false">
<div class="col-xs-2" style="text-align: left">Procentaje IVA:</div>
<div class="col-xs-4" style="text-align: left">
<asp:DropDownList ID="DdlPorcentajeIVAE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" Visible="false" Width="160px">
<asp:ListItem Text="16%" Value="0.16"></asp:ListItem> <asp:ListItem Text="16%" Value="0.16"></asp:ListItem>
<asp:ListItem Text="8%" Value="0.08"></asp:ListItem> <asp:ListItem Text="8%" Value="0.08"></asp:ListItem>
</asp:DropDownList> </asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvDdlPorcentajeIVAE" InitialValue="-1" runat="server" ControlToValidate="DdlPorcentajeIVAE" Display="None" ErrorMessage="El campo <b>''Porcentaje IVA''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="CeRfvDdlPorcentajeIVAE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlPorcentajeIVAE" Width="350px"></ajax:ValidatorCalloutExtender>
<i></i>
</div> </div>
</div> </div>
@@ -842,6 +940,9 @@
</div> </div>
<div class="col-xs-4"> <div class="col-xs-4">
<asp:DropDownList ID="DdlCuentaContableE" runat="server" Width="405px" CssClass="form-control input-sm select2me" DataValueField="CveCuenta" DataTextField="CtaCodigo"></asp:DropDownList><br /> <asp:DropDownList ID="DdlCuentaContableE" runat="server" Width="405px" CssClass="form-control input-sm select2me" DataValueField="CveCuenta" DataTextField="CtaCodigo"></asp:DropDownList><br />
<asp:RequiredFieldValidator ID="RfvDdlCuentaContableE" InitialValue="-1" runat="server" ControlToValidate="DdlCuentaContableE" Display="None" ErrorMessage="El campo <b>''Porcentaje IVA''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="CeRfvDdlCuentaContableE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlCuentaContableE" Width="350px"></ajax:ValidatorCalloutExtender>
<i></i>
</div> </div>
</div> </div>
<br /> <br />
@@ -849,6 +950,9 @@
<div class="col-xs-2" style="text-align: left">Referencia:</div> <div class="col-xs-2" style="text-align: left">Referencia:</div>
<div class="col-xs-4"> <div class="col-xs-4">
<asp:TextBox ID="TxtReferenciaE" runat="server" Width="405px" MaxLength="100" CssClass="form-control" ClientIDMode="Static"></asp:TextBox> <asp:TextBox ID="TxtReferenciaE" runat="server" Width="405px" MaxLength="100" CssClass="form-control" ClientIDMode="Static"></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvTxtReferenciaE" runat="server" ControlToValidate="TxtReferenciaE" Display="None" ErrorMessage="El campo <b>''Referebcia''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="CeRfvTxtReferenciaE" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtReferenciaE" Width="350px"></ajax:ValidatorCalloutExtender>
<i></i>
</div> </div>
</div> </div>
<br /> <br />
@@ -856,6 +960,11 @@
<div class="col-xs-2" style="text-align: left">Descripción:</div> <div class="col-xs-2" style="text-align: left">Descripción:</div>
<div class="col-xs-4"> <div class="col-xs-4">
<asp:TextBox ID="TxtConceptoE" runat="server" Width="405px" MaxLength="100" CssClass="form-control" ClientIDMode="Static"></asp:TextBox> <asp:TextBox ID="TxtConceptoE" runat="server" Width="405px" MaxLength="100" CssClass="form-control" ClientIDMode="Static"></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvTxtConceptoE" runat="server" ControlToValidate="TxtConceptoE" Display="None" ErrorMessage="El campo <b>''Referebcia''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="CeRfvTxtConceptoE" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtConceptoE" Width="350px"></ajax:ValidatorCalloutExtender>
<i></i>
</div> </div>
</div> </div>
<br /> <br />
@@ -873,6 +982,9 @@
<div class="col-xs-2" style="text-align: left">Tipo Gasto:</div> <div class="col-xs-2" style="text-align: left">Tipo Gasto:</div>
<div class="col-xs-3"> <div class="col-xs-3">
<asp:DropDownList ID="DdlTipoGastoE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="TipoGasto" DataValueField="CveTipoGasto" Width="150px"></asp:DropDownList> <asp:DropDownList ID="DdlTipoGastoE" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" DataTextField="TipoGasto" DataValueField="CveTipoGasto" Width="150px"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvDdlTipoGastoE" InitialValue="-1" runat="server" ControlToValidate="DdlTipoGastoE" Display="None" ErrorMessage="El campo <b>''Porcentaje IVA''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="CeRfvDdlTipoGastoE" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlTipoGastoE" Width="350px"></ajax:ValidatorCalloutExtender>
<i></i>
</div> </div>
</div> </div>
<br /> <br />
@@ -883,7 +995,7 @@
</div> </div>
<div class="col-xs-3"> <div class="col-xs-3">
<asp:TextBox ID="TxtCargoE" runat="server" CssClass=" form-control input-sm" Style="text-align: right"></asp:TextBox><br /> <asp:TextBox ID="TxtCargoE" runat="server" CssClass=" form-control input-sm" Style="text-align: right"></asp:TextBox><br />
<asp:CompareValidator ID="CVCargo" runat="server" ControlToValidate="TxtCargo" Display="None" ErrorMessage="El campo <b>''Cargo''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpGuardar"></asp:CompareValidator> <asp:CompareValidator ID="CVCargo" runat="server" ControlToValidate="TxtCargo" Display="None" ErrorMessage="El campo <b>''Cargo''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpMocalConceptoGuardar"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="VCCCargo" runat="server" HighlightCssClass="vco" TargetControlID="CVCargo" Width="300px"></ajax:ValidatorCalloutExtender> <ajax:ValidatorCalloutExtender ID="VCCCargo" runat="server" HighlightCssClass="vco" TargetControlID="CVCargo" Width="300px"></ajax:ValidatorCalloutExtender>
</div> </div>
<div class="col-xs-1" style="text-align: left"> <div class="col-xs-1" style="text-align: left">
@@ -891,24 +1003,94 @@
</div> </div>
<div class="col-xs-3"> <div class="col-xs-3">
<asp:TextBox ID="TxtAbonoE" runat="server" CssClass=" form-control input-sm" Style="text-align: right"></asp:TextBox><br /> <asp:TextBox ID="TxtAbonoE" runat="server" CssClass=" form-control input-sm" Style="text-align: right"></asp:TextBox><br />
<asp:CompareValidator ID="CVAbono" runat="server" ControlToValidate="TxtAbono" Display="None" ErrorMessage="El campo <b>''Abono''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpGuardar"></asp:CompareValidator> <asp:CompareValidator ID="CVAbono" runat="server" ControlToValidate="TxtAbono" Display="None" ErrorMessage="El campo <b>''Abono''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpMocalConceptoGuardar"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="VCCAbono" runat="server" HighlightCssClass="vco" TargetControlID="CVAbono" Width="300px"></ajax:ValidatorCalloutExtender> <ajax:ValidatorCalloutExtender ID="VCCAbono" runat="server" HighlightCssClass="vco" TargetControlID="CVAbono" Width="300px"></ajax:ValidatorCalloutExtender>
</div> </div>
</div> </div>
</ContentTemplate>
</asp:UpdatePanel> <div class="row" runat="server" visible="false" id="DVmodalConceptoTipoCambio">
<div class="col-xs-2" style="text-align: left">
Tipo de Cambio:
</div>
<div class="col-xs-3">
<asp:TextBox ID="TxtModalConceptoTipoCambio" runat="server" CssClass=" form-control input-sm" Style="text-align: right"></asp:TextBox><br />
<asp:CompareValidator ID="RfvTxtModalConceptoTipoCambio" runat="server" ControlToValidate="TxtCargo" Display="None" ErrorMessage="El campo <b>''Tipo de Cambio''</b> no tiene el formato correcto, por favor corrija e intente de nuevo (Solo formato numérico)." Operator="DataTypeCheck" Type="Currency" ValidationGroup="GrpMocalConceptoGuardar"></asp:CompareValidator>
<ajax:ValidatorCalloutExtender ID="VceRfvTxtModalConceptoTipoCambio" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtModalConceptoTipoCambio" Width="300px"></ajax:ValidatorCalloutExtender>
</div>
</div>
</div>
<div class="col-md-6" runat="server" id="DvMoldalConceptoSeccion2" visible="false">
<div runat="server" id="Div1">
<asp:Panel ID="Panel1" CssClass="chequesie text-small" runat="server" Width="400px" Visible="true">
<div class="chequesie1">
<div class="row">
<label class="col-md-2">Movimiento:</label>
<div class="col-md-6">
<asp:DropDownList ID="DdlModalConceptoTipoTransaccion" CssClass="form-control input-sm select2me" runat="server" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="TipoTransaccion" DataValueField="CveTipoTransaccion" Width="156px" ValidationGroup="GrpMocalConceptoGuardar"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvDdlModalConceptoTipoTransaccion" runat="server" ControlToValidate="DdlModalConceptoTipoTransaccion" InitialValue="-1" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Tipo Movimiento''</b> es necesario, por favor seleccione uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VceDdlModalConceptoTipoTransaccion" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlModalConceptoTipoTransaccion" Width="300px"></ajax:ValidatorCalloutExtender>
</div>
</div>
<div class="row">
<label class="col-md-2">Cuenta:</label>
<div class="col-md-6">
<asp:DropDownList ID="DdlModalConceptoCuenta" runat="server" CssClass="form-control input-sm select2me" AppendDataBoundItems="true" AutoPostBack="true" DataTextField="NumCuentaMoneda" DataValueField="CveCuenta" Width="200px" ValidationGroup="GrpMocalConceptoGuardar"></asp:DropDownList>
<asp:RequiredFieldValidator ID="RfvDdlModalConceptoCuenta" runat="server" ControlToValidate="DdlModalConceptoCuenta" Display="None" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Cuenta''</b> es necesario, por favor seleccione uno." InitialValue="-1" ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VceDdlModalConceptoCuenta" runat="server" HighlightCssClass="vco" TargetControlID="RfvDdlModalConceptoCuenta" Width="300px"></ajax:ValidatorCalloutExtender>
</div>
</div>
</div>
<div class="chequesie2">
<div class="row">
<asp:Label ID="Label1" runat="server" Text="Número:" class="col-md-2"></asp:Label>
<div class="col-md-4">
<asp:TextBox ID="TxtModalConceptoDocumentoFolio" CssClass="form-control input-sm" runat="server" MaxLength="12"></asp:TextBox>
<asp:RequiredFieldValidator ID="RfvTxtModalConceptoDocumentoFolio" runat="server" ControlToValidate="TxtModalConceptoDocumentoFolio" Display="None" ErrorMessage="El campo <b>''Folio''</b> es requerido por la aplicación, por favor ingrese uno." ValidationGroup="GrpMocalConceptoGuardar"></asp:RequiredFieldValidator>
<ajax:ValidatorCalloutExtender ID="VceTxtModalConceptoDocumentoFolio" runat="server" HighlightCssClass="vco" TargetControlID="RfvTxtModalConceptoDocumentoFolio" Width="350px"></ajax:ValidatorCalloutExtender>
</div>
<label class="col-md-2" style="display: none">Importe</label>
<div class="col-md-4 input-icon" style="display: none">
<i style="margin: 0px;">$</i>
<asp:TextBox ID="TxtModalConceptoDocumentoImporte" CssClass="form-control input-sm " Enabled="False" runat="server" MaxLength="12" Width="80px" ClientIDMode="Static" Style="text-align: right;"></asp:TextBox>
<ajax:FilteredTextBoxExtender ID="FilTxtModalConceptoDocumentoImporte" runat="server" TargetControlID="TxtModalConceptoDocumentoImporte" FilterType="Custom, Numbers" ValidChars=".," />
</div>
</div>
<div class="row">
<asp:Label ID="Label2" runat="server" Text="Beneficiario:" class="col-md-2"></asp:Label>
<div class="col-md-8">
<asp:TextBox ID="TxtModalConceptoDocumentoBeneficiario" runat="server" CssClass="form-control input-sm"></asp:TextBox>
</div>
</div>
<div class="row">
<label class="col-md-2">Observaciones:</label>
<div class="col-md-8">
<asp:TextBox ID="TxtModalConceptoDocumentoObservaciones" CssClass="form-control input-sm" runat="server" MaxLength="500" Rows="3" TextMode="MultiLine"></asp:TextBox>
</div>
</div>
</div>
</asp:Panel>
</div>
</div>
</div>
</div> </div>
<div class="modal-footer"> <div class="modal-footer">
<asp:Button ID="BtnAceptar" runat="server" class="btn btn-success" Text="Aceptar" /> <asp:Button ID="BtnAceptar" runat="server" class="btn btn-success" Text="Aceptar" ValidationGroup="GrpMocalConceptoGuardar" />
<button id="BtnCancelar" runat="server" type="button" class="btn default" data-dismiss="modal">Cancelar</button> <button id="BtnCancelar" runat="server" type="button" class="btn default" data-dismiss="modal">Cancelar</button>
</div> </div>
</ContentTemplate> </ContentTemplate>
</asp:UpdatePanel> </asp:UpdatePanel>
</div> </div>
</div> </div>
<div id="DivCargaExcel" class="modal ADS fade" role="dialog"> <div id="DivCargaExcel" class="modal ADS fade" role="dialog">
<div class="modal-dialog"> <div class="modal-dialog">
<!-- Modal content--> <!-- Modal content-->
@@ -1113,5 +1295,9 @@
} }
function valorIE() {
}
</script> </script>
</asp:Content> </asp:Content>

File diff suppressed because it is too large Load Diff

View File

@@ -585,7 +585,7 @@
<Paragraph> <Paragraph>
<TextRuns> <TextRuns>
<TextRun> <TextRun>
<Value>Regimen General de Ley Personas Morales</Value> <Value>Régimen Simplificado de Confianza</Value>
<Style> <Style>
<FontFamily>Myriad Pro</FontFamily> <FontFamily>Myriad Pro</FontFamily>
<FontSize>9.16pt</FontSize> <FontSize>9.16pt</FontSize>

View File

@@ -90,7 +90,13 @@ KM12 HERMOSILLO, SONORA</Value>
<Paragraph> <Paragraph>
<TextRuns> <TextRuns>
<TextRun> <TextRun>
<Value>SFD-101-00001</Value> <Value>JAM-101-</Value>
<Style>
<FontWeight>Normal</FontWeight>
</Style>
</TextRun>
<TextRun>
<Value>=Parameters!Consecutivo.Value</Value>
<Style> <Style>
<FontWeight>Normal</FontWeight> <FontWeight>Normal</FontWeight>
</Style> </Style>
@@ -481,7 +487,13 @@ KM12 HERMOSILLO, SONORA</Value>
<Paragraph> <Paragraph>
<TextRuns> <TextRuns>
<TextRun> <TextRun>
<Value>SFD-101-00001</Value> <Value>JAM-101-</Value>
<Style>
<FontWeight>Normal</FontWeight>
</Style>
</TextRun>
<TextRun>
<Value>=Parameters!Consecutivo.Value</Value>
<Style> <Style>
<FontWeight>Normal</FontWeight> <FontWeight>Normal</FontWeight>
</Style> </Style>
@@ -876,7 +888,13 @@ KM12 HERMOSILLO, SONORA</Value>
<Paragraph> <Paragraph>
<TextRuns> <TextRuns>
<TextRun> <TextRun>
<Value>SFD-101-00001</Value> <Value>JAM-101-</Value>
<Style>
<FontWeight>Normal</FontWeight>
</Style>
</TextRun>
<TextRun>
<Value>=Parameters!Consecutivo.Value</Value>
<Style> <Style>
<FontWeight>Normal</FontWeight> <FontWeight>Normal</FontWeight>
</Style> </Style>
@@ -1268,7 +1286,13 @@ KM12 HERMOSILLO, SONORA</Value>
<Paragraph> <Paragraph>
<TextRuns> <TextRuns>
<TextRun> <TextRun>
<Value>SFD-101-00001</Value> <Value>JAM-101-</Value>
<Style>
<FontWeight>Normal</FontWeight>
</Style>
</TextRun>
<TextRun>
<Value>=Parameters!Consecutivo.Value</Value>
<Style> <Style>
<FontWeight>Normal</FontWeight> <FontWeight>Normal</FontWeight>
</Style> </Style>
@@ -1626,6 +1650,18 @@ KM12 HERMOSILLO, SONORA</Value>
<AllowBlank>true</AllowBlank> <AllowBlank>true</AllowBlank>
<Prompt>ReportParameter1</Prompt> <Prompt>ReportParameter1</Prompt>
</ReportParameter> </ReportParameter>
<ReportParameter Name="Consecutivo">
<DataType>String</DataType>
<Nullable>true</Nullable>
<AllowBlank>true</AllowBlank>
<Prompt>ReportParameter1</Prompt>
</ReportParameter>
<ReportParameter Name="Fecha">
<DataType>String</DataType>
<Nullable>true</Nullable>
<AllowBlank>true</AllowBlank>
<Prompt>ReportParameter1</Prompt>
</ReportParameter>
</ReportParameters> </ReportParameters>
<EmbeddedImages> <EmbeddedImages>
<EmbeddedImage Name="logojam"> <EmbeddedImage Name="logojam">

3235
GPS/PalletEtiquetaCaja.rdlc Normal file

File diff suppressed because it is too large Load Diff

3208
GPS/PalletEtiqueta_2.rdlc Normal file

File diff suppressed because it is too large Load Diff

View File

@@ -71,6 +71,14 @@
<div class="modal-body"> <div class="modal-body">
<div class="row"> <div class="row">
<div class="form-group form-md-line-input input-iconright">
<asp:RadioButtonList runat="server" ID="RdTipoUnidad" AutoPostBack="true" OnSelectedIndexChanged="RdTipoUnidad_SelectedIndexChanged" RepeatDirection="Horizontal">
<asp:ListItem Value="1" Selected="True">Unidad</asp:ListItem>
<asp:ListItem Value="2">Remolque</asp:ListItem>
</asp:RadioButtonList>
</div>
<div class="form-group form-md-line-input input-iconright col-md-12"> <div class="form-group form-md-line-input input-iconright col-md-12">
<asp:TextBox ID="TxtEspecificacionNuevo" CssClass="form-control" runat="server" MaxLength="100"></asp:TextBox> <asp:TextBox ID="TxtEspecificacionNuevo" CssClass="form-control" runat="server" MaxLength="100"></asp:TextBox>
<label for="<%= TxtEspecificacionNuevo.ClientID.ToString()%>">Unidad:</label> <label for="<%= TxtEspecificacionNuevo.ClientID.ToString()%>">Unidad:</label>
@@ -89,9 +97,9 @@
</div> </div>
</div> </div>
<div class="form-group form-md-line-input input-iconright col-md-12"> <div class="form-group form-md-line-input input-iconright col-md-12" runat="server" visible="false" id="DvNumeroTrailler">
<asp:TextBox ID="TxtNumeroTrailer" CssClass="form-control" runat="server" MaxLength="100"></asp:TextBox> <asp:TextBox ID="TxtNumeroTrailer" CssClass="form-control" runat="server" MaxLength="100"></asp:TextBox>
<asp:Label AssociatedControlID="TxtNumeroTrailer" runat="server" Text="NÚMERO DE TRAILER"></asp:Label> <asp:Label AssociatedControlID="TxtNumeroTrailer" runat="server" Text="Número De Unidad"></asp:Label>
<i></i> <i></i>
</div> </div>
@@ -241,7 +249,7 @@
</div> </div>
<asp:CheckBox ID="ChkesRemolque" Checked="true" TextAlign="Left" Text="¿Es remolque?:" runat="server" AutoPostBack="true" OnCheckedChanged="ChkesRemolque_CheckedChanged" /> <%--<asp:CheckBox ID="ChkesRemolque" Checked="true" TextAlign="Left" Text="¿Es remolque?:" runat="server" AutoPostBack="true" OnCheckedChanged="ChkesRemolque_CheckedChanged" />--%>
</div> </div>

View File

@@ -23,6 +23,11 @@ Partial Class Inventarios_CatUnidades
End If End If
End Sub End Sub
Public Sub CargaDatos() Public Sub CargaDatos()
@@ -98,11 +103,12 @@ Partial Class Inventarios_CatUnidades
TxtNumeroTrailer.Text = "" TxtNumeroTrailer.Text = ""
TxtSCAC.Text = "" TxtSCAC.Text = ""
TxtCAAT.Text = "" TxtCAAT.Text = ""
ChkesRemolque.Checked = False
RdTipoUnidad.SelectedValue = "1"
LtlTituloModal.Text = "Agregar Unidad" LtlTituloModal.Text = "Agregar Unidad"
DdlTiposRemolque.SelectedValueExist(-1) DdlTiposRemolque.SelectedValueExist(-1)
ChkesRemolque_CheckedChanged(Nothing, Nothing) RdTipoUnidad_SelectedIndexChanged(Nothing, Nothing)
UpModalUnidades.Update() UpModalUnidades.Update()
RegistraScript(String.Format("$('#{0}').modal();", "DivAgregarUnidad")) RegistraScript(String.Format("$('#{0}').modal();", "DivAgregarUnidad"))
@@ -140,11 +146,13 @@ Partial Class Inventarios_CatUnidades
TxtSCAC.Text = GvRow.DataKey("SCAC") TxtSCAC.Text = GvRow.DataKey("SCAC")
TxtCAAT.Text = GvRow.DataKey("CAAT") TxtCAAT.Text = GvRow.DataKey("CAAT")
ChkesRemolque.Checked = (GvRow.DataKey("CveTipoCamion") = "2") 'ChkesRemolque.Checked = (GvRow.DataKey("CveTipoCamion") = "2")
RdTipoUnidad.SelectedValue = GvRow.DataKey("CveTipoCamion")
LtlTituloModal.Text = "Actualizar Unidad" LtlTituloModal.Text = "Actualizar Unidad"
ChkesRemolque_CheckedChanged(Nothing, Nothing) RdTipoUnidad_SelectedIndexChanged(Nothing, Nothing)
UpModalUnidades.Update() UpModalUnidades.Update()
@@ -185,7 +193,7 @@ Partial Class Inventarios_CatUnidades
Dim ErrorPrceso As Boolean = False Dim ErrorPrceso As Boolean = False
Dim CveTipoCamion As Integer = If(ChkesRemolque.Checked, 2, 1) Dim CveTipoCamion As Integer = RdTipoUnidad.SelectedValue.ToEntero
Using ObjInventarios As New ClsInventarios Using ObjInventarios As New ClsInventarios
If CveCamion <= 0 Then If CveCamion <= 0 Then
@@ -218,9 +226,9 @@ Partial Class Inventarios_CatUnidades
End Sub End Sub
Protected Sub ChkesRemolque_CheckedChanged(sender As Object, e As EventArgs) Protected Sub RdTipoUnidad_SelectedIndexChanged(sender As Object, e As EventArgs)
If Not ChkesRemolque.Checked Then If RdTipoUnidad.SelectedValue.ToEntero = 1 Then
DVAnio.Visible = True DVAnio.Visible = True
DVConfigAuto.Visible = True DVConfigAuto.Visible = True
@@ -230,11 +238,14 @@ Partial Class Inventarios_CatUnidades
DVNombreAseguradoraMedioAmbiente.Visible = True DVNombreAseguradoraMedioAmbiente.Visible = True
DVNumPolizaSeguroMedioAmbient.Visible = True DVNumPolizaSeguroMedioAmbient.Visible = True
DVLineaTransportacion.Visible = True 'DVLineaTransportacion.Visible = True
DVSCACCAAT.Visible = True 'DVSCACCAAT.Visible = True
DVTiposRemolque.Visible = False
'DVLongitudCaja.Visible = False
DVTiposRemolque.Visible = False DVTiposRemolque.Visible = False
DVLongitudCaja.Visible = False
Else Else
DVAnio.Visible = False DVAnio.Visible = False
DVConfigAuto.Visible = False DVConfigAuto.Visible = False
@@ -244,16 +255,33 @@ Partial Class Inventarios_CatUnidades
DVNombreAseguradoraMedioAmbiente.Visible = False DVNombreAseguradoraMedioAmbiente.Visible = False
DVNumPolizaSeguroMedioAmbient.Visible = False DVNumPolizaSeguroMedioAmbient.Visible = False
DVLineaTransportacion.Visible = False 'DVLineaTransportacion.Visible = False
DVSCACCAAT.Visible = False 'DVSCACCAAT.Visible = False
DVTiposRemolque.Visible = True DVTiposRemolque.Visible = True
DVLongitudCaja.Visible = True 'DVLongitudCaja.Visible = True
DVTiposRemolque.Visible = True
End If End If
DVTiposRemolque.Visible = ChkesRemolque.Checked If UsuarioActual.Empresa.Funcionalidad(590) = "1" Then
UpModalUnidades.Update DvNumeroTrailler.Visible = True
DVLongitudCaja.Visible = True
DVLineaTransportacion.Visible = True
DVSCACCAAT.Visible = True
Else
DvNumeroTrailler.Visible = False
DVLongitudCaja.Visible = False
DVLineaTransportacion.Visible = False
DVSCACCAAT.Visible = False
End If
UpModalUnidades.Update()
End Sub End Sub
End Class End Class

View File

@@ -109,7 +109,12 @@ Partial Class Inventarios_Kardex
If ddlProducto2.UsaWebService Then If ddlProducto2.UsaWebService Then
ddlProducto2.ddlWS.Attributes.Add("data-Estatus", "-1") ddlProducto2.ddlWS.Attributes.Add("data-Estatus", "-1")
If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then '' se cambio la página para que puedan filtrar "servicios" como los usados.
ddlProducto2.ddlWS.Attributes.Add("data-pagina", "Kardex")
Else
ddlProducto2.ddlWS.Attributes.Add("data-pagina", "Inventarios") ddlProducto2.ddlWS.Attributes.Add("data-pagina", "Inventarios")
End If
ddlProducto2.ddlWS.Attributes.Add("data-cveclasificacion", DdlClasificacion.SelectedValue) ddlProducto2.ddlWS.Attributes.Add("data-cveclasificacion", DdlClasificacion.SelectedValue)
'DdlClasificacion.AutoPostBack = False 'DdlClasificacion.AutoPostBack = False

View File

@@ -131,18 +131,16 @@
ShowHeaderWhenEmpty="false" CssClass="table table-advance table-GvM Widthall" GridLines="None"> ShowHeaderWhenEmpty="false" CssClass="table table-advance table-GvM Widthall" GridLines="None">
<Columns> <Columns>
<asp:HyperLinkField HeaderText="Fecha" ItemStyle-Width="75px" DataTextField="FechaMovto" ItemStyle-CssClass="Texto" DataNavigateUrlFields="CveMovimiento" DataNavigateUrlFormatString="/Inventarios/EntradasSalidas.aspx?CveMovimiento={0}" /> <asp:HyperLinkField HeaderText="Fecha" ItemStyle-Width="75px" DataTextField="FechaMovto" ItemStyle-CssClass="Texto" DataNavigateUrlFields="CveMovimiento" DataNavigateUrlFormatString="/Inventarios/EntradasSalidas.aspx?CveMovimiento={0}" />
<asp:BoundField HeaderText="Almacen" ItemStyle-Width="150px" DataField="Almacen" /> <asp:BoundField HeaderText="Almacen" DataField="Almacen" />
<asp:HyperLinkField HeaderText="Folio" ItemStyle-Width="50px" DataTextField="Folio" ItemStyle-CssClass="Texto" DataNavigateUrlFields="CveMovimiento" DataNavigateUrlFormatString="/Inventarios/EntradasSalidas.aspx?CveMovimiento={0}" /> <asp:HyperLinkField HeaderText="Folio" ItemStyle-Width="100px" DataTextField="Folio" ItemStyle-CssClass="Texto" DataNavigateUrlFields="CveMovimiento" DataNavigateUrlFormatString="/Inventarios/EntradasSalidas.aspx?CveMovimiento={0}" />
<asp:BoundField HeaderText="Activo Fijo" DataField="CodigoAF" ItemStyle-HorizontalAlign="Left" Visible="false" /> <asp:BoundField HeaderText="Activo Fijo" DataField="CodigoAF" ItemStyle-HorizontalAlign="Left" Visible="false" />
<asp:BoundField HeaderText="SubProyecto" DataField="SubProyecto" ItemStyle-HorizontalAlign="Left" Visible="false" /> <asp:BoundField HeaderText="SubProyecto" DataField="SubProyecto" ItemStyle-HorizontalAlign="Left" Visible="false" />
<asp:BoundField HeaderText="Entradas" ItemStyle-Width="75px" DataField="Entradas" DataFormatString="{0:#,###.####}" ItemStyle-HorizontalAlign="Left"/> <asp:BoundField HeaderText="Entradas" ItemStyle-Width="75px" DataField="Entradas" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right"/>
<asp:BoundField HeaderText="Costo" ItemStyle-Width="75px" DataField="CostoE" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Left"/> <asp:BoundField HeaderText="Costo" ItemStyle-Width="100px" DataField="CostoE" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right"/>
<asp:BoundField HeaderText="Importe" ItemStyle-Width="75px" DataField="ImporteE" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Left"/> <asp:BoundField HeaderText="Salidas" ItemStyle-Width="75px" DataField="Salidas" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right"/>
<asp:BoundField HeaderText="Salidas" ItemStyle-Width="75px" DataField="Salidas" DataFormatString="{0:#,###.####}" ItemStyle-HorizontalAlign="Left"/> <asp:BoundField HeaderText="Costo" ItemStyle-Width="100px" DataField="CostoS" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right"/>
<asp:BoundField HeaderText="Costo" ItemStyle-Width="75px" DataField="CostoS" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Left"/> <asp:BoundField HeaderText="Existencia" ItemStyle-Width="75px" DataField="ExistenciaAcum" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right"/>
<asp:BoundField HeaderText="Importe" ItemStyle-Width="75px" DataField="ImporteS" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Left"/> <asp:BoundField HeaderText="Valor" ItemStyle-Width="100px" DataField="ValorAcum" DataFormatString="{0:#,###.##}" ItemStyle-HorizontalAlign="Right"/>
<asp:BoundField HeaderText="Existencia" ItemStyle-Width="75px" DataField="ExistenciaAcum" DataFormatString="{0:#,###.####}" ItemStyle-HorizontalAlign="Left"/>
<asp:BoundField HeaderText="Valor" ItemStyle-Width="75px" DataField="ValorAcum" DataFormatString="{0:N2}" ItemStyle-HorizontalAlign="Left"/>
</Columns> </Columns>
</asp:GridView> </asp:GridView>
</div> </div>

View File

@@ -85,13 +85,9 @@ Partial Class Inventarios_RepExistenciasCostos
Private Sub CargaPermisos() Private Sub CargaPermisos()
Dim TienePermisoImportes As Boolean = UsuarioActual.TienePermisoProceso(201) Dim TienePermisoImportes As Boolean = UsuarioActual.TienePermisoProceso(201)
GvM.Columns(6).Visible = TienePermisoImportes GvM.Columns(6).Visible = TienePermisoImportes
GvM.Columns(8).Visible = TienePermisoImportes
GvM.Columns(7).Visible = TienePermisoImportes
GvM.Columns(9).Visible = TienePermisoImportes
GvM.Columns(10).Visible = TienePermisoImportes GvM.Columns(10).Visible = TienePermisoImportes
GvM.Columns(12).Visible = TienePermisoImportes
End Sub End Sub
Public Sub CargaCombos() Public Sub CargaCombos()
@@ -130,7 +126,6 @@ Partial Class Inventarios_RepExistenciasCostos
DdlAlmacen.Items.Insert(0, New ListItem("Seleccione", "-1")) DdlAlmacen.Items.Insert(0, New ListItem("Seleccione", "-1"))
DdlAlmacen.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1) DdlAlmacen.DataSource = GlobalDTAlmacenUsuarios(UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, -1)
DdlAlmacen.DataBind() DdlAlmacen.DataBind()
DdlAlmacen.Items.Insert(0, New ListItem("Todos", "-1")) DdlAlmacen.Items.Insert(0, New ListItem("Todos", "-1"))
@@ -202,11 +197,8 @@ Partial Class Inventarios_RepExistenciasCostos
Dim TienePermisoImportes = UsuarioActual.TienePermisoProceso(201) Dim TienePermisoImportes = UsuarioActual.TienePermisoProceso(201)
e.Row.Cells(6).Visible = TienePermisoImportes e.Row.Cells(6).Visible = TienePermisoImportes
e.Row.Cells(7).Visible = TienePermisoImportes e.Row.Cells(8).Visible = TienePermisoImportes
e.Row.Cells(9).Visible = TienePermisoImportes
e.Row.Cells(10).Visible = TienePermisoImportes e.Row.Cells(10).Visible = TienePermisoImportes
e.Row.Cells(12).Visible = TienePermisoImportes
Select Case e.Row.DBCampo("Orden").ToEntero Select Case e.Row.DBCampo("Orden").ToEntero
Case 10 Case 10
@@ -224,8 +216,6 @@ Partial Class Inventarios_RepExistenciasCostos
e.Row.Cells(8).Text = "" e.Row.Cells(8).Text = ""
e.Row.Cells(9).Text = "" e.Row.Cells(9).Text = ""
e.Row.Cells(10).Text = "" e.Row.Cells(10).Text = ""
e.Row.Cells(11).Text = ""
e.Row.Cells(12).Text = ""
Case 15 Case 15
If e.Row.DBCampo("CveMovimiento").ToString.ToEntero <= 0 Then If e.Row.DBCampo("CveMovimiento").ToString.ToEntero <= 0 Then
e.Row.Cells(0).Text = e.Row.DBCampo("FechaMovto") e.Row.Cells(0).Text = e.Row.DBCampo("FechaMovto")
@@ -240,8 +230,8 @@ Partial Class Inventarios_RepExistenciasCostos
e.Row.Cells(1).Visible = False e.Row.Cells(1).Visible = False
e.Row.Cells(2).Visible = False e.Row.Cells(2).Visible = False
e.Row.Cells(11).Text = e.Row.DBCampo("ExistenciaTotal").ToDouble().ToString("#,####.####") e.Row.Cells(9).Text = e.Row.DBCampo("ExistenciaTotal").ToDouble().ToString("#,####.####")
e.Row.Cells(12).Text = e.Row.DBCampo("ValorTotal").FormatoNumero e.Row.Cells(10).Text = e.Row.DBCampo("ValorTotal").FormatoNumero
End Select End Select

View File

@@ -905,9 +905,16 @@ ADSScroll = function (tablescroll) {
//tablescroll.before(objDiv); //tablescroll.before(objDiv);
//objDiv.append(tablescroll); //objDiv.append(tablescroll);
if (firsttr) { if (firsttr) {
let childitem = firsttr.find('> td,th').length;
let contador =1
firsttr.find('> td,th').each(function () { firsttr.find('> td,th').each(function () {
var thistd = $(this); var thistd = $(this);
trWwidth.append($('<td><div style="width:' + thistd.width() + 'px;"></br></div></td>')) let widthitem = thistd.width();
if ((childitem == contador) && widthitem > 0) {
widthitem = widthitem - 10;
}
trWwidth.append($('<td><div style="width:' + widthitem + 'px;"></br></div></td>'));
contador++;
}); });
} }
//objDiv.before(tablescroll); //objDiv.before(tablescroll);

View File

@@ -79,5 +79,18 @@
} }
function gotourl(url) {
var reload = window.opener;
if (!reload) {
reload = parent;
}
if (!url) {
url = reload.location.href.replace("#", "");
}
reload.location = url;
window.close();
}
</script> </script>
</asp:Content> </asp:Content>

View File

@@ -501,6 +501,19 @@
</div> </div>
</div> </div>
<div class="row" id="divRegimen" runat="server" visible="false" >
<div class="col-md-12">
<div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlRegimenFiscal" DataTextField="CodigoRegimenFiscalTexto" Width="100%" DataValueField="CveRegimenFiscal" runat="server" CssClass="form-control input-sm select2me">
<asp:ListItem Selected="True" Text="Seleccione" Value="-1"></asp:ListItem>
</asp:DropDownList>
<asp:RequiredFieldValidator ID="RFVRegimenFiscal" runat="server" InitialValue="-1" ControlToValidate="DdlRegimenFiscal" CssClass="help-block errorimput" ErrorMessage="<b><span style='text-decoration: underline'>ERROR:</span></b><br />El campo <b>''Regimen Fiscal''</b> es necesario, por favor ingréselo." ValidationGroup="GrpGuardar"></asp:RequiredFieldValidator>
<label for="<%= DdlRegimenFiscal.ClientID.ToString()%>">Régimen Fiscal:</label>
<i></i>
</div>
</div>
</div>
</div> </div>
@@ -633,20 +646,6 @@
<label>Requiere OC para facturar: </label> <label>Requiere OC para facturar: </label>
<asp:CheckBox ID="ChkRequiereOC" runat="server" CssClass="make-switchsd" data-size="small" Text="" ClientIDMode="Static" /> <asp:CheckBox ID="ChkRequiereOC" runat="server" CssClass="make-switchsd" data-size="small" Text="" ClientIDMode="Static" />
</div> </div>
<div runat="server" id="DivEsDistribuidor" visible="false" class="form-group form-md-line-input input-iconright">
<label>Es distribuidor: </label>
<asp:CheckBox ID="ChkEsDistribuidor" runat="server" CssClass="make-switchsd" data-size="small" Text="" ClientIDMode="Static" />
</div>
<div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlTipoCliente" runat="server" CssClass=" form-control input-sm select2me" Width="200px" AutoPostBack="true" OnSelectedIndexChanged="DdlTipoCliente_SelectedIndexChanged">
<asp:ListItem Selected="True" Value="1">Frecuente</asp:ListItem>
<asp:ListItem Value="2">Venta Mostrador</asp:ListItem>
</asp:DropDownList>
<label for="<%= DdlTipoCliente.ClientID.ToString()%>">Tipo de Cliente:</label>
</div>
<div class="form-group form-md-line-input input-iconright" id="divCorreoEntregaCompras" runat="server" visible="false"> <div class="form-group form-md-line-input input-iconright" id="divCorreoEntregaCompras" runat="server" visible="false">
<asp:TextBox runat="server" ID="TxtCorreoEntregaCompras" CssClass="form-control" /> <asp:TextBox runat="server" ID="TxtCorreoEntregaCompras" CssClass="form-control" />
<label for="<%= TxtCorreoEntregaCompras.ClientID.ToString()%>">Correo de Entrega de Compras:</label> <label for="<%= TxtCorreoEntregaCompras.ClientID.ToString()%>">Correo de Entrega de Compras:</label>
@@ -657,17 +656,35 @@
<label for="<%= TxtCorreoEntregaAlmacen.ClientID.ToString()%>">Correo de Entrega de Almacén:</label> <label for="<%= TxtCorreoEntregaAlmacen.ClientID.ToString()%>">Correo de Entrega de Almacén:</label>
</div> </div>
<div class="form-group form-md-line-input input-iconright" runat="server" id="DivCargoUsado" visible="false"> <div class="form-group form-md-line-input input-iconright">
<asp:DropDownList ID="DdlTipoCliente" runat="server" CssClass=" form-control input-sm select2me" Width="200px" AutoPostBack="true" OnSelectedIndexChanged="DdlTipoCliente_SelectedIndexChanged">
<asp:ListItem Selected="True" Value="1">Frecuente</asp:ListItem>
<asp:ListItem Value="2">Venta Mostrador</asp:ListItem>
</asp:DropDownList>
<label for="<%= DdlTipoCliente.ClientID.ToString()%>">Tipo de Cliente:</label>
</div>
<div runat="server" id="DivEsDistribuidor" visible="false" class="form-group form-md-line-input input-iconright">
<label>Es distribuidor: </label>
<asp:CheckBox ID="ChkEsDistribuidor" runat="server" CssClass="make-switchsd" data-size="small" Text="" ClientIDMode="Static" />
</div>
<div class="row">
<div class="col-md-6">
<div class="form-group form-md-line-input" runat="server" id="DivCargoUsado" visible="false">
<label>Cargo Usado:</label> <label>Cargo Usado:</label>
<asp:CheckBox ID="ChkCargoUsado" runat="server" CssClass="make-switchsd" data-size="small" Text="" ClientIDMode="Static" Enabled="true" /> <asp:CheckBox ID="ChkCargoUsado" runat="server" CssClass="make-switchsd" data-size="small" Text="" ClientIDMode="Static" Enabled="true" />
</div> </div>
<div class="form-group form-md-line-input input-iconright" runat="server" id="DivBonificacionUsado" visible="false"> </div>
<div class="col-md-6">
<div class="form-group form-md-line-input" runat="server" id="DivBonificacionUsado" visible="false">
<label>Bonificación Usado:</label> <label>Bonificación Usado:</label>
<asp:CheckBox ID="ChkBonificacionUsado" runat="server" CssClass="make-switchsd" data-size="small" Text="" ClientIDMode="Static" /> <asp:CheckBox ID="ChkBonificacionUsado" runat="server" CssClass="make-switchsd" data-size="small" Text="" ClientIDMode="Static" />
</div> </div>
</div> </div>
</div> </div>
</div> </div>
</div>
</div>
<%-- Marcar el Cliente como Frecuente --%> <%-- Marcar el Cliente como Frecuente --%>
<div class="col-md-6 " id="DivProtletRegistrar" visible="false" runat="server"> <div class="col-md-6 " id="DivProtletRegistrar" visible="false" runat="server">

View File

@@ -753,6 +753,10 @@ Partial Class Clientes
DivRetIVA.Visible = False DivRetIVA.Visible = False
End If End If
If UsuarioActual.Empresa.Funcionalidad(350) = "1" Then
divRegimen.Visible = True
End If
If Request("CveCliente") IsNot Nothing AndAlso IsNumeric(Request("CveCliente")) AndAlso Request("CveCliente").ToEntero() > 0 Then If Request("CveCliente") IsNot Nothing AndAlso IsNumeric(Request("CveCliente")) AndAlso Request("CveCliente").ToEntero() > 0 Then
'If UsuarioActual.CveEmpresa = 2 AndAlso UsuarioActual.CveUsuario = 77 AndAlso Not Request("CveCliente").Contiene("10450", "10460", "10458") Then 'If UsuarioActual.CveEmpresa = 2 AndAlso UsuarioActual.CveUsuario = 77 AndAlso Not Request("CveCliente").Contiene("10450", "10460", "10458") Then
' BtnGuardar.Enabled = False : BtnEliminar.Enabled = False : LbAgregarSucursal.Enabled = False : LbEnviarActivacionPortal.Enabled = False ' BtnGuardar.Enabled = False : BtnEliminar.Enabled = False : LbAgregarSucursal.Enabled = False : LbEnviarActivacionPortal.Enabled = False
@@ -788,8 +792,16 @@ Partial Class Clientes
UpAccionesCRM.Update() UpAccionesCRM.Update()
End If End If
If UsuarioActual.Empresa.Funcionalidad(531) = "1" AndAlso UsuarioActual.CveRol.Contiene(1280, 1511) Then If UsuarioActual.Empresa.Funcionalidad(531) = "1" Then 'si es acumuladora
'AndAlso UsuarioActual.CveRol.Contiene(1280, 1511)
If Not PermiteEditar() Then 'sino puede editar todos los datos del cliente, se bloquean los de distribuidor
DeshabilitarDatosClienteCajas() DeshabilitarDatosClienteCajas()
If UsuarioActual.TienePermisoProceso(309) Then 'si tiene permiso para edditar datos pero no de distribuidro
BtnGuardar.Visible = True
End If
End If
End If End If
End If End If
@@ -816,6 +828,7 @@ Partial Class Clientes
Else Else
'Configuración de Modalidad Insert 'Configuración de Modalidad Insert
CargaEstados() CargaEstados()
BtnGuardar.Visible = PermiteGuardar()
If UsuarioActual.Empresa.Funcionalidad(525) = "1" Then If UsuarioActual.Empresa.Funcionalidad(525) = "1" Then
Dim ObjClientes As New ClsClientes Dim ObjClientes As New ClsClientes
@@ -876,15 +889,6 @@ Partial Class Clientes
'Crea y carga CuentasBancarias - tab:Bancos 'Crea y carga CuentasBancarias - tab:Bancos
CargaCuentasBancarias() CargaCuentasBancarias()
'PERMISOS PAGINA
If CveCliente > 0 Then
LtlTareaNueva.Text = String.Format("<a class=""caption-subject bold font-green"" onclick=""OpenModalNewTareaUserControl(1,-1,{{CveCliente:{0}}});""> <i class=""fa fa-plus""'></i> Tarea</a>", CveCliente)
BtnEliminar.Visible = PermiteEliminar()
BtnGuardar.Visible = PermiteEditar()
Else
BtnGuardar.Visible = PermiteGuardar()
End If
UpGuardar.Update() UpGuardar.Update()
'[IPP]: SOLO PARA JAM '[IPP]: SOLO PARA JAM
@@ -1246,10 +1250,9 @@ Partial Class Clientes
CargaClasificaciones() CargaClasificaciones()
If UsuarioActual.Empresa.UsaContabilidad Then
'CargaCuentasContables()
End If
DdlRegimenFiscal.DataSource = GlobalDTRegimenesFiscales
DdlRegimenFiscal.DataBind()
CargaCombosComercioExterior() CargaCombosComercioExterior()
@@ -1426,6 +1429,9 @@ Partial Class Clientes
If ObjClientes.DtResultados.Rows.Count > 0 Then If ObjClientes.DtResultados.Rows.Count > 0 Then
Existe = True Existe = True
Retorno = True Retorno = True
LtlTareaNueva.Text = String.Format("<a class=""caption-subject bold font-green"" onclick=""OpenModalNewTareaUserControl(1,-1,{{CveCliente:{0}}});""> <i class=""fa fa-plus""'></i> Tarea</a>", CveCliente)
BtnEliminar.Visible = PermiteEliminar()
BtnGuardar.Visible = PermiteEditar()
CargaDdlSucursalCliente() CargaDdlSucursalCliente()
CargaDocumentosVenta(CveCliente) CargaDocumentosVenta(CveCliente)
@@ -1574,6 +1580,7 @@ Partial Class Clientes
DdlUsoCFDI.SelectedValueExist(ObjClientes.CveUsoCFDI.ToString()) DdlUsoCFDI.SelectedValueExist(ObjClientes.CveUsoCFDI.ToString())
DdlMetodoPago33.SelectedValueExist(ObjClientes.CveMetodoPago33.ToString()) DdlMetodoPago33.SelectedValueExist(ObjClientes.CveMetodoPago33.ToString())
DdlFormaPago33.SelectedValueExist(ObjClientes.CveFormaPago33.ToString()) DdlFormaPago33.SelectedValueExist(ObjClientes.CveFormaPago33.ToString())
DdlRegimenFiscal.SelectedValueExist(ObjClientes.CveRegimenFiscal)
ChkDesglosarIEPS.Checked = ObjClientes.DesglosaIEPS ChkDesglosarIEPS.Checked = ObjClientes.DesglosaIEPS
ChkNoDesglosaIVA.Checked = ObjClientes.NoDesglosaIVA ChkNoDesglosaIVA.Checked = ObjClientes.NoDesglosaIVA
@@ -2613,7 +2620,8 @@ Partial Class Clientes
CveFormaPago33:=DdlFormaPago33.SelectedValue.ToEntero(), CveMetodoPago33:=DdlMetodoPago33.SelectedValue.ToEntero(), DesglosaIEPS:=ChkDesglosarIEPS.Checked, AplicaComercioExterior:=ChkAplicaComercioExterior.Checked, CveTipoOperacion:=DdlTipoOperacion.SelectedValue.ToEntero(), CvePedimento:=DdlClavePedimento.SelectedValue.ToEntero(), CveIncoterm:=DdlIncoterm.SelectedValue.ToEntero(), CveFormaPago33:=DdlFormaPago33.SelectedValue.ToEntero(), CveMetodoPago33:=DdlMetodoPago33.SelectedValue.ToEntero(), DesglosaIEPS:=ChkDesglosarIEPS.Checked, AplicaComercioExterior:=ChkAplicaComercioExterior.Checked, CveTipoOperacion:=DdlTipoOperacion.SelectedValue.ToEntero(), CvePedimento:=DdlClavePedimento.SelectedValue.ToEntero(), CveIncoterm:=DdlIncoterm.SelectedValue.ToEntero(),
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(), 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, 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())) Then 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) Then
ViewState("CveCliente") = ObjClientes.CveCliente ViewState("CveCliente") = ObjClientes.CveCliente
@@ -2710,7 +2718,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(), 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(), 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()), CveAdminTrayecto:=If(DdlAdminTrayecto.SelectedValue.ToEntero() <= 0, 0, DdlAdminTrayecto.SelectedValue.ToEntero()),
NoDesglosaIVA:=ChkNoDesglosaIVA.Checked) Then NoDesglosaIVA:=ChkNoDesglosaIVA.Checked, CveRegimenFiscal:=DdlRegimenFiscal.SelectedValue.ToEntero) Then
ObjClientes.LimpiaImpuestosLocales(CveCliente) ObjClientes.LimpiaImpuestosLocales(CveCliente)
@@ -9475,14 +9483,12 @@ Partial Class Clientes
GvUsadosResumen.DataSource = ObjAcum.DtResultados GvUsadosResumen.DataSource = ObjAcum.DtResultados
ImporteBonificacion = ObjAcum.DtResultados.Rows(5)("Valor").ToString().ToDecimal() ImporteBonificacion = ObjAcum.DtResultados.Rows(5)("Valor").ToString().ToDecimal()
End If End If
GvUsadosResumen.DataBind()
'LnkFacturaUsadosCargos.Visible = If(ImporteCargo > 0, True, False)
LnkFacturaUsadosBonificacion.Visible = If(ImporteBonificacion > 0, True, False)
ObjAcum.Dispose() ObjAcum.Dispose()
GvAcum.DataBind() GvAcum.DataBind()
GvUsadosResumen.DataBind()
'LnkFacturaUsadosCargos.Visible = If(ImporteCargo > 0, True, False)
LnkFacturaUsadosBonificacion.Visible = If(ImporteBonificacion > 0, True, False)
UpAcciones.Update() UpAcciones.Update()
'UpUsadosResumen.Update() 'UpUsadosResumen.Update()

View File

@@ -621,6 +621,9 @@ Partial Class Ventas_ClientesAbonar
End If End If
End If End If
If RblTipoPago.SelectedValue = "1" Then
Dim ValFechaDocumento As Boolean = False Dim ValFechaDocumento As Boolean = False
Dim FoliosFechasValFechaDocumento As New StringBuilder Dim FoliosFechasValFechaDocumento As New StringBuilder
@@ -650,16 +653,13 @@ Partial Class Ventas_ClientesAbonar
End If End If
End If End If
Next Next
If ValFechaDocumento Then If ValFechaDocumento Then
Alert(FoliosFechasValFechaDocumento.ToString, TipoMensaje.MsgAdvertencia) Alert(FoliosFechasValFechaDocumento.ToString, TipoMensaje.MsgAdvertencia)
Exit Sub Exit Sub
End If End If
End If
If Not TxtImporte.Text.ToDecimal > 0 Then If Not TxtImporte.Text.ToDecimal > 0 Then
Alert("Debe de llevar un Importe", TipoMensaje.MsgAdvertencia) Alert("Debe de llevar un Importe", TipoMensaje.MsgAdvertencia)

View File

@@ -501,10 +501,19 @@
<i>$</i> <i>$</i>
</div> </div>
<div class="form-group form-md-line-input input-iconright"> <div class="form-group form-md-line-input input-iconright">
<div class="row" id="DivObjetoImpuesto" runat="server" visible="false">
<div class="col-md-12">
<div class="form-group form-md-line-input input-iconright">
<label for="<%= DdlObjetoImpuesto.ClientID.ToString()%>">Obj.Imp:</label>
<asp:DropDownList ID="DdlObjetoImpuesto" CssClass="form-control input-sm select2me" Width="100%" runat="server" DataValueField="CveObjetoImpuesto" DataTextField="CodigoObjetoImpuestoTexto" >
</asp:DropDownList>
</div>
</div>
</div>
<div class="row"> <div class="row">
<div id="DvTipo" runat="server" class="col-md-6"> <div id="DvTipo" runat="server" class="col-md-6">
<label for="<%= DdlTipoFactor.ClientID.ToString()%>">Tipo Factor:</label> <label for="<%= DdlTipoFactor.ClientID.ToString()%>">Tipo Factor:</label>
<asp:DropDownList ID="DdlTipoFactor" CssClass="form-control input-sm select2me" runat="server" AutoPostBack="true"> <asp:DropDownList ID="DdlTipoFactor" Width="100%" CssClass="form-control input-sm select2me" runat="server" AutoPostBack="true">
<asp:ListItem Selected="True" Text="Tasa" Value="1"></asp:ListItem> <asp:ListItem Selected="True" Text="Tasa" Value="1"></asp:ListItem>
<asp:ListItem Text="Cuota" Value="2"></asp:ListItem> <asp:ListItem Text="Cuota" Value="2"></asp:ListItem>
<asp:ListItem Text="Exento" Value="3"></asp:ListItem> <asp:ListItem Text="Exento" Value="3"></asp:ListItem>
@@ -947,6 +956,7 @@
</div> </div>
</div> </div>
<div class="col-md-6"> <div class="col-md-6">
<div class="portlet xspadding light bordered"> <div class="portlet xspadding light bordered">
<div class="portlet-title"> <div class="portlet-title">
<div class="caption font-green"> <div class="caption font-green">
@@ -997,6 +1007,9 @@
</div> </div>
</div> </div>
<br /> <br />
<asp:UpdatePanel runat="server" ID="UpCartaPorte" UpdateMode="Conditional">
<ContentTemplate>
<div class="portlet xspadding light bordered" id="divCartaPorte" runat="server" visible="false"> <div class="portlet xspadding light bordered" id="divCartaPorte" runat="server" visible="false">
<div class="portlet-title"> <div class="portlet-title">
<div class="caption font-green"> <div class="caption font-green">
@@ -1009,6 +1022,30 @@
</div> </div>
</div> </div>
<div class="portlet-body"> <div class="portlet-body">
<div class="row">
<div class="col-md-12">
<table style="width: 100%">
<tr>
<td style="width: 25%"></td>
<td style="width: 25%"></td>
<td style="width: 25%"></td>
<td style="width: 25%; text-align: left!important">
<asp:LinkButton runat="server" ID="LnkCPLimpiarConfiguracion" OnClick="LnkCPLimpiarConfiguracion_Click" CssClass="Texto">Limpiar datos</asp:LinkButton></td>
</tr>
</table>
</div>
</div>
<br />
<div class="row"> <div class="row">
<label class="col-md-4 truncate">Material Peligroso:</label> <label class="col-md-4 truncate">Material Peligroso:</label>
<div class="col-md-8"> <div class="col-md-8">
@@ -1035,6 +1072,9 @@
</div> </div>
</div> </div>
</div> </div>
</ContentTemplate>
</asp:UpdatePanel>
<br /> <br />
<asp:UpdatePanel ID="UpSeccionAlmacen" runat="server" UpdateMode="Conditional"> <asp:UpdatePanel ID="UpSeccionAlmacen" runat="server" UpdateMode="Conditional">
<ContentTemplate> <ContentTemplate>

View File

@@ -276,6 +276,9 @@ Partial Class ProductosyServicios
'DdlTipoPSDes.Attributes.Add("onChange", "CreaDescripcionPS();") 'DdlTipoPSDes.Attributes.Add("onChange", "CreaDescripcionPS();")
End If End If
If UsuarioActual.CveEmpresa.Contiene(72, 80) Then If UsuarioActual.CveEmpresa.Contiene(72, 80) Then
TxtPS.CssClass = "form-control Mayuscula" TxtPS.CssClass = "form-control Mayuscula"
End If End If
@@ -338,6 +341,12 @@ Partial Class ProductosyServicios
CargaCombosSeccionAlmacen() CargaCombosSeccionAlmacen()
If UsuarioActual.Empresa.Funcionalidad(350) = "1" Then 'emisión 4.0
DivObjetoImpuesto.Visible = True
DdlObjetoImpuesto.DataSource = GlobalDTSATObjetosImpuestos
DdlObjetoImpuesto.DataBind()
End If
CreaDtSeccionAlmacen() CreaDtSeccionAlmacen()
If UsuarioActual.Empresa.UsaContabilidad Then If UsuarioActual.Empresa.UsaContabilidad Then
@@ -902,6 +911,7 @@ Partial Class ProductosyServicios
DdlMedida.SelectedValueExist(ObjProductosServicios.DtResultados.Rows(0)("CveMedida").ToString) DdlMedida.SelectedValueExist(ObjProductosServicios.DtResultados.Rows(0)("CveMedida").ToString)
DdlRin.SelectedValueExist(ObjProductosServicios.DtResultados.Rows(0)("CveRinTamaño").ToString) DdlRin.SelectedValueExist(ObjProductosServicios.DtResultados.Rows(0)("CveRinTamaño").ToString)
DdlObjetoImpuesto.SelectedValueExist(ObjProductosServicios.DtResultados.Rows(0)("CveObjetoImpuesto").ToString)
'If ObjProductosServicios.CvePSAdicional > 0 Then 'If ObjProductosServicios.CvePSAdicional > 0 Then
' DdlPSAdicional.SelectedValue = ObjProductosServicios.CvePSAdicional.ToString ' DdlPSAdicional.SelectedValue = ObjProductosServicios.CvePSAdicional.ToString
' DdlPSAdicional.SelectedText = ObjProductosServicios.PSCodigoAdicional ' DdlPSAdicional.SelectedText = ObjProductosServicios.PSCodigoAdicional
@@ -1366,7 +1376,8 @@ Partial Class ProductosyServicios
CveModelo:=DdlModelo.SelectedValue.ToEntero(), CveMedida:=DdlMedida.SelectedValue.ToEntero(), CveRinTamaño:=DdlRin.SelectedValue.ToEntero(), CveModelo:=DdlModelo.SelectedValue.ToEntero(), CveMedida:=DdlMedida.SelectedValue.ToEntero(), CveRinTamaño:=DdlRin.SelectedValue.ToEntero(),
ClaveImpuestoEmpaque:=DdlImpEmpaque.SelectedValue.ToString, ClaveImpuestoUM:=DdlImpUM.SelectedValue.ToString, ClaveCategoriaToxicidad:=DdlCategoriaToxicidad.SelectedValue.ToString, ClaveImpuestoEmpaque:=DdlImpEmpaque.SelectedValue.ToString, ClaveImpuestoUM:=DdlImpUM.SelectedValue.ToString, ClaveCategoriaToxicidad:=DdlCategoriaToxicidad.SelectedValue.ToString,
ClaveImpuestoTipoProducto:=DdlImpTipoProducto.SelectedValue.ToString, EsOutSourcing:=ChkEsOutSourcing.Checked, TiempoCaducidad:=TiempoCaducidad, CvePSAdicionalVigencia:=DdlPSAdicionalVigencia.SelectedValue.ToEntero(), PrecioLibre:=ChkPrecioLibre.Checked, ClaveImpuestoTipoProducto:=DdlImpTipoProducto.SelectedValue.ToString, EsOutSourcing:=ChkEsOutSourcing.Checked, TiempoCaducidad:=TiempoCaducidad, CvePSAdicionalVigencia:=DdlPSAdicionalVigencia.SelectedValue.ToEntero(), PrecioLibre:=ChkPrecioLibre.Checked,
CveMaterialPeligroso:=DdlMaterialPeligroso.SelectedValue.ToEntero, CveEmbalaje:=DdlEmbalaje.SelectedValue.ToEntero, PesoKg:=TxtPesoKg.Text.ToDecimal, Dimensiones:=TxtDimensiones.Text.Trim) > 0 Then CveMaterialPeligroso:=DdlMaterialPeligroso.SelectedValue.ToEntero, CveEmbalaje:=DdlEmbalaje.SelectedValue.ToEntero, PesoKg:=TxtPesoKg.Text.ToDecimal, Dimensiones:=TxtDimensiones.Text.Trim,
CveObjetoImpuesto:=DdlObjetoImpuesto.SelectedValue.ToEntero) > 0 Then
ViewState("CvePS") = ObjProductosServicios.CvePS ViewState("CvePS") = ObjProductosServicios.CvePS
For Each GVR As GridViewRow In GvImpuestosLocales.Rows For Each GVR As GridViewRow In GvImpuestosLocales.Rows
If GVR.FCCheckBox("ChkDeduccion").Checked Then If GVR.FCCheckBox("ChkDeduccion").Checked Then
@@ -1416,7 +1427,8 @@ Partial Class ProductosyServicios
ClaveImpuestoEmpaque:=DdlImpEmpaque.SelectedValue.ToString, ClaveImpuestoUM:=DdlImpUM.SelectedValue.ToString, ClaveCategoriaToxicidad:=DdlCategoriaToxicidad.SelectedValue.ToString, ClaveImpuestoEmpaque:=DdlImpEmpaque.SelectedValue.ToString, ClaveImpuestoUM:=DdlImpUM.SelectedValue.ToString, ClaveCategoriaToxicidad:=DdlCategoriaToxicidad.SelectedValue.ToString,
ClaveImpuestoTipoProducto:=DdlImpTipoProducto.SelectedValue.ToString, EsOutSourcing:=ChkEsOutSourcing.Checked, ClaveImpuestoTipoProducto:=DdlImpTipoProducto.SelectedValue.ToString, EsOutSourcing:=ChkEsOutSourcing.Checked,
AplicaSerie:=ChkSerie.Checked, AplicaLote:=ChkLote.Checked, AplicaCaducidad:=ChkCaducidad.Checked, AplicaSeccion:=ChkSeccion.Checked, TiempoCaducidad:=TiempoCaducidad, CvePSAdicionalVigencia:=DdlPSAdicionalVigencia.SelectedValue.ToEntero(), PrecioLibre:=ChkPrecioLibre.Checked, AplicaSerie:=ChkSerie.Checked, AplicaLote:=ChkLote.Checked, AplicaCaducidad:=ChkCaducidad.Checked, AplicaSeccion:=ChkSeccion.Checked, TiempoCaducidad:=TiempoCaducidad, CvePSAdicionalVigencia:=DdlPSAdicionalVigencia.SelectedValue.ToEntero(), PrecioLibre:=ChkPrecioLibre.Checked,
CveMaterialPeligroso:=DdlMaterialPeligroso.SelectedValue.ToEntero, CveEmbalaje:=DdlEmbalaje.SelectedValue.ToEntero, PesoKg:=TxtPesoKg.Text.ToDecimal, Dimensiones:=TxtDimensiones.Text.Trim) Then CveMaterialPeligroso:=DdlMaterialPeligroso.SelectedValue.ToEntero, CveEmbalaje:=DdlEmbalaje.SelectedValue.ToEntero, PesoKg:=TxtPesoKg.Text.ToDecimal, Dimensiones:=TxtDimensiones.Text.Trim,
CveObjetoImpuesto:=DdlObjetoImpuesto.SelectedValue.ToEntero) Then
If Not ObjProductosServicios.LimpiaImpuestosLocales(CvePS) Then If Not ObjProductosServicios.LimpiaImpuestosLocales(CvePS) Then
TieneError = True TieneError = True
@@ -3117,7 +3129,7 @@ Partial Class ProductosyServicios
Else Else
'No es matgerial peligroso 'No es matgerial peligroso
If DdlMaterialPeligroso.txtValue.Value.ToEntero > 0 Or DdlEmbalaje.txtValue.Value.ToEntero > 0 Or TxtPesoKg.Text.Trim.Length > 0 Then If DdlMaterialPeligroso.txtValue.Value.ToEntero > 0 Or DdlEmbalaje.txtValue.Value.ToEntero > 0 Then
RegistraScript("$('#DivModalMensaje').modal('show');") RegistraScript("$('#DivModalMensaje').modal('show');")
ValidaMaterialPeligrosoMensaje = False ValidaMaterialPeligrosoMensaje = False
LblModalMensajeCuerpo.Text = "El producto servicio del SAT seleccionado no esta clasificado como material peligroso, favor de limpiar los datos de la sección carta porte en la pestaña Contabilidad - Inventarios, el incluir estos datos en un material no peligroso generara errores al timbrar traslados." LblModalMensajeCuerpo.Text = "El producto servicio del SAT seleccionado no esta clasificado como material peligroso, favor de limpiar los datos de la sección carta porte en la pestaña Contabilidad - Inventarios, el incluir estos datos en un material no peligroso generara errores al timbrar traslados."
@@ -3153,4 +3165,19 @@ Partial Class ProductosyServicios
Protected Sub LnkCPLimpiarConfiguracion_Click(sender As Object, e As EventArgs)
DdlMaterialPeligroso.txtText.Value = ""
DdlMaterialPeligroso.txtValue.Value = ""
DdlEmbalaje.txtText.Value = ""
DdlEmbalaje.txtValue.Value = ""
UpCartaPorte.Update()
End Sub
End Class End Class

View File

@@ -10983,13 +10983,15 @@ Partial Class Ventas
If Obj.FacturarSucursal Then If Obj.FacturarSucursal Then
Timbre.Receptor.RFC = Obj.ClienteSucursal.RFC Timbre.Receptor.RFC = Obj.ClienteSucursal.RFC
Timbre.Receptor.Nombre = Obj.ClienteSucursal.Nombre Timbre.Receptor.Nombre = Obj.ClienteSucursal.Nombre
Timbre.Receptor.DomicilioFiscalReceptor = Obj.ClienteSucursal.CP
Else Else
Timbre.Receptor.RFC = Obj.Cliente.RFC Timbre.Receptor.RFC = Obj.Cliente.RFC
Timbre.Receptor.Nombre = Obj.Cliente.Nombre Timbre.Receptor.Nombre = Obj.Cliente.Nombre
Timbre.Receptor.DomicilioFiscalReceptor = Obj.Cliente.CP
End If End If
Timbre.Receptor.RegimenFiscalReceptor = Obj.Cliente.CodigoRegimenFiscal Timbre.Receptor.RegimenFiscalReceptor = Obj.Cliente.CodigoRegimenFiscal
Timbre.Receptor.DomicilioFiscalReceptor = Obj.Cliente.CP
Timbre.Receptor.ResidenciaFiscal = "" Timbre.Receptor.ResidenciaFiscal = ""
Timbre.Receptor.NumeroRegistroTributario = "" Timbre.Receptor.NumeroRegistroTributario = ""
Timbre.Receptor.UsoCFDI = Obj.ClaveUsoCFDI Timbre.Receptor.UsoCFDI = Obj.ClaveUsoCFDI
@@ -11129,7 +11131,8 @@ Partial Class Ventas
.ClaveProdServ = drr("SATClaveProdServ").ToString(), .ClaveProdServ = drr("SATClaveProdServ").ToString(),
.Noidentificacion = drr("Noidentificacion").ToString(), .Noidentificacion = drr("Noidentificacion").ToString(),
.CuentaPredial = drr("CuentaPredial").ToString(), .CuentaPredial = drr("CuentaPredial").ToString(),
.ImporteGravaIVAAdicional = drr("ImporteIEPS").ToString().ToDecimal} .ImporteGravaIVAAdicional = drr("ImporteIEPS").ToString().ToDecimal,
.ObjetoImpuesto = drr("CodigoObjetoImpuesto").ToString()}
'verifica suma subtotales 'verifica suma subtotales
If i = Obj.DtDetalle.Rows.Count AndAlso totSubTotal.RoundSQL(2) <> concepto.Importe.RoundSQL(2) AndAlso Math.Abs(totSubTotal.RoundSQL(2) - concepto.Importe.RoundSQL(2)) <= 0.01 Then 'proceso de ajusta de decimales If i = Obj.DtDetalle.Rows.Count AndAlso totSubTotal.RoundSQL(2) <> concepto.Importe.RoundSQL(2) AndAlso Math.Abs(totSubTotal.RoundSQL(2) - concepto.Importe.RoundSQL(2)) <= 0.01 Then 'proceso de ajusta de decimales
concepto.Importe = totSubTotal concepto.Importe = totSubTotal
@@ -17751,6 +17754,7 @@ Partial Class Ventas
Row("CveTipoPS") = DrPS("CveTipoPS") Row("CveTipoPS") = DrPS("CveTipoPS")
Row("CveTipoInvPS") = DrPS("Inv_CveMetodoInventario") Row("CveTipoInvPS") = DrPS("Inv_CveMetodoInventario")
Row("CveTamaño") = DrPS("CveTamaño") Row("CveTamaño") = DrPS("CveTamaño")
Row("CodigoObjetoImpuesto") = DrPS("CodigoObjetoImpuesto")
If CveClasificacion <= 0 Then Row("CveClasificacion") = DrPS("CveClasificacion") If CveClasificacion <= 0 Then Row("CveClasificacion") = DrPS("CveClasificacion")
If Clasificacion = "" Then Row("Clasificacion") = DrPS("Clasificacion") If Clasificacion = "" Then Row("Clasificacion") = DrPS("Clasificacion")
@@ -18300,6 +18304,7 @@ Partial Class Ventas
TmpDT.Columns.Add("TieneProntoPago", GetType(String)) TmpDT.Columns.Add("TieneProntoPago", GetType(String))
TmpDT.Columns.Add("ImporteProntoPago", GetType(Decimal)) TmpDT.Columns.Add("ImporteProntoPago", GetType(Decimal))
TmpDT.Columns.Add("CodigoObjetoImpuesto", GetType(String))
TmpDT.Columns("EsOutSourcing").DefaultValue = False TmpDT.Columns("EsOutSourcing").DefaultValue = False
TmpDT.Columns("EsCargo").DefaultValue = False TmpDT.Columns("EsCargo").DefaultValue = False
@@ -18307,6 +18312,7 @@ Partial Class Ventas
TmpDT.Columns("TieneProntoPago").DefaultValue = "No" TmpDT.Columns("TieneProntoPago").DefaultValue = "No"
TmpDT.Columns("ImporteProntoPago").DefaultValue = 0 TmpDT.Columns("ImporteProntoPago").DefaultValue = 0
End Sub End Sub
Private Sub CreaDTmpC() Private Sub CreaDTmpC()
DTmpC = New DataTable DTmpC = New DataTable

View File

@@ -408,6 +408,8 @@