November 10, 2010

C# code geneartor stored procedure

Ref: http://www.codeproject.com/KB/database/CSCodeBuilder.aspx

CREATE PROCEDURE tools_CS_SPROC_Builder



(


@objName nvarchar(100)


)


AS




SET NOCOUNT ON






DECLARE @parameterCount int


DECLARE @errMsg varchar(100)


DECLARE @parameterAt varchar(1)


DECLARE @connName varchar(100)


//Change the following variable to the name of your connection instance


SET @connName='conn.Connection'


SET @parameterAt=''






SELECT


dbo.sysobjects.name AS ObjName,


dbo.sysobjects.xtype AS ObjType,


dbo.syscolumns.name AS ColName,


dbo.syscolumns.colorder AS ColOrder,


dbo.syscolumns.length AS ColLen,


dbo.syscolumns.colstat AS ColKey,


dbo.systypes.xtype


INTO #t_obj


FROM


dbo.syscolumns INNER JOIN


dbo.sysobjects ON dbo.syscolumns.id = dbo.sysobjects.id INNER JOIN


dbo.systypes ON dbo.syscolumns.xtype = dbo.systypes.xtype


WHERE


(dbo.sysobjects.name = @objName)


AND


(dbo.systypes.status <> 1)


ORDER BY


dbo.sysobjects.name,


dbo.syscolumns.colorder






SET @parameterCount=(SELECT count(*) FROM #t_obj)






IF(@parameterCount<1) SET @errMsg='No Parameters/Fields found for ' + @objName






IF(@errMsg is null)


BEGIN


PRINT 'try'


PRINT ' {'


PRINT ' SqlParameter[] paramsToStore =


new SqlParameter[' + cast(@parameterCount as varchar) + '];'


PRINT ''






DECLARE @source_name nvarchar,@source_type varchar,


@col_name nvarchar(100),@col_order int,@col_type varchar(20),


@col_len int,@col_key int,@col_xtype int,@col_redef varchar(20)






DECLARE cur CURSOR FOR


SELECT * FROM #t_obj


OPEN cur


-- Perform the first fetch.


FETCH NEXT FROM cur


INTO @source_name,@source_type,@col_name,@col_order,


@col_len,@col_key,@col_xtype






if(@source_type=N'U') SET @parameterAt='@'


-- Check @@FETCH_STATUS to see if there are any more rows to fetch.


WHILE @@FETCH_STATUS = 0


BEGIN


SET @col_redef=(SELECT


CASE @col_xtype


WHEN 34 THEN 'Image'


WHEN 35 THEN 'Text'


WHEN 48 THEN 'TinyInt'


WHEN 52 THEN 'SmallInt'


WHEN 56 THEN 'Int'


WHEN 58 THEN 'SmallDateTime'


WHEN 59 THEN 'Real'


WHEN 60 THEN 'Money'


WHEN 61 THEN 'DateTime'


WHEN 62 THEN 'Float'


WHEN 99 THEN 'NText'


WHEN 104 THEN 'Bit'


WHEN 106 THEN 'Decimal'


WHEN 122 THEN 'SmallMoney'


WHEN 127 THEN 'BigInt'


WHEN 165 THEN 'VarBinary'


WHEN 167 THEN 'VarChar'


WHEN 173 THEN 'Binary'


WHEN 175 THEN 'Char'


WHEN 231 THEN 'NVarChar'


WHEN 239 THEN 'NChar'


ELSE '!MISSING'






END AS C)


--Write out the parameter


PRINT ' paramsToStore[' + cast(@col_order-1 as varchar)


+ '] = new SqlParameter("' + @parameterAt + @col_name


+ '", SqlDbType.' + @col_redef


+ ');'






--If the type is a string then output the size declaration


IF(@col_xtype=231)OR(@col_xtype=167)OR(@col_xtype=175)


OR(@col_xtype=99)OR(@col_xtype=35)


BEGIN


PRINT ' paramsToStore[' + cast(@col_order-1 as varchar)


+ '].Size=' + cast(@col_len as varchar) + ';'


END


PRINT ' paramsToStore['+ cast(@col_order-1 as varchar)


+ '].Value = ;'


-- This is executed as long as the previous fetch succeeds.


FETCH NEXT FROM cur


INTO @source_name,@source_type,@col_name,@col_order,


@col_len,@col_key,@col_xtype


END


PRINT ''


PRINT ' SqlHelper.ExecuteNonQuery(' + @connName +


', CommandType.StoredProcedure,"' + @objName + '", paramsToStore);'


PRINT ' }'


PRINT 'catch(Exception excp)'


PRINT ' {'


PRINT ' }'


PRINT 'finally'


PRINT ' {'


PRINT ' ' + @connName + '.Dispose();'


PRINT ' ' + @connName + '.Close();'


PRINT ' }'


CLOSE cur


DEALLOCATE cur


END






if(LEN(@errMsg)>0) PRINT @errMsg


DROP TABLE #t_obj


SET NOCOUNT ON






GO


SET QUOTED_IDENTIFIER OFF


GO


SET ANSI_NULLS ON


GO

No comments:

Post a Comment