diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb
index 409b4be64..482e6026a 100644
--- a/Compras/PopUpVerFactura.aspx.vb
+++ b/Compras/PopUpVerFactura.aspx.vb
@@ -2703,6 +2703,9 @@ Partial Class PopUpVerFactura
params.Add(New ReportParameter("LogoPath", ""))
End If
+ Dim DepartamentoRecibe As String = GlobalDTRHPersonal(UsuarioActual.CveEmpresa).FiltroPrimeroValor("Departamento", String.Format("NombreCompleto = '{0}'", Recibio))
+ Dim DepartamentoEntrego As String = GlobalDTRHPersonal(UsuarioActual.CveEmpresa).FiltroPrimeroValor("Departamento", String.Format("NombreCompleto = '{0}'", Capturo))
+
params.Add(New ReportParameter("Empresa", UsuarioActual.Empresa.Empresa))
params.Add(New ReportParameter("Concepto", "Salida por resguardo"))
params.Add(New ReportParameter("Almacen", Almacen))
@@ -2712,12 +2715,17 @@ Partial Class PopUpVerFactura
params.Add(New ReportParameter("Descuentos", ""))
params.Add(New ReportParameter("IVA", ""))
params.Add(New ReportParameter("Total", ""))
- 'params.Add(New ReportParameter("NombreEntrego", String.Format("ENTREGÓ{0}{1}", vbCrLf, Capturo)))
+ params.Add(New ReportParameter("NombreEntrego", String.Format("ENTREGÓ{0}{1}", vbCrLf, Capturo)))
params.Add(New ReportParameter("NombreRecibio", Recibio))
params.Add(New ReportParameter("PuestoRecibio", PuestoEntrego))
params.Add(New ReportParameter("PuestoEntrego", PuestoRecibio))
+ If UsuarioActual.CveEmpresa = 72 Then
+ params.Add(New ReportParameter("Sucursal", SubProyecto))
+ params.Add(New ReportParameter("DepartamenteRecibio", DepartamentoRecibe))
+ params.Add(New ReportParameter("DepartamentoEntrego", DepartamentoEntrego))
+ End If
params.Add(New ReportParameter("FechaMovimiento", FechaMovimiento.ToString("dd/MM/yyyy")))
params.Add(New ReportParameter("UsuarioImprimio", NombreCapturo))
params.Add(New ReportParameter("Observaciones", Observaciones))
diff --git a/Empresas/72/Formatos/Factura.rdlc b/Empresas/72/Formatos/Factura.rdlc
index f55ce53db..fef85c978 100644
--- a/Empresas/72/Formatos/Factura.rdlc
+++ b/Empresas/72/Formatos/Factura.rdlc
@@ -787,7 +787,7 @@
Start
true
- 9.87049in
+ 9.18657in
0.06548in
1.67778in
8.23221in
@@ -1367,7 +1367,7 @@
true
- 7.30179in
+ 6.61787in
0.05817in
1.3508in
8.23035in
@@ -3408,7 +3408,7 @@
Textbox54
- 6.7921in
+ 6.10818in
0.16632cm
0.36385in
4.94037in
@@ -3444,7 +3444,7 @@
Textbox33
- 17.25192cm
+ 15.51477cm
12.71485cm
0.44794cm
8.33799cm
@@ -3474,7 +3474,7 @@
Textbox5
- 18.31722cm
+ 16.58007cm
0.16632cm
0.0882cm
20.88652cm
@@ -3732,7 +3732,7 @@
Textbox5
- 14.71903cm
+ 12.98188cm
0.14775cm
0.0882cm
20.90509cm
@@ -4038,7 +4038,7 @@
DsOC
- 15.01537cm
+ 13.27822cm
3.16661cm
1.61479cm
15.04148cm
@@ -4067,7 +4067,7 @@
Textbox5
- 16.9459cm
+ 15.20875cm
0.22358cm
0.0882cm
20.90509cm
@@ -4097,24 +4097,6 @@
-
- Embedded
- BannerFacturaSIG
- Fit
- 12.35498cm
- 0.14775cm
- 2.18766cm
- 10.48062cm
- 25
-
- =iif(len(Parameters!Observaciones.Value) > 100, true,false)
-
-
-
-
-
true
true
@@ -4140,7 +4122,7 @@
2.22035in
0.18861in
6.06817in
- 26
+ 25
@@ -4416,7 +4398,7 @@
0.06548in
0.34081in
2.08542in
- 27
+ 26
@@ -4910,11 +4892,11 @@
true
- 22.07352cm
+ 20.33637cm
0.14775cm
2.97096cm
20.69254cm
- 28
+ 27
=Microsoft.VisualBasic.Interaction.IIF(First(Fields!SerieFolio.Value, "DataSet4") <> "", False, True)
@@ -4925,7 +4907,7 @@
- 29.49675cm
+ 27.72404cm