create procedure sys.sp_MSrefcnt
    @objid int, @refcnt int output
as
    set @refcnt = 0
    create table #temprefs (objid int NOT NULL)
    insert into #temprefs select distinct referenced_object_id from sys.foreign_keys where parent_object_id = @objid

    while (@@rowcount > 0)
        insert into #temprefs select distinct referenced_object_id from
            sys.foreign_keys where parent_object_id in (select objid from #temprefs) and
                referenced_object_id not in (select objid from #temprefs)

    select @refcnt = count(*) from #temprefs
    return (0)