diff --git a/OS/OrdenesServicios.aspx.vb b/OS/OrdenesServicios.aspx.vb
index e586d230e..5bfb5f754 100644
--- a/OS/OrdenesServicios.aspx.vb
+++ b/OS/OrdenesServicios.aspx.vb
@@ -340,7 +340,7 @@ Partial Class OS_OrdenesServicios
 
             hdnEsThickbox.Value = "S"
             hdnClientIDLink.Value = "NoDefinido"
-
+            ImprimirAlGenerar()
         End If
 
     End Sub
@@ -2423,6 +2423,13 @@ Partial Class OS_OrdenesServicios
 
         ImprimirPDF("Empresas/Grales/Formatos/OrdenServicio.rdlc", lrds, params, NombreArchivo:=String.Format("OrdenServicio-{0}", CveFolio))
     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
 
 #Region "S O L I C I T A R  M A T E R I A L"