diff --git a/App_Code/ClsNominas.vb b/App_Code/ClsNominas.vb index 1b9fa869b..9b6533e90 100644 --- a/App_Code/ClsNominas.vb +++ b/App_Code/ClsNominas.vb @@ -2848,13 +2848,14 @@ Public Class ClsNominas End Try Return retorno End Function - Public Function GetTablasNomina(CveEmpresa As Integer) As Boolean + Public Function GetTablasNomina(CveEmpresa As Integer, Ejercicio As Integer) As Boolean Dim retorno As Boolean = False Try DTSet = New DataSet() DataAdapter("PA_Nom_Tablas", CommandType.StoredProcedure) With SqlAdapter.SelectCommand.Parameters .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa + .Add("@Ejercicio", SqlDbType.Int).Value = Ejercicio End With @@ -2869,6 +2870,29 @@ Public Class ClsNominas End Try Return retorno End Function + Public Function GetFistablasValues(CveEmpresa As Integer, CveTabla As Integer, Ejercicio As Integer) As Boolean + Dim retorno As Boolean = False + Try + DTSet = New DataSet() + DataAdapter("PA_Nom_FistablasValues", CommandType.StoredProcedure) + With SqlAdapter.SelectCommand.Parameters + .Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa + .Add("@CveTabla", SqlDbType.Int).Value = CveTabla + .Add("@Ejercicio", SqlDbType.Int).Value = Ejercicio + End With + + + SqlAdapter.Fill(Data) + retorno = True + Catch sqEx As SqlException + retorno = False + OnError("Ocurrió un error al obtener las tablas de nómina.", sqEx, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + Catch ex As Exception + retorno = False + OnError("Ocurrió un error al obtener las tablas de nómina.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) + End Try + Return retorno + End Function #Region "Prorrateo" Public Function ProrrateosubproyectoGET(CveEmpresa As Integer) As Boolean diff --git a/Bancos/IE.aspx.vb b/Bancos/IE.aspx.vb index 11915e78e..7d769f070 100644 --- a/Bancos/IE.aspx.vb +++ b/Bancos/IE.aspx.vb @@ -4238,7 +4238,7 @@ Partial Class Bancos_IE ElseIf DdlProveedores.Visible Then DescripcionAus = String.Format("{0} {1}", DescripcionAus, $"Páguese A:{DdlProveedores.SelectedText}") ElseIf DdlPersonal.Visible Then - DescripcionAus = String.Format("{0} {1}", DescripcionAus, $"Páguese A:{DdlPersonal.SelectedItem.Text}") + DescripcionAus = String.Format("{0} {1}", DescripcionAus, $"Páguese A:{If(DdlPersonal.SelectedItem IsNot Nothing, DdlPersonal.SelectedItem.Text, "")}") End If DescripcionAus = String.Format("{0} {1}", DescripcionAus, $"Fecha:{TxtFechaDocumento.Text}") diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb index aee594f27..ce1cbb413 100644 --- a/Compras/Compras.aspx.vb +++ b/Compras/Compras.aspx.vb @@ -1727,7 +1727,7 @@ Partial Class Compras_Compras If TmpDT.MAX("RetIVAPorcentaje").ToDecimal = 0.04 Then RetIVAFlete = True If ProductosCodigoSATNoPermitidos.ToString.Length > 0 Then - Dim mensajeAdvertencia As String = String.Format("El comprobante contiene productos con código SAT '01010101', revise los productos:

{0}", ProductosCodigoSATNoPermitidos.ToString) + Dim mensajeAdvertencia As String = String.Format("El XML que intenta registrar contiene partidas o artículos con código SAT ‘01010101’ el cual no es aceptado, hable con su proveedor para cancelar y/o refacturar un XML válido.
Partidas o artículos con código ‘01010101’:

{0}", ProductosCodigoSATNoPermitidos.ToString) Alert(mensajeAdvertencia, TipoMensaje.MsgAdvertencia) If UsuarioActual.CveEmpresa.Contiene(119, 158) AndAlso Not UsuarioActual.CveUsuario.Contiene(1719, 1721) Then BtnGuardar.Enabled = False '' solo se activa para el usuario Sara.JAM BtnGuardar.ToolTip = "No se permite registrar facturas con conceptos con código '01010101'. Solicite al proveedor un nuevo comprobante." diff --git a/Contabilidad2/RepAnexoCatalogoAnual.aspx b/Contabilidad2/RepAnexoCatalogoAnual.aspx index 57d34487d..476f19e1d 100644 --- a/Contabilidad2/RepAnexoCatalogoAnual.aspx +++ b/Contabilidad2/RepAnexoCatalogoAnual.aspx @@ -50,21 +50,41 @@
- + + "><%--class="expand"--%> +
-
    -
  • Ejercicio Inicio: - - -
    • -
  • Ejercicio Fin: - - -
    • -
  • - +
    +
    + Cuenta +
    +
    + + + + + +
    + + +
    + Ejercicio Inicio: +
    +
    + +
    +
    + Ejercicio Fin: +
    +
    + +
    +
    + +
    +
    @@ -80,35 +100,43 @@ -
    • -
  • SubProyecto: +
+
+ + +
+ +
> +
+ +
+ Proyecto: +
+
+ + +
+ SubProyecto: +
+ + +
+
+ Divisor: +
+
- - -
  • Divisor: - - - - - - -
    • -
  • Cuenta: -
    • -
  • - - - - - - - -
    • - - + + + + + + +
    +
    - + diff --git a/Contabilidad2/RepAnexoCatalogoAnual.aspx.vb b/Contabilidad2/RepAnexoCatalogoAnual.aspx.vb index f88da1720..217b3c9d7 100644 --- a/Contabilidad2/RepAnexoCatalogoAnual.aspx.vb +++ b/Contabilidad2/RepAnexoCatalogoAnual.aspx.vb @@ -217,7 +217,7 @@ Partial Class Contabilidad2_RepAnexoCatalogoAnual DtHeadersCount = DTHeaders.Rows.Count GvAnual.DataSource = Conta.DSResultados.Tables(1) - Dim Index = 2 + Dim Index As Integer = 2 For Index = 2 To GvAnual.Columns.Count - 1 GvAnual.Columns(Index).Visible = False Next Index diff --git a/Inventarios/CatUnidades.aspx b/Inventarios/CatUnidades.aspx index 72f256124..df1c8711d 100644 --- a/Inventarios/CatUnidades.aspx +++ b/Inventarios/CatUnidades.aspx @@ -155,7 +155,7 @@
    - + <%----%>
    diff --git a/Nomina/Nomina.aspx b/Nomina/Nomina.aspx index d6b497d88..187ee7301 100644 --- a/Nomina/Nomina.aspx +++ b/Nomina/Nomina.aspx @@ -149,6 +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; + } .GvConceptos.table > tbody > tr.ConceptosTotales td { border-top: 1px solid #E87E04; @@ -323,7 +331,7 @@
    - +
    @@ -1187,7 +1195,7 @@ @@ -2862,6 +2870,28 @@ +
    +
    +
    +
    + +
    + +
    +
    + + +
    + +
    +
    +
    + <%----%> +
    +
    + +
    @@ -2923,66 +2953,44 @@
    - -
    -
    -
    -
    - -
    - -
    -
    - -
    - -
    -
    -
    - <%----%> -
    -
    - -
    -
    - - - - - - - - - - - - - - - - - - - - - - - <%-- +
    + + + + + + + + + + + + + + + + + + + + + + + <%-- --%> - - - - - - - -
    + + + + + +     +     +
    @@ -2991,24 +2999,25 @@ -
    - - - - - - - - - - - - - - -
    +
    + + + + + + + + + + + + + + +
    + @@ -3027,7 +3036,30 @@ - + + + + + + + + + + + + + + + + + + + + + + + + @@ -3090,14 +3122,44 @@
    - +
    + + + + + + + + + + + + + + +
    - +
    + + + + + + + + + + + + + + +
    @@ -3107,6 +3169,28 @@ +
    +
    +
    +
    + +
    + +
    +
    + + +
    + +
    +
    +
    + <%----%> +
    +
    + +
    @@ -3118,8 +3202,31 @@
    -
    - +
    + + + + + + + + + + + + + + + + + + + + + + + +
    @@ -3134,10 +3241,32 @@
    - + + + + + + + + + + + + + + + + + + + + + + + +
    -
    @@ -3150,10 +3279,32 @@
    - + + + + + + + + + + + + + + + + + + + + + + + +
    -
    @@ -3166,7 +3317,30 @@
    - + + + + + + + + + + + + + + + + + + + + + + + +
    @@ -3181,7 +3355,30 @@
    - + + + + + + + + + + + + + + + + + + + + + + + +
    @@ -3193,7 +3390,62 @@     - + +
    +
    +
    +
    + +
    + +
    +
    + + +
    + +
    +
    +
    + <%----%> +
    +
    + +
    +
    +
    +
    + + Subsidio Mensual +
    +
    + + +
    +
    +
    + + + + + + + + + + + + + + + + + + + +
    +
    @@ -4725,7 +4977,7 @@ - +