Search This Blog

2009-11-27

Generic way of creation history tables in tsql with triggers on update , insert , delete



 
---
CREATE PROCEDURE [dbo].[procUtils_GenerateHistoryTable]            
@TableName [varchar](200)            
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                           
IsNullable varchar(3),  -- whether or not this table col is nullable            
MaxLength int --the CHARACTER_MAXIMUM_LENGTH        
)                                    
--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 @sqlTxtToPrint varchar(max)            
DECLARE @nowNiceTime varchar(400)        
set @nowNiceTime = dbo.funcGetNiceTime()         
--select * from sys.objects where object_name(object_id) like '%func%'        
SET @sqlTxtToPrint = ' USE Gaf             
GO'            
--PRINT THE SQL TO         
SET @sqlTxtToPrint = @sqlTxtToPrint +         
'  
USE [Gaf]  
GO  
/****** Object:  Table ' + @TableName + 'History    Script Date: ' + @nowNiceTime + ' ******/  
IF  EXISTS (SELECT * FROM sys.objects WHERE object_id = OBJECT_ID(N''' + @TableName + 'History'') AND type in (N''U''))  
DROP TABLE ' + @TableName + 'History  
GO  
USE [Gaf]  
GO  
/****** Object:  Table ' + @TableName + 'History    Script Date: ' + @nowNiceTime + ' ******/  
SET ANSI_NULLS ON  
GO  
SET QUOTED_IDENTIFIER ON  
GO  
SET ANSI_PADDING ON  
GO  
'        
--Populate the TABLE variable using some logic                                    
-- SELECT *  from INFORMATION_SCHEMA.COLUMNS                     
INSERT INTO @ColNames SELECT column_name , Data_type , IS_NULLABLE , CHARACTER_MAXIMUM_LENGTH 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 @ColName varchar(300);                                    
DECLARE @DataType varchar(50)          
DECLARE @PkColName varchar(200)            
DECLARE @IsNullable varchar(3)            
DECLARE @MaxLength int         
set @sqlTxtToPrint = @sqlTxtToPrint + '                          
SET NOCOUNT ON;                          
SET XACT_ABORT ON;                          
CREATE TABLE [dbo].[' + @TableName + 'History](' + CHAR(13)                          
--Loop through until all row processing is done                            
WHILE @CurrentDelimiterPositionVar <= @Count --while 1        
BEGIN                                    
--Load current value from the Table                                    
SELECT @ColName = ColName FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar              
SELECT @DataType = DataType FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar             
SELECT @IsNullable = IsNullable FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar         
SELECT @MaxLength = MaxLength FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar         
--PRINT EACH COLUMN WITH , AT THE END             
if @CurrentDelimiterPositionVar = 1             
BEGIN --IF THIS IS THE FIRST COL = PK            
set @PkColName = @TableName + 'HistoryId'             
set @sqlTxtToPrint = @sqlTxtToPrint +              
'[' + @PkColName + '][int] IDENTITY(1,1) NOT NULL,' + CHAR(13)            
END --IF THIS IS THE FIRST COL = PK            
SET @sqlTxtToPrint =  @sqlTxtToPrint + '[' + @ColName + ']' + ' ['+ @DataType +  '] '              
--ADD THE (200)              
IF @MaxLength IS NOT NULL               
BEGIN --IF @CHARACTER_MAXIMUM_LENGTH IS NOT NULL               
--xml              
if @DataType != 'xml' and @DataType != 'sql_variant' and @DataType != 'text' and @DataType != 'ntext' and @DataType != 'image' and @DataType != 'hierarchyid' and @DataType != 'binary' and @DataType != 'varbinary'               
begin --those with()              
if @MaxLength != -1            
SET @sqlTxtToPrint =                
@sqlTxtToPrint + '(' + CONVERT(VARCHAR , @MaxLength ) + ')'                 
else             
SET @sqlTxtToPrint =    @sqlTxtToPrint + '(max)'                 
end --those with(200)              
else               
begin               
SET @sqlTxtToPrint =  @sqlTxtToPrint               
end                 
END --IF @CHARACTER_MAXIMUM_LENGTH IS NOT NULL               
--ADD NULL , NOT NULL DEPENDING WHETHER OR NOT THE COLUMN IS NULLABLE    
IF @IsNullable = 'YES'             
SET @sqlTxtToPrint = + @sqlTxtToPrint + ' NULL '              
else     
SET @sqlTxtToPrint = + @sqlTxtToPrint + ' NOT NULL '              
--if @CurrentDelimiterPositionVar != @Count               
SET @sqlTxtToPrint = @sqlTxtToPrint + ','              
IF @DataType != 'timestamp'              
--DEBUGGING              
--PRINT '@ColName - ' + @ColName               
--PRINT '@DataType - ' + @DataType                        
--PRINT '@IsNullable - ' + @IsNullable               
--PRINT '@CHARACTER_MAXIMUM_LENGTH - ' +  CONVERT ( VARCHAR , @CHARACTER_MAXIMUM_LENGTH )              
SET @CurrentDelimiterPositionVar = @CurrentDelimiterPositionVar + 1;                             set @sqlTxtToPrint = @sqlTxtToPrint + CHAR(13)         
END --eof while 1                          
SET @CurrentDelimiterPositionVar  = 1    
set @sqlTxtToPrint = @sqlTxtToPrint +      
'[SqlLogin] [varchar](50) NOT NULL,            
[Action] [varchar](50) NOT NULL,            
[UpdatedWhen] [datetime] NOT NULL,  
CONSTRAINT [PK_' + @TableName + 'History] PRIMARY KEY CLUSTERED 
(
[' + @PkColName + '] ASC
)WITH (PAD_INDEX  = OFF, STATISTICS_NORECOMPUTE  = OFF, IGNORE_DUP_KEY = OFF, ALLOW_ROW_LOCKS  = ON, ALLOW_PAGE_LOCKS  = ON) ON [PRIMARY]
) ON [PRIMARY]
 
 
SET ANSI_PADDING ON            
'            
--NOW ADD SOME USEFULL STATEMENTS             
set @sqlTxtToPrint = @sqlTxtToPrint +              
+ ' --SELECT NAME FROM SYS.PROCEDURES WHERE NAME LIKE ''%PROC%''' + CHAR(13)                   
+ ' --SELECT NAME FROM SYS.TABLES WHERE NAME LIKE ''%TABLE%'''    + CHAR(13)                
+ ' --exec sp_HelpText procUtils_GenerateMetaInsert'        + CHAR(13)            
+ ' --exec procUtils_GenerateMetaInsert ''TABLE'''        + CHAR(13)            
--AT THE END PRINT THE RESULT             
PRINT @sqlTxtToPrint            
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 [Gaf]                                
GO                                
SELECT NAME FROM SYS.tables where name like '%Msg%'                                
EXEC [dbo].[procUtils_GenerateHistoryTable] @TableName = N'PlEditItem'                          
*/ 
 
 
---
CREATE  PROCEDURE [dbo].[procUtils_GenerateOnDeleteTrigger]    
@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 '                    
USE [Gaf]  
GO  
/****** Object:  Trigger [trigGen_AfterDeleteOn' + @TableName + ']    Script Date: 11/25/2009 10:35:45 ******/  
IF  EXISTS (SELECT * FROM sys.triggers WHERE object_id = OBJECT_ID(N''[dbo].[trigGen_AfterDeleteOn' + @TableName + ']''))  
DROP TRIGGER [dbo].[trigGen_AfterDeleteOn' + @TableName + ']  
GO  
USE [Gaf]  
GO  
/****** Object:  Trigger [dbo].[trigGen_AfterDeleteOn' + @TableName + ']    Script Date: 11/25/2009 10:35:45 ******/  
SET ANSI_NULLS ON  
GO  
SET QUOTED_IDENTIFIER ON  
GO  
-- =============================================  
-- Author:  <Yordan Georgiev>  
-- Create date: <Create Date,,>  
-- Description: <Description,,>  
-- =============================================  
CREATE TRIGGER  [dbo].[trigGen_AfterDeleteOn' + @TableName + ']   
ON  [dbo].[' + @TableName + ']  
for Delete  
AS   
BEGIN  
-- SET NOCOUNT ON added to prevent extra result sets from  
-- interfering with SELECT statements.  
SET NOCOUNT ON;  
Insert into ' + @TableName + 'History   
(   
'                    
--Loop through until all row processing is done                              
WHILE @CurrentDelimiterPositionVar <= @Count --while 1  
BEGIN           
--Load current value from the Table                              
SELECT @ColumnName = ColName FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar                    
SELECT @DataType = DataType FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar          
--DO SOMETHING TO THE FIRST COLUMN   
--if ( @CurrentDelimiterPositionVar = 1 )     
--begin    
--set @CurrentDelimiterPositionVar =@CurrentDelimiterPositionVar + 1    
-- continue    
--end    
--Process the current value                              
if @CurrentDelimiterPositionVar = @Count                              
print '[' + @ColumnName + '] , --type of ' + @DataType -- this is the last row this time with 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 --eof while 1                             
print '  
[SqlLogin],  
[Action],  
[UpdatedWhen]  
)  
SELECT   
'  
-- end the insert into STATEMENT  
--SELECT TOP 5 * FROM ' + @TableName + ' order by 1 desc                     
--AND START ALL OVER AGAIN        
SET @CurrentDelimiterPositionVar = 1                    
--Loop through until all row processing is done              
WHILE @CurrentDelimiterPositionVar <= @Count --while 2 start  
BEGIN                              
--Load current value from the Table                              
SELECT @ColumnName = ColName FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar                    
SELECT @DataType = DataType FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar               
--DO SOMETHING TO THE FIRST COLUMN   
--if ( @CurrentDelimiterPositionVar = 1 )     
--begin    
--set @CurrentDelimiterPositionVar =@CurrentDelimiterPositionVar + 1    
-- continue    
--end    
--Process the current value                              
if @CurrentDelimiterPositionVar = @Count                              
print '[' + @ColumnName + '] , --type of ' + @DataType -- this is the last row this with  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 --eof while 2  
print 'user_name(),  
''DELETE'',  
getdate()'  
print '   
from Deleted  
END  
GO  
'  
PRINT '--SELECT * FROM [dbo].[' + @TableName + 'History] ORDER BY 1 DESC '          
PRINT '--SELECT NAME FROM SYS.PROCEDURES WHERE NAME LIKE ''%PROC%'''              
PRINT '--SELECT NAME FROM SYS.TABLES WHERE NAME LIKE ''%TABLE%'''              
PRINT '--exec sp_HelpText procUtils_GenerateMetaInsert'              
PRINT '--exec procUtils_GenerateMetaInsert ''TABLE'''              
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 [Gaf]                          
GO                          
SELECT NAME FROM SYS.tables where name like '%Msg%'                          
EXEC [dbo].[procUtils_GenerateOnDeleteTrigger] @TableName = N'Requirement'                    
GO                          
*/ 
 
 
---
 
CREATE PROCEDURE [dbo].[procUtils_GenerateOnUpdateTrigger]
@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                                
DECLARE @PkColName varchar(200)                                 
--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 '                      
USE [Gaf]    
GO    
/****** Object:  Trigger [trigGen_AfterUpdateOn' + @TableName + ']    Script Date: 11/25/2009 10:35:45 ******/    
IF  EXISTS (SELECT * FROM sys.triggers WHERE object_id = OBJECT_ID(N''[dbo].[trigGen_AfterUpdateOn' + @TableName + ']''))    
DROP TRIGGER [dbo].[trigGen_AfterUpdateOn' + @TableName + ']    
GO    
USE [Gaf]    
GO    
/****** Object:  Trigger [dbo].[trigGen_AfterUpdateOn' + @TableName + ']    Script Date: 11/25/2009 10:35:45 ******/    
SET ANSI_NULLS ON    
GO    
SET QUOTED_IDENTIFIER ON    
GO    
-- =============================================    
-- Author:  <Yordan Georgiev>    
-- Create date: <Create Date,,>    
-- Description: <Description,,>    
-- =============================================    
CREATE TRIGGER  [dbo].[trigGen_AfterUpdateOn' + @TableName + ']     
ON  [dbo].[' + @TableName + ']    
for Update    
AS     
BEGIN    
-- SET NOCOUNT ON added to prevent extra result sets from    
-- interfering with SELECT statements.    
SET NOCOUNT ON;    
Insert into ' + @TableName + 'History     
(     
'                      
--Loop through until all row processing is done                                
WHILE @CurrentDelimiterPositionVar <= @Count --while 1    
BEGIN                                
--Load current value from the Table                                
SELECT @ColumnName = ColName FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar                      
SELECT @DataType = DataType FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar            
--DO SOMETHING TO THE FIRST COLUMN     
if ( @CurrentDelimiterPositionVar = 1 )       
begin      
SET @PkColName = @ColumnName    
end      
if @CurrentDelimiterPositionVar = @Count                                
print '[' + @ColumnName + '] , --type of ' + @DataType -- this is the last row this time with 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 --eof while 1                               
print '    
[SqlLogin],    
[Action],    
[UpdatedWhen]    
)    
SELECT     
'    
-- end the insert into STATEMENT    
--SELECT TOP 5 * FROM ' + @TableName + ' order by 1 desc                       
--AND START ALL OVER AGAIN          
SET @CurrentDelimiterPositionVar = 1                      
--Loop through until all row processing is done                
WHILE @CurrentDelimiterPositionVar <= @Count --while 2 start    
BEGIN                                
--Load current value from the Table                                
SELECT @ColumnName = ColName FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar                      
SELECT @DataType = DataType FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar                 
--DO SOMETHING TO THE FIRST COLUMN     
--if ( @CurrentDelimiterPositionVar = 1 )       
--begin      
--set @CurrentDelimiterPositionVar =@CurrentDelimiterPositionVar + 1      
-- continue      
--end      
--Process the current value                                
if @CurrentDelimiterPositionVar = @Count                                
print '[' + @ColumnName + '] , --type of ' + @DataType -- this is the last row this with  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 --eof while 2    
print 'user_name(),    
''UPDATE'',    
getdate()'    
print '     
from '+ @TableName + ' where '+ @PkColName + ' in (select ' + @PkColName + ' from Inserted)    
END    
GO    
'    
PRINT '--SELECT * FROM [dbo].[' + @TableName + 'History] ORDER BY 1 DESC '            
PRINT '--SELECT NAME FROM SYS.PROCEDURES WHERE NAME LIKE ''%PROC%'''                
PRINT '--SELECT NAME FROM SYS.TABLES WHERE NAME LIKE ''%TABLE%'''                
PRINT '--exec sp_HelpText procUtils_GenerateMetaInsert'                
PRINT '--exec procUtils_GenerateMetaInsert ''TABLE'''                
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 [Gaf]                            
GO                            
SELECT NAME FROM SYS.tables where name like '%Msg%'                            
EXEC [dbo].[procUtils_GenerateOnInsertTrigger] @TableName = N'Requirement'                      
GO                            
*/ 
 
 
---
CREATE PROCEDURE [dbo].[procUtils_GenerateOnInsertTrigger]      
@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                                
DECLARE @PkColName varchar(200)                                 
--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 '                      
USE [Gaf]    
GO    
/****** Object:  Trigger [trigGen_AfterInsertOn' + @TableName + ']    Script Date: 11/25/2009 10:35:45 ******/    
IF  EXISTS (SELECT * FROM sys.triggers WHERE object_id = OBJECT_ID(N''[dbo].[trigGen_AfterInsertOn' + @TableName + ']''))    
DROP TRIGGER [dbo].[trigGen_AfterInsertOn' + @TableName + ']    
GO    
USE [Gaf]    
GO    
/****** Object:  Trigger [dbo].[trigGen_AfterInsertOn' + @TableName + ']    Script Date: 11/25/2009 10:35:45 ******/    
SET ANSI_NULLS ON    
GO    
SET QUOTED_IDENTIFIER ON    
GO    
-- =============================================    
-- Author:  <Yordan Georgiev>    
-- Create date: <Create Date,,>    
-- Description: <Description,,>    
-- =============================================    
CREATE TRIGGER  [dbo].[trigGen_AfterInsertOn' + @TableName + ']     
ON  [dbo].[' + @TableName + ']    
for Insert    
AS     
BEGIN    
-- SET NOCOUNT ON added to prevent extra result sets from    
-- interfering with SELECT statements.    
SET NOCOUNT ON;    
Insert into ' + @TableName + 'History     
(     
'                      
--Loop through until all row processing is done                                
WHILE @CurrentDelimiterPositionVar <= @Count --while 1    
BEGIN                                
--Load current value from the Table                                
SELECT @ColumnName = ColName FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar                      
SELECT @DataType = DataType FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar            
--DO SOMETHING TO THE FIRST COLUMN     
if ( @CurrentDelimiterPositionVar = 1 )       
begin      
SET @PkColName = @ColumnName    
end      
if @CurrentDelimiterPositionVar = @Count                                
print '[' + @ColumnName + '] , --type of ' + @DataType -- this is the last row this time with 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 --eof while 1                               
print '    
[SqlLogin],    
[Action],    
[UpdatedWhen]    
)    
SELECT     
'    
-- end the insert into STATEMENT    
--SELECT TOP 5 * FROM ' + @TableName + ' order by 1 desc                       
--AND START ALL OVER AGAIN          
SET @CurrentDelimiterPositionVar = 1                      
--Loop through until all row processing is done                
WHILE @CurrentDelimiterPositionVar <= @Count --while 2 start    
BEGIN                                
--Load current value from the Table                                
SELECT @ColumnName = ColName FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar                      
SELECT @DataType = DataType FROM @ColNames WHERE Number = @CurrentDelimiterPositionVar                 
--DO SOMETHING TO THE FIRST COLUMN     
--if ( @CurrentDelimiterPositionVar = 1 )       
--begin      
--set @CurrentDelimiterPositionVar =@CurrentDelimiterPositionVar + 1      
-- continue      
--end      
--Process the current value                                
if @CurrentDelimiterPositionVar = @Count                                
print '[' + @ColumnName + '] , --type of ' + @DataType -- this is the last row this with  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 --eof while 2    
print 'user_name(),    
''INSERT'',    
getdate()'    
print '     
from '+ @TableName + ' where '+ @PkColName + ' in (select ' + @PkColName + ' from Inserted)  
END    
GO    
'    
PRINT '--SELECT * FROM [dbo].[' + @TableName + 'History] ORDER BY 1 DESC '            
PRINT '--SELECT NAME FROM SYS.PROCEDURES WHERE NAME LIKE ''%PROC%'''                
PRINT '--SELECT NAME FROM SYS.TABLES WHERE NAME LIKE ''%TABLE%'''                
PRINT '--exec sp_HelpText procUtils_GenerateMetaInsert'                
PRINT '--exec procUtils_GenerateMetaInsert ''TABLE'''                
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 [Gaf]                            
GO                            
SELECT NAME FROM SYS.tables where name like '%Msg%'                            
EXEC [dbo].[procUtils_GenerateOnInsertTrigger] @TableName = N'Msg'                      
GO                            
*/ 
 
 
---
CREATE PROCEDURE [dbo].[procUtils_GenerateTableHistorySql]  
@TableName varchar(50)
WITH EXECUTE AS CALLER  
AS  
BEGIN -- proc start                              
SET NOCOUNT ON;                              
declare @procedureName varchar(200)          
declare @procStep varchar(4000)    
declare @thisProcName varchar(300)  
set @thisProcName= ( SELECT OBJECT_NAME(@@PROCID))          
set @procStep = ' '       
BEGIN TRY        --begin try                    
 
 
 
-- Action !!!
exec procUtils_GenerateHistoryTable @TableName 
exec procUtils_GenerateOnInsertTrigger @TableName
exec procUtils_GenerateOnUpdateTrigger @TableName
exec procUtils_GenerateOnDeleteTrigger @TableName
 
 
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 [Gaf]  
GO  
DECLARE @return_value int,  
@ret int  
EXEC @return_value = [dbo].[procUtils_GenerateTableHistorySql1]  
@UserSessionId = 2,  
@PageTypeId = 12,  
@msgOut = NULL,  
@debugMsgOut = NULL,  
@ret = @ret OUTPUT  
SELECT @ret as N'@ret'  
SELECT 'Return Value' = @return_value  
SELECT NAME FROM SYS.PROCEDURES WHERE NAME LIKE '%grep%'  
exec SP_HelpText 'proc'  
GO  
*/ 
 

No comments:

Post a Comment

- the first minus - Comments have to be moderated because of the spammers
- the second minus - I am very lazy at moderating comments ... hardly find time ...
- the third minus - Short links are no good for security ...
- The REAL PLUS : Any critic and positive feedback is better than none, so your comments will be published sooner or later !!!!

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) git cheat sheet (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) 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) architecture (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) IDEA (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 input output (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) 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) smells (1) smtp (1) software development (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) system design (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