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

@@ -60,9 +60,9 @@ Partial Class Contabilidad_RepIVADiferencias
End Sub
Private Sub CargaCombos()
DdlEjercicio.Items.Insert(0, Now.Year.ToString)
DdlEjercicio.Items.Insert(1, Now.AddYears(-1).Year.ToString)
DdlPeriodo.SelectedValue = Now.Month.ToString
DdlEjercicio.Items.Insert(0, NowADS().Year.ToString)
DdlEjercicio.Items.Insert(1, NowADS().AddYears(-1).Year.ToString)
DdlPeriodo.SelectedValue = NowADS().Month.ToString
End Sub
Private Sub CargaDatos()
Dim ObjCont As New ClsContPAQi(UsuarioActual.Empresa)
@@ -109,7 +109,7 @@ Partial Class Contabilidad_RepIVADiferencias
params.Add(New ReportParameter("Ejercicio", Ejercicio.ToString))
params.Add(New ReportParameter("Periodo", Periodo))
params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Usuario))
params.Add(New ReportParameter("FechaImpresion", Now.ToShortDateString))
params.Add(New ReportParameter("FechaImpresion", NowADS().ToShortDateString))
ImprimirPDF(reportpath, DtDatos, params, fileName, Formato)
Else