Herkese merhaba,
SQL Server’da oluşturduğunuz projelerde Vergi Kimlik Numarasının kontrolü yapmak durumunda kalabilirsiniz.
Aşağıdaki fonksiyon yardımı ile bu işlemi rahatlıkla yapabilirsiniz.
|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 |
CREATE FUNCTION VergiNoKontrol ( @VKNO VARCHAR(10) ) RETURNS BIT BEGIN DECLARE @V_LAST_DIGIT SMALLINT, @V_1 SMALLINT, @V_2 SMALLINT, @V_3 SMALLINT, @V_4 SMALLINT, @V_5 SMALLINT, @V_6 SMALLINT, @V_7 SMALLINT, @V_8 SMALLINT, @V_9 SMALLINT, @V_11 SMALLINT, @V_22 SMALLINT, @V_33 SMALLINT, @V_44 SMALLINT, @V_55 SMALLINT, @V_66 SMALLINT, @V_77 SMALLINT, @V_88 SMALLINT, @V_99 SMALLINT, @TOPLAM SMALLINT, @R BIT; SET @V_1 = (CAST(SUBSTRING(@VKNO, 1, 1) AS SMALLINT) + 9) % 10; SET @V_2 = (CAST(SUBSTRING(@VKNO, 2, 1) AS SMALLINT) + 8) % 10; SET @V_3 = (CAST(SUBSTRING(@VKNO, 3, 1) AS SMALLINT) + 7) % 10; SET @V_4 = (CAST(SUBSTRING(@VKNO, 4, 1) AS SMALLINT) + 6) % 10; SET @V_5 = (CAST(SUBSTRING(@VKNO, 5, 1) AS SMALLINT) + 5) % 10; SET @V_6 = (CAST(SUBSTRING(@VKNO, 6, 1) AS SMALLINT) + 4) % 10; SET @V_7 = (CAST(SUBSTRING(@VKNO, 7, 1) AS SMALLINT) + 3) % 10; SET @V_8 = (CAST(SUBSTRING(@VKNO, 8, 1) AS SMALLINT) + 2) % 10; SET @V_9 = (CAST(SUBSTRING(@VKNO, 9, 1) AS SMALLINT) + 1) % 10; SET @V_LAST_DIGIT = CAST(SUBSTRING(@VKNO, 10, 1) AS SMALLINT); SET @V_11 = (@V_1 * 512) % 9; SET @V_22 = (@V_2 * 256) % 9; SET @V_33 = (@V_3 * 128) % 9; SET @V_44 = (@V_4 * 64) % 9; SET @V_55 = (@V_5 * 32) % 9; SET @V_66 = (@V_6 * 16) % 9; SET @V_77 = (@V_7 * 8) % 9; SET @V_88 = (@V_8 * 4) % 9; SET @V_99 = (@V_9 * 2) % 9; IF @V_1 != 0 AND @V_11 = 0 SET @V_11 = 9; IF @V_2 != 0 AND @V_22 = 0 SET @V_22 = 9; IF @V_3 != 0 AND @V_33 = 0 SET @V_33 = 9; IF @V_4 != 0 AND @V_44 = 0 SET @V_44 = 9; IF @V_5 != 0 AND @V_55 = 0 SET @V_55 = 9; IF @V_6 != 0 AND @V_66 = 0 SET @V_66 = 9; IF @V_7 != 0 AND @V_77 = 0 SET @V_77 = 9; IF @V_8 != 0 AND @V_88 = 0 SET @V_88 = 9; IF @V_9 != 0 AND @V_99 = 0 SET @V_99 = 9; SET @TOPLAM = @V_11 + @V_22 + @V_33 + @V_44 + @V_55 + @V_66 + @V_77 + @V_88 + @V_99; IF @TOPLAM % 10 = 0 BEGIN SET @TOPLAM = 0; END; ELSE BEGIN SET @TOPLAM = (10 - (@TOPLAM % 10)); END; IF @TOPLAM = @V_LAST_DIGIT SET @R = 1; -- DOĞRU ELSE SET @R = 0; -- YANLIŞ -- RETURN @R; END; --Çalıştırılması SELECT dbo.VergiNoKontrol(7348871321) |
Herkese çalışma hayatında ve yaşamında başarılar kolaylıklar.
Yazıyı Paylaşın
