Limpar Transaction Log no SQLServer 2000/2005

CREATE PROCEDURE [dbo].[function_clean_transaction_log]
AS
BEGIN
declare @dbstring varchar(300)
select @dbstring = DB_NAME()
print 'Iniciando Deleção do Transaction Log...'
BACKUP LOG @dbstring WITH TRUNCATE_ONLY
DBCC SHRINKDATABASE (@dbstring)
print 'Deleção do Transaction Log Terminada.'
END
GO