-- cambio en parametros obtención de anticipos

This commit is contained in:
2023-10-07 11:51:18 -07:00
parent 7863cb8444
commit 06dbde1332
2 changed files with 9 additions and 13 deletions

View File

@@ -397,7 +397,7 @@ Partial Class Portal_PortalProveedor
End Sub
Private Sub CargaAnticipos(SerieSucursal As String, SelectTop As Integer)
Dim ObjMovtos As New ClsMovimientos()
If ObjMovtos.GetAnticiposProveedor(CveProveedor, -1, SelectTop:=SelectTop) Then
If ObjMovtos.GetAnticiposProveedor(CveProveedor, UsuarioActual.CveEmpresa, SelectTop:=SelectTop) Then
If ObjMovtos.DtResultados.Rows.Count > 0 Then
Dim dtA, dtAH As DataTable
@@ -1253,7 +1253,7 @@ Partial Class Portal_PortalProveedor
Protected Function ImprimirReporteCxPPagadas(Optional Formato As String = "PDF") As Byte()
Dim retorno As Byte() = Nothing
Dim Imagen As New System.IO.FileInfo($"{UsuarioActual.Empresa.Ruta}/Logo.png")
Dim logouri = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
Dim logouri As String = String.Format("{0}://{1}:{2}/Empresas/{3}/Logo.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port, UsuarioActual.CveEmpresa)
Dim ImagenADSistemas As New System.IO.FileInfo(Server.MapPath("~") & "/Imagenes/LogoSinFondochico.png")
Dim LogoADSistemasUri As String = String.Format("{0}://{1}:{2}/Imagenes/LogoSinFondochico.png", Request.Url.Scheme, Request.Url.Host, Request.Url.Port)