-- cta mon extranjera
This commit is contained in:
@@ -851,7 +851,8 @@ Partial Class Bancos_ProveedoresAbonar
|
|||||||
CompraActual.EsImportacion = gvr.DataKey("EsImportacion") = "1"
|
CompraActual.EsImportacion = gvr.DataKey("EsImportacion") = "1"
|
||||||
CompraActual.UsuarioActual = UsuarioActual
|
CompraActual.UsuarioActual = UsuarioActual
|
||||||
CompraActual.CveSubProyecto = gvr.DataKey("CveSubProyecto").ToEntero
|
CompraActual.CveSubProyecto = gvr.DataKey("CveSubProyecto").ToEntero
|
||||||
CompraActual.IdCtaContableProv = CtaProveedor
|
CompraActual.IdCtaContableProv = If(CompraActual.CveMoneda >= 2, IdCtaContMonedaExtranjera, CtaProveedor)
|
||||||
|
CompraActual.IdCtaContableProvComplementaria = IdCtaContComplementaria
|
||||||
|
|
||||||
'Importe de pago
|
'Importe de pago
|
||||||
Pago.ImportePago = gvr.FCTextBox("TxtAbonar").Text.ToDecimal
|
Pago.ImportePago = gvr.FCTextBox("TxtAbonar").Text.ToDecimal
|
||||||
|
|||||||
Reference in New Issue
Block a user