Simplificar/limpiar código logos reportes RDLC

This commit is contained in:
MLopez
2022-12-22 19:49:13 -07:00
parent b2a6ad203d
commit 2e4bfe761b
141 changed files with 237 additions and 1158 deletions

View File

@@ -98,24 +98,14 @@ Partial Class Contabilidad_RepIVADiferencias
Dim reportpath As String = Server.MapPath("~/Empresas/Grales/Formatos/RepIvaDiferencias.rdlc") '"Empresas/Grales/Formatos/RepIvaDiferencias.rdlc"
'nombre del reporte
Dim fileName As String = "Diferencias IVA"
Dim LogoRuta = String.Format("{0}Logo.png", UsuarioActual.Empresa.Ruta)
If Not IsNothing(DtDatos) AndAlso DtDatos.Rows.Count > 0 Then
Dim params As New List(Of ReportParameter)
If File.Exists(LogoRuta) Then
If File.Exists(LogoRuta) Then
LogoRuta = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
End If
'POR EMPRESA
params.Add(New ReportParameter("pImg", LogoRuta))
Else
params.Add(New ReportParameter("pImg", ""))
End If
Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
params.Add(New ReportParameter("pImg", If(Imagen.Exists, $"file://{Imagen.FullName}", "")))
'parametros a enviar al reporte
params.Add(New ReportParameter("pEmp", UsuarioActual.Empresa.Empresa))
'params.Add(New ReportParameter("pImg", New Uri(Server.MapPath(String.Format("~/Empresas/{0}/Logo.png", UsuarioActual.CveEmpresa))).AbsoluteUri))
params.Add(New ReportParameter("Ejercicio", Ejercicio.ToString))
params.Add(New ReportParameter("Periodo", Periodo))
params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Usuario))