Considerar costo de usados en compras de almacen con costo indirecto
This commit is contained in:
@@ -2889,7 +2889,7 @@ Partial Class Inventarios_RecepcionAlmacen
|
|||||||
Dim dtt As DataTable = ObjInventario.DtResultados
|
Dim dtt As DataTable = ObjInventario.DtResultados
|
||||||
Dim tTotalInsertado As Decimal = dtt.SUMD("TotalOriginal") + ImporteIngresoAdicional
|
Dim tTotalInsertado As Decimal = dtt.SUMD("TotalOriginal") + ImporteIngresoAdicional
|
||||||
If CveTipoCompra = 8 Then 'entrada almacen con costo indirecto cargado en la misma compra
|
If CveTipoCompra = 8 Then 'entrada almacen con costo indirecto cargado en la misma compra
|
||||||
tTotalInsertado = dtt.SUMD("Total") ' está incluido el costo indirecto en la factura
|
tTotalInsertado = dtt.SUMD("Total") + ImporteIngresoAdicional ' está incluido el costo indirecto en la factura
|
||||||
End If
|
End If
|
||||||
If Math.Round(TotalCompraOC * If(TipoCambio > 1, TipoCambio, 1), 2) <> Math.Round(tTotalInsertado, 2) Then
|
If Math.Round(TotalCompraOC * If(TipoCambio > 1, TipoCambio, 1), 2) <> Math.Round(tTotalInsertado, 2) Then
|
||||||
ErrorMovInv = True
|
ErrorMovInv = True
|
||||||
|
|||||||
Reference in New Issue
Block a user