diff --git a/Inventarios/EntradasSalidas.aspx.vb b/Inventarios/EntradasSalidas.aspx.vb
index 1fd0506d4..e9c0cb69e 100644
--- a/Inventarios/EntradasSalidas.aspx.vb
+++ b/Inventarios/EntradasSalidas.aspx.vb
@@ -3940,7 +3940,7 @@ Partial Class Inventarios_EntradasSalidas
                                         Else
 
                                             Dim tCveSubProyecto = GlobalDTAlmacen(UsuarioActual.CveEmpresa).FiltroPrimeroValor("CveSubProyecto", $"CveAlmacen={DdlAlmacen.SelectedValue.ToEntero}").ToEntero
-                                                Dim tCveConcepto As Integer = 69
+                                            Dim tCveConcepto As Integer = 69
                                             If ObjInventario.CveConcepto = 37 Then
                                                 tCveConcepto = 181
                                             End If
@@ -3955,12 +3955,12 @@ Partial Class Inventarios_EntradasSalidas
 
                                             Next
                                         End If
-                                        End If
                                     End If
                                 End If
                             End If
                         End If
                     End If
+                End If
 
                 If Not ObjConta.AddPrePolizasDetalle(CvePrePoliza, MovAlmacen, DtCostos.SUMD("Total").RoundSQL, DtCostos.SUMD("Total").RoundSQL, 68, Concepto, Concepto, CveVenta:=CveVenta, CveMovimientoAlmacen:=CveMovimiento, Contabilizable:=Contabilizable) Then
                     ErrorMovInv = True