Empresas Zona Horaria
This commit is contained in:
@@ -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
|
||||
|
||||
Reference in New Issue
Block a user