--clases cat bloqueo diario

--fix salto de linea layout banamex

App_Code/ClsContabilidad.vb

@@ -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"

App_Code/ClsPaginas.vb

@@ -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 ---------------------

Contabilidad/CatBloqueoDiario.aspx

@@ -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>
+

Contabilidad/CatBloqueoDiario.aspx.vb

@@ -0,0 +1,5 @@
+
+Partial Class Contabilidad_CatBloqueoDiario
+    Inherits ClsPaginas
+
+End Class

Nomina/Nomina.aspx.cs

@@ -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());
+            Response.Write(sb.ToString());
-            //RegistraScript("$('#ModalLayoutBancos').modal('hide');");
+            //RegistraScript("$('#ModalLayoutBancos').modal('hide');");
-           // Response.Flush();
+            // 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();