码迷,mamicode.com
首页 > 数据库 > 详细

SQL Server开发接口生成方法

时间:2016-05-07 07:27:54      阅读:242      评论:0      收藏:0      [点我收藏+]

标签:

为提高开发效率,生成固定格式的接口是必须的,以下以提供新增/修改/删除/读取接口为例:

以常见的表结构为例,特殊表结构可自己尝试去调整方法

1、在Test数据库生成方法

if OBJECT_ID(‘Curdsqlstring‘,‘P‘) is not null
	DROP PROC Curdsqlstring
go
CREATE PROCEDURE Curdsqlstring(
					@TableName sysname
		)
with encryption
AS
if OBJECT_ID(@TableName,‘U‘) is null
	return 0
	
DECLARE @S NVARCHAR(MAX)
       ,@ColName NVARCHAR(MAX)
       ,@Identity sysname
       ,@IdentityWHERE NVARCHAR(100)
       ,@Insert0 NVARCHAR(MAX)
       ,@Insert1 NVARCHAR(MAX)
       ,@Insert2 NVARCHAR(MAX)
       ,@Insert3 NVARCHAR(MAX)  
       ,@UPDATE0 NVARCHAR(MAX)   
       ,@UPDATE1 NVARCHAR(MAX)
       ,@UPDATE2 NVARCHAR(MAX)
       ,@UPDATE3 NVARCHAR(MAX)
       ,@SELECTWHERE0 NVARCHAR(MAX)
       ,@SELECTWHERE1 NVARCHAR(MAX)
       ,@SELECT0 NVARCHAR(MAX)
       ,@SELECT1 NVARCHAR(MAX)
       ,@DELETE NVARCHAR(MAX)
       ,@ColName2 NVARCHAR(MAX)
       ,@ObjectID INT
       ,@UPDATECol1 NVARCHAR(MAX)
       ,@ColAll NVARCHAR(MAX)
       ,@InputCol sysname
       ,@Write NVARCHAR(100)
       ,@OutputAll NVARCHAR(1000)
	   ,@TableName2 sysname
SELECT @Write=‘Roy‘+char(32)+char(32)+char(32)+convert(varchar(10),getdate(),120),@Insert2=‘‘,@Insert3=‘‘

SELECT 
	@S=CASE WHEN a.is_computed=1 THEN @S ELSE ISNULL(@s+‘,‘,‘‘)+‘@‘+Name+char(32)+ TYPE_NAME(user_type_id)+CASE	when user_type_id in(34,35,36,48,52,56,58,59,60,61,62,98,99,104,122,127,189,241,256,241,40,41,129) then ‘‘ 
			when user_type_id in(106,108) then ‘(‘+rtrim(Precision)+‘,‘+rtrim(Scale)+‘)‘
			when user_type_id in (231,239) then  CASE when  max_length=-1 then ‘(max)‘ else ‘(‘+rtrim(max_length/2)+‘)‘ end
			when max_length=-1 then ‘(Max)‘
			else ‘(‘+rtrim(max_length)+‘)‘ end
	+CASE	when is_identity=1 then char(32)+‘OUTPUT‘ 
			else ‘‘ end END,
	@ColName=CASE when is_identity=1 OR a.is_computed=1 THEN @ColName else isnull(@ColName+‘,‘,‘‘)+quotename(Name) end,
	@ColName2=CASE when is_identity=1 OR a.is_computed=1 then @ColName2 else isnull(@ColName2+‘,‘,‘‘)+‘@‘+Name end,
	@UPDATECol1=CASE when Name!=N‘ID‘  AND NOT EXISTS ( SELECT 1
                                 FROM   sys.objects x
                                        JOIN sys.indexes y ON x.type = N‘PK‘
                                                              AND x.name = y.name
                                        JOIN sysindexkeys z ON z.id = x.object_id
                                                              AND z.indid = y.index_id
                                                              AND z.colid = a.Column_id 
                                                              AND x.object_id=a.object_id) AND a.is_computed=0 THEN ISNULL(@UPDATECol1+‘,‘,‘‘)+QUOTENAME(Name)+‘=‘+‘@‘+Name ELSE @UPDATECol1 END,
	@IdentityWHERE=isnull(@IdentityWHERE,‘‘)+CASE when COLUMNPROPERTY (OBJECT_ID, Name , ‘IsIdentity‘ )=1 OR Name=N‘ID‘ then quotename(Name)+‘=‘+‘@‘+Name  ELSE ‘‘ end,
	@ColAll=isnull(@ColAll+‘,‘,‘‘)+quotename(Name),
	@OutputAll=isnull(@OutputAll+‘,‘,‘‘)+‘@‘+Name
from 
	Sys.columns AS a
WHERE 
	a.OBJECT_ID=OBJECT_ID(@TableName)
