SQL SCRIPT to grant DBC_Execute to all user SP

--The SQL 7.0/2000 Query for granting execute permission for all users Stored Proc to DBC_Execute; by Ramanuj on 02-Jan-2004
DECLARE @strStoredProcName varchar(255)
DECLARE @str   varchar(255)

DECLARE cur_grantExec_All CURSOR FOR
SELECT o.name 
FROM sysobjects o, sysusers u 
WHERE o.xtype = 'P' and o.status >= 0 and o.uid = u.uid 
ORDER by o.name

OPEN cur_grantExec_All 
FETCH NEXT FROM cur_grantExec_All INTO @strStoredProcName

WHILE @@FETCH_STATUS = 0
BEGIN
SET @str = 'grant exec ON [' + @strStoredProcName + '] to DBC_Execute'
PRINT 'EXECUTING....' + @str
exec(@str)

FETCH NEXT FROM cur_grantExec_All INTO @strStoredProcName
END

CLOSE cur_grantExec_All
DEALLOCATE cur_grantExec_All