diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb
index 36819bc16..0268da558 100644
--- a/Compras/Compras.aspx.vb
+++ b/Compras/Compras.aspx.vb
@@ -6698,8 +6698,15 @@ Partial Class Compras_Compras
                                                                                 End If
                                                                             Next
 
+                                                                            'obtengo si hay servicios
+                                                                            Dim CostosIndirectosTardados As Decimal = TmpDT.SUMD("Total", "ISNULL(TipoAF,0) <> 2 And ISNULL(CveAlmacen,0) = 0 And ISNULL(AplicaCostoIndirecto,0) <> 1 And ISNULL(CveTipoPS,0) = 1")
+                                                                            'consideracion, si la oc, se le agrego un servicio y este no se cargo en la entrada al almacen.
+                                                                            If CostoIndirectoAcum176 = 0 AndAlso CostosIndirectosTardados > 0 Then
+                                                                                CostosIndirectosTardados = CostosIndirectosTardados * TCO
+                                                                            End If
+
                                                                             'calcula la diferencia entre lo recibido por la OC, considerando costos indirectos y lo que se ingresaria en la compra
-                                                                            SumatoriaOCINV = SumatoriaInventario - (TmpDT.SUMD("Total") * TCO).RoundSQL 'sumatoria de la factura
+                                                                            SumatoriaOCINV = SumatoriaInventario - (TmpDT.SUMD("Total") * TCO).RoundSQL + CostosIndirectosTardados 'sumatoria de la factura
                                                                             If SumatoriaOCINV.RoundSQL <> 0 Then
                                                                                 ' se abona el costo, cambiamos su naturaleza
                                                                                 'SumatoriaOCINV = -SumatoriaOCINV