Empresas Zona Horaria

This commit is contained in:
rakcsle
2023-10-09 11:54:42 -07:00
parent 2df7c3976c
commit f43b7759a8
649 changed files with 11445 additions and 11105 deletions

View File

@@ -23,8 +23,8 @@ Partial Class Ventas_RepIndiceRotacionPersonal
Private Sub Ventas_RepIndiceRotacionPersonal_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not IsPostBack Then
txtInicio.Text = Date.Now.AddDays(-30).ToString("dd/MM/yyyy")
txtFin.Text = Date.Now.ToString("dd/MM/yyyy")
txtInicio.Text = NowADS().AddDays(-30).ToString("dd/MM/yyyy")
txtFin.Text = NowADS().ToString("dd/MM/yyyy")
CargaProyecto()
CargaTurnos()
@@ -75,8 +75,8 @@ Partial Class Ventas_RepIndiceRotacionPersonal
Dim CveSubproyecto As Integer = -1
Dim CveTurno As Integer = -1
Dim FechaInicio As Date = Date.Now.AddDays(-30)
Dim FechaFin As Date = Date.Now
Dim FechaInicio As Date = NowADS().AddDays(-30)
Dim FechaFin As Date = NowADS()
FechaInicio = Date.Parse(txtInicio.Text)
@@ -160,7 +160,7 @@ Partial Class Ventas_RepIndiceRotacionPersonal
params.Add(New ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa))
params.Add(New ReportParameter("FechaInicial", txtInicio.Text))
params.Add(New ReportParameter("FechaFinal", txtFin.Text))
params.Add(New ReportParameter("FechaRealizado", Date.Now().ToString()))
params.Add(New ReportParameter("FechaRealizado", NowADS().ToString()))
params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
params.Add(New ReportParameter("LogoPath", If(Imagen.Exists, $"file://{Imagen.FullName}", "")))