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
OC/RepRequisiciones.aspx.vb
View File

@@ -32,7 +32,7 @@ Partial Class OC_RepRequisiciones
DtUsuarioProyectos = objEstatusUsuarios.DtResultados
End If
objEstatusUsuarios.Dispose()
txtFechaI.Text = Now.AddMonths(-1).FirstDayOfMonth.ToShortDateString
txtFechaI.Text = NowADS().AddMonths(-1).FirstDayOfMonth.ToShortDateString
DdlProyecto.DataSource = DtUsuarioProyectos.FiltraParametros("", "", {"CveProyecto", "Proyecto"}) ' GlobalDTProyectos(UsuarioActual.Empresa.CveEmpresa)
DdlProyecto.DataBind()
@@ -145,7 +145,7 @@ Partial Class OC_RepRequisiciones
End Sub
'Protected Sub ImgExcel_Click(sender As Object, e As System.EventArgs) Handles ImgExcel.Click
' GVDatos.ExportToExcel("ReporteRequisiciones" & Now.ToShortDateString)
' GVDatos.ExportToExcel("ReporteRequisiciones" & NowADS().ToShortDateString)
'End Sub
@@ -161,7 +161,7 @@ Partial Class OC_RepRequisiciones
Dim params As New List(Of ReportParameter)
params.Add(New ReportParameter("NombreEmpresa", UsuarioActual.Empresa.Empresa))
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("Proyecto", DdlProyecto.SelectedItem.Text))
params.Add(New ReportParameter("SubProyecto", DdlSubProyecto.SelectedItem.Text))
params.Add(New ReportParameter("LogoPath", If(Imagen.Exists, $"file://{Imagen.FullName}", "")))