Search This Blog

2009-09-21

Rolf Eisenring's Quantum Battery

SOURCES:
On the brand new Drupal site

2009-09-18

For each procedure in sqlserver 2005 2008 do something ..



ALTER PROCEDURE [dbo].[procUtils_ForEachProcedure]  
WITH EXECUTE AS CALLER  
AS  
BEGIN -- proc start                              
SET NOCOUNT ON;                              
 
BEGIN TRY        --begin try                    
 
declare @LogLevel int --THE LOG LEVEL OF THE EXECUTING USER  
declare @ProcedureName varchar(1000) --
DECLARE @CODESTR VARCHAR(MAX)
 
--Declare the Procedure variable     
DECLARE @ProcedureNames Table    
(    
Number INT IDENTITY(1,1), --Auto incrementing Identity column    
ProcedureName VARCHAR(300) --The string value    
)    
--Decalre a variable to remember the position of the current delimiter    
DECLARE @CurrentDelimiterPositionVar INT     
--Decalre a variable to remember the number of rows in the Procedure    
DECLARE @Count INT    
DECLARE @SqlCode varchar(200)
 
-- DEBUG select * from sys.procedures
--Populate the Procedure variable using some logic    
INSERT INTO @ProcedureNames 
SELECT name FROM sys.procedures 
--where name like '%procGen%' --ADD SOME CONSTRAINT ALSO ...
--Initialize the looper variable    
SET @CurrentDelimiterPositionVar = 1    
--Determine the number of rows in the Procedure    
SELECT @Count=max(Number) from @ProcedureNames    
--Loop through until all row processing is done    
WHILE @CurrentDelimiterPositionVar <= @Count    
BEGIN   
SET @CODESTR = 'DROP ' 
--Load current value from the Procedure    
SELECT @ProcedureName = ProcedureName FROM @ProcedureNames WHERE Number = @CurrentDelimiterPositionVar    
--Process the current value    
SET  @CODESTR = @CODESTR + 'PROC '+ @ProcedureName + ''              
print @CODESTR
--Increment loop counter    
SET @CurrentDelimiterPositionVar = @CurrentDelimiterPositionVar + 1;    
END    
END TRY        --end try                    
BEGIN CATCH                          
print  ' Error number: ' + CAST(ERROR_NUMBER() AS varchar(100)) +                 
'Error message: ' + ERROR_MESSAGE() + 'Error severity: ' +   
CAST(ERROR_SEVERITY() AS varchar(10)) +                 
'Error state: ' + CAST(ERROR_STATE() AS varchar(1000)) +   
'XACT_STATE: ' + CAST(XACT_STATE() AS varchar(1000))                          
END CATCH                          
END --procedure end                               
/*   
USE [Db]  
GO  
exec procUtils_ForEachProcedure  
*/

Foreach table in sqlserver 2005 2008 do something



