Display Person Initials

CREATE FUNCTION ufnDerive_Initials

(@stringtobesearched varchar(8000))

RETURNS char(3) AS

BEGIN



DECLARE @FirstSpace INT
DECLARE @SecondSpace INT
DECLARE @ReversedYN INT
DECLARE @Results VARCHAR(3)

SET @ReversedYN = CHARINDEX(',', RTRIM(@stringtobesearched))
SET @stringtobesearched = REPLACE(@stringtobesearched, ',', ' ')
SET @FirstSpace = CHARINDEX(' ', RTRIM(@stringtobesearched))

IF @FirstSpace < LEN(RTRIM(@stringtobesearched)) 

BEGIN

                        -- Write first letter of name
                        SET @Results = SUBSTRING(RTRIM(@stringtobesearched),1, 1)

                        SET @Results = @Results + SUBSTRING(RTRIM(@stringtobesearched),@FirstSpace + 1, 1)

                        -- Now check to see if there is a second space in the string
                        SET @SecondSpace = CHARINDEX(' ', RTRIM(@stringtobesearched),@FirstSpace + 1)

                        IF @SecondSpace > 0

                        BEGIN

                                    SET @Results = @Results + SUBSTRING(RTRIM(@stringtobesearched),@SecondSpace + 1, 1)

                        END

                        -- If @SecondSpace = 0 then No second space, we are done

END

ELSE

-- No middle inital or last name write first letter of string only

BEGIN

            SET @Results = RTRIM(LTRIM(SUBSTRING(RTRIM(@stringtobesearched),1,1)))
    RETURN @Results
END


IF @ReversedYN > 0 

BEGIN
            SELECT @Results = REVERSE(@Results)
    RETURN @Results
END

ELSE

BEGIN
            RETURN @Results
END


RETURN @Results

END