Merge branch 'master' of http://192.168.10.111:8383/SIG
This commit is contained in:
@@ -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))
|
||||
|
||||
Reference in New Issue
Block a user