Simplificar referencias a logos en RDLC y más limpieza de código
This commit is contained in:
@@ -342,6 +342,7 @@ Partial Class AC_RepAnexoCatalogoSegmento
|
||||
GvDatos.ExportToExcelx("RepAnexoCatalogoSegmento")
|
||||
End Sub
|
||||
'Private Sub ImprimirReporte(Optional Formato As String = "PDF")
|
||||
' Dim Imagen As New System.IO.FileInfo($"{UsuarioActual.Empresa.Ruta}/Logo.png")
|
||||
' 'ubicacion del rdlc
|
||||
' Dim reportpath As String = "Contabilidad/Reportes/RepAnexoCatalogo.rdlc"
|
||||
' 'nombre del reporte
|
||||
@@ -350,11 +351,7 @@ Partial Class AC_RepAnexoCatalogoSegmento
|
||||
' Dim params As New List(Of ReportParameter)
|
||||
' params.Add(New ReportParameter("IdCuenta", IdCuenta.ToString))
|
||||
' params.Add(New ReportParameter("pEmp", UsuarioActual.Empresa.Empresa))
|
||||
' Dim Imagen As New System.IO.FileInfo(String.Format("{0}/Logo.png", UsuarioActual.Empresa.Ruta))
|
||||
' If Imagen.Exists Then
|
||||
' params.Add(New ReportParameter("pImg", $"file://{Imagen.FullName}"))
|
||||
' Else
|
||||
' params.Add(New ReportParameter("pImg", ""))
|
||||
' params.Add(New ReportParameter("pImg", If(Imagen.Exists, $"file://{Imagen.FullName}", "")))
|
||||
' End If
|
||||
' params.Add(New ReportParameter("pFechaFin", FechaFin.ToString("dd/MM/yyyy")))
|
||||
|
||||
|
||||
Reference in New Issue
Block a user