diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index ef22b8974..4c790a109 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -1955,11 +1955,8 @@ Partial Class Compras_Compras
If UsuarioActual.CveEmpresa.Contiene(119, 158) AndAlso Not UsuarioActual.CveUsuario.Contiene(1719, 1721) Then BtnGuardar.Enabled = False '' solo se activa para el usuario Sara.JAM
BtnGuardar.ToolTip = "No se permite registrar facturas con conceptos con código '01010101'. Solicite al proveedor un nuevo comprobante."
End If
-
End If
-
-
Dim SbValRet As New StringBuilder
For Each concepto As XmlNode In nodeconceptos
' Obtener la descripción del concepto
@@ -1992,6 +1989,34 @@ Partial Class Compras_Compras
SbValRet.Append($"Producto: {descripcion} La base e importe del impuesto {impuesto} no coincide Base: {baseValue.ToString()}, Importe Producto: {importeValue.ToString()}
")
End If
Next
+
+ If UsuarioActual.CveEmpresa = 119 Then
+ Dim BaseIEPS As Decimal = 0
+ Dim BaseIVA As Decimal = 0
+ Dim TasaIEPS As String = ""
+ Dim traslados As XmlNodeList = impuestosNode.SelectNodes("cfdi:Traslados/cfdi:Traslado", namespaces)
+ For Each traslado As XmlNode In traslados
+ ' Obtener los valores de los atributos Base e Importe
+ Dim baseValue As Decimal = Decimal.Parse(ValorXML(traslado, "Base")).RoundSQL(2)
+ Dim impuesto As String = ValorXML(traslado, "Impuesto")
+
+ If impuesto = "001" Then
+ impuesto = "ISR"
+ ElseIf impuesto = "002" Then
+ impuesto = "IVA"
+ BaseIVA += baseValue
+ ElseIf impuesto = "003" Then
+ impuesto = "IEPS"
+ TasaIEPS = ValorXML(traslado, "TasaOCuota")
+ BaseIEPS += baseValue
+ End If
+ Next
+ ' Validar si Base coincide con Importe
+ If BaseIVA <> BaseIEPS AndAlso BaseIEPS > 0 Then
+ 'SbValRet.Append($"La base e importe de la retención del impuesto {impuesto} no coinciden para {descripcion}. Base: {baseValue.ToString()}, Importe: {importeValue.ToString()}
")
+ SbValRet.Append($"Producto: {descripcion} La base del IEPS es no coincide con el subtotal, favor de desglosarlo en una base : {BaseIEPS.ToString()}, Tasa: {TasaIEPS}
")
+ End If
+ End If
End If
Next