From 1b19fdbf31e44ebbb668cbef9fe583c8a21f71f2 Mon Sep 17 00:00:00 2001 From: JPerez Date: Tue, 8 Jul 2025 17:02:39 -0700 Subject: [PATCH] --FIX E189 --- Ashx/E189.ashx | 7 +++++-- 1 file changed, 5 insertions(+), 2 deletions(-) diff --git a/Ashx/E189.ashx b/Ashx/E189.ashx index 201b808b0..013be2e57 100644 --- a/Ashx/E189.ashx +++ b/Ashx/E189.ashx @@ -99,14 +99,17 @@ Public Class E189 : Implements IHttpHandler, System.Web.SessionState.IRequiresSe Private Function ConsultaDatos(ByVal context As HttpContext) As String + + Dim Usuario As Usuario = ValidaUsuarioSistema(100, CveEmpresa) + Dim Respuesta As New ResponseMsg Dim RespuestaError As New ResponseMsgError Dim TieneError As Boolean = False Dim productos As JArray = Nothing - Using ObjInventario As New ClsProductosServicios - If ObjInventario.GetPS_APIMarcasStock(189) AndAlso ObjInventario.DtResultados IsNot Nothing Then + Using ObjInventario As New ClsProductosServicios() + If ObjInventario.GetPS_APIMarcasStock(CveEmpresa) AndAlso ObjInventario.DtResultados IsNot Nothing Then productos = JArray.Parse(ObjInventario.DtResultados.DataTableToJSONIPP()) Else RespuestaError.message = "no se pudo obtener los datos"