Remove old DTS Package versions

CREATE PROCEDURE ip_RemoveOldDTSVersions
AS

-- SET NOCOUNT ON -- I like to know how many items removed.
delete 
sysdtspackages
where
versionid in (
select 
versionid 
from 
sysdtspackages
inner join
(
select 
[id] mxid, 
max(createdate) as mxcd 
from 
sysdtspackages 
group by 
[id]
) as MaxCD
on
[id] = mxid and
createdate != mxcd
)go