daheads blog²

Hier noch ein weitere Beispiel zu String-Operationen mit T-SQL (siehe ersten Teil hier).

Die Funktion dient dem ermitteln einer Briefanrede anhand einer Anrede.
Als Anrede definiere ich bspw. "Herr", "Frau" oder "Frau Dr.", usw.

Die Briefanrede wäre dann "Sehr geehrte Frau Dr.".

set ANSI_NULLS OFF
set QUOTED_IDENTIFIER ON
GO
CREATE Function [dbo].[f_GetBriefanredeFromAnrede](@Anrede varchar(50)) returns varchar(50)
as 
Begin
 
	Declare @Result varchar(50)
 
	-- Anrede ersetzen durch Briefanrede
	-- Anrede ist bspw. "Herr", "Frau", "Herr Dr.", "Frau Dr. Prof.", ...
 
	-- Prüfen, ob wir den String "Herr" finden
	Declare @FoundHerr Integer
	Set @FoundHerr = PATINDEX('%Herr%', @Anrede)
 
	-- Prüfen, ob wir den String "Frau" finden
	Declare @FoundFrau Integer
	Set @FoundFrau = PATINDEX('%Frau%', @Anrede)
 
	if @FoundHerr > 0
	begin
		Set @Result = 'Sehr geehrter ' + @Anrede
		-- Set @Result = Replace(@Anrede, 'Herr', 'Sehr geehrter Herr')
	end
 
	if @FoundFrau > 0 
	begin 
		Set @Result = 'Sehr geehrte ' + @Anrede
		-- Set @Result = Replace(@Anrede, 'Frau', 'Sehr geehrte Frau')
	end
 
	-- Bei bspw. "Dipl.-Ing. (FH)" gibt es kein Herr, Frau
	if @FoundHerr = 0 and @FoundFrau = 0
	begin
		Set @Result = 'Sehr geehrte(r) ' + @Anrede
	end
 
return @Result
end