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
General/CATIEPSxEntidadFed.aspx.cs
View File

@@ -52,8 +52,8 @@ public partial class General_CATIEPSxEntidadFed : ClsPaginas
DdlEstado.Items.Insert(0, new ListItem("Todos", "-1"));
RcveEstado = Request["cveEstado"] == null ? -1 : Request["cveEstado"].ToString().ToEntero();
RtasaIEPS = Request["tasaIEPS"] == null ? -1 : Request["tasaIEPS"].ToString().ToDecimal();
RfechaInicio = Request["fechaInicio"] == null ? string.Format("01/{0:MM/yyyy}", DateTime.Now.AddMonths(-1)) : Request["fechaInicio"].ToString();
RfechaFin = Request["fechaFin"] == null ? string.Format("{0:dd/MM/yyyy}", DateTime.Now.AddMonths(-1).LastDayOfMonth()) : Request["fechaFin"].ToString();
RfechaInicio = Request["fechaInicio"] == null ? string.Format("01/{0:MM/yyyy}", NowADS().AddMonths(-1)) : Request["fechaInicio"].ToString();
RfechaFin = Request["fechaFin"] == null ? string.Format("{0:dd/MM/yyyy}", NowADS().AddMonths(-1).LastDayOfMonth()) : Request["fechaFin"].ToString();
DdlEstado.SelectedValueExist(RcveEstado.ToString());
DdlIeps.SelectedValueExist(RtasaIEPS.ToString());
TxtIEPSfechaInicio.Text = $"{RfechaInicio:dd/MM/yyyy}";
@@ -127,7 +127,7 @@ public partial class General_CATIEPSxEntidadFed : ClsPaginas
paramList.Add(new ReportParameter("Agrupador", DdlAgrupador.SelectedValue));
paramList.Add(new ReportParameter("Empresa", UsuarioActual.Empresa.Empresa));
paramList.Add(new ReportParameter("UsuarioImprimio", UsuarioActual.Nombre));
paramList.Add(new ReportParameter("FechaImpresion", DateTime.Now.ToString()));
paramList.Add(new ReportParameter("FechaImpresion", NowADS().ToString()));
paramList.Add(new ReportParameter("Filtros", $"{FechaInicio}{FechaFin}{IEPS}{Estado}{Agrupador}"));

4
General/CatDiasInhabiles.aspx.vb
View File

@@ -31,7 +31,7 @@ Partial Class General_CatDiasInhabiles
Alert("Agregado Correctamente.", TipoMensaje.MsgInformacion)
End If
ElseIf HdnModalidad.Value = "U" Then
If ObjGrl.DiasInhabiles_Update(HdnID.Value.ToEntero, UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario, TxtDiaInhabil.Text, TxtDescripcion.Text, Estatus, Date.Now, TxtFechaInhabil.Text.ToDate) Then
If ObjGrl.DiasInhabiles_Update(HdnID.Value.ToEntero, UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario, TxtDiaInhabil.Text, TxtDescripcion.Text, Estatus, NowADS(), TxtFechaInhabil.Text.ToDate) Then
CargaDatos()
Alert("Actualizado Correctamente.", TipoMensaje.MsgInformacion)
End If
@@ -82,7 +82,7 @@ Partial Class General_CatDiasInhabiles
TxtDescripcion.Text = ""
ChkEstatus.Checked = False
UpAddDiasInhabiles.Update()
TxtFechaInhabil.Text = Date.Now.ToString
TxtFechaInhabil.Text = NowADS().ToString
RegistraScript(String.Format("$('#{0}').modal('show');", "divAddDiasInhabiles"))
End Sub

2
General/CatMarcas.aspx.vb
View File

@@ -107,7 +107,7 @@ Partial Class General_CatMarcas
#End Region
#Region "GRIDVIEW"
#Region "GRIDVIEW"
Protected Sub GvMarcas_RowDataBound(sender As Object, e As System.Web.UI.WebControls.GridViewRowEventArgs) Handles GvMarcas.RowDataBound
If e.Row.RowType = DataControlRowType.DataRow Then
If e.Row.DBCampo("Estatus") = "True" Then

2
General/CatSatListado69B.aspx.vb
View File

@@ -78,7 +78,7 @@ Partial Class General_CatSatListado69B
Protected Sub LnkListado69BExcel_Click(sender As Object, e As EventArgs)
If GVDatosGeneral.Rows.Count > 0 Then
GVDatosGeneral.ExportToExcel($"Reporte_{Now.ToString("yyyyMMddhhmmss")}")
GVDatosGeneral.ExportToExcel($"Reporte_{NowADS().ToString("yyyyMMddhhmmss")}")
End If
End Sub

2
General/CatTipoCambio.aspx.cs
View File

