Skip to main content

List all triggers in a database with its source code

Yesterday I saw a question in a forum asking for help in writing a script to list out all Triggers within a database. They also wanted to see the source code of each trigger.

Method 1: Which works in SQL Server 2000, SQL Server 2005 and SQL Server 2008.

But the problem with SYSCOMMENTS is it would truncate any text beyond 4000 characters. As the "Text" column which preserves the source code is declared as NVARCHAR(8000).

/*
Written By: Vadivel Mohanakrishnan
Date: Oct 10, 2011
URL: http://vadivel.blogspot.com
Purpose:  To list all triggers in the current database along with the actual text/source code. It also lists what of type of trigger it is. 


But for all future development we should avoid using SYSOBJECTS, SYSCOMMENTS as it might be removed in the future versions.
*/
SELECT
  SO2.Name AS [Table Name],
    SO1.name AS [Trigger Name],
  OBJECTPROPERTY( [so1].[id], 'ExecIsUpdateTrigger') AS [isUpdate],
    OBJECTPROPERTY( [so1].[id], 'ExecIsDeleteTrigger') AS [isDelete],
    OBJECTPROPERTY( [so1].[id], 'ExecIsInsertTrigger') AS [isInsert],
    OBJECTPROPERTY( [so1].[id], 'ExecIsAfterTrigger') AS [isAfter],
    OBJECTPROPERTY( [so1].[id], 'ExecIsInsteadOfTrigger') AS [isInsteadOf],
    OBJECTPROPERTY([so1].[id], 'ExecIsTriggerDisabled') AS [isDisabled],
    SC.Text AS [Source Code]
FROM
SYSOBJECTS SO1 
    Inner Join SYSOBJECTS SO2 On SO1.parent_obj = SO2.id
    Inner Join SYSCOMMENTS SC On SO1.id = SC.id
WHERE      
SO1.xtype = 'TR' And SO2.xtype = 'U'
ORDER BY 
SO2.Name, SO1.name
GO

Method 2: Works with SQL Server 2005 and above.

This method doesn't have the problem of text getting truncated beyond 4000 characters because the column "definition" of SYS.SQL_MODULES is declared as NVARCHAR(MAX).

/*
Written By: Vadivel Mohanakrishnan
Date: Oct 11, 2011
URL: http://vadivel.blogspot.com
Purpose: To list all triggers in the current database along with the actual text/source code. It also lists what of type of trigger it is.
*/
SELECT 
Object_name( TR.parent_id) AS [Table Name],
TR.[Name] AS [Trigger Name],
TR.is_disabled AS [isDisabled],
TR.is_Instead_of_trigger AS [isInsteadOfTrigger],
MO.definition AS [Source Code], 
TR.create_date AS [Created Date],
TR.modify_date AS [Modified Date]
FROM 
SYS.TRIGGERS TR INNER JOIN SYS.SQL_MODULES MO 
ON TR.Object_id = MO.Object_ID
WHERE 
TR.[Type] = 'TR' AND
TR.is_ms_shipped = 0 AND
TR.[parent_id] > 0
ORDER BY 
Object_name( TR.parent_id), TR.[Name]
GO

Comments

George said…
You don't need to join to sql_modules because you can use the object_definition function instead.

Select *, object_definition(object_id) from sys.triggers

Popular posts from this blog

Registry manipulation from SQL

Registry Manupulation from SQL Server is pretty easy. There are 4 extended stored procedure in SQL Server 2000 for the purpose of manupulating the server registry. They are: 1) xp_regwrite 2) xp_regread 3) xp_regdeletekey 4) xp_regdeletevalue Let us see each one of them in detail! About xp_regwrite This extended stored procedure helps us to create data item in the (server’s) registry and we could also create a new key. Usage: We must specify the root key with the @rootkey parameter and an individual key with the @key parameter. Please note that if the key doesn’t exist (without any warnnig) it would be created in the registry. The @value_name parameter designates the data item and the @type the type of the data item. Valid data item types include REG_SZ and REG_DWORD . The last parameter is the @value parameter, which assigns a value to the data item. Let us now see an example which would add a new key called " TestKey ", and a new data item under it called TestKeyValue :

Screen scraping using XmlHttp and Vbscript ...

I wrote a small program for screen scraping any sites using XmlHttp object and VBScript. I know I haven't done any rocket science :) still I thought of sharing the code with you all. XmlHttp -- E x tensible M arkup L anguage H ypertext T ransfer P rotocol An advantage is that - the XmlHttp object queries the server and retrieve the latest information without reloading the page. Source code: < html > < head > < script language ="vbscript"> Dim objXmlHttp Set objXmlHttp = CreateObject("Msxml2.XMLHttp") Function ScreenScrapping() URL == "UR site URL comes here" objXmlHttp.Open "POST", url, False objXmlHttp.onreadystatechange = getref("HandleStateChange") objXmlHttp.Send End Function Function HandleStateChange() If (ObjXmlHttp.readyState = 4) Then msgbox "Screenscrapping completed .." divShowContent.innerHtml = objXmlHttp.responseText End If End Function </ script > < head > < body > &l

Script table as - ALTER TO is greyed out - SQL SERVER

One of my office colleague recently asked me why we are not able to generate ALTER Table script from SSMS. If we right click on the table and choose "Script Table As"  ALTER To option would be disabled or Greyed out. Is it a bug? No it isn't a bug. ALTER To is there to be used for generating modified script of Stored Procedure, Functions, Views, Triggers etc., and NOT for Tables. For generating ALTER Table script there is an work around. Right click on the table, choose "Modify" and enter into the design mode. Make what ever changes you want to make and WITHOUT saving it right click anywhere on the top half of the window (above Column properties) and choose "Generate Change Script". Please be advised that SQL Server would drop actually create a new table with modifications, move the data from the old table into it and then drop the old table. Sounds simple but assume you have a very large table for which you want to do this! Then it woul