DECLARE
	@bitIncludeSystemFunctions BIT,
	@intMaxID1 INT,
	@intMinID1 INT,
	@txtGroup VARCHAR(256),
	@txtObject1 VARCHAR(256),
	@txtObjectTypes VARCHAR(55),
	@txtOwner VARCHAR(256),
	@txtPermissions VARCHAR(55),
	@txtSQLString1 VARCHAR(4000)

SELECT 
	@bitIncludeSystemFunctions = '1',
	@txtPermissions = 'ALL',
	@txtGroup = 'public',
--	@txtObjectTypes = '''P'',''T'''
	@txtObjectTypes = 'ALL'

SELECT @txtGroup = '[' + @txtGroup + ']'

IF (SELECT OBJECT_ID('tempdb..#tmpObjects')) IS NOT NULL
	BEGIN
		DROP TABLE #tmpObjects
	END

CREATE TABLE #tmpObjects (intID INT IDENTITY(1,1), txtObjectName VARCHAR(256), txtOwner VARCHAR(256))

--Determine what groups to add based on @txtObjectTypes
IF @txtObjectTypes = 'ALL'
	BEGIN
		INSERT #tmpObjects (txtObjectName, txtOwner)
			SELECT 
				so.name,
				su.name
			FROM 
				sysobjects so
				INNER JOIN sysusers su ON so.uid = su.uid
			WHERE 
				so.xtype IN('FN','IF','P','RF','S','TF','U','V','X') 
				AND so.name NOT LIKE 'dt_%'
				AND su.name <> 'system_function_schema'
	END
ELSE
	BEGIN
		SELECT @txtSQLString1 = '
			SELECT 
				so.name,
				su.name
			FROM 
				sysobjects so
				INNER JOIN sysusers su ON so.uid = su.uid
			WHERE 
				so.xtype IN(' + @txtObjectTypes + ') 
				AND so.name NOT LIKE ''dt_%''
				AND su.name <> ''system_function_schema'''

	INSERT #tmpObjects (txtObjectName)
			EXEC (@txtSQLString1)
--			PRINT @txtSQLString1
	END

SELECT
	@intMaxID1 = (SELECT MAX(intID) FROM #tmpObjects),
	@intMinID1 = (SELECT MIN(intID) FROM #tmpObjects)

WHILE @intMinID1 <= @intMaxID1
BEGIN

	SELECT 
		@txtObject1 = (SELECT '[' + txtObjectName + ']' FROM #tmpObjects WHERE intID = @intMinID1),
		@txtOwner = (SELECT '[' + txtOwner + ']' FROM #tmpObjects WHERE intID = @intMinID1)

	SELECT @txtSQLString1 = 'REVOKE ' + @txtPermissions + ' ON ' + @txtOwner + '.' + @txtObject1 + ' TO ' + @txtGroup

-- 	PRINT @txtSQLString1
 	EXEC (@txtSQLString1)

	SELECT @intMinID1 = @intMinID1 + 1
END