--select column_name from INFORMATION_SCHEMA.COLUMNS where TABLE_NAME='Products'    
--Declare the Table variable     
DECLARE @TableNames TABLE    
(    
Number INT IDENTITY(1,1), --Auto incrementing Identity column    
TableName VARCHAR(300) --The string value    
)    
--Decalre a variable to remember the position of the current delimiter    
DECLARE @CurrentDelimiterPositionVar INT     
--Decalre a variable to remember the number of rows in the table    
DECLARE @Count INT    
DECLARE @SqlCode varchar(200)
--Populate the TABLE variable using some logic    
INSERT INTO @TableNames SELECT name FROM sys.tables
--Initialize the looper variable    
SET @CurrentDelimiterPositionVar = 1    
--Determine the number of rows in the Table    
SELECT @Count=max(Number) from @TableNames    
--A variable to hold the currently selected value from the table    
DECLARE @TableName varchar(300);    
--Loop through until all row processing is done    
WHILE @CurrentDelimiterPositionVar <= @Count    
BEGIN    
--Load current value from the Table    
SELECT @TableName = TableName FROM @TableNames WHERE Number = @CurrentDelimiterPositionVar    
--Process the current value    
print 'EXEC [dbo].[procUtils_GenerateInsertProc] @TableName = N'''+ @TableName + ''''              
--Increment loop counter    
SET @CurrentDelimiterPositionVar = @CurrentDelimiterPositionVar + 1;    
END    

what I have been doing lately on SqlServer 2005 2008



USE [Db]
GO
 
/****** Object:  StoredProcedure [dbo].[procUtils_WhatIHaveBeenDoing]    Script Date: 09/18/2009 11:36:19 ******/
SET ANSI_NULLS ON
GO
 
SET QUOTED_IDENTIFIER ON
GO
 
CREATE PROCEDURE [dbo].[procUtils_WhatIHaveBeenDoing]
WITH EXECUTE AS CALLER
AS
BEGIN -- proc start                            
SET NOCOUNT ON;                            
declare @procedureName varchar(200)        
declare @procStep varchar(4000)  
declare    @UserSessionId [int]
declare    @PageTypeId [int]
declare    @msgOut [varchar](200)
declare    @debugMsgOut [varchar](200)
declare    @ret [int] 
set @procedureName = ( SELECT OBJECT_NAME(@@PROCID))        
set @procStep = ' '     
BEGIN TRY        --begin try                  
set @ret = 1 --assume false from the beginning                  
declare @LogLevel int --THE LOG LEVEL OF THE EXECUTING USER
 
select  o.name  , 
(SELECT [definition] AS [text()] 
FROM sys.all_sql_modules 
where sys.all_sql_modules.object_id=a.object_id FOR XML PATH(''), TYPE) 
AS Statement_Text
, a.object_id, o.modify_date  from sys.all_sql_modules  a 
left join sys.objects  o on a.object_id=o.object_id order by 4 desc
 
--select * from sys.objects
 
 
 
set @LogLevel = dbo.funcGetUserLogLevelByUserSessionId( @UserSessionId)
 
set @procStep = 'START PROCEDURE ' + @procedureName
if ( @LogLevel = 1 )
begin --if ( @LogLevel = 1 )
INSERT INTO [dbo].[LogStore] ( [Date],[Thread],[Level],[Logger],[Message])
values ( getdate() , N'8', N'DEBUG', @procedureName , @procStep )
END --if ( @LogLevel = 1 )  
 
 
 
 
set @procStep = ' PUT HERE THE STEP''S NAME '   
if ( @LogLevel = 1 )
begin --if ( @LogLevel = 1 )
INSERT INTO [dbo].[LogStore]([Date], [Thread], [Level], [Logger], [Message])
values( GETDATE(), N'8', N'DEBUG', @procedureName , @procStep )
END --if ( @LogLevel = 1 )  
 
 
 
-- RUN SOME CODE 
-- IF NEEDED PERFORM SOME DEBUGGING 
 
 
--GET SOME MESSAGE OF THE DESIRED LANGUAGE FROM THE MSG TABLE 
DECLARE    @return_value int,
@MsgTxt nvarchar(max)
 
EXEC    @return_value = [dbo].[procUtils_GetMsgTxtByKeyAndUserSessionId]
@UserSessionId = @UserSessionId,
@MsgKey = N'ErrorMsgMenuRetrievalFailed',
@MsgTxt = @MsgTxt OUTPUT
 
set @ret = @@ERROR                  
 
if ( @@ERROR != 0 ) 
set @msgOut = @MsgTxt            
return @RET                   
END TRY        --end try                  
BEGIN CATCH                        
 
EXEC    @return_value = [dbo].[procUtils_GetMsgTxtByKeyAndUserSessionId]
@UserSessionId = 2,
@MsgKey = N'ErrorMsgMenuRetrievalFailed',
@MsgTxt = @MsgTxt OUTPUT
 
set @ret = 1                  
 
set @debugMsgOut = ' Error number: ' + CAST(ERROR_NUMBER() AS varchar(100)) +               
'Error message: ' + ERROR_MESSAGE() + 'Error severity: ' + 
CAST(ERROR_SEVERITY() AS varchar(10)) +               
'Error state: ' + CAST(ERROR_STATE() AS varchar(100)) + 
'XACT_STATE: ' + CAST(XACT_STATE() AS varchar(100))                        
-- record the error in the database                        
set @debugMsgOut = @debugMsgOut + @msgOut            
INSERT INTO [dbo].[LogStore] ( [Date],[Thread],[Level],[Logger],[Message])
values ( getdate() , N'8', N'DEBUG', 'dbo.procUtils_WhatIHaveBeenDoing' , @debugMsgOut )
END CATCH                        
 
END --procedure end                             
/* 
USAGE:
EXEC procUtils_WhatIHaveBeenDoing
*/
 
GO
 
 

How-to generate update statements on SqlServer 2005 , 2008



alter PROCEDURE [dbo].[procUtils_GenerateMetaUpdate]  
@TableName [varchar](50)  
WITH EXECUTE AS CALLER  
AS  
BEGIN -- proc start                                    
SET NOCOUNT ON;                                    
BEGIN TRY        --begin try                          
--CODE SNIPPET TO LIST TABLE COLUMNS         
-- RUN IN SSMS WITH cTRL + t FIRST TO OUTPUT THE RESULT TO TEXT FOR COPY PASTE        
--FIRST SEARCH THE TABLE WHICH HAD A "Feature" in its name         
--SELECT NAME FROM SYS.TABLES WHERE NAME LIKE '%Feature%'        
--select column_name from INFORMATION_SCHEMA.COLUMNS where TABLE_NAME='Feature'            
--Declare the Table variable             
DECLARE @ColNames TABLE            
(            
Number INT IDENTITY(1,1), --Auto incrementing Identity column            
ColName VARCHAR(300) , --The string value            
DataType varchar(50) --the datatype   
)            
--Decalre a variable to remember the position of the current delimiter            
DECLARE @CurrentDelimiterPositionVar INT             
--Decalre a variable to remember the number of rows in the table            
DECLARE @Count INT            
--Populate the TABLE variable using some logic            
INSERT INTO @ColNames SELECT column_name , Data_type from INFORMATION_SCHEMA.COLUMNS         
where TABLE_NAME=@TableName            
--Initialize the looper variable            
SET @CurrentDelimiterPositionVar = 1            
--Determine the number of rows in the Table            
SELECT @Count=max(Number) from @ColNames            
--A variable to hold the currently selected value from the table            
DECLARE @ColumnName varchar(300);            
DECLARE @DataType varchar(50)  
print '  
SET NOCOUNT ON;  
SET XACT_ABORT ON;  
GO  
SELECT TOP 5 * FROM ' + @TableName + ' order by 1 desc   
GO  
'  
print 'UPDATE ' + @TableName + ' SET '            
--Loop through until all row processing is done            
WHILE @CurrentDelimiterPositionVar <= @Count            
BEGIN            
--Load current value from the Table            
SELECT @ColumnName = ColName FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar  
SELECT @DataType = DataType FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar    
--Process the current value            
if @CurrentDelimiterPositionVar = @Count            
begin
print '[' + @ColumnName + ']= ''' + @ColumnName + '''--type of ' + @DataType 
-- this is the last row no comma!        
end
else         
begin
print '[' + @ColumnName + ']= ''' + @ColumnName + ''', --type of '  + @DataType 
-- print it without the ,        
-- print 'obj1.' + @ColumnName+ ' = obj2.'+ @ColumnName        
end
-- print @ColumnName    --SIMPLE PRINT        
--Increment loop counter            
SET @CurrentDelimiterPositionVar = @CurrentDelimiterPositionVar + 1;            
END            
print 'WHERE '            
--AND START ALL OVER AGAIN       
SET @CurrentDelimiterPositionVar = 1  
--Loop through until all row processing is done            
WHILE @CurrentDelimiterPositionVar <= @Count            
BEGIN            
--Load current value from the Table            
SELECT @ColumnName = ColName FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar  
SELECT @DataType = DataType FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar    
--Process the current value            
if @CurrentDelimiterPositionVar = @Count            
begin
print '[' + @ColumnName + ']=' +  ''''' -- type of ' + @DataType 
-- this is the last row no comma!        
end
else
begin         
print '[' + @ColumnName + ']=' +  ''''' AND -- type of ' + 
@DataType  
-- print it without the ,        
-- print 'obj1.' + @ColumnName+ ' = obj2.'+ @ColumnName        
-- print @ColumnName    --SIMPLE PRINT        
--Increment loop counter            
end
SET @CurrentDelimiterPositionVar = @CurrentDelimiterPositionVar + 1;            
END            
set nocount off         
PRINT '-- NOW VIEW THE RESULTS '        
PRINT 'Select top 5  * from '+ @TableName +' order by 1 desc   '  
END TRY        --end try                          
BEGIN CATCH                                
print ' Error number: ' + CAST(ERROR_NUMBER() AS varchar(100)) +                       
'Error message: ' + ERROR_MESSAGE() + 'Error severity: ' +         
CAST(ERROR_SEVERITY() AS varchar(10)) +                       
'Error state: ' + CAST(ERROR_STATE() AS varchar(100)) +         
'XACT_STATE: ' + CAST(XACT_STATE() AS varchar(100))                                
END CATCH                                
END --procedure end                                     
/*         
USE [Db]        
GO        
SELECT NAME FROM SYS.tables where name like '%Msg%'        
EXEC [dbo].[procUtils_GenerateMetaUpdate] @TableName = N'msg'  
GO        
*/ 

How-to generate insert statements for Sql Server 2005 , 2008



alter PROCEDURE [dbo].[procUtils_GenerateMetaInsert]  
@TableName [varchar](50)  
WITH EXECUTE AS CALLER  
AS  
BEGIN -- proc start                                    
SET NOCOUNT ON;                                    
BEGIN TRY        --begin try                          
--CODE SNIPPET TO LIST TABLE COLUMNS         
-- RUN IN SSMS WITH cTRL + t FIRST TO OUTPUT THE RESULT TO TEXT FOR COPY PASTE        
--FIRST SEARCH THE TABLE WHICH HAD A "Feature" in its name         
--SELECT NAME FROM SYS.TABLES WHERE NAME LIKE '%Feature%'        
--select column_name from INFORMATION_SCHEMA.COLUMNS where TABLE_NAME='Feature'            
--Declare the Table variable             
DECLARE @ColNames TABLE            
(            
Number INT IDENTITY(1,1), --Auto incrementing Identity column            
ColName VARCHAR(300) , --The string value            
DataType varchar(50) --the datatype   
)            
--Decalre a variable to remember the position of the current delimiter            
DECLARE @CurrentDelimiterPositionVar INT             
--Decalre a variable to remember the number of rows in the table            
DECLARE @Count INT            
--Populate the TABLE variable using some logic            
INSERT INTO @ColNames SELECT column_name , Data_type from INFORMATION_SCHEMA.COLUMNS         
where TABLE_NAME=@TableName            
--Initialize the looper variable            
SET @CurrentDelimiterPositionVar = 1            
--Determine the number of rows in the Table            
SELECT @Count=max(Number) from @ColNames            
--A variable to hold the currently selected value from the table            
DECLARE @ColumnName varchar(300);            
DECLARE @DataType varchar(50)  
print '  
SET NOCOUNT ON;  
SET XACT_ABORT ON;  
GO  
SET IDENTITY_INSERT [dbo].[' + @TableName + '] ON;  
SELECT TOP 5 * FROM ' + @TableName + ' order by 1 desc   
GO  
'  
print 'INSERT INTO ' + @TableName + '( '            
--Loop through until all row processing is done            
WHILE @CurrentDelimiterPositionVar <= @Count            
BEGIN            
--Load current value from the Table            
SELECT @ColumnName = ColName FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar  
SELECT @DataType = DataType FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar    
--Process the current value            
if @CurrentDelimiterPositionVar = @Count            
print '[' + @ColumnName + '] --type of ' + @DataType -- this is the last row no comma!        
else         
print '[' + @ColumnName + '], --type of '  + @DataType -- print it without the ,        
-- print 'obj1.' + @ColumnName+ ' = obj2.'+ @ColumnName        
-- print @ColumnName    --SIMPLE PRINT        
--Increment loop counter            
SET @CurrentDelimiterPositionVar = @CurrentDelimiterPositionVar + 1;            
END            
print ') VALUES ( '            
--AND START ALL OVER AGAIN       
SET @CurrentDelimiterPositionVar = 1  
--Loop through until all row processing is done            
WHILE @CurrentDelimiterPositionVar <= @Count            
BEGIN            
--Load current value from the Table            
SELECT @ColumnName = ColName FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar  
SELECT @DataType = DataType FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar    
--Process the current value            
if @CurrentDelimiterPositionVar = @Count            
print ''''' --[' + @ColumnName + '] type of ' + @DataType -- this is the last row no comma!        
else         
print ''''' , --[' + @ColumnName + '] type of ' + @DataType  -- print it without the ,        
-- print 'obj1.' + @ColumnName+ ' = obj2.'+ @ColumnName        
-- print @ColumnName    --SIMPLE PRINT        
--Increment loop counter            
SET @CurrentDelimiterPositionVar = @CurrentDelimiterPositionVar + 1;            
END            
set nocount off         
PRINT ')'  
PRINT '-- NOW VIEW THE RESULTS '        
PRINT 'Select top 5  * from '+ @TableName +' order by 1 desc   '  
END TRY        --end try                          
BEGIN CATCH                                
print ' Error number: ' + CAST(ERROR_NUMBER() AS varchar(100)) +                       
'Error message: ' + ERROR_MESSAGE() + 'Error severity: ' +         
CAST(ERROR_SEVERITY() AS varchar(10)) +                       
'Error state: ' + CAST(ERROR_STATE() AS varchar(100)) +         
'XACT_STATE: ' + CAST(XACT_STATE() AS varchar(100))                                
END CATCH                                
END --procedure end                                     
/*         
USE [GenApp]        
GO        
SELECT NAME FROM SYS.tables where name like '%Msg%'        
EXEC [dbo].[procUtils_GenerateMetaInsert] @TableName = N'msg'  
GO        
*/ 

2009-09-17

Generic Getter and Setter in C#



using System;
using System.Collections.Generic;
using System.Collections.Generic;
 
namespace GenApp.Dh
{
 
/// <summary>
/// Provides simple wrapping around generated single item 
/// for less refactoring during swaping of DAL generation libs
/// </summary>
public class HolderForItem<T>
{
private T _Item ; 
public void  SetItem (T item)
{
this._Item = (T)item;
} //eof Set
 
 
public T GetItem()
{
return (T)_Item;
} //eof 
 
} //eof class 
} //eof namespace 

2009-09-11

how-to generate list of column names of a table in sql server 2005 2008



USE [GenApp]
GO
/****** Object:  StoredProcedure [dbo].[procUtils_PrintTableCols]    Script Date: 09/11/2009 14:25:22 ******/
SET ANSI_NULLS ON
GO
SET QUOTED_IDENTIFIER ON
GO
ALTER PROCEDURE [dbo].[procUtils_PrintTableCols]
@TableName [varchar](50)
WITH EXECUTE AS CALLER
AS
BEGIN -- proc start                                  
SET NOCOUNT ON;                                  
BEGIN TRY        --begin try                        
--CODE SNIPPET TO LIST TABLE COLUMNS       
-- RUN IN SSMS WITH cTRL + t FIRST TO OUTPUT THE RESULT TO TEXT FOR COPY PASTE      
--FIRST SEARCH THE TABLE WHICH HAD A "Feature" in its name       
--SELECT NAME FROM SYS.TABLES WHERE NAME LIKE '%Feature%'      
--select column_name from INFORMATION_SCHEMA.COLUMNS where TABLE_NAME='Feature'          
--Declare the Table variable           
DECLARE @ColNames TABLE          
(          
Number INT IDENTITY(1,1), --Auto incrementing Identity column          
ColName VARCHAR(300) , --The string value          
DataType varchar(50) --the datatype 
)          
--Decalre a variable to remember the position of the current delimiter          
DECLARE @CurrentDelimiterPositionVar INT           
--Decalre a variable to remember the number of rows in the table          
DECLARE @Count INT          
--Populate the TABLE variable using some logic          
INSERT INTO @ColNames SELECT column_name , Data_type from INFORMATION_SCHEMA.COLUMNS       
where TABLE_NAME=@TableName          
--Initialize the looper variable          
SET @CurrentDelimiterPositionVar = 1          
--Determine the number of rows in the Table          
SELECT @Count=max(Number) from @ColNames          
--A variable to hold the currently selected value from the table          
DECLARE @ColumnName varchar(300);          
DECLARE @DataType varchar(50)
 
--Loop through until all row processing is done          
WHILE @CurrentDelimiterPositionVar <= @Count          
BEGIN          
--Load current value from the Table          
SELECT @ColumnName = ColName FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar
SELECT @DataType = DataType FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar  
--Process the current value          
if @CurrentDelimiterPositionVar = @Count          
print '[' + @ColumnName + '] --type of ' + @DataType -- this is the last row no comma!      
else       
print '[' + @ColumnName + '], --type of '  + @DataType -- print it without the ,      
-- print 'obj1.' + @ColumnName+ ' = obj2.'+ @ColumnName      
-- print @ColumnName    --SIMPLE PRINT      
--Increment loop counter          
SET @CurrentDelimiterPositionVar = @CurrentDelimiterPositionVar + 1;          
END          
PRINT 'Select top 5  * from '+ @TableName +' order by 1 desc   '
END TRY        --end try                        
BEGIN CATCH                              
print ' Error number: ' + CAST(ERROR_NUMBER() AS varchar(100)) +                     
'Error message: ' + ERROR_MESSAGE() + 'Error severity: ' +       
CAST(ERROR_SEVERITY() AS varchar(10)) +                     
'Error state: ' + CAST(ERROR_STATE() AS varchar(100)) +       
'XACT_STATE: ' + CAST(XACT_STATE() AS varchar(100))                              
END CATCH                              
END --procedure end                                   
/*       
USE [GenApp]      
GO      
SELECT NAME FROM SYS.tables where name like '%feature%'      
EXEC    [dbo].[procUtils_PrintTableCols] @TableName = N'fEATURE'
GO      
*/ 

How-to generate insert statements from a table name



alter PROCEDURE [dbo].[procUtils_GenerateMetaInsert]      
@TableName varchar(50)      
AS      
BEGIN -- proc start                                  
SET NOCOUNT ON;                                  
BEGIN TRY        --begin try                        
--CODE SNIPPET TO LIST TABLE COLUMNS       
-- RUN IN SSMS WITH cTRL + t FIRST TO OUTPUT THE RESULT TO TEXT FOR COPY PASTE      
--FIRST SEARCH THE TABLE WHICH HAD A "Feature" in its name       
--SELECT NAME FROM SYS.TABLES WHERE NAME LIKE '%Feature%'      
--select column_name from INFORMATION_SCHEMA.COLUMNS where TABLE_NAME='Feature'          
--Declare the Table variable           
DECLARE @ColNames TABLE          
(          
Number INT IDENTITY(1,1), --Auto incrementing Identity column          
ColName VARCHAR(300) , --The string value          
DataType varchar(50) --the datatype 
)          
--Decalre a variable to remember the position of the current delimiter          
DECLARE @CurrentDelimiterPositionVar INT           
--Decalre a variable to remember the number of rows in the table          
DECLARE @Count INT          
--Populate the TABLE variable using some logic          
INSERT INTO @ColNames SELECT column_name , Data_type from INFORMATION_SCHEMA.COLUMNS       
where TABLE_NAME=@TableName          
--Initialize the looper variable          
SET @CurrentDelimiterPositionVar = 1          
--Determine the number of rows in the Table          
SELECT @Count=max(Number) from @ColNames          
--A variable to hold the currently selected value from the table          
DECLARE @ColumnName varchar(300);          
DECLARE @DataType varchar(50)
print 'INSERT INTO ' + @TableName + '( '          
--Loop through until all row processing is done          
WHILE @CurrentDelimiterPositionVar <= @Count          
BEGIN          
--Load current value from the Table          
SELECT @ColumnName = ColName FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar
SELECT @DataType = DataType FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar  
--Process the current value          
if @CurrentDelimiterPositionVar = @Count          
print '[' + @ColumnName + '] --type of ' + @DataType -- this is the last row no comma!      
else       
print '[' + @ColumnName + '], --type of '  + @DataType -- print it without the ,      
-- print 'obj1.' + @ColumnName+ ' = obj2.'+ @ColumnName      
-- print @ColumnName    --SIMPLE PRINT      
--Increment loop counter          
SET @CurrentDelimiterPositionVar = @CurrentDelimiterPositionVar + 1;          
END          
print ') VALUES ( '          
--AND START ALL OVER AGAIN     
SET @CurrentDelimiterPositionVar = 1
--Loop through until all row processing is done          
WHILE @CurrentDelimiterPositionVar <= @Count          
BEGIN          
--Load current value from the Table          
SELECT @ColumnName = ColName FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar
SELECT @DataType = DataType FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar  
 
--Process the current value          
if @CurrentDelimiterPositionVar = @Count          
print ''''' --[' + @ColumnName + '] type of ' + @DataType -- this is the last row no comma!      
else       
print ''''' , --[' + @ColumnName + '] type of ' + @DataType  -- print it without the ,      
-- print 'obj1.' + @ColumnName+ ' = obj2.'+ @ColumnName      
-- print @ColumnName    --SIMPLE PRINT      
--Increment loop counter          
SET @CurrentDelimiterPositionVar = @CurrentDelimiterPositionVar + 1;          
END          
set nocount off       
PRINT ')'      
END TRY        --end try                        
BEGIN CATCH                              
print ' Error number: ' + CAST(ERROR_NUMBER() AS varchar(100)) +                     
'Error message: ' + ERROR_MESSAGE() + 'Error severity: ' +       
CAST(ERROR_SEVERITY() AS varchar(10)) +                     
'Error state: ' + CAST(ERROR_STATE() AS varchar(100)) +       
'XACT_STATE: ' + CAST(XACT_STATE() AS varchar(100))                              
END CATCH                              
END --procedure end                                   
/*       
USE [GenApp]      
GO      
EXEC    [dbo].[procUtils_GenerateMetaInsert] @TableName = N'Msg'
GO      
*/ 

2009-09-08

List columns from any table and generate code in tsql



--CODE SNIPPET TO LIST TABLE COLUMNS 
-- RUN IN SSMS WITH cTRL + t FIRST TO OUTPUT THE RESULT TO TEXT FOR COPY PASTE
 
--FIRST SEARCH THE TABLE WHICH HAD A "Feature" in its name 
--SELECT NAME FROM SYS.TABLES WHERE NAME LIKE '%Feature%'
 
--select column_name from INFORMATION_SCHEMA.COLUMNS where TABLE_NAME='Feature'    
--Declare the Table variable     
DECLARE @ColNames TABLE    
(    
Number INT IDENTITY(1,1), --Auto incrementing Identity column    
ColName VARCHAR(300) --The string value    
)    
--Decalre a variable to remember the position of the current delimiter    
DECLARE @CurrentDelimiterPositionVar INT     
--Decalre a variable to remember the number of rows in the table    
DECLARE @Count INT    
--Populate the TABLE variable using some logic    
INSERT INTO @ColNames SELECT column_name from INFORMATION_SCHEMA.COLUMNS 
where TABLE_NAME='Feature'    
--Initialize the looper variable    
SET @CurrentDelimiterPositionVar = 1    
--Determine the number of rows in the Table    
SELECT @Count=max(Number) from @ColNames    
--A variable to hold the currently selected value from the table    
DECLARE @CurrentValue varchar(300);    
--Loop through until all row processing is done    
WHILE @CurrentDelimiterPositionVar <= @Count    
BEGIN    
--Load current value from the Table    
SELECT @CurrentValue = ColName FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar    
--Process the current value    
if @CurrentDelimiterPositionVar = @Count    
print '[' + @CurrentValue + ']' -- this is the last row no comma!
else 
print '[' + @CurrentValue + '],' -- print it without the ,
-- print 'obj1.' + @CurrentValue+ ' = obj2.'+ @CurrentValue
 
-- print @CurrentValue    --SIMPLE PRINT
--Increment loop counter    
SET @CurrentDelimiterPositionVar = @CurrentDelimiterPositionVar + 1;    
END    
 
set nocount off 

How-to create a table and its according history table in tsql

The main principle -

recreate the table from ssms
with TableNameHistory
add A TableNameHistoryId with the identity
add an Action Column - specifies what is the action performed on the table to track
add an SqlLogin Column - specifies the sql login performing the action
add an UpdateWhen column - specifies the time of the update ( here Update means the UPDATE , DELETE , INSERT actions )

Copy paste this triggers and replace the name of the "Feature" table with the name of your table
+ replace the corresponing columns.

The whole thing could wrap up in a single DDL trigger for CREATE_TABLE. If you have done it , please share a code ...





USE [GenApp]
GO
 
/****** Object:  Table [dbo].[FeatureHistory]    Script Date: 09/08/2009 10:02:43 ******/
SET ANSI_NULLS ON
GO
 
SET QUOTED_IDENTIFIER ON
GO
 
SET ANSI_PADDING ON
GO
 
CREATE TABLE [dbo].[FeatureHistory](
[FeatureHistoryId] [int] IDENTITY(1,1) NOT NULL,
[FeatureId] [int] NOT NULL,
[Vote] [int] NULL,
[Key] [varchar](200) NULL,
[Title] [varchar](2000) NOT NULL,
[Description] [varchar](2000) NOT NULL,
[GenAppApplicationId] [int] NULL,
[FeatureHistoryTagId] [int] NULL,
[Action] [varchar](50) NULL,
[SqlLogin] [varchar](200) NULL,
[UpdateWhen] [datetime] NOT NULL,
CONSTRAINT [PK_FeatureHistory] PRIMARY KEY CLUSTERED 
(
[FeatureHistoryId] ASC
)WITH (PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON) ON [PRIMARY]
) ON [PRIMARY]
 
GO
 
SET ANSI_PADDING ON
GO
 
ALTER TABLE [dbo].[FeatureHistory] ADD  CONSTRAINT [DF_FeatureHistory_UpdateWhen]  DEFAULT (getdate()) FOR [UpdateWhen]
GO
 
 
 
USE [GenApp]
GO
 
/****** Object:  Table [dbo].[Feature]    Script Date: 09/08/2009 10:02:32 ******/
SET ANSI_NULLS ON
GO
 
SET QUOTED_IDENTIFIER ON
GO
 
SET ANSI_PADDING ON
GO
 
CREATE TABLE [dbo].[Feature](
[FeatureId] [int] IDENTITY(1,1) NOT NULL,
[Vote] [int] NULL,
[Key] [varchar](200) NULL,
[Title] [varchar](2000) NOT NULL,
[Description] [varchar](2000) NOT NULL,
[GenAppApplicationId] [int] NULL,
[FeatureTagId] [int] NULL,
CONSTRAINT [PK_Feature] PRIMARY KEY CLUSTERED 
(
[FeatureId] ASC
)WITH (PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON) ON [PRIMARY]
) ON [PRIMARY]
 
GO
 
SET ANSI_PADDING ON
GO
 
 
/****** Object:  Trigger [dbo].[trig_AfterDeleteOnFeature]    Script Date: 09/08/2009 10:02:32 ******/
SET ANSI_NULLS ON
GO
 
 
SET QUOTED_IDENTIFIER ON
GO
 
 
 
 
 
 
-- =============================================
-- Author:        <Yordan Georgiev>
-- Create date: <Create Date,,>
-- Description:    <Description,,>
-- =============================================
CREATE TRIGGER [dbo].[trig_AfterDeleteOnFeature]    
ON  [dbo].[Feature]
for Delete
AS 
BEGIN
-- SET NOCOUNT ON added to prevent extra result sets from
-- interfering with SELECT statements.
SET NOCOUNT ON;
Insert into FeatureHistory 
( 
[FeatureId] , 
[Vote],
[Key],
[Title],
[Description],
[GenAppApplicationId],
[FeatureHistoryTagId],
[SqlLogin] , 
[Action],
[UpdateWhen]
 
)
 
select
[FeatureId] , 
[Vote],
[Key],
[Title],
[Description],
[GenAppApplicationId],
[FeatureTagId],
user_name(),
'DELETE',
getdate()
 
from Deleted
 
END
 
 
 
 
GO
 
 
/****** Object:  Trigger [dbo].[trig_AfterInsertOnFeature]    Script Date: 09/08/2009 10:02:32 ******/
SET ANSI_NULLS ON
GO
 
 
SET QUOTED_IDENTIFIER ON
GO
 
 
 
 
 
-- =============================================
-- Author:        <Yordan Georgiev>
-- Create date: <Create Date,,>
-- Description:    <Description,,>
-- =============================================
CREATE TRIGGER [dbo].[trig_AfterInsertOnFeature]    
ON  [dbo].[Feature]
AFTER insert
AS 
BEGIN
-- SET NOCOUNT ON added to prevent extra result sets from
-- interfering with SELECT statements.
SET NOCOUNT ON;
insert     into FeatureHistory 
( 
[FeatureId] , 
[Vote],
[Key],
[Title],
[Description],
[GenAppApplicationId],
[FeatureHistoryTagId],
[Action],
[SqlLogin],
[UpdateWhen]
 
)
 
select
[FeatureId] , 
[Vote],
[Key],
[Title],
[Description],
[GenAppApplicationId],
[FeatureTagId],
'INSERT',
user_name(), 
getdate()
 
from Feature where FeatureId in (select FeatureId from inserted)
select current_user
END
 
 
 
GO
 
 
/****** Object:  Trigger [dbo].[trig_AfterUpdateOnFeature]    Script Date: 09/08/2009 10:02:32 ******/
SET ANSI_NULLS ON
GO
 
 
SET QUOTED_IDENTIFIER ON
GO
 
 
 
 
 
 
 
-- =============================================
-- Author:        <Yordan Georgiev>
-- Create date: <Create Date,,>
-- Description:    <Description,,>
-- =============================================
CREATE TRIGGER [dbo].[trig_AfterUpdateOnFeature]    
ON  [dbo].[Feature]
AFTER UPDATE
AS 
BEGIN
-- SET NOCOUNT ON added to prevent extra result sets from
-- interfering with SELECT statements.
SET NOCOUNT ON;
insert     into FeatureHistory 
(
[FeatureId] ,  
[Vote],
[Key],
[Title],
[Description],
[GenAppApplicationId],
[FeatureHistoryTagId],
[SqlLogin] , 
[Action],
[UpdateWhen]
 
)
 
select
[FeatureId] , 
[Vote],
[Key],
[Title],
[Description],
[GenAppApplicationId],
[FeatureTagId],
user_name() , 
'UPDATE'  , 
getdate()
 
from Feature where FeatureId in (select FeatureId from inserted)
 
END
 
 
 
 
 
GO
 
 

Labels

perl (41) Cheat Sheet (25) how-to (24) windows (14) sql server 2008 (13) linux (12) oracle (12) sql (12) Unix (11) cmd windows batch (10) mssql (10) cmd (9) script (9) textpad (9) netezza (8) sql server 2005 (8) cygwin (7) meta data mssql (7) metadata (7) bash (6) code generation (6) Informatica (5) cheatsheet (5) energy (5) tsql (5) utilities (5) excel (4) future (4) generic (4) html (4) perl modules (4) programs (4) settings (4) sh (4) shortcuts (4) поуки (4) принципи (4) Focus Fusion (3) Solaris (3) cool programs (3) development (3) economy (3) example (3) freeware (3) fusion (3) git cheat sheet (3) logging (3) morphus (3) mssql 2005 (3) nuclear (3) nz (3) parse (3) python (3) sftp (3) sofware development (3) source (3) sqlplus (3) table (3) vim (3) .Net (2) C# (2) China (2) GUI (2) Google (2) GoogleCL (2) Solaris Unix (2) ascii (2) awk (2) batch (2) cas (2) chrome extensions (2) code2html (2) columns (2) configuration (2) conversion (2) duplicates (2) excel shortcuts (2) export (2) file (2) free programs (2) informatica sql repository (2) linux cheat sheet (2) mssql 2008 (2) mysql (2) next big future (2) nsis (2) nz netezza cheat sheet (2) nzsql (2) ora (2) prediction (2) publish (2) release management (2) report (2) security (2) single-click (2) sqlserver 2005 (2) sqlserver 2008 (2) src (2) ssh (2) template (2) tools (2) vba (2) video (2) xlt (2) xml (2) youtube videos (2) *nix (1) .vimrc (1) .virmrc vim settings configs (1) BSD license (1) Bulgaria (1) Dallas (1) Database role (1) Dense plasma focus (1) Deployment (1) ERP (1) ExcelToHtml (1) GD (1) GDP (1) HP-UX (1) Hosting (1) INC (1) IT general (1) ITIL management bullshit-management (1) IZarc (1) Java Web Start (1) JavaScript anchor html jquery (1) Khan Academy (1) LINUX UNIX BASH AND CYGWIN TIPS AND TRICKS (1) Linux Unix rpm cpio build install configure (1) Linux git source build .configure make (1) ListBox (1) MIT HYDROGEN VIRUS (1) OO (1) Obama (1) PowerShell (1) Run-time (1) SDL (1) SIWA (1) SOX (1) Scala (1) Services (1) Stacks (1) SubSonic (1) TED (1) abstractions (1) ansible hosts linux bash (1) ansible linux deployment how-to (1) ansible yum pip python (1) apache (1) apache 2.2 (1) application life cycle (1) architecture (1) archive (1) arguments (1) avatar (1) aws cheat sheet cli (1) aws cli (1) aws cli amazon cheat sheet (1) aws elb (1) backup (1) bash Linux open-ssh ssh ssh_server ssh_client public-private key authentication (1) bash perl search and replace (1) bash stub (1) bin (1) biofuels (1) biology (1) books (1) browser (1) bubblesort (1) bugs (1) build (1) byte (1) cas_sql_dev (1) chennai (1) chrome (1) class (1) claut (1) cmdow (1) code generation sqlserver (1) command (1) command line (1) conf (1) confluence (1) console (1) convert (1) cool programs windows free freeware (1) copy-paste (1) csv (1) ctags (1) current local time (1) cygwin X11 port-forwarding mintty xclock Linux Unix X (1) cygwin bash how-to tips_n_tricks (1) cygwin conf how-to (1) data (1) data types (1) db2 cheat sheet (1) db2 starter ibm bash Linux (1) debt (1) diagram (1) dictionaries (1) digital (1) disk (1) disk space (1) documentation (1) dos (1) dubai (1) e-cars (1) electric cars (1) electricity (1) emulate (1) errors (1) exponents (1) export workflow (1) extract (1) fast export (1) fexp (1) file extension (1) file permissions (1) findtag (1) firewall (1) for loop (1) freaky (1) functions (1) fusion research (1) german (1) git gitlab issues handling system (1) google cli (1) google code (1) google command line interface (1) gpg (1) ha (1) head (1) helsinki (1) history (1) hop or flop (1) host-independant (1) how-to Windows cmd time date datetime (1) ibm db2 cognos installation example db deployment provisioning (1) ideas (1) image (1) informatica oracle sql (1) informatica repo sql workflows sessions file source dir (1) informatica source files etl (1) install (1) isg-pub issue-tracker architecture (1) it management best practices (1) java (1) jump to (1) keyboard shortcuts (1) ksh (1) level (1) linkedin (1) linux bash ansible hosts (1) linux bash commands (1) linux bash how-to shell expansion (1) linux bash shell grep xargs (1) linux bash tips and t ricks (1) linux bash unix cygwin cheatsheet (1) linux bash user accounts password (1) linux bash xargs space (1) linux cheat-sheet (1) linux cheatsheet cheat-sheet revised how-to (1) linux how-to non-root vim (1) linux ssh hosts parallel subshell bash oneliner (1) london (1) make (1) me (1) metacolumn (1) metadata functions (1) metaphonre (1) method (1) model (1) movie (1) multithreaded (1) mysql cheat sheet (1) mysql how-to table datatypes (1) n900 (1) nano (1) neteza (1) netezza bash linux nps (1) netezza nps (1) netezza nps nzsql (1) netezza nz Linux bash (1) netezza nz bash linux (1) netezza nz nzsql sql (1) netezza nzsql database db sizes (1) non-password (1) nord pol (1) nps backup nzsql schema (1) number formatting (1) nz db size (1) nz table count rows (1) nzsql date timestamp compare bigint to_date to_char now (1) on-lier (1) one-liners (1) one-to-many (1) oneliners (1) open (1) open source (1) openrowset (1) openssl (1) oracle PL/SQL (1) oracle Perl perl (1) oracle installation usability (1) oracle number formatting format-model ora-sql oracle (1) oracle templates create table (1) oracle trigger generic autoincrement (1) oracle vbox virtual box cheat sheet (1) oracle virtual box cheat sheet (1) outlook (1) parser (1) password (1) paths (1) perl @INC compile-time run-time (1) perl disk usage administration Linux Unix (1) perl modules configuration management (1) permissions (1) php (1) picasa (1) platform (1) postgreSQL how-to (1) powerShell cmd cygwin mintty.exe terminal (1) ppm (1) predictions (1) prices (1) principles (1) productivity (1) project (1) prompt (1) proxy account (1) public private key (1) publishing (1) putty (1) qt (1) read file (1) registry (1) relationship (1) repository (1) rm (1) scala ScalaFmt (1) scp (1) scripts (1) scsi (1) search and replace (1) sed (1) sendEmail (1) sh stub (1) shortcuts Windows sql developer Oracle (1) sidebar (1) silicon (1) smtp (1) software procurement (1) sofware (1) sort (1) sql script (1) sql_dev (1) sqlcmd (1) sqlite (1) sqlite3 (1) sshd (1) sshd cygwin (1) stackoverflow (1) stored procedure (1) stub (1) stupidity (1) subroutines (1) svn (1) sysinternals (1) tail (1) tar (1) temp table (1) templates (1) teradata (1) terminal (1) test (1) testing (1) theory (1) thorium (1) time (1) tip (1) title (1) tmux .tmux.conf configuration (1) tmux efficiency bash (1) tool (1) ui code prototyping tips and tricks (1) umask Linux Unix bash file permissions chmod (1) url (1) urls (1) user (1) utility (1) utils (1) vb (1) vbox virtual box cheat sheet (1) vim perl regex bash search for string (1) vim recursively hacks (1) vim starter (1) vim-cheat-sheet vim cheat-sheet (1) vimeo (1) visual stuio (1) warsaw (1) wiki (1) wikipedia (1) window (1) windows 7 (1) windows 8 (1) windows programs (1) windows reinstall (1) windows utility batch perl space Windows::Clipboard (1) wisdoms (1) workflow (1) worth-reading (1) wrapper (1) xp_cmdshell (1) xslt (1) youtube (1)

Blog Archive

Translate with Google Translate

My Blog List

VideoBar

This content is not yet available over encrypted connections.