zoukankan      html  css  js  c++  java
  • 根据名称查找存储过程或函数

    -- =============================================
    -- Author:        FWM
    -- Create date: 20201126
    -- Description:    根据名称查找存储过程或函数
    -- =============================================
    ALTER PROCEDURE [dbo].[SearchProcOrFuncByNameProc]
      @srh    NVARCHAR(MAX),
      @srh1   NVARCHAR(MAX),
      @types  NVARCHAR(MAX), -- 格式:(,\w*)*
      @dbs    NVARCHAR(MAX),
      @orders NVARCHAR(MAX)
    AS
    BEGIN
      SET NOCOUNT ON;
    
      IF ISNULL(@srh, N'') = N''
      BEGIN
        PRINT N'请提供 @srh 参数';
        RETURN;
      END;
    
      DECLARE @tempXML XML;
      DECLARE @dbTbl TABLE (dbname NVARCHAR(MAX));
    
      IF ISNULL(@dbs, N'') = N''
      BEGIN
        INSERT @dbTbl (dbname)
        SELECT name
        FROM   sys.sysdatabases
        WHERE  name NOT IN ('master', 'tempdb', 'model', 'msdb', 'OldCustomerBak');
      END;
      ELSE
      BEGIN
        SET @tempXML = N'<v>' + REPLACE(@dbs, N' ', N'</v><v>') + N'</v>';
    
        INSERT @dbTbl (dbname)
        SELECT t.val
        FROM   (SELECT t.c.value(N'.', N'NVARCHAR(MAX)') val
                FROM   @tempXML.nodes(N'/v') t(c) ) t
        WHERE  t.val <> N'';
    
        IF NOT EXISTS (SELECT 1 FROM @dbTbl)
        BEGIN
          PRINT N'请输入需要查找的数据库';
          RETURN;
        END;
      END;
    
      DECLARE @conditionType NVARCHAR(MAX);
    
      IF ISNULL(@types, N'') = N''
        SET @conditionType = N'''P'', ''FN'', ''TF'', ''IF'', ''TR'', ''V''';
      ELSE
        SET @conditionType = STUFF(
                             (SELECT N', ''' + t.val + N''''
                              FROM   (SELECT CASE WHEN CHARINDEX(N',', @types, p.number + 1) > 0 THEN
                                                    SUBSTRING(@types, p.number + 1, CHARINDEX(N',', @types, p.number + 1) - p.number - 1)
                                                  ELSE SUBSTRING(@types, p.number + 1, LEN(@types) - p.number)
                                             END val
                                      FROM   master.dbo.spt_values p
                                      WHERE  p.type = N'P'
                                             AND p.number >= 1
                                             AND p.number < LEN(@types)
                                             AND SUBSTRING(@types, p.number, 1) = N',') t
                              WHERE  t.val <> N''
                             FOR XML PATH(N'')),
                             1,
                             2,
                             N'');
    
      DECLARE @sql NVARCHAR(MAX);
    
      SET @sql = (SELECT N'SELECT DISTINCT ''' + t.dbname
                         + N''' dbname, sch.name COLLATE DATABASE_DEFAULT schName, obj.name COLLATE DATABASE_DEFAULT objName, obj.type COLLATE DATABASE_DEFAULT objType, CASE obj.type WHEN ''AF'' THEN N''聚合函数 (CLR)'' WHEN ''C'' THEN N''CHECK 约束'' WHEN ''D'' THEN N''默认值或 DEFAULT 约束'' WHEN ''F'' THEN N''FOREIGN KEY 约束'' WHEN ''L'' THEN N''日志'' WHEN ''FN'' THEN N''标量函数'' WHEN ''FS'' THEN N''程序集 (CLR) 标量函数'' WHEN ''FT'' THEN N''程序集 (CLR) 表值函数'' WHEN ''IF'' THEN N''内联表函数'' WHEN ''IT'' THEN N''内部表'' WHEN ''P'' THEN N''存储过程'' WHEN ''PC'' THEN N''程序集 (CLR) 存储过程'' WHEN ''PK'' THEN N''PRIMARY KEY 约束(类型为 K)'' WHEN ''RF'' THEN N''复制筛选存储过程'' WHEN ''S'' THEN N''系统表'' WHEN ''SN'' THEN N''同义词'' WHEN ''SQ'' THEN N''服务队列'' WHEN ''TA'' THEN N''程序集 (CLR) DML 触发器'' WHEN ''TF'' THEN N''表函数'' WHEN ''TR'' THEN N''SQL DML 触发器'' WHEN ''TT'' THEN N''表类型'' WHEN ''U'' THEN N''用户表'' WHEN ''UQ'' THEN N''UNIQUE 约束(类型为 K)'' WHEN ''V'' THEN N''视图'' WHEN ''X'' THEN N''扩展存储过程'' ELSE N''未知('' + obj.type + N'''' END objTypeName, CONVERT(VARCHAR(50), obj.modify_date, 120) modifyDate FROM '
                         + t.dbname + N'.sys.objects obj INNER JOIN ' + t.dbname + N'.sys.schemas sch ON sch.schema_id = obj.schema_id WHERE obj.name LIKE ''%'
                         + @srh + N'%''' + CASE WHEN @srh1 <> N'' THEN N' AND obj.name LIKE ''%' + @srh1 + N'%''' ELSE N'' END + N' AND obj.type IN ('
                         + @conditionType + N') UNION ALL '
                  FROM   @dbTbl t
                 FOR XML PATH(N''), TYPE).value('.', 'NVARCHAR(MAX)');
    
      SET @sql = LEFT(@sql, LEN(@sql) - LEN(N' UNION ALL ')) + N' ORDER BY '
                 + CASE WHEN ISNULL(@orders, N'') = N'' THEN N'dbname, modifyDate DESC' ELSE @orders END;
    
      EXEC (@sql);
    END;
    Slowly I find myself
  • 相关阅读:
    Django Model数据访问Making queries
    Tomcat 7源码学习笔记 -5 web app自动reload
    tomcat启动提示server.xml的context节点中不支持source属性警告的解决方法
    javaweb学习总结(三十九)——数据库连接池
    共享文件系统
    高可用+负载均衡 方案
    Java对象克隆(Clone)及Cloneable接口、Serializable接口的深入探讨
    Java对象序列化给分布式计算带来的方便
    JAVABEAN必须继承序列化借口的作用
    keep-alive pipeline区别
  • 原文地址:https://www.cnblogs.com/SDdemon/p/15568575.html
Copyright © 2011-2022 走看看