diff --git a/App_Code/ClsGenerales.vb b/App_Code/ClsGenerales.vb
index 0c36234e9..6ea87a883 100644
--- a/App_Code/ClsGenerales.vb
+++ b/App_Code/ClsGenerales.vb
@@ -3308,9 +3308,9 @@ Public Class ClsGenerales
         Return Retorno
     End Function
 
-    Public Function GetCartaPorteTipoPermiso() As Boolean
+    Public Function GetCartaPorteTipoPermisoSCT() As Boolean
         Dim Retorno As Boolean = False
-        DataAdapter("PA_Gral_CP_TipoPermisoGet")
+        DataAdapter("PA_Gral_CP_TipoPermisoSCTGet")
         Try
             SqlAdapter.Fill(Data)
             Retorno = True