From 7e255cc50e6578e4a3a512d037a591b4ded47e63 Mon Sep 17 00:00:00 2001
From: Jonathan Alexis Perez Morales <jonathan.perez@adssistemas.mx>
Date: Fri, 19 Aug 2022 11:24:39 -0700
Subject: [PATCH] Validar cantidades al recibir usados

---
 Ashx/SIGWeb.ashx                    | 26 +++++++++++++-------------
 Inventarios/RecepcionUsados.aspx.vb |  2 +-
 2 files changed, 14 insertions(+), 14 deletions(-)

diff --git a/Ashx/SIGWeb.ashx b/Ashx/SIGWeb.ashx
index 9afe72256..f8cb7fa91 100644
--- a/Ashx/SIGWeb.ashx
+++ b/Ashx/SIGWeb.ashx
@@ -278,19 +278,19 @@ Public Class SIGWeb : Implements IHttpHandler, IRequiresSessionState
         Return retorno
     End Function
     Private Function GetTokenAngular(context As HttpContext) As String
-        Dim usuario As Usuario = UsuarioActual(context)
-        Dim tokenDescriptor = New Microsoft.IdentityModel.Tokens.SecurityTokenDescriptor With {
-        .Subject = New System.Security.Claims.ClaimsIdentity(New System.Security.Claims.Claim() {New System.Security.Claims.Claim("CvePlataforma", usuario.CvePlataforma.ToString()),
-        New System.Security.Claims.Claim("CveUsuario", usuario.CveUsuario.ToString()), New System.Security.Claims.Claim("CveEmpresa", usuario.CveEmpresa.ToString()),
-        New System.Security.Claims.Claim("CveRol", usuario.CveRol.ToString()), New System.Security.Claims.Claim("Fecha", Date.Now.ToLongDateString())}),
-        .Expires = Date.UtcNow.AddHours(3),
-        .SigningCredentials = New Microsoft.IdentityModel.Tokens.SigningCredentials(
-        New Microsoft.IdentityModel.Tokens.SymmetricSecurityKey(Encoding.ASCII.GetBytes("*_AsistenciaDesarrolloSistemas-SIGAPI_*17-06-2020")),
-        Microsoft.IdentityModel.Tokens.SecurityAlgorithms.HmacSha256Signature)}
-        Dim tokenHandler = New System.IdentityModel.Tokens.Jwt.JwtSecurityTokenHandler()
-        Dim newtoken = tokenHandler.CreateToken(tokenDescriptor)
-        Dim stokenn As String = tokenHandler.WriteToken(newtoken)
-        Return stokenn
+        'Dim usuario As Usuario = UsuarioActual(context)
+        'Dim tokenDescriptor = New Microsoft.IdentityModel.Tokens.SecurityTokenDescriptor With {
+        '.Subject = New System.Security.Claims.ClaimsIdentity(New System.Security.Claims.Claim() {New System.Security.Claims.Claim("CvePlataforma", usuario.CvePlataforma.ToString()),
+        'New System.Security.Claims.Claim("CveUsuario", usuario.CveUsuario.ToString()), New System.Security.Claims.Claim("CveEmpresa", usuario.CveEmpresa.ToString()),
+        'New System.Security.Claims.Claim("CveRol", usuario.CveRol.ToString()), New System.Security.Claims.Claim("Fecha", Date.Now.ToLongDateString())}),
+        '.Expires = Date.UtcNow.AddHours(3),
+        '.SigningCredentials = New Microsoft.IdentityModel.Tokens.SigningCredentials(
+        'New Microsoft.IdentityModel.Tokens.SymmetricSecurityKey(Encoding.ASCII.GetBytes("*_AsistenciaDesarrolloSistemas-SIGAPI_*17-06-2020")),
+        'Microsoft.IdentityModel.Tokens.SecurityAlgorithms.HmacSha256Signature)}
+        'Dim tokenHandler = New System.IdentityModel.Tokens.Jwt.JwtSecurityTokenHandler()
+        'Dim newtoken = tokenHandler.CreateToken(tokenDescriptor)
+        'Dim stokenn As String = tokenHandler.WriteToken(newtoken)
+        Return ""
 
     End Function
     Private Function sendMailLPM(context As HttpContext) As String
diff --git a/Inventarios/RecepcionUsados.aspx.vb b/Inventarios/RecepcionUsados.aspx.vb
index 7850ebe3f..17cc978e4 100644
--- a/Inventarios/RecepcionUsados.aspx.vb
+++ b/Inventarios/RecepcionUsados.aspx.vb
@@ -1082,7 +1082,7 @@ Partial Class Inventarios_RecepcionUsados
         If Valido And AgregarUsado Then
 
             If ObjFactura IsNot Nothing AndAlso Me.CveRemisionRecibida > 0 Then
-                Dim RowDetalle As DataRow = ObjFactura.DtDetalle.FiltroPrimero($"CvePS={CvePS}")
+                Dim RowDetalle As DataRow = ObjFactura.DtDetalle.FiltroPrimero($"CveVentaDetalle={CveVentaDetalle}")
 
                 If RowDetalle IsNot Nothing Then