Sql Primary Key Checks

primarykey.sql

select
    'exec sp_rename @objtype = ''INDEX'', @objname = ''' + quotename(s.name) + '.' + quotename(t.name) + '.' + quotename(pk.name) + ''', @newname = ''' + 'PK_' + t.name + '''' as RenameScript
from
    sys.schemas s
    inner join
      sys.tables t
      on s.schema_id = t.schema_id
    inner join sys.key_constraints pk
      on t.object_id = pk.parent_object_id
where
    pk.type = 'PK'
    and pk.name <> 'PK_' + t.name