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

8
Compras/RepProductosServiciosDetalle.aspx.vb
View File

@@ -263,8 +263,8 @@ Partial Class Compras_RepProductosServiciosDetalle
RowActivoFijo.Visible = True
'Carga Fechas
txtFechaI.Text = FirstDayOfMonth(Now.AddMonths(-5)).ToShortDateString
txtFechaF.Text = Now.ToShortDateString
txtFechaI.Text = FirstDayOfMonth(NowADS().AddMonths(-5)).ToShortDateString
txtFechaF.Text = NowADS().ToShortDateString
TipoCambio = 1
TCEspecifico = 0
@@ -461,7 +461,7 @@ Partial Class Compras_RepProductosServiciosDetalle
If RblTipoCambio.SelectedValue.ToEntero = 3 Then
Dim TipoCambio As Double
LiEspecifico.Visible = True
TipoCambio = GlobalTipoCambio(Now)
TipoCambio = GlobalTipoCambio(NowADS())
TxtEspecifico.Text = TipoCambio.ToString
Else
LiEspecifico.Visible = False
@@ -520,7 +520,7 @@ Partial Class Compras_RepProductosServiciosDetalle
'params.Add(New ReportParameter("FechaInicio", FechaI))
'params.Add(New ReportParameter("FechaFin", FechaF))
params.Add(New ReportParameter("UsuarioImprimio", UsuarioActual.Nombre))
params.Add(New ReportParameter("FechaImpresion", Now.ToDateTime.ToShortDateString))
params.Add(New ReportParameter("FechaImpresion", NowADS().ToDateTime.ToShortDateString))
params.Add(New ReportParameter("AgrupoPor", $"{Grupo}{Proyecto}{TipoGasto}{SubProyecto}{Categoria}{Clasificacion}{PS}{Proveedor}{Estatus}{TipoAF}{SubTipoAF}{FechaIn}{FechaFn}"))
params.Add(New ReportParameter("LogoPath", If(Imagen.Exists, $"file://{Imagen.FullName}", "")))