From 9cd23f6c15ea1ce54ba3088e710bc5c3bf20ebc2 Mon Sep 17 00:00:00 2001 From: rrene Date: Tue, 16 Jan 2024 12:00:20 -0700 Subject: [PATCH] - mejora --- AF/CatAF.aspx.vb | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/AF/CatAF.aspx.vb b/AF/CatAF.aspx.vb index 4a021ea00..1ee85db95 100644 --- a/AF/CatAF.aspx.vb +++ b/AF/CatAF.aspx.vb @@ -124,8 +124,8 @@ Partial Class AF_CatAF DdlTipoActivo.Items.Insert(0, New ListItem("Todos", "-1")) End Sub Private Sub CargaResponsable() - Dim DtPersonal = GlobalDTRHPersonal(UsuarioActual.CveEmpresa).FiltraParametros("", "NombreCompleto") - DdlResponsable.DataSource = DtPersonal + + DdlResponsable.DataSource = GlobalDTRHPersonal(UsuarioActual.CveEmpresa).FiltraParametros("", "NombreCompleto") DdlResponsable.DataBind() End Sub Protected Sub DdlTipoActivo_SelectedIndexChanged(sender As Object, e As EventArgs) @@ -454,7 +454,7 @@ Partial Class AF_CatAF End Sub Private Sub GenerarPDF(Optional Formato As String = "PDF") - If DtActivosFijos.Rows.Count > 0 Then + If DtActivosFijos IsNot Nothing AndAlso DtActivosFijos.Rows.Count > 0 Then Dim params As New List(Of ReportParameter) Dim Imagen As New System.IO.FileInfo($"{UsuarioActual.Empresa.Ruta}/Logo.png")