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

checkpoint en la orden de servicio

Browse Source
This commit is contained in:
Antonio Gonzalez
2019-10-18 10:35:25 -05:00
parent 9af5891916
commit 86a850b1ff
1 changed files with 8 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
OS/OrdenesServicios.aspx.vb
View File

@@ -340,7 +340,7 @@ Partial Class OS_OrdenesServicios
hdnEsThickbox.Value = "S" hdnEsThickbox.Value = "S"
hdnClientIDLink.Value = "NoDefinido" hdnClientIDLink.Value = "NoDefinido"
ImprimirAlGenerar()
End If End If
End Sub End Sub
@@ -2423,6 +2423,13 @@ Partial Class OS_OrdenesServicios
ImprimirPDF("Empresas/Grales/Formatos/OrdenServicio.rdlc", lrds, params, NombreArchivo:=String.Format("OrdenServicio-{0}", CveFolio)) ImprimirPDF("Empresas/Grales/Formatos/OrdenServicio.rdlc", lrds, params, NombreArchivo:=String.Format("OrdenServicio-{0}", CveFolio))
End Sub End Sub
Private Sub ImprimirAlGenerar()
Dim params As New List(Of ReportParameter)
Dim report As LocalReport = New LocalReport()
report.ReportPath = String.Format("Empresas/{0}/Formatos/FormatoOS.rdlc", UsuarioActual.CveEmpresa)
Dim paramCollection = report.GetParameters
End Sub
#End Region #End Region
#Region "S O L I C I T A R M A T E R I A L" #Region "S O L I C I T A R M A T E R I A L"