create proc sp_default_collation
as
set nocount on
declare @servercollation sysname
select @servercollation = convert(sysname, serverproperty('collation'))
if @servercollation is not NULL
BEGIN
select 'Server default collation' = description
from ::fn_helpcollations() C
where @servercollation = C.name
END
set nocount off
go
original link: http://www.sqlservercentral.com/scripts/Miscellaneous/30410/