--sucursal del cliente en pdf de stimultsoft

2023-10-24 10:29:12 -07:00
parent ce370181ac
commit b0980decbe
1 changed files with 3 additions and 0 deletions
--- a/App_Code/ClsPaginas.vb
+++ b/App_Code/ClsPaginas.vb
@@ -6044,6 +6044,9 @@ Public Class ClsPaginas
                End If
            Else
                RutaFormato = RutaFormato.Replace(".rdlc", ".mrt")
+
+                params.Add(New ReportParameter("SucursalCliente", If(Vta.ClienteSucursal.Sucursal Is Nothing, "", Vta.ClienteSucursal.Sucursal.ToString)))
+
                retorno = StreamBytesStimul("Facturas", RutaFormato, lrds, params, NombreArchivo:=NombreArchivo, Formato:="PDF")
                If UsuarioActual.Empresa.Funcionalidad(707) = "1" Then
                    Dim ArchivoPDF As New System.IO.FileInfo(String.Format("{0}PDF\{1}\{2}.pdf", UsuarioActual.Empresa.Ruta, Vta.TipoDocto, Vta.SerieFolio))