Ruta personalizada por Empresa

2021-07-31 09:54:05 -07:00
parent d59dc01317
commit fbde0a2e58
79 changed files with 2710 additions and 2685 deletions
--- a/Inventarios/RepEntradasSalidas.aspx.vb
+++ b/Inventarios/RepEntradasSalidas.aspx.vb
@@ -368,7 +368,7 @@ Partial Class Inventarios_ReporteEntradasSalidas
            FechaF = Now
        End If
        Dim RutaPDF As String
-        Dim Ruta As String = $"{ModExtensiones.DirectorioBaseEmpresas}Empresas\{UsuarioActual.CveEmpresa}\"
+        Dim Ruta As String = UsuarioActual.Empresa.Ruta
        Dim NombreArchivoDescarga = "ReporteEntradas-Salidas"

        If UsuarioActual.CveEmpresa.Contiene(119) Then