dbo.QBM_FCVStringToXMLMasked

1   create   function dbo.QBM_FCVStringToXMLMasked (@in nvarchar(max) ) returns nvarchar(max) as begin declare @out nvarchar(max) declare @Zeichen
2 nvarchar(max) declare @len int declare @i int declare @CharacterCoding int declare @isTableFilled bit = 0 declare @umsetz table (NumCoding int primary
3 key , XMLSnippet nvarchar(100) ) select @len = len(@in) select @i = 1 select @out = N'' while @i <= @len begin select @zeichen = substring(@in, @i, 1)
4 select @CharacterCoding = unicode(@zeichen) if @CharacterCoding between 48 and 57 or @CharacterCoding between 65 and 90 or @CharacterCoding between 97
5 and 122  begin select @out = concat(@out , @Zeichen) end else begin  if @isTableFilled = 0 begin insert into @umsetz(NumCoding, XMLSnippet) select v.NumCoding
6, XMLSnippet from QBM_VCharacterSpecial v select @isTableFilled = 1 end select @out = concat(@out , case when exists (select top 1 1 from @umsetz u where
7 u.NumCoding = @CharacterCoding ) then (select top 1 XMLSnippet from @umsetz u where u.NumCoding = @CharacterCoding ) else @zeichen end ) end  select @i
8 = @i+1 end return(@out) end 
9