CREATE FUNCTION [dbo].[FN_GEN_CODE_128B] (@TEXTO VARCHAR(252))
RETURNS VARCHAR(255)
AS
BEGIN
DECLARE @RESULTADO VARCHAR(255)
DECLARE @CARACTER CHAR(1)
DECLARE @CHECKSUM INT
DECLARE @TMP INT
DECLARE @ii INT
SET @CHECKSUM = 104
SET @ii = 1
WHILE @ii <= LEN(@TEXTO)
BEGIN
SET @CARACTER = SUBSTRING(@TEXTO,@ii,1)
SET @TMP = ASCII(@CARACTER)
SET @TMP = CASE WHEN (@TMP >= 32 AND @TMP < 127) THEN @TMP - 32 ELSE @TMP END
SET @CHECKSUM = @CHECKSUM + (@TMP*@ii)
SET @ii = @ii + 1
END
SET @CHECKSUM = @CHECKSUM % 103
SET @CHECKSUM = CASE @CHECKSUM
WHEN 95 THEN ASCII('È') WHEN 96 THEN ASCII('É') WHEN 97 THEN ASCII('Ê') WHEN 98 THEN ASCII('Ë') WHEN 99 THEN ASCII('Ì') WHEN 100 THEN ASCII('Í') WHEN 101 THEN ASCII('Î') WHEN 102 THEN ASCII('Ï') ELSE @CHECKSUM + 32
END
SET @RESULTADO = 'Ñ' + @TEXTO + CHAR(@CHECKSUM) + 'Ó'
RETURN(@RESULTADO)
END
GO
Crear cuenta