order by CASE when Name=‘ID‘ then 0 else 1 end,Column_id

IF @IdentityWHERE = ‘‘
   SELECT   @IdentityWHERE = @IdentityWHERE+CASE WHEN @IdentityWHERE > ‘‘ AND EXISTS ( SELECT 1
                                 FROM   sys.objects x
                                        JOIN sys.indexes y ON x.type = N‘PK‘
                                                              AND x.name = y.name
                                        JOIN sysindexkeys z ON z.id = a.object_id
                                                              AND z.indid = y.index_id
                                                              AND z.colid = a.Column_id ) THEN ‘ AND ‘
                                  ELSE ‘‘
                             END
            + CASE WHEN EXISTS ( SELECT 1
                                 FROM   sys.objects x
                                        JOIN sys.indexes y ON x.type = N‘PK‘
                                                              AND x.name = y.name
                                        JOIN sysindexkeys z ON z.id = a.object_id
                                                              AND z.indid = y.index_id
                                                              AND z.colid = a.Column_id )
                   THEN QUOTENAME(name) + ‘=‘ + ‘@‘ + name
                   ELSE ‘‘
              END
   FROM     sys.columns AS a
   WHERE    object_id = OBJECT_ID(@TableName)
   ORDER BY column_id

IF @IdentityWHERE=‘‘
	SELECT TOP 1 @IdentityWHERE=quotename(Name)+‘=‘+‘@‘+Name FROM sys.columns WHERE OBJECT_ID=OBJECT_ID(@TableName) ORDER BY column_id
--主键为第一列
SELECT @Identity=replace(left(@s,charindex(‘,‘,@s)-1),char(32)+‘output‘,‘‘)
	,@ObjectID=OBJECT_ID(@TableName)
	,@TableName=replace(replace(stuff(@TableName,1,charindex(‘.‘,@TableName),‘‘),‘]‘,‘‘),‘[‘,‘‘)
	,@TableName2=CASE WHEN @TableName NOT LIKE ‘%.%‘ THEN ‘‘+OBJECT_SCHEMA_NAME(@ObjectID)+‘.‘+@TableName ELSE @TableName END

SELECT @Insert1=‘CREATE PROCEDURE c‘+@TableName+char(10)+char(9)+char(9)+‘(‘+@s+‘)‘+char(10)+‘AS‘,
				@Insert2=‘INSERT INTO ‘+@TableName2+char(10)+char(9)+‘(‘+@ColName+‘)‘,
				@Insert3=‘VALUES‘+char(10)+char(9)+‘(‘+@ColName2+‘)‘
				+CASE	when exists(SELECT 1 from Sys.columns WHERE OBJECT_ID=@ObjectID and is_identity=1) 
						then char(10)+char(10)+‘SET ‘+left(@Identity,charindex(char(32),@Identity)-1)+‘=SCOPE_IDENTITY()‘ 
						else ‘‘ end,
		@UPDATE1=‘CREATE PROCEDURE u‘+@TableName+char(10)+char(9)+char(9)+‘(‘+replace(@s,char(32)+‘output‘,‘‘)+‘)‘+char(10)+‘AS‘,
				@UPDATE2=‘UPDATE ‘+@TableName2+char(10)+‘SET ‘+@UPDATECol1,
				@UPDATE3=‘WHERE ‘+@IdentityWHERE,
		@SELECTWHERE1=‘CREATE PROCEDURE r‘+@TableName+‘By‘+stuff(left(@Identity,charindex(char(32),@Identity)-1),1,1,‘‘)+char(10)+char(9)+char(9)+‘(‘+@Identity+‘)‘+char(10)+‘AS‘+char(10)
					+‘SET NOCOUNT ON;‘+char(10)+‘SET TRANSACTION ISOLATION LEVEL READ UNCOMMITTED;‘+char(10)+
					‘SELECT ‘+char(10)+char(9)+@ColAll+char(10)+‘From‘+char(10)+char(9)+@TableName2+char(10)+‘WHERE‘+char(10)+char(9)+@IdentityWHERE,
		@SELECT1=‘CREATE PROCEDURE r‘+@TableName+‘ForAll‘+char(10)+‘AS‘+char(10)+
					‘SET NOCOUNT ON;‘+char(10)+‘SET TRANSACTION ISOLATION LEVEL READ UNCOMMITTED;‘+char(10)+
					‘SELECT ‘+char(10)+char(9)+@ColAll+char(10)+‘From‘+char(10)+char(9)+@TableName2,
		@DELETE=‘CREATE PROCEDURE d‘+@TableName+char(10)+char(9)+‘(‘+@Identity+‘)‘+char(10)+‘AS‘+char(10)+‘DELETE ‘+@TableName2+char(32)+‘WHERE‘+char(32)+@IdentityWHERE,
		@InputCol=CASE when exists(SELECT 1 from Sys.columns WHERE OBJECT_ID=@ObjectID and is_identity=1) then @Identity else ‘‘ end



