diff --git a/AC/RepPresupuestoIngresosDetalle.aspx b/AC/RepPresupuestoIngresosDetalle.aspx index e887f1955..0a4ca9ee3 100644 --- a/AC/RepPresupuestoIngresosDetalle.aspx +++ b/AC/RepPresupuestoIngresosDetalle.aspx @@ -15,11 +15,11 @@ -
+
" style="display: inline-block; margin-right: -20px; width: 150px;" /> " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info">
-
+
diff --git a/AF/CatAF.aspx b/AF/CatAF.aspx index 3c894d746..c7a483fa0 100644 --- a/AF/CatAF.aspx +++ b/AF/CatAF.aspx @@ -149,11 +149,11 @@
-
+
" style="display: inline-block; margin-right: -20px; width: 150px;" /> " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info">
-
+
diff --git a/App_Code/ClsCompras.vb b/App_Code/ClsCompras.vb index 33dc7e050..ad35ebb1e 100644 --- a/App_Code/ClsCompras.vb +++ b/App_Code/ClsCompras.vb @@ -588,7 +588,10 @@ Public Class ClsCompras End If Catch ex As SqlException If ex.Message.Contains("FK_Inv_MovimientosDetalle_Inv_MovimientosDetalleEntrada") Then - Alert(String.Format("No se puede eliminar la compra, porque tiene movimientos de salida de Almacen relacionados."), TipoMensaje.MsgAdvertencia) + Alert(String.Format("No se puede eliminar la compra, porque tiene movimientos de salida de Almacen relacionados."), TipoMensaje.MsgAdvertencia) + + ElseIf ex.Message.Contains("50015") Then + Alert("No se puede eliminar na compra debido a que el perido esta cerrado.", TipoMensaje.MsgAdvertencia) Else Me.OnError("Ocurrió un error al eliminar la Compra.", ex, SqlAdapter.SelectCommand.Parameters.ParametrosInfo()) End If diff --git a/Ashx/SIGWeb.ashx b/Ashx/SIGWeb.ashx index 9b4e7e2ca..fe81513fa 100644 --- a/Ashx/SIGWeb.ashx +++ b/Ashx/SIGWeb.ashx @@ -51,12 +51,48 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState context.Response.Write(ValidaCURP(context.Request("Curp").ToString())) Case "sendMail" context.Response.Write(sendMail(context)) + Case "sendMailLPM" + context.Response.Write(sendMail(context)) End Select Catch ex As Exception ex.GuardaLog(ex.Message) End Try End Sub + + Private Function sendMailLPM(context As HttpContext) As String + Dim retorno As String = "true" + Dim nombre As String = "" + Dim correo As String = "" + Dim asunto As String = "" + Dim cuerpo As String = "" + Dim obj = context.Request("Nombre") 'Nombre=' + $('#Nombre').val() +'Correo=' + $('#Correo').val() +'Sitio=' + $('#Sitio').val() +'Cuerpo=' + $('#Cuerpo').val() + + If Not IsNothing(obj) Then + nombre = obj.ToString() + End If + obj = context.Request("Correo") + If Not IsNothing(obj) Then + correo = obj.ToString() + End If + obj = context.Request("Asunto") + If Not IsNothing(obj) Then + asunto = obj.ToString() + End If + obj = context.Request("Cuerpo") + If Not IsNothing(obj) Then + cuerpo = obj.ToString().Replace("< ", "<") + End If + Dim Body As String = String.Format("Prospecto : {0}
Correo : {1}
Asunto : {2}

{3}", nombre, correo, asunto, cuerpo) + Dim para As String = "contacto@localizacionprecisa.com;caudillo.90d@gmail.com;" + 'para = "" + Dim Mail As New ClsSisMail() + If Mail.SendMail(ClsPaginas.EmpresaNotificaciones, para, "NotificaciónProspecto", Body) Then + retorno = "true" + Else + retorno = "false" + End If + Return retorno + End Function Private Function sendMail(context As HttpContext) As String Dim retorno As String = "true" Dim nombre As String = "" diff --git a/Compras/CatProveedores.aspx b/Compras/CatProveedores.aspx index 54e4c06be..3599a49e7 100644 --- a/Compras/CatProveedores.aspx +++ b/Compras/CatProveedores.aspx @@ -100,7 +100,7 @@
-
+
" style="display: inline-block; margin-right: -20px; width: 150px;" /> " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info">
diff --git a/Compras/Compras.aspx.vb b/Compras/Compras.aspx.vb index 14d802679..64bc81a2b 100644 --- a/Compras/Compras.aspx.vb +++ b/Compras/Compras.aspx.vb @@ -6729,10 +6729,10 @@ Partial Class Compras_Compras End If - If UsuarioActual.CveEmpresa.Contiene(119) Then + If UsuarioActual.CveEmpresa.Contiene(119) Then Dim ContienePSNeteoBonif As Boolean = False For Each Dr As DataRow In TmpDT.Rows - If Dr("CveClasificacion").ToString.ToEntero.Contiene(20319) Then 'clasificación de Bonificación, no se incluirá en el neteo + If Dr("CveClasificacion").ToString.ToEntero.Contiene(20319) Or DdlTipoCompra.SelectedValue.ToEntero = 11 Then 'clasificación de Bonificación, no se incluirá en el neteo ContienePSNeteoBonif = True Exit For End If diff --git a/Compras/Proveedores.aspx b/Compras/Proveedores.aspx index 929b552c4..5673f5984 100644 --- a/Compras/Proveedores.aspx +++ b/Compras/Proveedores.aspx @@ -2186,7 +2186,7 @@
-
+
" style="display: inline-block; margin-right: -20px; width: 150px;" /> " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info">
diff --git a/Compras/ProveedoresAuxiliar.aspx b/Compras/ProveedoresAuxiliar.aspx index 4ef950a21..e2fd78ef7 100644 --- a/Compras/ProveedoresAuxiliar.aspx +++ b/Compras/ProveedoresAuxiliar.aspx @@ -142,12 +142,12 @@
-
+
" style="display: inline-block; margin-right: -20px; width: 150px;" /> " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info">
-
+
diff --git a/Compras/RepDocumentacionProveedor.aspx b/Compras/RepDocumentacionProveedor.aspx index 14fed4ef1..0d1a20e7b 100644 --- a/Compras/RepDocumentacionProveedor.aspx +++ b/Compras/RepDocumentacionProveedor.aspx @@ -129,15 +129,15 @@ -
+
" style="display: inline-block; margin-right: -20px; width: 150px;" /> " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info">
+
-
-
- +
+
diff --git a/Compras/RepEvaluacionProveedor.aspx b/Compras/RepEvaluacionProveedor.aspx index 6ac634124..05fb324f6 100644 --- a/Compras/RepEvaluacionProveedor.aspx +++ b/Compras/RepEvaluacionProveedor.aspx @@ -1,15 +1,15 @@ <%@ Page Title="" Language="VB" MasterPageFile="~/Site.master" AutoEventWireup="false" CodeFile="RepEvaluacionProveedor.aspx.vb" Inherits="RepEvaluacionProveedor" %> - - + @@ -46,7 +45,7 @@ Reporte Evaluación de Proveedor -
  • +
  • Excel
    • @@ -62,13 +61,15 @@
    - +
    Proveedor
    Clasificación
    -
    +
    + +
    Fecha Inicio
    @@ -102,7 +103,6 @@
    -
    @@ -111,27 +111,38 @@ -
    -
    +
    +
    -
    -
    Número de registros encontrados:
    -
    +
    +
    + Número de registros encontrados: + + + + + + + +
    +
    - " style="display: inline-block; margin-right: -20px; width: 150px;" /> - " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> + " style="display: inline-block; margin-right: -20px; width: 150px;" /> + " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info"> +
    -
    - - - + + + @@ -207,23 +218,23 @@ - -
    - + +
    + - - + + var ancho = 0 + ancho += celdas[0]; + //console.log('ancho pro ' + ancho); + $('#dvPro').width(ancho); + ancho = 0; + + ancho += celdas[1]; + ancho += celdas[2]; + ancho += celdas[3]; + ancho += celdas[4]; + // console.log('ancho req ' + ancho); + $('#dvReq').width(ancho); + ancho = 0; + + ancho += celdas[5]; + ancho += celdas[6]; + ancho += celdas[7]; + + // console.log('ancho req ' + ancho); + $('#dvOc').width(ancho); + ancho = 0; + + ancho += celdas[8]; + ancho += celdas[9]; + ancho += celdas[10]; + + // console.log('ancho req ' + ancho); + $('#dvCo').width(ancho); + ancho = 0; + + $('#dvCa').css('visibility', 'visible'); + + return false; + }); + } + + diff --git a/Contabilidad/RepIVA.aspx.cs b/Contabilidad/RepIVA.aspx.cs index 969d38b25..7593aa05d 100644 --- a/Contabilidad/RepIVA.aspx.cs +++ b/Contabilidad/RepIVA.aspx.cs @@ -215,9 +215,20 @@ public partial class Contabilidad_RepIVA : ClsPaginas string Formato = TT.ActiveTabIndex == 0 ? "RepIVA.rpt" : (Opcion == "EXCEL2" ? "RepIVAAcreditable2.rpt" : "RepIVAAcreditable.rpt"); Opcion = (Opcion == "EXCEL2" ? "EXCEL" : Opcion); para.Add(new CrystalParametro("Excel", Formato)); - string Ruta = (ModExtensiones.DirectorioBaseEmpresas + $@"Empresas\Grales\Formatos\{Formato}"); + System.IO.FileInfo Archivo = new System.IO.FileInfo(string.Format("{0}/Formatos/{1}", UsuarioActual.Empresa.Ruta, Formato)); + string Ruta;// = (Archivo.Exists ? string.Format("{0}/{1}", UsuarioActual.Empresa.Ruta, Formato ): ModExtensiones.DirectorioBaseEmpresas + $@"Empresas\Grales\Formatos\{Formato}"); + + Alert(string.Format("{0}/Formatos/{1}", UsuarioActual.Empresa.Ruta, Formato)); + if (Archivo.Exists) + { + Ruta = string.Format("{0}/Formatos/{1}", UsuarioActual.Empresa.Ruta, Formato); + ImprimirbytesPDF(ImprimirPDFCrystal(Ruta, Dt, para, "Reporte de IVA", Opcion), "Reporte de IVA", Opcion); + }else + { + Ruta = ModExtensiones.DirectorioBaseEmpresas + $@"Empresas\Grales\Formatos\{Formato}"; + ImprimirbytesPDF(ImprimirSubRepPDFCrystal(Ruta,Dt,para, DtIEPSA,DtIVAA,"RepIEPSPorcentaje.rpt","RepIVAPorcentaje.rpt", "Reporte de IVA", Opcion), "Reporte de IVA", Opcion); + } Ruta.GuardaLogAD(); - ImprimirbytesPDF(ImprimirSubRepPDFCrystal(Ruta,Dt,para, DtIEPSA,DtIVAA,"RepIEPSPorcentaje.rpt","RepIVAPorcentaje.rpt", "Reporte de IVA", Opcion), "Reporte de IVA", Opcion); //ImprimirbytesPDF(ImprimirPDFCrystal(Ruta, Dt, para, "Reporte de IVA", Opcion), "Reporte de IVA", Opcion); } else diff --git a/Inventarios/EntradasSalidas.aspx.vb b/Inventarios/EntradasSalidas.aspx.vb index 5d912970f..659934309 100644 --- a/Inventarios/EntradasSalidas.aspx.vb +++ b/Inventarios/EntradasSalidas.aspx.vb @@ -4196,7 +4196,7 @@ Partial Class Inventarios_EntradasSalidas ElProductoChange() TxtnSerie.Text = Serie TxtnLote.Text = Lote - DdlSeccionAlmacen.SelectedValue = CveSeccionAlmacen.ToString + DdlSeccionAlmacen.SelectedValueExist(CveSeccionAlmacen.ToString) TxtnFechaCaducidad.Text = If(Caducidad = "", MinFecha.ToString, Caducidad) AgregarPS() txtPrecio.Text = "" diff --git a/Inventarios/PopUpExistenciasAlmacen.aspx.vb b/Inventarios/PopUpExistenciasAlmacen.aspx.vb index 8ad38121e..b71e823e5 100644 --- a/Inventarios/PopUpExistenciasAlmacen.aspx.vb +++ b/Inventarios/PopUpExistenciasAlmacen.aspx.vb @@ -95,7 +95,7 @@ Partial Class Inventarios_Default End Sub Private Sub CargaDatos(CvePS As Integer, Tipo As Integer) - If ValidarFiltrosSeleccionados() Then + If ValidarFiltrosSeleccionados() OrElse CvePS > 0 Then Dim ObjInventarios As New ClsInventarios() If ObjInventarios.GetExistenciasProducto(CvePS, -1, UsuarioActual.CveEmpresa, -1, FechaMovto:=DateTime.Today.AddDays(1).ToString("yyyy/MM/dd HH:mm"), ExcluyeApartados:=-1, ExcluyeAdelantado:=1, CveSubProyecto:=DdlSubProyecto.SelectedValue.ToEntero, TopSelect:=100) Then diff --git a/Metronic/assets/admin/layout/css/custom.css b/Metronic/assets/admin/layout/css/custom.css index 39800e20f..9dcbcfc51 100644 --- a/Metronic/assets/admin/layout/css/custom.css +++ b/Metronic/assets/admin/layout/css/custom.css @@ -2962,4 +2962,7 @@ select.select2-offscreen, select.select2-offscreen:focus { .ADScroller > div > table.table.table-smallpadding > tbody > tr > td:nth-last-child(1) span, table.ScrollAD.table.table-smallpadding > tbody > tr > td:nth-last-child(1) span, .ADScroller > div > table.table.table-smallpadding > tbody > tr > th:nth-last-child(1) span, table.ScrollAD.table.table-smallpadding > tbody > tr > th:nth-last-child(1) span{ padding-right: 7px; +} +div.mypaste * { + display: none; } \ No newline at end of file diff --git a/Nomina/Nomina2.aspx.cs b/Nomina/Nomina2.aspx.cs index 757b5cd09..ca3f173e2 100644 --- a/Nomina/Nomina2.aspx.cs +++ b/Nomina/Nomina2.aspx.cs @@ -3466,6 +3466,7 @@ public partial class Nomina_Nomina2 : ClsPaginas if (continuar) { objNomina.Commit(); + Alert("La nomina se autorizó correctamente."); } else { @@ -3473,9 +3474,15 @@ public partial class Nomina_Nomina2 : ClsPaginas } } + if(dtr != null){ dtr.Dispose(); - dtconp.Dispose(); - Alert("Termine"); + + } + if (dtconp != null) + { + dtconp.Dispose(); + + } } protected void LnkCargaAsistenciaMasiva_Click(object sender, EventArgs e) diff --git a/RH/CatPuesto.aspx b/RH/CatPuesto.aspx index 7ee708fd4..e17c81fcb 100644 --- a/RH/CatPuesto.aspx +++ b/RH/CatPuesto.aspx @@ -26,7 +26,7 @@ -
    +
    " style="display: inline-block; margin-right: -20px; width: 150px;" /> " style="margin-top: -3px;" class="btn btn-circle btn-sm label-info">
    @@ -34,7 +34,7 @@ + ToolTip="Listado de Puestos" CssClass="ScrollAD table table-striped table-advance table-hover Widthall" GridLines="None" data-cols="0" data-heighterror="280"> diff --git a/TareasProgramadas/Tareas119.ashx b/TareasProgramadas/Tareas119.ashx index 3801b68c5..a123a8239 100644 --- a/TareasProgramadas/Tareas119.ashx +++ b/TareasProgramadas/Tareas119.ashx @@ -92,7 +92,8 @@ public class TareasJam : IHttpHandler - ////"ftp://us2.hostedftp.com/", "agrojam", "A12345678"; + //"ftp://us2.hostedftp.com/", "agrojam", "A12345678"; + //string FTPServer = "ftp://127.0.0.1/"; //string TFPUsr = "Toor"; //string FTPPass = "agj-3500"; @@ -321,10 +322,10 @@ public class TareasJam : IHttpHandler if (CargaProductos) { - CargaVentas = CargarArchivos(FInfoVentas, FTPServer, TFPUsr, FTPPass); + CargaVentas = CargarArchivos(FInfoVentas, $"{FTPServer}/Ventas", TFPUsr, FTPPass); if (CargaVentas) { - CargaVentas = VerificarArchivo(FInfoVentas, FInfoVentas.Length, FTPServer, TFPUsr, FTPPass); + CargaVentas = VerificarArchivo(FInfoVentas, FInfoVentas.Length, $"{FTPServer}/Ventas", TFPUsr, FTPPass); } } @@ -338,10 +339,10 @@ public class TareasJam : IHttpHandler if (CargaProductos & CargaVentas) { - CargaClientes = CargarArchivos(FInfoClientes, FTPServer, TFPUsr, FTPPass); + CargaClientes = CargarArchivos(FInfoClientes, $"{FTPServer}/Clientes", TFPUsr, FTPPass); if (CargaClientes) { - CargaClientes = VerificarArchivo(FInfoClientes, FInfoClientes.Length, FTPServer, TFPUsr, FTPPass); + CargaClientes = VerificarArchivo(FInfoClientes, FInfoClientes.Length, $"{FTPServer}/Clientes", TFPUsr, FTPPass); } } @@ -355,10 +356,10 @@ public class TareasJam : IHttpHandler if (CargaProductos & CargaVentas& CargaClientes ) { - CargaAlmacenes = CargarArchivos(FInfoAlmacenes, FTPServer, TFPUsr, FTPPass); + CargaAlmacenes = CargarArchivos(FInfoAlmacenes, $"{FTPServer}/Stock", TFPUsr, FTPPass); if (CargaClientes) { - CargaAlmacenes = VerificarArchivo(FInfoAlmacenes, FInfoAlmacenes.Length, FTPServer, TFPUsr, FTPPass); + CargaAlmacenes = VerificarArchivo(FInfoAlmacenes, FInfoAlmacenes.Length, $"{FTPServer}/Stock", TFPUsr, FTPPass); } } @@ -434,7 +435,7 @@ public class TareasJam : IHttpHandler ClsSisMail Correo = new ClsSisMail(); string Para = "julian@adssistemas.mx;rene.molina@adssistemas.mx;oscar.irigoyen@adssistemas.mx"; - // string Para = "oscar.irigoyen@adssistemas.mx"; + //string Para = "oscar.irigoyen@adssistemas.mx"; string Asunto = ErrorProceso ? $"Carga Layout Corteva {DateTime.Now.ToString("yyyy-MM-dd")}" : $"Carga Layout Corteva Error {DateTime.Now.ToString("yyyy-MM-dd")}"; Correo.SendMail(ClsPaginas.EmpresaNotificaciones, Para, Asunto, Cuerpo, Archivos:ListaArchivos); @@ -446,7 +447,7 @@ public class TareasJam : IHttpHandler } - private bool CargarArchivos(FileInfo FInfo, string FTPServer, string FTPUsr, string FTPPass) + private bool CargarArchivos(FileInfo FInfo, string FTPServer, string FTPUsr, string FTPPass ) { bool Respuesta; //var FInfo = new FileInfo(RutaArchivo);