Changing the Owner of a Single DTS Package

CREATE  PROCEDURE sp_DTSReplaceOwner
 @p_name sysname,
 @new_owner sysname
AS

DECLARE @name sysname, @id uniqueidentifier
DECLARE cur_sysdtspackages CURSOR FOR 
   
SELECT     DISTINCT [name],[id]
FROM         sysdtspackages
WHERE     (createdate =
            (SELECT     TOP 1 createdate
             FROM          sysdtspackages
             WHERE      (name = @p_name)
             ORDER BY createdate DESC))
 AND (name = @p_name)

 OPEN cur_sysdtspackages
 
 FETCH NEXT FROM cur_sysdtspackages
 INTO @name, @id
  
 WHILE @@FETCH_STATUS = 0
 BEGIN
     EXEC sp_reassign_dtspackageowner @name=@name, @id=@id, @newloginname=@new_owner

     FETCH NEXT FROM cur_sysdtspackages
     INTO @name, @id
 END