From 5807857cb76b2fe37e9ff7c819c5f50cbeb1f1c2 Mon Sep 17 00:00:00 2001 From: rrene Date: Mon, 3 Jul 2023 07:32:00 -0700 Subject: [PATCH] =?UTF-8?q?--=20desactivaci=C3=B3n=20de=20servicio=20POG?= MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- Ashx/E119.ashx | 20 ++++++++++---------- 1 file changed, 10 insertions(+), 10 deletions(-) diff --git a/Ashx/E119.ashx b/Ashx/E119.ashx index 86dfc5f45..e7e3a11f0 100644 --- a/Ashx/E119.ashx +++ b/Ashx/E119.ashx @@ -100,18 +100,18 @@ Public Class E119 : Implements IHttpHandler Try Dim Metodo = If(context.Request("Metodo") = Nothing, "", context.Request("Metodo").ToString()) 'OBTENER EXISTENCIAS - If Metodo = "BASF_POG40" Then - context.Response.ContentType = "application/json" - Dim Auth = ValidarSolicitud(context) + 'If Metodo = "BASF_POG40" Then + ' context.Response.ContentType = "application/json" + ' Dim Auth = ValidarSolicitud(context) - If Auth.IsSucces Then - retorno = ConsultaDatos(context) - Else - context.Response.StatusCode = Auth.StatusCode - retorno = JsonConvert.SerializeObject(Auth.ErrorMessage) - End If + ' If Auth.IsSucces Then + ' retorno = ConsultaDatos(context) + ' Else + ' context.Response.StatusCode = Auth.StatusCode + ' retorno = JsonConvert.SerializeObject(Auth.ErrorMessage) + ' End If - End If + 'End If context.Response.Write(retorno)