fnXmlEncode

    CREATE  function dbo.fnXmlEncode(@value nvarchar(4000))
    returns nvarchar(4000)
    as
    begin
        declare @i integer
        set @i = 128
        while (@i < 256) 
        begin
            if (@i = 162) set @i = 195
            set @value = replace(@value, char(@i), '&#'+convert(varchar(3), @i)+';') 
            set @i = @i+1;
        end
        return @value
    end