加入收藏 | 设为首页 | 会员中心 | 我要投稿 李大同 (https://www.lidatong.com.cn/)- 科技、建站、经验、云计算、5G、大数据,站长网!
当前位置: 首页 > 站长学院 > MsSql教程 > 正文

sqlserver 建表语句,获取建表语句的存储过程,包括排序规则,索

发布时间:2020-12-12 13:52:18 所属栏目:MsSql教程 来源:网络整理
导读:先创建一个分割表名的分割函数 -- 表值函数用以截取字符串 -- 如果为其添加一列主键id,则其顺序就会固定了 create FUNCTION [ Split ] ( @text NVARCHAR ( max )) RETURNS @tempTable TABLE (value NVARCHAR ( 1000 )) AS BEGIN DECLARE @StartIndex INT --

先创建一个分割表名的分割函数

--表值函数用以截取字符串
--如果为其添加一列主键id,则其顺序就会固定了
create FUNCTION [Split](@text NVARCHAR(max))
RETURNS @tempTable TABLE(value NVARCHAR(1000))
AS
BEGIN
     DECLARE @StartIndex INT                --开始查找的位置
     DECLARE @FindIndex INT                --找到的位置
     DECLARE @Content    VARCHAR(4000)    --找到的值
     --初始化一些变量
     SET @StartIndex = 1 --T-SQL中字符串的查找位置是从1开始的
     SET @FindIndex=0
    
     --开始循环查找字符串逗号
     WHILE(@StartIndex <= LEN(@Text))
     BEGIN
         --查找字符串函数 CHARINDEX 第一个参数是要找的字符串
         --                            第二个参数是在哪里查找这个字符串
         --                            第三个参数是开始查找的位置
         --返回值是找到字符串的位置
         SELECT @FindIndex = CHARINDEX(,,@Text,@StartIndex)
         --判断有没找到 没找到返回0
         IF(@FindIndex =0 OR @FindIndex IS NULL)
         BEGIN
             --如果没有找到就表示找完了
             SET @FindIndex = LEN(@Text)+1
         END
         --截取字符串函数 SUBSTRING 第一个参数是要截取的字符串
         --                            第二个参数是开始的位置
         --                            第三个参数是截取的长度
         SET @Content =SUBSTRING(@Text,@StartIndex,@FindIndex-@StartIndex)
         --初始化下次查找的位置
         SET @StartIndex = @FindIndex+1
         --把找的的值插入到要返回的Table类型中
         INSERT INTO @tempTable (Value) VALUES (@Content)
     END
     RETURN
END

创建获得建表语句的存储过程

create PROCEDURE [sp_gettext]
    @name VARCHAR(max) = NULL,@identity BIT = 1,@index TINYINT = 2 -- 0不创建索引  1不创建表  2创建索引  ,@new BIT =0 
AS
SET ARITHABORT ON;
SET CONCAT_NULL_YIELDS_NULL ON;
SET QUOTED_IDENTIFIER ON;
SET ANSI_NULLS ON;
SET ANSI_PADDING ON;
SET ANSI_WARNINGS ON;
SET NUMERIC_ROUNDABORT OFF;

DECLARE    @crlf CHAR(2);
SET @crlf = CHAR(13) + CHAR(10);
DECLARE    @objid INT;

DECLARE @results TABLE (definition NVARCHAR(max))

DECLARE    @objects TABLE (id VARCHAR(100),type CHAR(2));

WITH    db1(dbname)
            AS (SELECT    [value] AS dbname
                FROM    Split(@name)),db2    AS (SELECT   
              --CASE WHEN CHARINDEX(‘.‘,dbname) = 0 AND CHARINDEX(‘[‘,dbname) = 0 THEN ‘[cn9c080].‘ + QUOTENAME(dbname)
     --                            ELSE dbname
     --                       END AS dbname
                        CASE WHEN o.[object_id] IS NULL AND tt.[name] IS NULL THEN % ELSE LTRIM(ISNULL(o.[object_id],tt.[type_table_object_id])) END AS object_id,CASE  [db1].[dbname] WHEN tables THEN U WHEN procs THEN P else
                         o.[type] END type
                FROM    db1
                left JOIN sys.[objects] o ON (PARSENAME(db1.[dbname],1) = o.[name] OR OBJECT_ID([cn9c080]. + QUOTENAME(dbname)) = o.[object_id])
                LEFT JOIN sys.table_types tt ON db1.dbname=tt.NAME 
                )
                

    INSERT    INTO @objects
    SELECT    *
    FROM    db2    ;
    --OPTION    (MAXRECURSION 0);    

    --SELECT TOP 100 * FROM @objects;
     
    WITH    ColumnDefs
                AS (SELECT    TableObj = c.[object_id],ColSeq = c.column_id,ColumnDef = QUOTENAME(c.name) +   + CASE    WHEN c.is_computed = 1
                                                                        THEN as  + COALESCE(k.[definition],‘‘) + CASE
                                                                                                        WHEN k.is_persisted = 1
                                                                                                        THEN  PERSISTED + CASE
                                                                                                        WHEN k.is_nullable = 0
                                                                                                        THEN  NOT NULL
                                                                                                        ELSE ‘‘
                                                                                                        END
                                                                                                        ELSE ‘‘
                                                                                                        END
                                                                        ELSE DataType + CASE    WHEN DataType IN (
                                                                                                        decimal,numeric)
                                                                                                THEN ( + CAST(c.precision AS VARCHAR(10)) + CASE
                                                                                                        WHEN c.scale <> 0
                                                                                                        THEN , + CAST(c.scale AS VARCHAR(10))
                                                                                                        ELSE ‘‘
                                                                                                        END + )
                                                                                                WHEN DataType IN (char,varchar,nchar,nvarchar,binary,varbinary)
                                                                                                THEN ( + CASE
                                                                                                        WHEN c.max_length = -1
                                                                                                        THEN max
                                                                                                        ELSE CASE
                                                                                                        WHEN DataType IN (
                                                                                                        nchar,nvarchar)
                                                                                                        THEN CAST(c.max_length / 2 AS VARCHAR(10))
                                                                                                        ELSE CAST(c.max_length AS VARCHAR(10))
                                                                                                        END
                                                                                                        END + )
                                                                                                WHEN DataType = float AND c.precision <> 53
                                                                                                THEN ( + CAST(c.precision AS VARCHAR(10)) + )
                                                                                                WHEN DataType IN (time,datetime2,datetimeoffset) AND c.scale <> 7
                                                                                                THEN ( + CAST(c.scale AS VARCHAR(10)) + )
                                                                                                ELSE ‘‘
                                                                                        END
                                                                    END + CASE    WHEN c.is_identity = 1 AND @identity = 1
                                                                                THEN  IDENTITY( + CAST(IDENT_SEED(QUOTENAME(OBJECT_SCHEMA_NAME(c.[object_id])) + . + QUOTENAME(OBJECT_NAME(c.[object_id]))) AS VARCHAR(30)) + , + CAST(IDENT_INCR(QUOTENAME(OBJECT_SCHEMA_NAME(c.[object_id])) + . + QUOTENAME(OBJECT_NAME(c.[object_id]))) AS VARCHAR(30)) + )
                                                                                ELSE ‘‘
                                                                            END + CASE    WHEN c.is_rowguidcol = 1
                                                                                        THEN  ROWGUIDCOL
                                                                                        ELSE ‘‘
                                                                                    END + CASE    WHEN c.xml_collection_id > 0
                                                                                                THEN  (CONTENT  + QUOTENAME(SCHEMA_NAME(x.schema_id)) + . + QUOTENAME(x.name) + )
                                                                                                ELSE ‘‘
                                                                                            END + CASE    WHEN c.is_computed = 0 AND UserDefinedFlag = 0
                                                                                                        THEN CASE
                                                                                                        WHEN c.collation_name <> CAST(DATABASEPROPERTYEX(DB_NAME(),collation) AS NVARCHAR(128))
                                                                                                        THEN  COLLATE  + c.collation_name
                                                                                                        ELSE ‘‘
                                                                                                        END
                                                                                                        ELSE ‘‘
                                                                                                    END + CASE
                                                                                                        WHEN c.is_computed = 0
                                                                                                        THEN CASE
                                                                                                        WHEN c.is_nullable = 0
                                                                                                        THEN  NOT
                                                                                                        ELSE ‘‘
                                                                                                        END +  NULL
                                                                                                        ELSE ‘‘
                                                                                                        END + CASE                                                                                                        
                                                                                                        WHEN c.default_object_id > 0 AND ISNULL(@new,0) = 0
                                                                                                        THEN  CONSTRAINT  + QUOTENAME(d.name) +  DEFAULT  + COALESCE(d.[definition],‘‘)
                                                                                                        WHEN c.default_object_id > 0 AND ISNULL(@new,0) = 1
                                                                                                        THEN  DEFAULT  + COALESCE(d.[definition],‘‘)
                                                                                                        ELSE ‘‘
                                                                                                        END
                    FROM    sys.columns c
                    CROSS APPLY (SELECT    DataType = TYPE_NAME(c.user_type_id),UserDefinedFlag = CASE    WHEN c.system_type_id = c.user_type_id THEN 0
                                                                ELSE 1
                                                            END) F1
                    LEFT JOIN sys.default_constraints d ON c.default_object_id = d.[object_id]
                    LEFT JOIN sys.computed_columns k ON c.[object_id] = k.[object_id] AND c.column_id = k.column_id
                    LEFT JOIN sys.xml_schema_collections x ON c.xml_collection_id = x.xml_collection_id),IndexDefs
                AS (SELECT    TableObj = i.[object_id],IxName = QUOTENAME(i.name+CASE WHEN @new=1 THEN _+LEFT(NEWID(),4) ELSE ‘‘ end),IxPKFlag = i.is_primary_key,IxType = CASE    WHEN i.is_primary_key = 1 THEN PRIMARY KEY 
                                            WHEN i.is_unique = 1 THEN UNIQUE 
                                            ELSE ‘‘
                                        END + LOWER(type_desc),IxDef = ( + IxColList + ) + COALESCE( INCLUDE ( + IxInclList + ),‘‘),IxOpts = IxOptList
                    FROM    sys.indexes i
                    LEFT JOIN sys.stats s ON i.index_id = s.stats_id AND i.[object_id] = s.[object_id]
                    CROSS APPLY (SELECT    STUFF((SELECT    CASE    WHEN i.is_padded = 1 THEN ,PAD_INDEX=ON
                                                                ELSE ‘‘
                                                        END + CASE    WHEN i.fill_factor <> 0
                                                                    THEN ,FILLFACTOR= + CAST(i.fill_factor AS VARCHAR(10))
                                                                    ELSE ‘‘
                                                                END + CASE    WHEN i.ignore_dup_key = 1
                                                                            THEN ,IGNORE_DUP_KEY=ON
                                                                            ELSE ‘‘
                                                                        END + CASE    WHEN s.no_recompute = 1
                                                                                    THEN ,STATISTICS_RECOMPUTE=ON
                                                                                    ELSE ‘‘
                                                                                END + CASE    WHEN i.allow_row_locks = 0
                                                                                            THEN ,ALLOW_ROW_LOCKS=OFF
                                                                                            ELSE ‘‘
                                                                                        END + CASE    WHEN i.allow_page_locks = 0
                                                                                                    THEN ,ALLOW_PAGE_LOCKS=OFF
                                                                                                    ELSE ‘‘
                                                                                                END),1,2,‘‘)) F_IxOpts (IxOptList)
                    CROSS APPLY (SELECT    STUFF((SELECT    , + QUOTENAME(c.name) + CASE    WHEN ic.is_descending_key = 1 AND i.type <> 3
                                                                                        THEN  DESC
                                                                                        WHEN ic.is_descending_key = 0 AND i.type <> 3
                                                                                        THEN  ASC
                                                                                        ELSE ‘‘
                                                                                    END
                                                FROM    sys.index_columns ic
                                                JOIN    sys.columns c ON ic.[object_id] = c.[object_id] AND ic.column_id = c.column_id
                                                WHERE    ic.[object_id] = i.[object_id] AND ic.index_id = i.index_id AND ic.is_included_column = 0
                                                ORDER BY ic.key_ordinal    
                                        FOR        XML    PATH(‘‘),TYPE).value(.,nvarchar(max)),‘‘)) F_IxCols (IxColList)
                    CROSS APPLY (SELECT    STUFF((SELECT    , + QUOTENAME(c.name)
                                                FROM    sys.index_columns ic
                                                JOIN    sys.columns c ON ic.[object_id] = c.[object_id] AND ic.column_id = c.column_id
                                                WHERE    ic.[object_id] = i.[object_id] AND ic.index_id = i.index_id AND ic.is_included_column = 1
                                                ORDER BY ic.key_ordinal    
                                        FOR        XML    PATH(‘‘),‘‘)) F_IxIncl (IxInclList)
                    WHERE    i.type_desc <> HEAP),FKDefs
                AS (SELECT    TableObj = f.parent_object_id,FKName = QUOTENAME(f.name),FKRef = QUOTENAME(OBJECT_SCHEMA_NAME(f.referenced_object_id)) + . + QUOTENAME(OBJECT_NAME(f.referenced_object_id)),FKColList = ParentColList,FKRefList = RefColList,FKDelOpt = CASE f.delete_referential_action
                                            WHEN 1 THEN CASCADE
                                            WHEN 2 THEN SET NULL
                                            WHEN 3 THEN SET DEFAULT
                                        END,FKUpdOpt = CASE f.update_referential_action
                                                            WHEN 1 THEN CASCADE
                                                            WHEN 2 THEN SET NULL
                                                            WHEN 3 THEN SET DEFAULT
                                                        END,FKNoRepl = f.is_not_for_replication
                    FROM    sys.foreign_keys f
                    CROSS APPLY (SELECT    STUFF((SELECT    , + QUOTENAME(c.name)
                                                FROM    sys.foreign_key_columns k
                                                JOIN    sys.columns c ON k.parent_object_id = c.[object_id] AND k.parent_column_id = c.column_id
                                                WHERE    k.constraint_object_id = f.[object_id]
                                                ORDER BY constraint_column_id
                                        FOR        XML    PATH(‘‘),‘‘)) F_Parent (ParentColList)
                    CROSS APPLY (SELECT    STUFF((SELECT    , + QUOTENAME(c.name)
                                                FROM    sys.foreign_key_columns k
                                                JOIN    sys.columns c ON k.referenced_object_id = c.[object_id] AND k.referenced_column_id = c.column_id
                                                WHERE    k.constraint_object_id = f.[object_id]
                                                ORDER BY constraint_column_id
                                        FOR        XML    PATH(‘‘),‘‘)) F_Ref (RefColList))
        INSERT INTO @results ([definition])
        SELECT  --TableName,
                [definition]+CHAR(10)+GO+CHAR(10) AS definition            
        FROM    sys.tables t
        INNER JOIN @objects o ON(t.[object_id] LIKE o.[id] AND o.[type]=U)
        CROSS APPLY (SELECT    TableName = QUOTENAME(OBJECT_SCHEMA_NAME(t.[object_id])) + . + QUOTENAME(OBJECT_NAME(t.[object_id]))) F_Name
        CROSS APPLY (SELECT    STUFF((SELECT    @crlf + , + ColumnDef
                                    FROM    ColumnDefs
                                    WHERE    TableObj = t.[object_id]
                                    ORDER BY ColSeq    
                            FOR        XML    PATH(‘‘),5,‘‘)) F_Cols (ColumnList)
        CROSS APPLY (SELECT    STUFF((SELECT    @crlf + ,CONSTRAINT  + QUOTENAME(name) +  CHECK  + CASE
                                                                                                        WHEN is_not_for_replication = 1
                                                                                                        THEN NOT FOR REPLICATION 
                                                                                                        ELSE ‘‘
                                                                                                        END + COALESCE([definition],‘‘)
                                    FROM    sys.check_constraints
                                    WHERE    parent_object_id = t.[object_id]
                            FOR        XML    PATH(‘‘),‘‘)) F_Const (ChkConstList)
        CROSS APPLY (SELECT    STUFF((SELECT    @crlf + ,CONSTRAINT  + IxName +   + IxType +   + IxDef + COALESCE( WITH ( + IxOpts + ),‘‘)
                                    FROM    IndexDefs
                                    WHERE    TableObj = t.[object_id] AND IxPKFlag = 1
                            FOR        XML    PATH(‘‘),‘‘)) F_IxConst (IxConstList)
        CROSS APPLY (SELECT    STUFF((SELECT    @crlf + ,CONSTRAINT  + FKName +  FOREIGN KEY  + ( + FKColList + ) +  REFERENCES  + FKRef +  ( + FKRefList + ) + CASE
                                                                                                        WHEN FKDelOpt IS NOT NULL
                                                                                                        THEN  ON DELETE  + FKDelOpt
                                                                                                        ELSE ‘‘
                                                                                                        END + CASE
                                                                                                        WHEN FKUpdOpt IS NOT NULL
                                                                                                        THEN  ON UPDATE  + FKUpdOpt
                                                                                                        ELSE ‘‘
                                                                                                        END + CASE
                                                                                                        WHEN FKNoRepl = 1
                                                                                                        THEN  NOT FOR REPLICATION
                                                                                                        ELSE ‘‘
                                                                                                        END
                                    FROM    FKDefs
                                    WHERE    TableObj = t.[object_id]
                            FOR        XML    PATH(‘‘),‘‘)) F_Keys (FKConstList)
        CROSS APPLY (SELECT    STUFF((SELECT    @crlf + CREATE  + IxType +  INDEX  + IxName +  ON  + TableName +   + IxDef + COALESCE( WITH ( + IxOpts + ),‘‘)
                                    FROM    IndexDefs
                                    WHERE    TableObj = t.[object_id] AND IxPKFlag = 0
                            FOR        XML    PATH(‘‘),‘‘)) F_Indexes (IndexList)
        CROSS APPLY (SELECT    [definition] =
            ( SELECT    CASE    WHEN @index <> 1
                                THEN CREATE TABLE  + TableName + @crlf + ( + @crlf +     + ColumnList + COALESCE(@crlf + ChkConstList,‘‘) + COALESCE(@crlf + IxConstList,‘‘) + COALESCE(@crlf + FKConstList,‘‘) + @crlf + ) + @crlf
                                ELSE ‘‘
                        END + CASE    WHEN @index <> 0 THEN COALESCE(@crlf + IndexList,‘‘)
                                    ELSE ‘‘
                                END    
                        FOR    XML    PATH(‘‘),nvarchar(max))) F_Link
        WHERE    t.[is_ms_shipped] = 0 AND [definition] <> ‘‘;


        -- 视图/过程/函数/触发器
    INSERT INTO @results ([definition])
    SELECT  --QUOTENAME(object_schema_name(m.object_id))+‘.‘+ QUOTENAME(object_name(m.object_id)) AS [name],o.type,
            m.definition+CHAR(10)+GO+CHAR(10) AS definition            
    FROM    sys.sql_modules m
    INNER JOIN sys.objects o ON m.object_id = o.object_id
    INNER JOIN @objects a ON(m.[object_id] LIKE a.[id] AND a.[type] <>U);    

    --houpeidong 2018-05-30 add 字段说明
    insert into @results ([definition])
    select 
    EXEC sys.sp_addextendedproperty @name=N‘‘MS_Description‘‘,@value=N‘‘‘ 
    + cast(ep.[value] as varchar(100)) 
    +‘‘‘,@level0type=N‘‘SCHEMA‘‘,@level0name=N‘‘‘
    +schema_name(schema_id)
    +‘‘‘,@level1type=N‘‘TABLE‘‘,@level1name=N‘‘‘
    +t.[name]
    +‘‘‘,@level2type=N‘‘COLUMN‘‘,@level2name=N‘‘‘
    +c.[name]
    +‘‘‘‘
    +CHAR(10)+GO+CHAR(10)
    --,t.[name] AS 表名,c.[name] AS 字段名,cast(ep.[value] as varchar(100)) AS [字段说明],c.collation_name,t.create_date,t.modify_date,schema_name(schema_id),*
    FROM sys.tables AS t  
    INNER JOIN sys.columns AS c ON t.object_id = c.object_id  
    LEFT JOIN sys.extended_properties AS ep ON ep.major_id = c.object_id AND ep.minor_id = c.column_id 
    INNER JOIN @objects o ON(t.[object_id] LIKE o.[id] AND o.[type]=U)
    WHERE ep.class =1 --AND t.name=‘tbCertifyUserApply‘
        
    SELECT * FROM @results;
    -- 用户定义类型. 不过对用户定义表类型尚不完善
    --;WITH TypeDef AS(
 -- SELECT TypeName=QUOTENAME( SCHEMA_NAME(t.schema_id))+‘.‘+QUOTENAME(t.name)
 --,ParentName=TYPE_NAME(t.system_type_id)+‘‘
 --                +case
 --                   when DataType in (‘decimal‘,‘numeric‘) then ‘(‘+cast(t.precision as varchar(10))+case when t.scale<>0 then ‘,‘+cast(t.scale as varchar(10)) else ‘‘ end +‘)‘
 --                   when DataType in (‘char‘,‘varchar‘,‘nchar‘,‘nvarchar‘,‘binary‘,‘varbinary‘) then ‘(‘+case when t.max_length=-1 then ‘max‘ else case when DataType in (‘nchar‘,‘nvarchar‘) then cast(t.max_length/2 as varchar(10)) else cast(t.max_length as varchar(10)) end end +‘)‘
 --                   when DataType=‘float‘ and t.precision<>53 then ‘(‘+cast(t.precision as varchar(10))+‘)‘
 --                   when DataType in (‘time‘,‘datetime2‘,‘datetimeoffset‘) and t.scale<>7 then ‘(‘+cast(t.scale as varchar(10))+‘)‘
 --                   else ‘‘
 --                 end
 --            +case when t.is_nullable=0 then ‘ NOT‘ else ‘‘ end+‘ NULL‘ 
 -- from sys.types t
 -- cross apply (  
 --   select DataType=type_name(t.system_type_id)
 --         ) F1
 -- WHERE t.is_user_defined=1
 -- )
 -- SELECT TypeName,‘CREATE TYPE ‘+TypeName+‘ FROM ‘ +ParentName AS definition FROM TypeDef

执行示例:

--单个表
exec [sp_gettext] tablename
--多个表
exec [sp_gettext] tablename1,tablename2,tablename3

(编辑:李大同)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章
      热点阅读