--Insert
SELECT @Insert0=
‘if OBJECT_ID(‘+quotename(‘c‘+@TableName,‘‘‘‘)+‘,‘‘P‘‘) is not null‘+char(13)+char(9)+‘DROP PROC ‘+quotename(‘c‘+@TableName)
+char(10)+‘Go‘+char(13)+char(10)+‘/‘+replicate(‘*‘,160)+char(10)+
‘%%存储过程名:c‘+@TableName+char(10)+char(10)+
‘%%输入参数:‘+@ColName2+char(10)+char(10)+
‘%%输出参数:‘+@InputCol+char(10)+char(10)+
‘%%功能:新增记录在表‘+@TableName+char(10)+replicate(‘*‘,160)+char(10)+
‘%%编写:‘+@Write+char(10)+char(10)+replicate(‘*‘,160)+‘/‘
,

--UPDATE

@UPDATE0=
‘if OBJECT_ID(‘+quotename(‘u‘+@TableName,‘‘‘‘)+‘,‘‘P‘‘) is not null‘+char(13)+char(9)+‘DROP PROC ‘+quotename(‘u‘+@TableName)
+char(10)+‘Go‘+char(13)+char(10)+‘/‘+replicate(‘*‘,160)+char(10)+
‘%%存储过程名:u‘+@TableName+char(10)+char(10)+
‘%%输入参数:‘+@OutputAll+char(10)+char(10)+
‘%%输出参数:‘+char(10)+char(10)+
‘%%功能:修改记录在表‘+@TableName+char(10)+replicate(‘*‘,160)+char(10)+
‘%%编写:‘+@Write+char(10)+char(10)+replicate(‘*‘,160)+‘/‘
,
--SELECTWHERE
@SELECTWHERE0=
‘if OBJECT_ID(‘+quotename(‘r‘+@TableName+‘By‘+stuff(left(@Identity,charindex(char(32),@Identity)-1),1,1,‘‘),‘‘‘‘)+‘,‘‘P‘‘) is not null‘+char(13)+char(9)+‘DROP PROC ‘+quotename(‘r‘+@TableName+‘By‘+stuff(left(@Identity,charindex(char

(32),@Identity)-1),1,1,‘‘))
+char(10)+‘Go‘+char(13)+char(10)+‘/‘+replicate(‘*‘,160)+char(10)
+‘%%存储过程名:r‘+@TableName+‘By‘+stuff(left(@Identity,charindex(char(32),@Identity)-1),1,1,‘‘)+char(10)+char(10)
+N‘%%输入参数:‘+@Identity+char(10)+char(10)
+N‘%%输出参数:‘+char(10)+char(10)
+N‘%%功能:根据条件读取记录在表‘+@TableName+char(10)+replicate(‘*‘,160)+char(10)
+‘%%编写:‘+@Write+char(10)+char(10)+replicate(‘*‘,160)+‘/‘,
--SELECT 
@SELECT0=
‘if OBJECT_ID(‘+quotename(‘r‘+@TableName+‘ForAll‘,‘‘‘‘)+‘,‘‘P‘‘) is not null‘+char(13)+char(9)+‘DROP PROC ‘+quotename(‘r‘+@TableName+‘ForAll‘)
+char(10)+‘Go‘+char(13)+char(10)+‘/‘+replicate(‘*‘,160)+char(10)
+‘%%存储过程名:r‘+@TableName+‘ForAll‘+char(10)+char(10)
+‘%%输入参数:‘+char(10)+char(10)
+‘%%输出参数:‘+char(10)+char(10)
+‘%%功能:读取记录在表‘+@TableName+char(10)+replicate(‘*‘,160)+char(10)
+‘%%编写:‘+@Write+char(10)+char(10)+replicate(‘*‘,160)+‘/‘,

@DELETE=
‘if OBJECT_ID(‘+quotename(‘d‘+@TableName,‘‘‘‘)+‘,‘‘P‘‘) is not null‘+char(13)+char(9)+‘DROP PROC ‘+quotename(‘d‘+@TableName)
+char(10)+‘Go‘+char(13)+char(10)+‘/‘+replicate(‘*‘,160)+char(10)
+‘%%存储过程名:d‘+@TableName+char(10)+char(10)
+‘%%输入参数:‘+char(10)+char(10)
+‘%%输出参数:‘+@Identity+char(10)+char(10)
+‘%%功能:删除记录在表‘+@TableName+char(10)+replicate(‘*‘,160)+char(10)
+‘%%编写:‘+@Write+char(10)+char(10)+replicate(‘*‘,160)+‘/‘+char(10)
+@DELETE+char(13)+char(10)+‘Go‘+char(13)+char(10)

