diff --git a/Inventarios/EntradasSalidas.aspx.vb b/Inventarios/EntradasSalidas.aspx.vb
index 447588480..20bb83ab8 100644
--- a/Inventarios/EntradasSalidas.aspx.vb
+++ b/Inventarios/EntradasSalidas.aspx.vb
@@ -1524,6 +1524,7 @@ Partial Class Inventarios_EntradasSalidas
 
                             Dim OrigenMov As Integer = GlobalDTInvConceptos.FiltroPrimeroValor("Origen", "CveConcepto = " & DdlConcepto.SelectedValue).ToEntero
                             If OrigenMov = 1 Then TipoMovtoAlmacen = False Else TipoMovtoAlmacen = True
+                            TipoMovtoOtro = Not TipoMovtoAlmacen
 
                             Dim CveConceptoContable As Integer = 78
                             Dim CveClasificacion As Integer = -1