Problem 7 - Define Functoion - Functions,Triggers and Transa

ALTER FUNCTION ufn_IsWordComprised(@SetOfLetters VARCHAR(50), @Word VARCHAR(50))
RETURNS BIT
AS
BEGIN
    DECLARE @IsTrue BIT =1
    DECLARE @Counter INT =1
    DECLARE @Letter VARCHAR(1)
    SET @SetOfLetters = LOWER(@SetOfLetters)
    SET @Word = LOWER(@Word)
    WHILE @Counter < LEN(@Word)
    BEGIN
        SET @Letter = SUBSTRING(@SetOfLetters,@Counter,1)
        IF CHARINDEX(@Letter,@Word) = 0
        BEGIN
            SET @IsTrue = 0
            BREAK
        END
        SET @Counter+=1
    END
    RETURN @IsTrue
END