print ‘USE ‘+db_name()+char(13)+char(10)+‘Go‘+char(13)+char(10)
PRINT @Insert0
print @Insert1
print @Insert2
print @Insert3
PRINT ‘Go‘+char(13)+char(10)
print @UPDATE0
print @UPDATE1
print @UPDATE2
print @UPDATE3
PRINT ‘Go‘+char(13)+char(10)
print @SELECTWHERE0
print @SELECTWHERE1
PRINT ‘Go‘+char(13)+char(10)
print @SELECT0
print @SELECT1
PRINT ‘Go‘+char(13)+char(10)
print @DELETE


go
exec sp_ms_marksystemobject ‘CurdSqlString‘--添加在系统存储过程目录
go

  

2、创建表Tab1

e.g.

USE [test]
GO

/****** Object:  Table [dbo].[Tab1]    Script Date: 2016/5/6 11:51:47 ******/
IF OBJECT_ID(Tab1,U) IS NOT NULL
DROP TABLE [dbo].[Tab1]
GO
CREATE TABLE [dbo].[Tab1](
    [ID] [BIGINT] NULL,
    [Name] [sysname] NOT NULL
) ON [PRIMARY]

GO

3、调用方法:

--调用方法:
exec CurdSqlString ‘Tab1‘-- 表名

显示效果:

USE test
Go
if OBJECT_ID(‘cTab1‘,‘P‘) is not null
	DROP PROC [cTab1]
Go
/****************************************************************************************************************************************************************
%%存储过程名:cTab1

%%输入参数:@ID,@Name

%%输出参数:

%%功能:新增记录在表Tab1
****************************************************************************************************************************************************************
%%编写:Roy   2016-05-06

****************************************************************************************************************************************************************/
CREATE PROCEDURE cTab1
		(@ID bigint,@Name sysname)
AS
INSERT INTO dbo.Tab1
	([ID],[Name])
VALUES
	(@ID,@Name)
Go
if OBJECT_ID(‘uTab1‘,‘P‘) is not null
	DROP PROC [uTab1]
Go
/****************************************************************************************************************************************************************
%%存储过程名:uTab1

%%输入参数:@ID,@Name

%%输出参数:

%%功能:修改记录在表Tab1
****************************************************************************************************************************************************************
%%编写:Roy   2016-05-06

****************************************************************************************************************************************************************/
CREATE PROCEDURE uTab1
		(@ID bigint,@Name sysname)
AS
UPDATE dbo.Tab1
SET [Name]=@Name
WHERE [ID]=@ID
Go
if OBJECT_ID(‘rTab1ByID‘,‘P‘) is not null
	DROP PROC [rTab1ByID]
Go
/****************************************************************************************************************************************************************
%%存储过程名:rTab1ByID

%%输入参数:@ID bigint

%%输出参数:

%%功能:根据条件读取记录在表Tab1
****************************************************************************************************************************************************************
%%编写:Roy   2016-05-06

****************************************************************************************************************************************************************/
CREATE PROCEDURE rTab1ByID
		(@ID bigint)
AS
SET NOCOUNT ON;
SET TRANSACTION ISOLATION LEVEL READ UNCOMMITTED;
SELECT 
	[ID],[Name]
From
	dbo.Tab1
WHERE
	[ID]=@ID
Go
if OBJECT_ID(‘rTab1ForAll‘,‘P‘) is not null
	DROP PROC [rTab1ForAll]
Go
/****************************************************************************************************************************************************************
%%存储过程名:rTab1ForAll

%%输入参数:

%%输出参数:

%%功能:读取记录在表Tab1
****************************************************************************************************************************************************************
%%编写:Roy   2016-05-06

****************************************************************************************************************************************************************/
CREATE PROCEDURE rTab1ForAll
AS
SET NOCOUNT ON;
SET TRANSACTION ISOLATION LEVEL READ UNCOMMITTED;
SELECT 
	[ID],[Name]
From
	dbo.Tab1
Go
if OBJECT_ID(‘dTab1‘,‘P‘) is not null
	DROP PROC [dTab1]
Go
/****************************************************************************************************************************************************************
%%存储过程名:dTab1

%%输入参数:

%%输出参数:@ID bigint

%%功能:删除记录在表Tab1
****************************************************************************************************************************************************************
%%编写:Roy   2016-05-06

****************************************************************************************************************************************************************/
CREATE PROCEDURE dTab1
	(@ID bigint)
AS
DELETE dbo.Tab1 WHERE [ID]=@ID
Go

  

SQL Server开发接口生成方法

标签:

原文地址:http://blog.csdn.net/roy_88/article/details/51331261

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!