AdminADS/SIG
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

--clases cat bloqueo diario

Browse Source 
--fix salto de linea layout banamex
This commit is contained in:
Jonathan Alexis Perez Morales
2024-07-16 02:36:20 -07:00
parent c7752358fc
commit e326efcee0
5 changed files with 110 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

65
App_Code/ClsContabilidad.vb
View File

@@ -6330,6 +6330,71 @@ Public Class ClsContabilidad
Return Retorno
End Function
#End Region
#Region "B L O Q U E O -- D I A R I O"
Public Function GetBloqueoDiario(CveBloqueoDiario As Integer, FechaI As DateTime, FechaF As DateTime, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Conta_BloqueoDiarioGet")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveBloqueoDiario", SqlDbType.Int).Value = CveBloqueoDiario
.Add("@FechaI", SqlDbType.Date).Value = FechaI
.Add("@FechaF", SqlDbType.Date).Value = FechaF
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
Me.OnError("Ocurrió un error al obtener el periodo de bloqueo diario.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function AddUpdateBloqueoDiario(CveBloqueoDiario As Integer, Fecha As DateTime, Bloqueado As Boolean, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Conta_BloqueoDiarioAddUpdate")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveBloqueoDiario", SqlDbType.Int).Value = CveBloqueoDiario
.Add("@Fecha", SqlDbType.Date).Value = Fecha
.Add("@Bloqueado", SqlDbType.Bit).Value = Bloqueado
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
Me.OnError("Ocurrió un error al actulizar el periodo de bloqueo diario.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
Public Function RemoveBloqueoDiario(CveBloqueoDiario As Integer, CveEmpresa As Integer) As Boolean
Dim Retorno As Boolean = False
DataAdapter("PA_Conta_BloqueoDiarioRemove")
With SqlAdapter.SelectCommand.Parameters
.Add("@CveBloqueoDiario", SqlDbType.Int).Value = CveBloqueoDiario
.Add("@CveEmpresa", SqlDbType.Int).Value = CveEmpresa
End With
Try
SqlAdapter.Fill(Data)
Retorno = True
Catch ex As Exception
Me.OnError("Ocurrió un error al eliminar el periodo de bloqueo diario.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo())
End Try
Return Retorno
End Function
#End Region
#Region "ESTADO RESULTADOS HORIZONTAL"

1
App_Code/ClsPaginas.vb
View File

@@ -10131,6 +10131,7 @@ Public Class ClsPaginas
PaginaDict.Add("/Contabilidad/CatContaEjercicios.aspx".ToUpper(), 725)
PaginaDict.Add("/Contabilidad/RepEstadoResultadosHorizontal.aspx".ToUpper(), 420)
PaginaDict.Add("/Contabilidad/RepAnexoCatalogoMensualHorizontal.aspx".ToUpper(), -1)
PaginaDict.Add("/Contabilidad/CatBloqueoDiario.aspx".ToUpper(), 680)
#End Region
#Region "Contratos"
'--------------------- C O N T R A T O S - P R E S U P U E S T O S ---------------------

20
Contabilidad/CatBloqueoDiario.aspx Normal file
View File

@@ -0,0 +1,20 @@
<%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="CatBloqueoDiario.aspx.vb" Inherits="Contabilidad_CatBloqueoDiario" %>
<asp:Content ID="Content1" ContentPlaceHolderID="CP" Runat="Server">
</asp:Content>
<asp:Content ID="Content2" ContentPlaceHolderID="Css" Runat="Server">
</asp:Content>
<asp:Content ID="Content3" ContentPlaceHolderID="E" Runat="Server">
Catálogo de bloqueo diario
</asp:Content>
<asp:Content ID="Content4" ContentPlaceHolderID="HB" Runat="Server">
</asp:Content>
<asp:Content ID="Content5" ContentPlaceHolderID="H" Runat="Server">
</asp:Content>
<asp:Content ID="Content6" ContentPlaceHolderID="HA" Runat="Server">
</asp:Content>
<asp:Content ID="Content7" ContentPlaceHolderID="C" Runat="Server">
</asp:Content>
<asp:Content ID="Content8" ContentPlaceHolderID="JS" Runat="Server">
</asp:Content>

5
Contabilidad/CatBloqueoDiario.aspx.vb Normal file
View File

@@ -0,0 +1,5 @@

Partial Class Contabilidad_CatBloqueoDiario
Inherits ClsPaginas
End Class

37
Nomina/Nomina.aspx.cs
View File

@@ -710,8 +710,8 @@ public partial class Nomina_Nomina2 : ClsPaginas
LnkTimbrarTodos.Visible = (dtempleados.Rows.Count > 0 &&
dtempleados.COUNT("CvePersonal", "SeTimbro=0 AND CvePersonal >0 AND NomAutorizado =1") > 0);
}
}
}
}
if (CvePersonal > 0)
@@ -7198,7 +7198,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
}
using (ClsNominas ObjMovt = new ClsNominas())
{
ObjMovt.GetMovtoPermanenteSaldos(UsuarioActual.CveEmpresa, SRCvePersonal, CcveMovtoPermanente);
ObjMovt.GetMovtoPermanenteSaldos(UsuarioActual.CveEmpresa, SRCvePersonal, CcveMovtoPermanente);
GVMovtoPermanenteSaldos.DataSource = ObjMovt.DtResultados;
GVMovtoPermanenteSaldos.DataBind();
}
@@ -9894,7 +9894,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
}
protected void DdlCuenta_SelectedIndexChanged(object sender, EventArgs e)
{
{
ConvenioPagoElectronico = string.Empty;
DivModalLayoutBancosFecha.Visible = false;
@@ -9948,7 +9948,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
libro.Range(1, 1, row, column - 1).Style.Font.FontColor = ClosedXML.Excel.XLColor.White;
libro.Range(1, 1, row, column - 1).Style.Fill.SetBackgroundColor(ClosedXML.Excel.XLColor.FromArgb(79, 129, 189));
if (objnom.GetDispersionNomina(CvePeriodoSeleccionado, UsuarioActual.CveEmpresa,-1))
if (objnom.GetDispersionNomina(CvePeriodoSeleccionado, UsuarioActual.CveEmpresa, -1))
{
foreach (DataRow dRow in objnom.DtResultados.Rows)
{
@@ -10061,7 +10061,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
{
using (ClsNominas objnom = new ClsNominas())
{
if (objnom.GetDispersionNomina(CvePeriodoSeleccionado, UsuarioActual.CveEmpresa,4))
if (objnom.GetDispersionNomina(CvePeriodoSeleccionado, UsuarioActual.CveEmpresa, 4))
{
CrearLayoutNominaBancomer(objnom.DtResultados);
}
@@ -10071,7 +10071,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
{
using (ClsNominas objnom = new ClsNominas())
{
if (objnom.GetDispersionNomina (CvePeriodoSeleccionado, UsuarioActual.CveEmpresa,18))
if (objnom.GetDispersionNomina(CvePeriodoSeleccionado, UsuarioActual.CveEmpresa, 18))
{
CrearLayoutNominaBanorte(objnom.DtResultados, ConvenioPagoElectronico, 1);
}
@@ -10081,7 +10081,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
{
using (ClsNominas objnom = new ClsNominas())
{
if (objnom.GetDispersionNomina(CvePeriodoSeleccionado, UsuarioActual.CveEmpresa,1))
if (objnom.GetDispersionNomina(CvePeriodoSeleccionado, UsuarioActual.CveEmpresa, 1))
{
CrearLayoutNominaBanamex(objnom.DtResultados);
}
@@ -10126,8 +10126,8 @@ public partial class Nomina_Nomina2 : ClsPaginas
SbErrores.AppendLine($"- {Nombre} el importe debe de ser mayor a 0 importe {Importe}"); // importe mayot a 0
ErroresValidaciones = true;
}
}
}
if (!ErroresValidaciones)
{
int Count = 1;
@@ -10142,7 +10142,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
SbLinea.Append(Count.ToString("000000000"));
SbLinea.Append(RFC.Trim().PadRight(16));
if (modalidadnomina == 2) SbLinea.Append("99"); else SbLinea.Append("03");
if (modalidadnomina == 2) SbLinea.Append("99"); else SbLinea.Append("03");
SbLinea.Append(BancoNumCuenta.Trim().PadRight(20));
SbLinea.Append(Importe.ToString("0000000000000.00").Replace(".", ""));
@@ -10152,9 +10152,10 @@ public partial class Nomina_Nomina2 : ClsPaginas
SbLinea.Append(Nombre.Trim().PadRight(40));
if (modalidadnomina == 2)
{
SbLinea.Append("001"); SbLinea.Append("001");
SbLinea.Append("001"); SbLinea.Append("001");
}
else {
else
{
SbLinea.Append("012"); SbLinea.Append("000");
}
sb.AppendLine(SbLinea.ToString());
@@ -10167,9 +10168,9 @@ public partial class Nomina_Nomina2 : ClsPaginas
Response.ContentType = "text/plain";
//Response.AppendHeader("Content-Disposition", $"attachment;filename=\"Nomina{NowADS().ToString("yyyyMMddhhmmss").ToString()}.txt\"");
Response.AppendHeader("Content-Disposition", $"attachment;filename=\"Nomina_BBVA_{DdlPeriodo.SelectedItem.Text}.txt\"");
Response.Write(sb.ToString());
//RegistraScript("$('#ModalLayoutBancos').modal('hide');");
// Response.Flush();
Response.Write(sb.ToString());
//RegistraScript("$('#ModalLayoutBancos').modal('hide');");
// Response.Flush();
Response.End();
}
else
@@ -10348,7 +10349,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
if (!ErroresValidaciones)
{
DataRow RowCuenta = get_GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveCuenta: DdlCuenta.SelectedValue.ToEntero(), CveEmpresa: UsuarioActual.CveEmpresa).FiltroPrimero("");
DataRow RowCuenta = get_GlobalDTBancosCuentas(UsuarioActual.CveUsuario, CveCuenta: DdlCuenta.SelectedValue.ToEntero(), CveEmpresa: UsuarioActual.CveEmpresa).FiltroPrimero("");
var ClaveMoneda = "001"; // PESOS MEXICANOS
//REGISTRO DE CONTROL - IMPORTACIÓN
@@ -10421,7 +10422,7 @@ public partial class Nomina_Nomina2 : ClsPaginas
var NumCargos = (1).ToString("000000");
var StrImportes = SumaImportes.ToString("0000000000000000.00").Replace(".", "");
sb.AppendLine($"{TipoReg4}{ClaveMoneda}{NumAbonos}{StrImportes}{NumCargos}{StrImportes}");
sb.Append($"{TipoReg4}{ClaveMoneda}{NumAbonos}{StrImportes}{NumCargos}{StrImportes}");
Response.Clear();
Response.ClearHeaders();