diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb
index 4ec533836..e10a3197b 100644
--- a/Compras/PopUpVerFactura.aspx.vb
+++ b/Compras/PopUpVerFactura.aspx.vb
@@ -4211,19 +4211,24 @@ Partial Class PopUpVerFactura
End If
ObjAcum.Dispose()
- Dim Dia As String = {"lunes", "martes", "miércoles", "jueves", "viernes", "sábado", "domingo"}(If((Weekday(Today) - 2) = -1, 7, Weekday(Today) - 2))
- Dim Mes As String = {"enero", "febrero", "marzo", "abril", "mayo", "junio", "julio", "agosto", "septiembre", "octubre", "noviembre", "diciembre"}(Month(Today) - 1)
+ 'Dim Dia As String = {"lunes", "martes", "miércoles", "jueves", "viernes", "sábado", "domingo"}(If((Weekday(Today) - 2) = -1, 7, Weekday(Today) - 2))
+ 'Dim Mes As String = {"enero", "febrero", "marzo", "abril", "mayo", "junio", "julio", "agosto", "septiembre", "octubre", "noviembre", "diciembre"}(Month(Today) - 1)
- Dim FechaConFormato As String = String.Format("{0}, {1} de {2} de {3}", Dia, Day(Today), Mes, Year(Today))
+ 'Dim FechaConFormato As String = String.Format("{0}, {1} de {2} de {3}", Dia, Day(Today), Mes, Year(Today))
Dim params As New List(Of ReportParameter)
params.Add(New ReportParameter("Direccion", Almacen))
- params.Add(New ReportParameter("FechaConFormato", FechaConFormato))
+ params.Add(New ReportParameter("FechaConFormato", Now.ToString("dd/MM/yyyy")))
'params.Add(New ReportParameter("FechaInicial", Fecha))
'params.Add(New ReportParameter("FechaFinal", Today.ToString("dd/MM/yyyy")))
params.Add(New ReportParameter("Sucursal", "Sucursal"))
params.Add(New ReportParameter("Cliente", NombreCliente))
+ params.Add(New ReportParameter("Folio", Folio))
+ params.Add(New ReportParameter("FechaImpresion", Now.ToString("dd/MM/yyyy hh:mm tt")))
+ params.Add(New ReportParameter("Recibio", Recibio))
+ params.Add(New ReportParameter("Observaciones", Observaciones))
+ 'params.Add(New ReportParameter("Observaciones", "Observaciones con un tamaño mas grande para ver como se ve en el ticket chico."))
ImprimirPDF(String.Format("Empresas/{0}/Formatos/UsadosEntradas.rdlc", UsuarioActual.CveEmpresa), DtMovimientos, params, "Reporte entrada usados", "PDF", "DsInventarios")
Case 7
diff --git a/Empresas/140/Formatos/Traslado.rdlc b/Empresas/140/Formatos/Traslado.rdlc
index 722441982..85672b3ae 100644
--- a/Empresas/140/Formatos/Traslado.rdlc
+++ b/Empresas/140/Formatos/Traslado.rdlc
@@ -15,7 +15,10 @@
2.19837cm
- 8.85259cm
+ 6.04844cm
+
+
+ 2.80415cm
1.41521cm
@@ -196,6 +199,48 @@
+
+
+
+ true
+ true
+
+
+
+
+ Serie
+
+
+
+
+
+
+ Textbox8
+
+
+
+ Black
+
+ 1pt
+
+
+ Black
+
+ 1pt
+
+ 2pt
+ 2pt
+ 2pt
+ 2pt
+
+
+
+
@@ -420,6 +465,39 @@
+
+
+
+ true
+ true
+
+
+
+
+ =Fields!Serie.Value
+
+
+
+
+
+
+ Serie
+
+
+ Bottom
+ 2pt
+ 2pt
+ =IIf(rownumber(nothing) = 1, "2pt", "0pt")
+
+
+
+
@@ -500,6 +578,7 @@
+
@@ -611,7 +690,7 @@
0.72418in
-