Ms SQL server grants users stored procedure execution permissions in batches

Set nocount on
Declare @ procedure sysname -- used to obtain the stored procedure name set
, @ STR nvarchar (200) -- set fixed variables for ease of use
, @ Str1 nvarchar (200) -- saves the execution string for cyclic operations
, @ Username nvarchar (30) -- user name to be authorized
Set @ STR = n' grant execute on'
Set @ username = n'bkpr'
Declare authorization_pro cursor
Select Sch. Name + '.' + pro. Name
From SYS. Procedures pro join SYS. schemas Sch on pro. schema_id = Sch. schema_id
Open authorization_pro
Fetch next from authorization_pro into @ procedure
While @ fetch_status = 0
Begin
Set @ str1 = @ STR + @ procedure + 'to' + @ username
Execute (@ str1)
Set @ str1 =''
Fetch next from authorization_pro into @ procedure
End
Close authorization_pro
Deallocate authorization_pro
Set nocount off