SET @len = LEN(@hexstr);
SET @i = 1;
SET @ret = CAST(” AS VARBINARY);

SET @chr1 = SUBSTRING(@hexstr, @i, 1);
SET @chr2 = SUBSTRING(@hexstr, @i + 1, 1);

WHILE (@i <= @len AND @chr1 LIKE ‘[0-9A-Fa-f]‘ AND @chr2 LIKE ‘[0-9A-Fa-f]‘)
BEGIN
SET @chr1 = SUBSTRING(@hexstr, @i, 1);
SET @chr2 = SUBSTRING(@hexstr, @i + 1, 1);
SET @ret = @ret + CAST(((CASE WHEN @chr1 LIKE ‘[0-9]‘ THEN CAST(@chr1 AS TINYINT)
ELSE CAST(ASCII(UPPER(@chr1)) – 55 AS TINYINT)
END * CAST(16 AS TINYINT))
+ CASE WHEN @chr2 LIKE ‘[0-9]‘ THEN CAST(@chr2 AS TINYINT)
ELSE CAST(ASCII(UPPER(@chr2)) – 55 AS TINYINT)
END)
AS VARBINARY);
SET @i = @i + 2;
END

RETURN @ret;
END