Pago Grupos Liberacion General

This commit is contained in:
Rakcsle Supertramp
2020-03-24 10:52:21 -07:00
parent b6b8936144
commit 58e74bfbf2
13 changed files with 5587 additions and 5429 deletions

View File

@@ -3624,6 +3624,7 @@ Partial Class Compras_Compras
'OBTENER TRASLADOS POR DETALLES
Dim ContadorTraslado = 0
Dim nodosConceptosTraslado As XmlNodeList = node.SelectNodes(String.Format("//{0}:Impuestos/{0}:Traslados/{0}:Traslado", Prefijo), namespaces)
For Each nodeTraslado As XmlNode In nodosConceptosTraslado
If Not DtTemporalGuardados.FiltraParametros($"Contador = {ContadorTraslado} AND Tipo = 1").Rows.Count > 0 Then
@@ -3637,7 +3638,12 @@ Partial Class Compras_Compras
Dr("Tipo") = 1
DtTemporalGuardados.Rows.Add(Dr)
DtTemporalGuardados.AcceptChanges()
Exit For
If PorcentajeIVA > 0 Then
Exit For
End If
ElseIf ValorXML(nodeTraslado, "Impuesto") = "003" Then
IEPS = ValorXML(nodeTraslado, "Importe").Trim.ToDecimal
PorcentajeIEPS = ValorXML(nodeTraslado, "TasaOCuota").Trim.ToDecimal