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

@@ -43,8 +43,8 @@ Partial Class Contabilidad_RepEdoResultados2
Private Sub Contabilidad_RepEdoResultados2_Load(sender As Object, e As EventArgs) Handles Me.Load
If Not Page.IsPostBack Then
CargaCombos()
txtFechaI.Text = $"01/01/{Now.Year}"
txtFechaF.Text = $"31/12/{Now.Year}"
txtFechaI.Text = $"01/01/{NowADS().Year}"
txtFechaF.Text = $"31/12/{NowADS().Year}"
CargaDatos()
End If
@@ -222,7 +222,7 @@ Partial Class Contabilidad_RepEdoResultados2
params.Add(New ReportParameter("Empresa", UsuarioActual.Empresa.Empresa))
params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
params.Add(New ReportParameter("FechaImpresion", Now.ToLongDateString))
params.Add(New ReportParameter("FechaImpresion", NowADS().ToLongDateString))
params.Add(New ReportParameter("Filtros", StrFiltro.ToString))
Dim rds1 As New ReportDataSource With {.Name = "DataSet1", .Value = If(DtIngresos IsNot Nothing, DtIngresos, New DataTable)} ' sino esta creado el objeto, lo creamos, para que no truene el reporte