Empresas Zona Horaria
This commit is contained in:
@@ -65,7 +65,7 @@ Partial Class Compras_RepCompras
|
||||
End Sub
|
||||
|
||||
Private Sub CargaCombos()
|
||||
txtFechaI.Text = $"01/01/{Now.Year}"
|
||||
txtFechaI.Text = $"01/01/{NowADS().Year}"
|
||||
|
||||
'Carga Tipo Centro de Costo
|
||||
CargarCentrosDeCosto(DdlProyecto, DdlSubProyecto, LblProyecto, LblSubProyecto, divProyecto:=DivProyecto)
|
||||
@@ -114,7 +114,7 @@ Partial Class Compras_RepCompras
|
||||
If RblTipoCambio.SelectedValue.ToEntero = 3 Then
|
||||
Dim TipoCambio As Double
|
||||
LiEspecifico.Visible = True
|
||||
TipoCambio = GlobalTipoCambio(Now)
|
||||
TipoCambio = GlobalTipoCambio(NowADS())
|
||||
TxtEspecifico.Text = TipoCambio.ToString
|
||||
Else
|
||||
LiEspecifico.Visible = False
|
||||
@@ -298,7 +298,7 @@ Partial Class Compras_RepCompras
|
||||
|
||||
#Region "I M P R I M I R"
|
||||
Protected Sub LnkExportar_Click(sender As Object, e As EventArgs) Handles LnkExportar.Click
|
||||
GvDatos.ExportToExcel("ReporteCompras" & Now.ToShortDateString)
|
||||
GvDatos.ExportToExcel("ReporteCompras" & NowADS().ToShortDateString)
|
||||
End Sub
|
||||
|
||||
Private Sub GenerarPDF()
|
||||
@@ -328,7 +328,7 @@ Partial Class Compras_RepCompras
|
||||
params.Add(New ReportParameter("FechaFin", FechaF))
|
||||
params.Add(New ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa))
|
||||
params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
|
||||
params.Add(New ReportParameter("FechaImpresion", Now.ToString))
|
||||
params.Add(New ReportParameter("FechaImpresion", NowADS().ToString))
|
||||
params.Add(New ReportParameter("AgrupadoPor", $"<b>Agrupado Por:</b> {Grupo}{Proveedor}{Capturo}{Moneda}{FechaIn}{FechaFn}{Proyecto}{SubProyecto}{TipoGasto}{TipoProveedor}{FechaICaptura}{FechaFCaptura}{TipoDocto}"))
|
||||
params.Add(New ReportParameter("LogoPath", If(Imagen.Exists, $"file://{Imagen.FullName}", "")))
|
||||
ImprimirPDF("Empresas/Grales/Formatos/RepCompras.rdlc", DtCompras, params, "ReporteCompras")
|
||||
|
||||
Reference in New Issue
Block a user