From 5ad50e8dbc902c7734a1075fe312233458622166 Mon Sep 17 00:00:00 2001 From: rakcsle Date: Mon, 29 Apr 2024 16:04:01 -0700 Subject: [PATCH] Thalamus Campo address.street1 se envia como fecha, Prodcutos servicios no se esta enviando campo --- TareasProgramadas/Tareas119.ashx | 79 +++++++++++++++++++++++++------ Ventas/ProductosServicios.aspx.vb | 2 +- 2 files changed, 65 insertions(+), 16 deletions(-) diff --git a/TareasProgramadas/Tareas119.ashx b/TareasProgramadas/Tareas119.ashx index 7aa065c1b..db0c9cfc5 100644 --- a/TareasProgramadas/Tareas119.ashx +++ b/TareasProgramadas/Tareas119.ashx @@ -13,6 +13,9 @@ using System.Text; using System.Collections.Generic; using ClosedXML; +using System.Web.SessionState; +using System.Web.Hosting; + public class TareasJam : IHttpHandler { @@ -50,12 +53,15 @@ public class TareasJam : IHttpHandler } private bool EjecutaThalamus(int CveEmpresa, HttpContext context) { + Usuario Usuario = ValidaUsuarioSistema(100, 119); this.GuardaLog("EjecutaThalamus: Inicio. "); bool Respuesta = false; StringBuilder SBLog = new StringBuilder(); + + ClsGenerales ObjGenerales = new ClsGenerales(); DataTable DTProductos = new DataTable(); @@ -116,7 +122,7 @@ public class TareasJam : IHttpHandler SBLog.AppendLine("Consultas
"); SBLog.AppendLine(""); - Usuario Usuario = ValidaUsuarioSistema(100, 119); + this.GuardaLog("EjecutaThalamus: Consultando Productos. "); if (ObjGenerales.GetJAMCorveta(1)) @@ -319,6 +325,8 @@ public class TareasJam : IHttpHandler var wbAClientes = new ClosedXML.Excel.XLWorkbook(FormatoClientes); var wsClientes = wbAClientes.Worksheet(1); + wsClientes.Column(8).Style.NumberFormat.Format = "@"; + wsClientes.Column(9).Style.NumberFormat.Format = "@"; count = 2; @@ -332,7 +340,8 @@ public class TareasJam : IHttpHandler wsClientes.Cell(count, 5).Value = DRow["address.countryId"].ToString(); wsClientes.Cell(count, 6).Value = DRow["address.stateId"].ToString(); wsClientes.Cell(count, 7).Value = DRow["address.city"].ToString(); - wsClientes.Cell(count, 8).Value = DRow["address.street1"].ToString(); + + wsClientes.Cell(count, 8).Value = DRow["address.street1"].ToString(); wsClientes.Cell(count, 9).Value = DRow["address.street2"].ToString(); wsClientes.Cell(count, 10).Value = "'" + DRow["address.postalCode"].ToString(); wsClientes.Cell(count, 11).Value = DRow["phone.intCode"].ToString(); @@ -372,7 +381,7 @@ public class TareasJam : IHttpHandler } - //ErrorProceso = true; + ErrorProceso = true; if (!ErrorProceso) @@ -630,25 +639,65 @@ public class TareasJam : IHttpHandler return Respuesta; } - private Usuario ValidaUsuarioSistema(int CveUsuario, int CveEmpresa) + private Usuario ValidaUsuarioSistema(int CveUsuario, int CveEmpresa) + { + Usuario UsuarioActual = null/* TODO Change to default(_) if this is not a reference type */; + ClsSisUsuarios ObjUsuarios = new ClsSisUsuarios(); + + if (ObjUsuarios.GetUsuarios(CveUsuario)) { - Usuario UsuarioActual = null/* TODO Change to default(_) if this is not a reference type */; - ClsSisUsuarios ObjUsuarios = new ClsSisUsuarios(); - if (ObjUsuarios.GetUsuarios(CveUsuario)) + if (ObjUsuarios.DtResultados.Rows.Count > 0) { - if (ObjUsuarios.DtResultados.Rows.Count > 0) + string Usuario = ObjUsuarios.DtResultados.Rows[0]["Usuario"].ToString(); + string Contrasenia = ObjUsuarios.DtResultados.Rows[0]["Contraseña"].ToString(); + UsuarioActual = ObjUsuarios.ValidaUsuario(Usuario, Contrasenia, CveEmpresa: CveEmpresa); + UsuarioActual.CveEmpresa = CveEmpresa; + + if( HttpContext.Current.Session == null) { - string Usuario = ObjUsuarios.DtResultados.Rows(0)("Usuario").ToString(); - string Contrasenia = ObjUsuarios.DtResultados.Rows(0)("Contraseña").ToString(); - UsuarioActual = ObjUsuarios.ValidaUsuario(Usuario, Contrasenia, CveEmpresa: CveEmpresa); - UsuarioActual.CveEmpresa = CveEmpresa; - HttpContext.Current.Session("UsuarioSIG") = UsuarioActual; + // CrearHttpContextArtificial(); + CrearHttpContextConSession(); + + } + + HttpContext.Current.Session["UsuarioSIG"] = UsuarioActual; } - ObjUsuarios.Dispose(); - return UsuarioActual; } + ObjUsuarios.Dispose(); + return UsuarioActual; + } + + + //public static void CrearHttpContextArtificial() + //{ + // // Crear un SimpleWorkerRequest + // var workerRequest = new SimpleWorkerRequest("/dummy", null, new StringWriter()); + + // // Crear un HttpContext utilizando el SimpleWorkerRequest + // HttpContext.Current = new HttpContext(workerRequest); + + // // Ahora puedes usar HttpContext.Current como si estuviera en un contexto web + // // Nota: La sesión aún no está disponible + //} + + public static void CrearHttpContextConSession() + { + //CrearHttpContextArtificial(); + + // Para agregar soporte de sesión, debemos inicializar el manejador de sesión + var sessionContainer = new HttpSessionStateContainer("id", + new SessionStateItemCollection(), + new HttpStaticObjectsCollection(), + 10, + true, + HttpCookieMode.AutoDetect, + SessionStateMode.InProc, + false); + + SessionStateUtility.AddHttpSessionStateToContext(HttpContext.Current, sessionContainer); + } private bool VerificarArchivo(FileInfo FInfo, long Tamanio, string FTPServer, string FTPUsr, string FTPPass) diff --git a/Ventas/ProductosServicios.aspx.vb b/Ventas/ProductosServicios.aspx.vb index e85ff4dec..1a49ae181 100644 --- a/Ventas/ProductosServicios.aspx.vb +++ b/Ventas/ProductosServicios.aspx.vb @@ -1521,7 +1521,7 @@ Partial Class ProductosyServicios If CvePS = -1 Then Dim PSS As String = TxtPS.Text.Trim.Replace("|", "") If UsuarioActual.CveEmpresa.Contiene(1, 72, 80) Then PSS = PSS.ToUpper - If ObjProductosServicios.AddPS(DdlClasificacion.SelectedValue.ToEntero, -1, DdlUnidadMedida.SelectedValue.ToEntero, TxtCodigo.Text.Trim, "", TxtCodigoBarras.Text.Trim, PSS, + If ObjProductosServicios.AddPS(DdlClasificacion.SelectedValue.ToEntero, -1, DdlUnidadMedida.SelectedValue.ToEntero, TxtCodigo.Text.Trim, TxtNumeroParte.Text.Trim, TxtCodigoBarras.Text.Trim, PSS, TxtPrecio.Text.Trim.ToDouble, DdlIVA.SelectedValue.ToDouble, (TxtRetIVA.Text.Trim.ToDouble / 100), ChkInventariable.Checked, CveProveedor, True, ChkAplicaParaVenta.Checked, UsuarioActual.CveUsuario, UsuarioActual.CveEmpresa, CveMetodoInv, EsPaquete, CveTipoPS:=DdlTipoPS.SelectedValue.ToEntero, FuePorXML:=False, TipoServicio:=-1, CveClasificacion2:=CveClasificacion2, CveMarca:=CveMarca, AlmacenSeccion:=TxtAlmacenSeccion.Text.Trim,
ConsultaRegistros