Empresas Zona Horaria
This commit is contained in:
@@ -69,8 +69,8 @@ Partial Class Ventas_RepVentasResumen
|
||||
DdlSubProyecto.DataBind()
|
||||
DdlSubProyecto.Items.Insert(0, New ListItem("Todos", "-1"))
|
||||
|
||||
TxtFechaI.Text = $"01/{Now.Month}/{Now.Year}"
|
||||
TxtFechaF.Text = Now.ToString("dd/MM/yyyy")
|
||||
TxtFechaI.Text = $"01/{NowADS().Month}/{NowADS().Year}"
|
||||
TxtFechaF.Text = NowADS().ToString("dd/MM/yyyy")
|
||||
End Sub
|
||||
|
||||
|
||||
@@ -111,7 +111,7 @@ Partial Class Ventas_RepVentasResumen
|
||||
Datos = Nothing
|
||||
End If
|
||||
|
||||
Dim FechaCorte As String = $"31/12/{Now.Year}"
|
||||
Dim FechaCorte As String = $"31/12/{NowADS().Year}"
|
||||
|
||||
If ObjMovtos.GetCxC(TxtFechaI.Text, TxtFechaF.Text, -1, DdlSubProyecto.SelectedValue.ToEntero, -1, -1, -1, "-1", UsuarioActual.CveEmpresa, 5, -1, 1, -1,
|
||||
"-1", "-1", "-1", FechaCorte:=FechaCorte.ToDate, CveUsuarioConsulta:=UsuarioActual.CveUsuario) Then
|
||||
|
||||
Reference in New Issue
Block a user