From 9b00c97cf3d275a30c63b88c2163a7785b008d87 Mon Sep 17 00:00:00 2001 From: rakcsle Date: Thu, 15 Apr 2021 12:32:56 -0700 Subject: [PATCH] EntradasSalidas --- Contratos/ContratoObra.aspx | 4 ++-- Inventarios/EntradasSalidas.aspx.vb | 4 +++- 2 files changed, 5 insertions(+), 3 deletions(-) diff --git a/Contratos/ContratoObra.aspx b/Contratos/ContratoObra.aspx index b8b20b068..01c9dc2b5 100644 --- a/Contratos/ContratoObra.aspx +++ b/Contratos/ContratoObra.aspx @@ -1906,7 +1906,7 @@ - +<%-- @@ -2027,7 +2027,7 @@ - + --%> diff --git a/Inventarios/EntradasSalidas.aspx.vb b/Inventarios/EntradasSalidas.aspx.vb index e6e103354..ba5d598bc 100644 --- a/Inventarios/EntradasSalidas.aspx.vb +++ b/Inventarios/EntradasSalidas.aspx.vb @@ -2177,8 +2177,10 @@ Partial Class Inventarios_EntradasSalidas End If - If UsuarioActual.CveUsuario.Contiene(2185, 100) And DdlAlmacen.SelectedValue.ToEntero.Contiene(651, 658) Then + If UsuarioActual.CveUsuario.Contiene(2185, 100) Then DdlConcepto.Items.Add(New ListItem("Entrada por Ajuste", "32")) + DdlConcepto.Items.Add(New ListItem("Salida por Ajuste", "34")) + End If