Vérifiez CUSIP format correct Fonction dans SQL
Celui-ci vérifie le format d'un CUSIP . Ce est élargi code SQL en utilisant la documentation sur l'article de Wikipedia sur le lien.
Cela fait partie de trois articles liés qui va vérifier ISIN, SEDOL et CUSIP identifiants.
SQL
ALTER FUNCTION CheckCUSIP(@CUSIP NVARCHAR(20))
RETURNS INT AS BEGIN
DECLARE @Check INT
IF RIGHT(@CUSIP,1) NOT BETWEEN '0' AND '9' BEGIN
SET @Check=-1
RETURN @Check
END
IF PATINDEX('%[^0-Z]%',@CUSIP)>0 BEGIN
SET @Check=-3
RETURN @Check
END
DECLARE @Sum INT=0,@Letter INT=1,@Char VARCHAR(1),@LetVal INT
WHILE @Letter<LEN(@CUSIP)
BEGIN
SET @Char=SUBSTRING(@CUSIP,@Letter,1)
SET @LetVal=((SELECT (CASE WHEN @Char BETWEEN '0' AND '9' THEN @Char ELSE ASCII(UPPER(@Char))-55END))
*(CASEWHEN @Letter%2=1 THEN 1 ELSE 2 END))
If @LetVal > 9 BEGIN
SET @LetVal =(@LetVal % 10)+(@LetVal / 10)
End
SET @Sum=@Sum+@LetVal
SET @Letter=@Letter+1
END
SET @Sum=(10 -(@Sum % 10))% 10
IF LEN(@CUSIP)<>9 BEGIN
SET @Check=-4
RETURN @Check
END
IF RIGHT(@CUSIP,1) BETWEEN '0' AND '9' BEGIN
SET @Check =(CASEWHEN RIGHT(@CUSIP,1)=@Sum THEN 1 ELSE 0 END)
END
RETURN @Check
END
