Delete Duplicate Char from String

create FUNCTION DeleteDuplicateCharFromAtring(@String AS varchar(max))
RETURNS varchar(max)
AS
BEGIN
   DECLARE @Index int
   SET @Index = LEN(@String)
   WHILE @Index > 1
       BEGIN
           IF CHARINDEX(SUBSTRING(@String, @Index, 1), @String) < @Index
               BEGIN
                   SET @String = STUFF(@String, @Index, 1, '')
               END
           SET @Index = @Index - 1
       END
   RETURN @String
END