From cbb126e0f2fe2aa46e6816bddd7202914a58dcda Mon Sep 17 00:00:00 2001 From: JORGE LUIS CAUDILLO ESPARZA Date: Mon, 24 Jan 2022 17:29:12 -0700 Subject: [PATCH] --- Compras/PopUpVerFactura.aspx.vb | 2 +- Documentacion/TableroMaterialidad.aspx | 166 +++++++++++++++++++--- Documentacion/TableroMaterialidad.aspx.cs | 99 ++++++++++++- Edoc/CatDocumentos.aspx.vb | 88 ++++++------ Nomina/ISRCalculoAnual.aspx | 128 ----------------- Nomina/ISRCalculoAnual.aspx.cs | 47 ------ RH/CatPersonal.aspx | 8 ++ RH/CatPersonal.aspx.vb | 5 + Ventas/Ventas.aspx.vb | 18 +++ vwd.webinfo | 6 + 10 files changed, 328 insertions(+), 239 deletions(-) delete mode 100644 Nomina/ISRCalculoAnual.aspx delete mode 100644 Nomina/ISRCalculoAnual.aspx.cs diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb index e50e6e1ac..fdd6679a9 100644 --- a/Compras/PopUpVerFactura.aspx.vb +++ b/Compras/PopUpVerFactura.aspx.vb @@ -262,7 +262,7 @@ Partial Class PopUpVerFactura Remolque1 = String.Format("{0} ", row("Rem1Especificacion"), row("Rem1Anio")) Mercado = If(row("AgenciaAduanalUSA").ToString() = "2", "Extranjero", "Nacional") - NumeroTrailer = row("NumeroTrailer").ToString() + NumeroTrailer = String.Format("No. {0}", row("NumeroTrailer").ToString()) LongitudCaja = row("LongitudCaja").ToString() LineaTransportacion = row("LineaTransportacion").ToString() diff --git a/Documentacion/TableroMaterialidad.aspx b/Documentacion/TableroMaterialidad.aspx index 744690695..a2a338199 100644 --- a/Documentacion/TableroMaterialidad.aspx +++ b/Documentacion/TableroMaterialidad.aspx @@ -11,9 +11,39 @@ #C_Tab_Tlablero tr td:nth-child(n+2) { text-align: center } - .spanfoliofiscal{ - white-space:nowrap; + + .spanfoliofiscal { + white-space: nowrap; } + th:not(.Modulo5) + th.Modulo5, + th:not(.Modulo6) + th.Modulo6, + th:not(.Modulo7) + th.Modulo7{ + border-left:1px solid black; + } + th.Modulo5 + th:not(.Modulo5), + th.Modulo6 + th:not(.Modulo6), + th.Modulo7 + th:not(.Modulo7){ + border-left:1px solid black; + } + .ADScroller-header .trtitle{ + display:none; + } + /* + tr:first-child th.Modulo5, + tr th.Modulo6, + tr th.Modulo7{ + border-left:1px solid black; + } + tr th.Modulo5:nth-child(1), + tr th.Modulo6:nth-child(1), + tr th.Modulo7:nth-child(1){ + border-left:1px solid black; + } + tr th.Modulo5:nth-last-child(1), + tr th.Modulo6:nth-last-child(1), + tr th.Modulo7:nth-last-child(1){ + border-right:1px solid black; + }*/ @@ -24,6 +54,10 @@ + +
  • + +
  • Cargar Doctos <%--Cargar Doctos--%> @@ -32,6 +66,7 @@ Cargar XML PDF <%--Cargar XML PDF--%>
  • +
  • Enviar
  • @@ -83,9 +118,13 @@ - + +
    + + @@ -95,9 +134,9 @@ - + - <%-- + <%-- class='Modulo5' @@ -115,7 +154,7 @@ "; + + LtlThs.Text = string.Format("{0}{1}", LtlThs.Text, string.Concat(Enumerable.Repeat("", dt.Rows.Count))); + LtlThs.Text = string.Format("{0}", LtlThs.Text); + int filas = dt.FiltraParametros("Modulo =5").Rows.Count; + if(filas > 0) + { + LtlThs.Text = string.Format("{0}", LtlThs.Text, filas); + } + filas = dt.FiltraParametros("Modulo =6").Rows.Count; + if (filas > 0) + { + LtlThs.Text = string.Format("{0}", LtlThs.Text, filas); + } + filas = dt.FiltraParametros("Modulo =7").Rows.Count; + if (filas > 0) + { + LtlThs.Text = string.Format("{0}", LtlThs.Text, filas); + } + LtlThs.Text = string.Format("{0}", LtlThs.Text); RPTTableroHeader.DataSource = edoc.DSResultados.Tables[1]; RPTTableroHeader.DataBind(); RptDatos.DataBind(); @@ -350,12 +380,12 @@ public partial class Documentacion_TableroMaterialidad : ClsPaginas } - public void procesararchivo(string xmlobject,int periodo, bool guardarInformacion =false) + public void procesararchivo(string xmlobject, int periodo, bool guardarInformacion = false) { using (ClsEdocumentacion edoc = new ClsEdocumentacion()) { - if (edoc.materialidadDoctos(xmlobject,UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, periodo, guardarInformacion)) + if (edoc.materialidadDoctos(xmlobject, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, periodo, guardarInformacion)) { if (edoc.DtResultados.Rows.Count > 0) { @@ -542,6 +572,71 @@ public partial class Documentacion_TableroMaterialidad : ClsPaginas Alert("El correo se ha enviado."); } + + protected void BtnAgregarDocumento_Click(object sender, EventArgs e) + { + + Txtdocumentacion.Text = ""; + TxtOrden.Text = "1"; + TxtPeriodicidad.Text = "1"; + TxtDiasLimite.Text = "1"; + BtnAgregarDocumentoModal.Text = "Agregar"; + LtlTituloModalDocumentacion.Text = "Agregar documentación"; + DdlDocumentacionTipo.SelectedIndex = 0; + chkEstatus.Checked = true; + chkRequerido.Checked = true; + + ActualizarDocumentacion = false; + UpModalDocumentacion.Update(); + RegistraScript("$('#divAgregarDocumentacion').modal({ backdrop: 'static', keyboard: false});"); + } + + + + protected void BtnAgregarDocumentoModal_Click(object sender, EventArgs e) + { + using (ClsEdocumentacion objRH = new ClsEdocumentacion()) + { + int intCompleto = 0; + int _estatus = 0; + int _requerido = 0; + string _formato = ""; + + + if (chkEstatus.Checked) + _estatus = 1; + + if (chkRequerido.Checked) + _requerido = 1; + + if (ActualizarDocumentacion) + { + //_formato = GuardarArchivo(CveDocumentacion); + if (objRH.DocumentacionUpdate(CveDocumentacion, Txtdocumentacion.Text.Trim(), _formato, DdlDocumentacionTipo.SelectedValue.ToEntero(), _estatus, TxtOrden.Text.ToEntero(), _requerido, TxtDiasLimite.Text.ToEntero(), ChkAplicaDiasLimite.Checked, ChkAplicaFechaVencimiento.Checked, UsuarioActual.Empresa.CveEmpresa, TxtPeriodicidad.Text.ToEntero())) + { + RegistraScript(string.Format("$('#{0}').modal('hide');", "divAgregarDocumentacion")); + Alert("Documento Actualizado correctamente.", ModExtensiones.TipoMensaje.MsgInformacion); + cargadatos(); + } + } + else if (objRH.DocumentacionAdd(Txtdocumentacion.Text.Trim(), _formato, DdlDocumentacionTipo.SelectedValue.ToEntero(), _estatus, TxtOrden.Text.ToEntero(), _requerido, TxtDiasLimite.Text.ToEntero(), ChkAplicaDiasLimite.Checked, ChkAplicaFechaVencimiento.Checked, UsuarioActual.Empresa.CveEmpresa, TxtPeriodicidad.Text.ToEntero())) + { + //CveDocumentacion = objRH.DtResultados(0)(0).ToString.ToEntero; + //_formato = GuardarArchivo(CveDocumentacion); + if (objRH.DocumentacionUpdate(CveDocumentacion, Txtdocumentacion.Text.Trim(), _formato, DdlDocumentacionTipo.SelectedValue.ToEntero(), _estatus, TxtOrden.Text.ToEntero(), _requerido, TxtDiasLimite.Text.ToEntero(), ChkAplicaDiasLimite.Checked, ChkAplicaFechaVencimiento.Checked, UsuarioActual.Empresa.CveEmpresa, TxtPeriodicidad.Text.ToEntero())) + { + } + + RegistraScript(string.Format("$('#{0}').modal('hide');", "divAgregarDocumentacion")); + Alert("Documento agregado correctamente.", ModExtensiones.TipoMensaje.MsgInformacion); + cargadatos(); + } + + ActualizarDocumentacion = false; + + } + + } } public class archivoxmlpdf { diff --git a/Edoc/CatDocumentos.aspx.vb b/Edoc/CatDocumentos.aspx.vb index 2858a24c0..f4a6cd1aa 100644 --- a/Edoc/CatDocumentos.aspx.vb +++ b/Edoc/CatDocumentos.aspx.vb @@ -323,49 +323,51 @@ Partial Class RH_CatDocumentos Protected Sub BtnAgregarDocumentoModal_Click(sender As Object, e As EventArgs) Handles BtnAgregarDocumentoModal.Click - Dim objRH As New ClsEdocumentacion - Dim intCompleto As Integer = 0 - Dim _estatus As Integer = 0 - Dim _requerido As Integer = 0 - Dim _formato As String = "" - - - If chkEstatus.Checked Then - _estatus = 1 - End If - - If chkRequerido.Checked Then - _requerido = 1 - End If - - If ActualizarDocumentacion Then - - _formato = GuardarArchivo(CveDocumentacion) - If objRH.DocumentacionUpdate(CveDocumentacion, Txtdocumentacion.Text.Trim, _formato, DdlDocumentacionTipo.SelectedValue.ToEntero, _estatus, TxtOrden.Text.ToEntero, _requerido, TxtDiasLimite.Text.ToEntero, ChkAplicaDiasLimite.Checked, ChkAplicaFechaVencimiento.Checked, UsuarioActual.Empresa.CveEmpresa, - TxtPeriodicidad.Text.ToEntero) Then - - RegistraScript(String.Format("$('#{0}').modal('hide');", "divAgregarDocumentacion")) - Alert("Documento Actualizado correctamente.", TipoMensaje.MsgInformacion) - CargaDocumentacion() - End If - - Else - If objRH.DocumentacionAdd(Txtdocumentacion.Text.Trim, _formato, DdlDocumentacionTipo.SelectedValue.ToEntero, _estatus, TxtOrden.Text.ToEntero, _requerido, TxtDiasLimite.Text.ToEntero, ChkAplicaDiasLimite.Checked, ChkAplicaFechaVencimiento.Checked, UsuarioActual.Empresa.CveEmpresa, TxtPeriodicidad.Text.ToEntero) Then - - CveDocumentacion = objRH.DtResultados(0)(0).ToString.ToEntero - _formato = GuardarArchivo(CveDocumentacion) - If objRH.DocumentacionUpdate(CveDocumentacion, Txtdocumentacion.Text.Trim, _formato, DdlDocumentacionTipo.SelectedValue.ToEntero, _estatus, TxtOrden.Text.ToEntero, _requerido, TxtDiasLimite.Text.ToEntero, ChkAplicaDiasLimite.Checked, ChkAplicaFechaVencimiento.Checked, UsuarioActual.Empresa.CveEmpresa, - TxtPeriodicidad.Text.ToEntero) Then - - End If - - RegistraScript(String.Format("$('#{0}').modal('hide');", "divAgregarDocumentacion")) - Alert("Documento agregado correctamente.", TipoMensaje.MsgInformacion) - CargaDocumentacion() - End If - End If - - ActualizarDocumentacion = False + Using objRH As New ClsEdocumentacion + + Dim intCompleto As Integer = 0 + Dim _estatus As Integer = 0 + Dim _requerido As Integer = 0 + Dim _formato As String = "" + + + If chkEstatus.Checked Then + _estatus = 1 + End If + + If chkRequerido.Checked Then + _requerido = 1 + End If + + If ActualizarDocumentacion Then + + _formato = GuardarArchivo(CveDocumentacion) + If objRH.DocumentacionUpdate(CveDocumentacion, Txtdocumentacion.Text.Trim, _formato, DdlDocumentacionTipo.SelectedValue.ToEntero, _estatus, TxtOrden.Text.ToEntero, _requerido, TxtDiasLimite.Text.ToEntero, ChkAplicaDiasLimite.Checked, ChkAplicaFechaVencimiento.Checked, UsuarioActual.Empresa.CveEmpresa, + TxtPeriodicidad.Text.ToEntero) Then + + RegistraScript(String.Format("$('#{0}').modal('hide');", "divAgregarDocumentacion")) + Alert("Documento Actualizado correctamente.", TipoMensaje.MsgInformacion) + CargaDocumentacion() + End If + + Else + If objRH.DocumentacionAdd(Txtdocumentacion.Text.Trim, _formato, DdlDocumentacionTipo.SelectedValue.ToEntero, _estatus, TxtOrden.Text.ToEntero, _requerido, TxtDiasLimite.Text.ToEntero, ChkAplicaDiasLimite.Checked, ChkAplicaFechaVencimiento.Checked, UsuarioActual.Empresa.CveEmpresa, TxtPeriodicidad.Text.ToEntero) Then + + CveDocumentacion = objRH.DtResultados(0)(0).ToString.ToEntero + _formato = GuardarArchivo(CveDocumentacion) + If objRH.DocumentacionUpdate(CveDocumentacion, Txtdocumentacion.Text.Trim, _formato, DdlDocumentacionTipo.SelectedValue.ToEntero, _estatus, TxtOrden.Text.ToEntero, _requerido, TxtDiasLimite.Text.ToEntero, ChkAplicaDiasLimite.Checked, ChkAplicaFechaVencimiento.Checked, UsuarioActual.Empresa.CveEmpresa, + TxtPeriodicidad.Text.ToEntero) Then + + End If + + RegistraScript(String.Format("$('#{0}').modal('hide');", "divAgregarDocumentacion")) + Alert("Documento agregado correctamente.", TipoMensaje.MsgInformacion) + CargaDocumentacion() + End If + End If + + ActualizarDocumentacion = False + End Using End Sub diff --git a/Nomina/ISRCalculoAnual.aspx b/Nomina/ISRCalculoAnual.aspx deleted file mode 100644 index 6de631038..000000000 --- a/Nomina/ISRCalculoAnual.aspx +++ /dev/null @@ -1,128 +0,0 @@ -<%@ Page Title="" Language="C#" MasterPageFile="~/Site.master" AutoEventWireup="true" CodeFile="ISRCalculoAnual.aspx.cs" Inherits="Nomina_ISCalculoAnual" %> - - - - - - - Calculo anual de ISR - - - - - - - - - - - - -
    -
    -
    -
    - -
    - -
    -
    - - -
    - -
    -
    -
    - <%----%> -
    -
    - -
    -
    -
    - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
    - - - diff --git a/Nomina/ISRCalculoAnual.aspx.cs b/Nomina/ISRCalculoAnual.aspx.cs deleted file mode 100644 index f6528e3b0..000000000 --- a/Nomina/ISRCalculoAnual.aspx.cs +++ /dev/null @@ -1,47 +0,0 @@ -using System; -using System.Collections.Generic; -using System.Data; -using System.Linq; -using System.Web; -using System.Web.UI; -using System.Web.UI.WebControls; -using Extensiones; - -public partial class Nomina_ISCalculoAnual : ClsPaginas -{ - protected void Page_Load(object sender, EventArgs e) - { - - DataTable dtejercicio = new DataTable(); - using (ClsNominas objnom = new ClsNominas()) - { - if (objnom.GetEjercicios(UsuarioActual.CveEmpresa)) - { - dtejercicio = objnom.DtResultados; - } - } - DdlEjercicios.DataSource = dtejercicio; - DdlEjercicios.DataBind(); - } - - protected void LnkConsultar_Click(object sender, EventArgs e) - { - CargaPersonalISRAnual(); - } - - protected void CargaPersonalISRAnual() - { - DataTable dtdatos = new DataTable(); - int ejercicio = DdlEjercicios.SelectedValue.ToEntero(); - using (ClsNominas objnom = new ClsNominas()) - { - if (objnom.PersonalISRAnual(-1, UsuarioActual.CveEmpresa, ejercicio)) - { - dtdatos = objnom.DTSetResultados.Tables[0]; - } - } - GVPersonalISRAnual.DataSource = dtdatos; - GVPersonalISRAnual.DataBind(); - upDatosPers.Update(); - } -} \ No newline at end of file diff --git a/RH/CatPersonal.aspx b/RH/CatPersonal.aspx index 0e9b885e3..c491e9881 100644 --- a/RH/CatPersonal.aspx +++ b/RH/CatPersonal.aspx @@ -622,6 +622,13 @@ + + Riesgo de puesto + + + + + @@ -794,6 +801,7 @@
    +
    diff --git a/RH/CatPersonal.aspx.vb b/RH/CatPersonal.aspx.vb index 952096265..5ffc3dff2 100644 --- a/RH/CatPersonal.aspx.vb +++ b/RH/CatPersonal.aspx.vb @@ -564,6 +564,11 @@ Partial Class RH_CatPersonal Else GvDatos.Columns(42).Visible = False End If + If ChkRiesgoPuesto.Checked Then + GvDatos.Columns(43).Visible = True + Else + GvDatos.Columns(42).Visible = False + End If If (GvDatos.Rows.Count > 0) Then diff --git a/Ventas/Ventas.aspx.vb b/Ventas/Ventas.aspx.vb index 6ae82b361..c81997889 100644 --- a/Ventas/Ventas.aspx.vb +++ b/Ventas/Ventas.aspx.vb @@ -2468,6 +2468,24 @@ Partial Class Ventas HlFacturasRelaciondas.Visible = True End If + If Request("CveEmbarqueManifiesto") IsNot Nothing AndAlso IsNumeric(Request("CveEmbarqueManifiesto")) AndAlso Request("CveEmbarqueManifiesto").ToEntero() > 0 Then + Using ObjVentas As New ClsNominas + + If ObjVentas.ManifiestoForVtaGet(UsuarioActual.CveEmpresa, UsuarioActual.CveUsuario, "", Request("CveEmbarqueManifiesto").ToEntero()) Then + TmpDT = ObjVentas.DtResultados + TmpDT.Columns.Add("EntregaDirecta", GetType(Integer)) + TmpDT.Columns.Add("CveMovimientoDetallePedido", GetType(Integer)) + TmpDT.Columns.Add("CveVentaDetalleRNC", GetType(Integer)) + TmpDT.Columns.Add("TieneProntoPago", GetType(String)) + TmpDT.Columns.Add("ImporteProntoPago", GetType(Decimal)) + GvPS.DataSource = ObjVentas.DtResultados + GvPS.DataBind() + + 'IEPS A NIVEL DETALLE + 'TxtIEPS.Text = If(TmpDT.SUM("IEPS") > 0, TmpDT.SUM("IEPS").FormatoNumero, TxtIEPS.Text) + End If + End Using + End If 'Carga Venta If Request("CveVenta") IsNot Nothing AndAlso IsNumeric(Request("CveVenta")) AndAlso Request("CveVenta").ToEntero() > 0 Then diff --git a/vwd.webinfo b/vwd.webinfo index af2a2c734..5b42c0490 100644 --- a/vwd.webinfo +++ b/vwd.webinfo @@ -398,6 +398,12 @@ + + + + + +
    Cliente <%# DataBinder.Eval(Container.DataItem, "Documentacion") %> ><%# DataBinder.Eval(Container.DataItem, "Documentacion") %>
    <%# String.Format("{0:dd/MM/yyyy} - {1:dd/MM/yyyy}", DataBinder.Eval(Container.DataItem, "InicioPeriodo"), DataBinder.Eval(Container.DataItem, "FinPeriodo")) %> <%# DataBinder.Eval(Container.DataItem, "Antiguedad") %> XML Timbrados PDF Timbrados - Enviar + @@ -249,9 +288,9 @@
    - Procesar + Procesar
    - +
    @@ -360,33 +399,37 @@ - + - Fecha
    inicio + Fecha
    + inicio
    - + - Fecha
    fin + Fecha
    + fin
    - + - Fecha
    pago + Fecha
    + pago
    - + - Días
    pago + Días
    + pago
    @@ -439,9 +482,9 @@ - +
    - Guardar + Guardar
    @@ -621,6 +664,93 @@ + + + diff --git a/Documentacion/TableroMaterialidad.aspx.cs b/Documentacion/TableroMaterialidad.aspx.cs index d232db48c..5524b48a0 100644 --- a/Documentacion/TableroMaterialidad.aspx.cs +++ b/Documentacion/TableroMaterialidad.aspx.cs @@ -19,6 +19,16 @@ public partial class Documentacion_TableroMaterialidad : ClsPaginas { #region "Propiedades" + public Boolean ActualizarDocumentacion + { + get { return ViewState["ActualizarDocumentacion"] != null ? (Boolean)ViewState["ActualizarDocumentacion"] : false; } + set { ViewState["ActualizarDocumentacion"] = value; } + } + public int CveDocumentacion + { + get { return ViewState["CveDocumentacion"] != null ? ViewState["CveDocumentacion"].ToString().ToEntero() : 0; } + set { ViewState["CveDocumentacion"] = value; } + } public int anio { get { return ViewState["anio"] != null ? ViewState["anio"].ToString().ToEntero() : 0; } @@ -67,6 +77,26 @@ public partial class Documentacion_TableroMaterialidad : ClsPaginas { RptDatos.DataSource = edoc.DSResultados.Tables[0]; dt = edoc.DSResultados.Tables[1]; + LtlThs.Text = "
    GeneralesPor ClienteNivel empleado