@@ -67,7 +67,7 @@ public partial class General_CatTipoCambio : ClsPaginas
{
if (!IsPostBack)
{
FechaInicio = DateTime.Now.AddDays(-30);
FechaInicio = NowADS().AddDays(-30);
FechaFin = DateTime.Today;
txtFechaI.Text = FechaInicio.ToString("dd/MM/yyyy");

2
General/ColectivasDetalle.aspx.vb
View File

@@ -70,7 +70,7 @@ Partial Class General_ColectivasDetalle
LtlTitulo.Text = "Consulta del Colectiva:"
Else
'Configuración de Modalidad Insertf
LblFechaCaptura.Text = Now.ToShortDateString()
LblFechaCaptura.Text = NowADS().ToShortDateString()
LblUsuarioCapturo.Text = UsuarioActual.Usuario
ViewState("CveColectiva") = -1
End If

2
General/FolioFechaCancelacion.aspx.vb
View File

@@ -68,7 +68,7 @@ Partial Class Generales_FolioFechaCancelacion
Dim CancelacionAcuse As String = ""
Dim CancelacionState As Integer = 0
Dim CancelacionFecha As Date = Now
Dim CancelacionFecha As Date = NowADS()
Dim Consula As Boolean = False
Dim solicitud As New WSGF.Service1SoapClient

4
General/RepIndicadorResumen.aspx.vb
View File

@@ -18,8 +18,8 @@ Partial Class General_RepIndicadorResumen
Private Sub CargaCombos()
'Carga SubProyectos
CargarCentrosDeCosto(Nothing, DdlSubProyecto, Nothing, lblSubProyecto)
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")
'CreaDataTableColor()
End Sub
Protected Sub BtnConsultar_Click(sender As Object, e As EventArgs) Handles btnConsultar.Click

6
General/RepPaqueteriasGuias.aspx.cs
View File

@@ -310,7 +310,7 @@ public partial class General_RepPaqueteriasGuias : ClsPaginas
protected void InicializaFechas()
{
DateTime FI = new DateTime(DateTime.Now.Year, 1, 1);
DateTime FI = new DateTime(NowADS().Year, 1, 1);
TxtFechaI.Text = FI.ToShortDateString();
TxtFechaF.Text = DateTime.Today.ToShortDateString();
@@ -884,7 +884,7 @@ public partial class General_RepPaqueteriasGuias : ClsPaginas
@params.Add(new ReportParameter("EntregasDirectas", (ChkLote.Checked?"Solo entregas directas":"Entregas directas y por paquetería")));
@params.Add(new ReportParameter("UsuarioImprimio", UsuarioActual.Nombre));
@params.Add(new ReportParameter("FechaImpresion", DateTime.Now.ToShortDateString()));
@params.Add(new ReportParameter("FechaImpresion", NowADS().ToShortDateString()));
string Usuario = DdlUsuarios.SelectedValue == "-1" ? "No especificado" : DdlUsuarios.SelectedItem.Text;
string FechasIngF = TxtFechaFinalIngreso.Text.Length > 0 ? string.Format("&emsp; &emsp;< b > F.I.Ingreso: </ b >{0}", TxtFechaFinalIngreso.Text) : "";
@@ -895,7 +895,7 @@ public partial class General_RepPaqueteriasGuias : ClsPaginas
@params.Add(new ReportParameter("FiltroUsuario", Usuario));
@params.Add(new ReportParameter("LogoPath", Imagen.Exists ? $"file://{Imagen.FullName}" : ""));
ImprimirPDF(RutaPDF, DTDatos, @params, "RepPaqueteriasGuias" + DateTime.Now.ToString("yyyyMMddhhmmss"), Formato);
ImprimirPDF(RutaPDF, DTDatos, @params, "RepPaqueteriasGuias" + NowADS().ToString("yyyyMMddhhmmss"), Formato);
}
#endregion

6
General/SaldosIniciales.aspx.vb
View File

@@ -10,7 +10,7 @@ Partial Class General_SaldosIniciales
Inherits ClsPaginas
Protected Sub Page_Load(sender As Object, e As System.EventArgs) Handles Me.Load
If Not IsPostBack Then
TxtFecha.Text = Now.ToShortDateString
TxtFecha.Text = NowADS().ToShortDateString
End If
End Sub
@@ -2102,7 +2102,7 @@ Partial Class General_SaldosIniciales
Dim Cuenta As String = ""
Dim Reporte As New StringBuilder
IdPoliza = ObjConta.AddPoliza(1, "Saldos Iniciales", 0, 0, 100, Now.ToDate)
IdPoliza = ObjConta.AddPoliza(1, "Saldos Iniciales", 0, 0, 100, NowADS().ToDate)
@@ -2137,7 +2137,7 @@ Partial Class General_SaldosIniciales
If YaExiste = False Then
If IdCuenta > 0 Then
If Not ObjConta.AddMovimiento(IdPoliza, IdCuenta, CargoAbono, Importe, "", "Saldos Iniciales", -1, Now, "") Then
If Not ObjConta.AddMovimiento(IdPoliza, IdCuenta, CargoAbono, Importe, "", "Saldos Iniciales", -1, NowADS(), "") Then
TieneError = True
Exit For
End If