AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

- mejora

Browse Source
This commit is contained in:
rrene
2024-01-16 12:00:20 -07:00
parent 0ca35ce5a4
commit 9cd23f6c15
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
AF/CatAF.aspx.vb
View File

@@ -124,8 +124,8 @@ Partial Class AF_CatAF
DdlTipoActivo.Items.Insert(0, New ListItem("Todos", "-1")) DdlTipoActivo.Items.Insert(0, New ListItem("Todos", "-1"))
End Sub End Sub
Private Sub CargaResponsable() Private Sub CargaResponsable()
Dim DtPersonal = GlobalDTRHPersonal(UsuarioActual.CveEmpresa).FiltraParametros("", "NombreCompleto")
DdlResponsable.DataSource = DtPersonal DdlResponsable.DataSource = GlobalDTRHPersonal(UsuarioActual.CveEmpresa).FiltraParametros("", "NombreCompleto")
DdlResponsable.DataBind() DdlResponsable.DataBind()
End Sub End Sub
Protected Sub DdlTipoActivo_SelectedIndexChanged(sender As Object, e As EventArgs) Protected Sub DdlTipoActivo_SelectedIndexChanged(sender As Object, e As EventArgs)
@@ -454,7 +454,7 @@ Partial Class AF_CatAF
End Sub End Sub
Private Sub GenerarPDF(Optional Formato As String = "PDF") 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 params As New List(Of ReportParameter)
Dim Imagen As New System.IO.FileInfo($"{UsuarioActual.Empresa.Ruta}/Logo.png") Dim Imagen As New System.IO.FileInfo($"{UsuarioActual.Empresa.Ruta}/Logo.png")