From b24ad9f94dfb78dd95fa18dcc74c6601b7e04e4b Mon Sep 17 00:00:00 2001
From: rrene <rene.molina@adssistemas.mx>
Date: Mon, 8 Jan 2024 11:09:04 -0700
Subject: [PATCH] -

---
 App_Code/modExtensiones.vb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/App_Code/modExtensiones.vb b/App_Code/modExtensiones.vb
index cdc3e0a1b..120c31636 100644
--- a/App_Code/modExtensiones.vb
+++ b/App_Code/modExtensiones.vb
@@ -823,7 +823,7 @@ Namespace Extensiones
         End Function
         <Runtime.CompilerServices.Extension()>
         Public Function SubStringADS(Str As String, Longitud As Integer) As String
-            Return Str.Substring(0, If(Str.Length > 30, 30, Str.Length))
+            Return Str.Substring(0, If(Str.Length > Longitud, Longitud, Str.Length))
         End Function
 
         <Runtime.CompilerServices.Extension()>