AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Merge branch 'master' of http://192.168.10.111:8383/SIG

Browse Source
This commit is contained in:
rrene
2021-07-21 15:02:27 -07:00
parent d61f789fa2 24d3f65167
commit d47c2a596b
1 changed files with 13 additions and 13 deletions
Download Patch File Download Diff File Expand all files Collapse all files

26
Compras/Compras.aspx.vb
View File

@@ -8569,21 +8569,21 @@ Partial Class Compras_Compras
If Math.Abs(DiferenciaIVas) > 0.01D Then If Math.Abs(DiferenciaIVas) > 0.01D Then
Respuesta = False Respuesta = False
'If IVADetalles > 0 Then If IVADetalles > 0 Then
' For Each dRow As DataRow In TmpDT.Rows For Each dRow As DataRow In TmpDT.Rows
' If dRow("IVA").ToString.ToDecimal > 0 Then If dRow("IVA").ToString.ToDecimal > 0 Then
' dRow("IVA") = dRow("IVA").ToString.ToDecimal + DiferenciaIVas dRow("IVA") = dRow("IVA").ToString.ToDecimal + DiferenciaIVas
' TmpDT.AcceptChanges() TmpDT.AcceptChanges()
' Respuesta = True Respuesta = True
' Exit For Exit For
' End If End If
' Next Next
'Else Else
' Alert("Los productos especificados en el lisado no tienen asigando impuesto IVA, favor de realizar la correción en el producto que aplique el impúesto.", TipoMensaje.MsgAdvertencia) Alert("Los productos especificados en el lisado no tienen asigando impuesto IVA, favor de realizar la correción en el producto que aplique el impúesto.", TipoMensaje.MsgAdvertencia)
' Respuesta = False Respuesta = False
'End If End If
Else Else
Respuesta = True Respuesta = True
End If End If