From 5f9772db6c6adf29b73438a0aa545cc9b2d50b04 Mon Sep 17 00:00:00 2001 From: rrene Date: Tue, 30 Mar 2021 11:11:34 -0700 Subject: [PATCH] recepcion por oc, considerar lote/caducidad --- Inventarios/RecepcionAlmacen.aspx.vb | 8 +++++++- 1 file changed, 7 insertions(+), 1 deletion(-) diff --git a/Inventarios/RecepcionAlmacen.aspx.vb b/Inventarios/RecepcionAlmacen.aspx.vb index 304e33b82..07d18b516 100644 --- a/Inventarios/RecepcionAlmacen.aspx.vb +++ b/Inventarios/RecepcionAlmacen.aspx.vb @@ -4082,6 +4082,8 @@ Partial Class Inventarios_RecepcionAlmacen TipoCambio = 0 TipoMovimiento = 1 + + If ObjInventario.RecepcionAlmacenOCGet(CveOC, UsuarioActual.CveEmpresa) AndAlso ObjInventario.DtResultados.Rows.Count > 0 Then DtDatosDetalle = Nothing CreaDtDetalle() @@ -4120,7 +4122,11 @@ Partial Class Inventarios_RecepcionAlmacen DivDocumentos.Visible = True UpDocumentos.Update() End If - + 'RMF condición temporal + Dim CveSubProyecto As Integer = ObjInventario.DtResultados.Rows(0)("CveSubProyecto").ToString.ToEntero + If UsuarioActual.CveEmpresa = 119 AndAlso CveSubProyecto = 10276 Then + ValidaLoteCaducidad = True + End If CargaGVInv()