AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Empresas Zona Horaria

Browse Source
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
Download Patch File Download Diff File Expand all files Collapse all files

6
Acumuladores/EntradasUsadosResumenRep.aspx.vb
View File

@@ -35,11 +35,11 @@ Partial Class Acumuladores_RepEntradasUsados
End Sub
Protected Sub CargarCombos()
Dim fecha As Date = Date.Now.AddMonths(-1)
Dim fecha As Date = NowADS().AddMonths(-1)
Dim Años As New ListItem
Dim i As Integer
If Cargado = 0 Then
For i = Date.Now.Year.ToEntero To (fecha.Year.ToEntero - 5) Step -1
For i = NowADS().Year.ToEntero To (fecha.Year.ToEntero - 5) Step -1
Años = New ListItem(i.ToString, i.ToString)
DdlAño.Items.Add(Años)
Next
@@ -85,7 +85,7 @@ Partial Class Acumuladores_RepEntradasUsados
Dim params As New List(Of ReportParameter)
params.Add(New ReportParameter("Direccion", Direccion))
params.Add(New ReportParameter("FechaConFormato", Date.Now.ToString))
params.Add(New ReportParameter("FechaConFormato", NowADS().ToString))
params.Add(New ReportParameter("FechaInicial", txtFechaI.Text))
params.Add(New ReportParameter("FechaFinal", txtFechaF.Text))
params.Add(New ReportParameter("Sucursal", "Sucursal"))