mejora

Inventarios/RecepcionAlmacen.aspx.vb

@@ -4350,8 +4350,6 @@ Partial Class Inventarios_RecepcionAlmacen
                 TipoCambio = 0
                 TipoMovimiento = 1
 
-
-
                 If ObjInventario.RecepcionAlmacenOCGet(CveOC, UsuarioActual.CveEmpresa) AndAlso ObjInventario.DtResultados.Rows.Count > 0 Then
                     DtDatosDetalle = Nothing
                     CreaDtDetalle()
@@ -4359,7 +4357,10 @@ Partial Class Inventarios_RecepcionAlmacen
                     CreaDtLoteDetalle()
                     CreaDTInv(ObjInventario.DtResultados.FiltraParametros("CantidadCompra = 0"))
                     BtnGuardar.Visible = True
-
+                    'cuando están todos los detalles de la compra, nos indica que se va a recibir la totalidad de la compra
+                    If DtDatosDetalle.Rows.Count = DtDatosDetalle.Rows(0)("NumDetalles").ToString.ToEntero Then
+                        RecibidaCompleta = True
+                    End If
 
                     ''MONEDA DIFERENTE
                     If CveMoneda <> 1 Then