conciliaciones que tome el archivo rdlc de la empresa

Bancos/ConciliacionesBancarias.aspx.vb

@@ -667,7 +667,13 @@ Partial Class Bancos_ConciliacionesBancariasaspx
             params.Add(New ReportParameter("LogoPath", ""))
         End If
 
-        ImprimirPDF("Empresas/Grales/Formatos/Conciliacion.rdlc", lrds, params, $"Conciliacion Bancaria {NombreMes} {txtFechaI.Text.ToDate.Year}", Formato)
+        Dim Archivo As String = $"Empresas/{UsuarioActual.CveEmpresa}/Formatos/Conciliacion.rdlc"
+
+        If Not IO.File.Exists($"{Server.MapPath("~")}/{Archivo}") Then
+            Archivo = "Empresas/Grales/Formatos/Conciliacion.rdlc"
+        End If
+
+        ImprimirPDF(Archivo, lrds, params, $"Conciliacion Bancaria {NombreMes} {txtFechaI.Text.ToDate.Year}", Formato)
     End Sub
 
 #End Region