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:
HECTOR RODRIGUEZ
2021-06-18 19:09:21 -07:00
parent 1b8e431e13 e0e690ba4a
commit 9466d22b66
16 changed files with 147 additions and 128 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
Bancos/PopIECompras.aspx.vb
View File

@@ -294,6 +294,7 @@ Partial Class Bancos_PopIECompras
Public Property ConceptoRetIVA As Integer
Public Property ConceptoRetISR As Integer
Public Property PorcentajeIVA As Decimal
Public Property IVAPorPagar As Decimal
End Class
Private Property CveMonedaFiltros As Integer
Get
@@ -662,7 +663,7 @@ Partial Class Bancos_PopIECompras
MovimientoPagar.ConceptoRetIVA = dr("CveRetIVAConcepto").ToString.ToEntero
MovimientoPagar.ConceptoRetISR = dr("CveRetISRConcepto").ToString.ToEntero
MovimientoPagar.PorcentajeIVA = dr("PorcentajeIVA").ToString.ToDecimal
MovimientoPagar.IVAPorPagar = dr("IVAPorPagar").ToString.ToDecimal
TxtFolio.Enabled = True
TxtFechaDocumento.Enabled = True
@@ -2341,16 +2342,17 @@ Partial Class Bancos_PopIECompras
End If
Else
If CveMoneda = 1 AndAlso CveMonedaCompra = 1 Then
ImporteMovimiento = MovimientoPagar.IVA * PorcentajePago
'ImporteMovimiento = MovimientoPagar.IVA * PorcentajePago
ImporteMovimiento = MovimientoPagar.IVAPorPagar * PorcentajePago
ImporteMX = ImporteMovimiento
ElseIf CveMoneda = 1 AndAlso CveMonedaCompra = 2 Then
ImporteMovimiento = (MovimientoPagar.IVA * PorcentajePago)
ImporteMovimiento = (MovimientoPagar.IVAPorPagar * PorcentajePago)
ImporteMX = ImporteMovimiento * tipoCambioCompra
ElseIf CveMoneda = 2 AndAlso CveMonedaCompra = 1 Then
ImporteMovimiento = (MovimientoPagar.IVA * PorcentajePago)
ImporteMovimiento = (MovimientoPagar.IVAPorPagar * PorcentajePago)
ImporteMX = ImporteMovimiento * tipoCambioCompra
ElseIf CveMoneda = 2 AndAlso CveMonedaCompra = 2 Then
ImporteMovimiento = (MovimientoPagar.IVA * PorcentajePago)
ImporteMovimiento = (MovimientoPagar.IVAPorPagar * PorcentajePago)
ImporteMX = ImporteMovimiento * tipoCambioCompra
End If
ImporteMovimiento = Math.Round(ImporteMovimiento, 2)