diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb
index de293344c..1fde65c90 100644
--- a/Compras/PopUpVerFactura.aspx.vb
+++ b/Compras/PopUpVerFactura.aspx.vb
@@ -2991,34 +2991,41 @@ Partial Class PopUpVerFactura
params.Add(New ReportParameter("LogoPath", ""))
End If
- If ObjOS.GetOrdenesServiciosDetalle(CveOS) Then
- TmpDTOS = ObjOS.DtResultados
- End If
+ 'If ObjOS.GetOrdenesServiciosDetalle(CveOS) Then
+ ' TmpDTOS = ObjOS.DtResultados
+ 'End If
- If ObjOS.GetDetalleMateriales(-1, CveOS) Then
- TmpDTMaterialesOS = ObjOS.DtResultados
- End If
+ 'If ObjOS.GetDetalleMateriales(-1, CveOS) Then
+ ' TmpDTMaterialesOS = ObjOS.DtResultados
+ 'End If
- Dim lrds As New List(Of ReportDataSource)
- Dim rds As New ReportDataSource With {.Name = "DataSet2", .Value = TmpDTMaterialesOS}
- Dim rds2 As New ReportDataSource With {.Name = "DataSet1", .Value = TmpDTOS}
+ 'Dim lrds As New List(Of ReportDataSource)
+ 'Dim rds As New ReportDataSource With {.Name = "DataSet2", .Value = TmpDTMaterialesOS}
+ 'Dim rds2 As New ReportDataSource With {.Name = "DataSet1", .Value = TmpDTOS}
- lrds.Add(rds)
- lrds.Add(rds2)
- ObjOS.Dispose()
+ 'lrds.Add(rds)
+ 'lrds.Add(rds2)
+ 'ObjOS.Dispose()
- ImprimirPDF("Empresas/Grales/Formatos/OrdenServicio.rdlc", lrds, params, NombreArchivo:=String.Format("OrdenServicio-{0}", CveFolio))
- Else
- Dim lrds As New List(Of ReportDataSource)
- Dim rds As New ReportDataSource With {.Name = "DataSet2", .Value = TmpDTMaterialesOS}
- Dim rds2 As New ReportDataSource With {.Name = "DataSet1", .Value = TmpDTOS}
-
- lrds.Add(rds)
- lrds.Add(rds2)
- ObjOS.Dispose()
-
- ImprimirPDF(String.Format("Empresas/{0}/Formatos/OrdenServicio.rdlc", UsuarioActual.CveEmpresa), lrds, params, NombreArchivo:=String.Format("OrdenServicio-{0}", CveFolio))
+ 'ImprimirPDF("Empresas/Grales/Formatos/OrdenServicio.rdlc", lrds, params, NombreArchivo:=String.Format("OrdenServicio-{0}", CveFolio))
End If
+
+ If ObjOS.GetOrdenesServiciosDetalle(CveOS) Then
+ TmpDTOS = ObjOS.DtResultados
+ End If
+
+ If ObjOS.GetDetalleMateriales(-1, CveOS) Then
+ TmpDTMaterialesOS = ObjOS.DtResultados
+ End If
+ Dim lrds As New List(Of ReportDataSource)
+ Dim rds As New ReportDataSource With {.Name = "DataSet2", .Value = TmpDTMaterialesOS}
+ Dim rds2 As New ReportDataSource With {.Name = "DataSet1", .Value = TmpDTOS}
+
+ lrds.Add(rds)
+ lrds.Add(rds2)
+ ObjOS.Dispose()
+
+ ImprimirPDF(String.Format("Empresas/{0}/Formatos/OrdenServicio.rdlc", UsuarioActual.CveEmpresa), lrds, params, NombreArchivo:=String.Format("OrdenServicio-{0}", CveFolio))
End Sub
Private Sub CreaDT()
TmpDTOS = New DataTable
diff --git a/Empresas/72/Formatos/OrdenServicio.rdlc b/Empresas/72/Formatos/OrdenServicio.rdlc
index b2229978d..4f395863e 100644
--- a/Empresas/72/Formatos/OrdenServicio.rdlc
+++ b/Empresas/72/Formatos/OrdenServicio.rdlc
@@ -23,7 +23,7 @@
Textbox165
3.63358cm
- 0.07cm
+ 0.11767cm
0.47364cm
18.64497cm
+
+
+
+
+ 1.64066cm
+
+
+ 1.82591cm
+
+
+ 8.24827cm
+
+
+ 6.93013cm
+
+
+
+
+ 0.6cm
+
+
+
+
+ true
+ true
+
+
+
+
+ Cantidad
+
+
+
+
+
+
+ Textbox14
+
+
+ Silver
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ UM
+
+
+
+
+
+
+ Textbox18
+
+
+ Silver
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Descripcion
+
+
+
+
+
+
+ Textbox25
+
+
+ Silver
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ Observaciones
+
+
+
+
+
+
+ Textbox27
+
+
+ Silver
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ 0.6cm
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!Cantidad.Value
+
+
+
+
+
+
+ Cantidad
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!UM.Value
+
+
+
+
+
+
+ UM
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!PS.Value
+
+
+
+
+
+
+ PS
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!Observaciones.Value
+
+
+
+
+
+
+ Observaciones
+
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+
+ After
+
+
+
+
+
+
+ DataSet1
+ 9.80202cm
+ 0.13112cm
+ 1.2cm
+ 18.64497cm
+ 26
+
+
+ 7pt
+
+
- 9.8435in
+ 10.79142in
-