diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb index aff44610d..767eee53e 100644 --- a/App_Code/ClsNominas.vb +++ b/App_Code/ClsNominas.vb @@ -673,7 +673,7 @@ Public Class ClsNominas ' End Try ' Return retorno 'End Function - Public Function GetDispersionnomina(CvePeriodo As Int32, CveEmpresa As Int32, CveSATBanco As Int32) As Boolean + Public Function GetDispersionNomina(CvePeriodo As Int32, CveEmpresa As Int32, CveSATBanco As Int32) As Boolean Dim retorno As Boolean = False DataAdapter("PA_Nom_Dispersionnomina", CommandType.StoredProcedure) With SqlAdapter.SelectCommand.Parameters diff --git a/App_Code/ClsPaginas.vb b/App_Code/ClsPaginas.vb index f3365603a..c1ae046c4 100644 --- a/App_Code/ClsPaginas.vb +++ b/App_Code/ClsPaginas.vb @@ -7615,7 +7615,7 @@ Public Class ClsPaginas End If Dim urlHost As String = "hhttp://sig.adssistemas.mx:7998/" If EsProduccion Then - urlHost = "http://sig.adssistemas.mx:6599/" + urlHost = "http://192.200.113.178:6599/" End If 'SITIO DE PRUEBA EN IIS Dim Url As Uri = New Uri(String.Format("{0}{1}", urlHost, Opcion)) diff --git a/App_Code/ClsVentas.vb b/App_Code/ClsVentas.vb index 18032d741..5ea5979ef 100644 --- a/App_Code/ClsVentas.vb +++ b/App_Code/ClsVentas.vb @@ -2159,13 +2159,14 @@ Public Class ClsVentas #Region "V E N T A S - P R E C I O L I S T A S" - Public Function GetPreciosListaSPPermitidos(CveSubProyecto As Integer, CveEmpresa As Integer) As Boolean + Public Function GetPreciosListaSPPermitidos(CveSubProyecto As Integer, CvePS As Integer, CveEmpresa As Integer) As Boolean Dim Retorno As Boolean = False DataAdapter("PA_Vta_PrecioListaSPPermitdosGet") With SqlAdapter.SelectCommand.Parameters .Add("@CveSubProyecto", SqlDbType.Int).Value = CveSubProyecto + .Add("@CvePS", SqlDbType.Int).Value = CvePS .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa End With diff --git a/Compras/Compras.aspx b/Compras/Compras.aspx index b9e726e82..b7975235e 100644 --- a/Compras/Compras.aspx +++ b/Compras/Compras.aspx @@ -6125,7 +6125,10 @@ // totalPoints += ToDouble($(this).val()); let txtvalue = ToDouble($(this).val()); //let asdasdasd = $(this).data('tcanticipo'); - let TCAnticipo = ToDouble($(this).data('tcanticipo')); + let TCAnticipo = 1; + if ($(this).data('tcanticipo')) { + TCAnticipo = ToDouble($(this).data('tcanticipo')); + } if (CveMonedaAnticipo == 1 && CveMonedaOriginal == 2) { txtvalue = ToDouble(txtvalue / TCAnticipo); @@ -6146,7 +6149,10 @@ $('input[name*=TxtComision]').each(function () { //totalPoints += ToDouble($(this).val()); let txtvalue = ToDouble($(this).val()); - let TCAnticipo = ToDouble($(this).data('tcanticipo')); + let TCAnticipo = 1; + if ($(this).data('tcanticipo')) { + TCAnticipo = ToDouble($(this).data('tcanticipo')); + } if (CveMonedaAnticipo == 1 && CveMonedaOriginal == 2) { txtvalue = ToDouble(txtvalue / TCAnticipo); } else if (CveMonedaAnticipo == 2 && CveMonedaOriginal == 1) { diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb index 34ae5d558..0d7f05061 100644 --- a/Compras/Compras.aspx.vb +++ b/Compras/Compras.aspx.vb @@ -9923,6 +9923,7 @@ Partial Class Compras_Compras e.Row.FCTextBox("TxtAnticipo").Attributes.Add("data-tcanticipo", tTCFecha.ToString) + e.Row.FCTextBox("TxtComision").Attributes.Add("data-tcanticipo", tTCFecha.ToString) Dim TCAnt As Decimal = If(DdlMoneda.SelectedValue = "1", 1, If(CveCompra > 0, LblTC.Text.Replace("TC:", "").ToDecimal, TxtTC.Text.ToDecimal)) @@ -13313,7 +13314,7 @@ Partial Class Compras_Compras DDLDevolucion.Items.Clear() Dim dtt As DataTable = objcompras.DtResultados If UsuarioActual.Empresa.Funcionalidad(558) = "1" Then 'solo los últimos 3 meses - dtt = dtt.FiltraParametros($"Fecha >= #{NowADS.AddMonths(-6).ToString("yyyy/MM/dd")}#") + dtt = dtt.FiltraParametros($"Fecha >= #{NowADS.AddMonths(-12).ToString("yyyy/MM/dd")}#") End If DDLDevolucion.DataSource = dtt DDLDevolucion.Items.Insert(0, New ListItem("Seleccione", "-1")) diff --git a/Compras/PopUpVerFactura.aspx.vb b/Compras/PopUpVerFactura.aspx.vb index 386792d7a..760d15aa0 100644 --- a/Compras/PopUpVerFactura.aspx.vb +++ b/Compras/PopUpVerFactura.aspx.vb @@ -1557,6 +1557,16 @@ Partial Class PopUpVerFactura Dim ConsultaPorSucursal As Boolean = UsuarioActual.Empresa.Funcionalidad(382) = "1" If ConsultaPorSucursal Then + 'SI NO TIENE ESTOS VALORES, SARCALOS DEL CORTE + If CveCorte > 0 AndAlso (FechaConsulta = ModExtensiones.MaxFecha OrElse CveSubProyecto <= 0) Then + Using ObjVta As New ClsPuntoVenta + If ObjVta.GetVta_Cortes("-1", "-1", -1, CveCorte, UsuarioActual.CveEmpresa, -1) AndAlso ObjVta.DtResultados.Rows.Count > 0 Then + FechaConsulta = ObjVta.DtResultados.FiltroPrimeroValor("FechaInicial").ToString().ToDate().Date + CveSubProyecto = ObjVta.DtResultados.FiltroPrimeroValor("CveSubProyecto").ToEntero() + End If + End Using + End If + CveCorte = -1 End If @@ -1638,7 +1648,10 @@ Partial Class PopUpVerFactura If UsuarioActual.Empresa.Funcionalidad(109) = "1" OrElse UsuarioActual.CveEmpresa = 197 Then If DtReporteCorte IsNot Nothing Then - Dim DtTT = GenerateTransposedTable(DtReporteCorte) + Dim dtDatos = DtReporteCorte.Clone() + dtDatos.ImportRow(DtReporteCorte.Rows(0)) + + Dim DtTT = GenerateTransposedTable(dtDatos) Dim DtDatosVentas As New DataTable() DtDatosVentas.Columns.Add(New DataColumn("Orden", GetType(Integer))) DtDatosVentas.Columns.Add(New DataColumn("Columna", GetType(String))) diff --git a/Nomina/Nomina.aspx b/Nomina/Nomina.aspx index fa8c75001..f7fce04d7 100644 --- a/Nomina/Nomina.aspx +++ b/Nomina/Nomina.aspx @@ -149,13 +149,14 @@ padding-top: 2px; padding-bottom: 2px; } + #ModalConceptos table.table > tbody > tr > td, #ModalConceptos table.table > tbody > tr > th, #ModalConceptos table.table > thead > tr > td, #ModalConceptos table.table > thead > tr > th { font-size: 11px; padding-top: 2px; - padding-bottom: 2px; + padding-bottom: 2px; } .GvConceptos.table > tbody > tr.ConceptosTotales td { @@ -215,7 +216,7 @@ - +
  • Autorizar
    • @@ -288,6 +289,9 @@
  • Nómina tabular
    • +
  • + Nómina Personalizar +
  • Nómina Fiscal
    • @@ -305,7 +309,8 @@
  • Procesar archivo SUA EBA PDF -
    • <%-- + + <%--
  • CancelarTimbre
    • --%> @@ -1438,7 +1443,7 @@ - +     @@ -3826,8 +3831,8 @@ Cargar - - + + @@ -4929,7 +4934,7 @@ - +