From baf0f8c980092bb823aa00b132b41b47cbed5a54 Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Mon, 30 Oct 2023 19:19:45 -0700
Subject: [PATCH] -- clasificaciones

---
 Ashx/E119.ashx | 10 +++++++++-
 1 file changed, 9 insertions(+), 1 deletion(-)

diff --git a/Ashx/E119.ashx b/Ashx/E119.ashx
index 0a53e84c6..eb5c2c093 100644
--- a/Ashx/E119.ashx
+++ b/Ashx/E119.ashx
@@ -282,7 +282,15 @@ Public Class E119 : Implements IHttpHandler
         Dim Clasificaciones As JArray = Nothing
 
         Try
-            Clasificaciones = JArray.Parse(ClsPaginas.GlobalDTClasificaciones(CveEmpresa).FiltraParametros("", DistinctColumns:={"CveClasificacion", "Clasificacion"}).DataTableToJSONIPP())
+            'Clasificaciones = JArray.Parse(ClsPaginas.GlobalDTClasificaciones(CveEmpresa).FiltraParametros("", DistinctColumns:={"CveClasificacion", "Clasificacion"}).DataTableToJSONIPP())
+            Using ObjInventario As New ClsInventarios
+                If ObjInventario.GetJAM_APIs(2, CveClasificacion:=-1) AndAlso ObjInventario.DtResultados IsNot Nothing Then
+                    Clasificaciones = JArray.Parse(ObjInventario.DtResultados.DataTableToJSONIPP())
+                Else
+                    RespuestaError.message = "no se pudo obtener los datos"
+                    TieneError = True
+                End If
+            End Using
         Catch ex As Exception
             RespuestaError.message = "no se pudo obtener los datos"
             TieneError = True