Veri Girişi Yaparken Vergi Kimlik No'sunun Sistematik Olarak Doğrulanması

[olgun1916]

Altta vereceğim bilgiler ışığında vergi no doğrulma algoritması yazıp excelde doğrulama yapabilirmiyiz.Tşk.
TEK VERGİ NUMARASI UYGULAMASINDA VERGİ KİMLİK NUMARASININ YAPISI VE HESAPLAMASI
1. CHECK DIGIT HESABI VE VERGİ KİMLİK NUMARASININ TESBİTİ

Check digit rakamı Vergi Kimlik Numarası nın ilk dokuz karakterine göre hesaplanır.

Hesaplama aşağıda açıklandığı gibi yapılır.

1.1. Vergi Kimlik Numarası nın ilk dokuz karakteri yan yana yazılır. Sağdan başlamak üzere altına artan sırada 1’den 9 a kadar rakam yazılır. İki sayı birbiri ile kolon bazında toplanır. Bu toplam neticesinde 9 dan büyük sayı çıkarsa elde edilen sayıdan 10 çıkarılıp sonuç alta yazılır.

1.2 Elde edilen sayının altına sağdan itibaren 2’den başlayıp 2’nin katları 512’ye kadar yazılır. Bundan sonra bu iki sayı kolon bazında çarpılarak, her kolonun altına bulunan sayı yazılır.
( A * B = C )

Bu çarpım sonucunda elde edilen sayıların ( C ) kolon bazında Mutlak Değerleri toplanır. Mutlak değerler toplamında 9 un katları atılır. Kalan sayı alta yazılır. ( D ) Mutlak değer toplamında sonuç 9’un altında bir sayı çıkarsa kendisi, 9’un katları atılarak sıfır kalırsa 9 yazılır.

Mutlak değerler toplamı sonucunda elde ettiğimiz sayılar yan yana toplanarak çıkan sonuç, sonu sıfır olan bir üst tam sayıdan çıkarılır. Elde edilen rakam CHECK DIGIT rakamıdır.
(Vergi Kimlik Numarasının onuncu karakteridir.) Mutlak değerler toplamı elde edilen sayının sonu sıfır ise check digit rakamı sıfır olarak yazılır.

Elde edilen Check Digit rakamı 9. karakterin sağına yazılarak 10 karakterlik VERGİ NUMARASI bulunmuş olur.

TEST AMAÇLI KULLANILABİLECEK CHECK - DIGIT' LARI
DOĞRU HESAPLANMIŞ ÖRNEK VERGİ NUMARALARI

0540033975 0540033887
0680066825 Y- 0680066806
Y-1670068624 1670068615
3950079269 3950079068
4540017830 4540017847
4780040920 Y- 4780040913
4870003769 4870003751
6300043009 6300042985
7360014117 7360014109
7400016053 7400016254
7460064345 7460064353
Y- 7700040832 Y- 7700040828
Y-7710018660 7710018651
8360031658 8360031754
8450027618 8450027675
9130005852 9130005878

Y = Yanlış CHECK - DIGIT lı numaralardır.



CHCEK - DIGIT HESAPLAMA ÖRNEKLERİ


ÖRNEK –1 : VERGİ NO (9 CH)

4 9 2 0 0 1 1 6 4
+ 9 8 7 6 5 4 3 2 1
3 7 9 6 5 5 4 8 5


3 7 9 6 5 5 4 8 5 A
512 256 128 64 32 16 8 4 2 B*
1536 1792 1152 384 160 80 32 32 10 A*B=C

6 1 9 6 7 8 5 5 1 D

6 + 1 + 9 + 6 + 7 + 8 + 5 + 5 + 1 = 48

50 - 48 = 2 CHCEK DIGIT olup, bulunan
VERGİ NUMARASI = 4 9 2 0 0 1 1 6 4 2 dir.








ÖRNEK-2: VERGİ NO (9CH)

4 9 2 0 0 3 1 1 8
9 8 7 6 5 4 3 2 1
+-----------------------------------
3 7 9 6 5 7 4 3 9

3 7 9 6 5 7 4 3 9 A
512 256 128 64 32 16 8 4 2 B*
---------------------------------------------------------------
1536 1792 1152 384 160 112 32 12 18 A*B=C

6 1 9 6 7 4 5 3 9 D

6 + 1 + 9 + 6 + 7 + 4 + 5 + 3 + 9 = 50

elde edilen sayının son karakteri SIFIR olduğundan check-digit = 0 dır.
Bulunan VERGİ NUMARAS I = 4 9 2 0 0 3 1 1 8 0 dır.

ÖRNEK-3: VERGİ NO (9CH)

6 1 3 0 0 7 3 0 7
9 8 7 6 5 4 3 2 1
+-------------------------------------
5 9 0 6 5 1 6 2 8

5 9 0 6 5 1 6 2 8 A
512 256 128 64 32 16 8 4 2 B *
----------------------------------------------------------
2560 2304 0 384 160 16 48 8 16 A*B=C

4 9 0 6 7 7 3 8 7 D
4 + 9 + 0 + 6 + 7 + 7 + 3 + 8 + 7 =51

60–51=9 CHECK-DIGIT olup,bulunan VERGİ NUMARASI = 4 9 0 6 7 7 3 8 7 9 dur.

 

[mgurten]

dosyan ekte kardeş
sağlam bir formül yaptırdın bana :agla:

 

[olgun1916]

Mgurten Hocam öncelikle verdiğin emek için çok teşekkür ederim. Bu formulu forumda açılan tc no doğrulama başlığı altında cevaben yapılan exceldeki örnek gibi düzenlemeniz mümkünmü..?( http://www.excel.web.tr/f125/veri-giri-i-yaparken-tc-kimlik-nosunun-sistematik-t23050.html ) bende 5 bin tane firmanın vergi nosu var excelde onları 1 sutuna alt alta yazdırıyım paralel sutundaki hücreye yanlış olanlara yanlış ifadesi yazdırsın.Sanırım bu şekilde yaparsanız Türkiyede bir ilk olacak ve çok kişinin işine yarayacak. Birde yaptığınız formül son karakterimi doğruluyor sağdaki en son sutunda açıklayabilirmisiniz. Kolay gelsin.

 

[olgun1916]

Hocam anladığım kadarıyla son sutun doğrulama sutunu eğr öyleyse benim işimi görür.fakat kullanacak arkadaşlar için biraz açıklama yapa bilirmisiniz.

 

[mgurten]

Hocam şimdi burada
a sütununa yazdığınız ifade 9 karakter ise otomatik yeşil yapıyor eğer 9 haneden farklı ise o hücreyi kırmızıya boyuyor o da yanlış anlamına geliyor. B sütununa sizin tarif ettiğiniz şekilde hesap yapıp yeni değeri yazıyor.

ben 1000 satır civarında yaptım formülü siz aşağıya doğüru kopyalarsanız istediğiniz kadar satır girebilirsiniz.

 

[olgun1916]

m gurten hocam ilk sutun da yazacagım tüm vergi noları benim zaten 10 haneli.
benim problemim elimdeki mevcut 10 haneli verginosunun kendi içinde takdim-tehir olmasında (yer değiştirmesinden) kaynaklanan vergino yanlışlıkları

İlk gönderdiğiniz excel sayfasında doğruluk sınaması yapsın istiyorum. Yani A sütununa rakam girdiğimizde sizin girdiğiniz formülün bulduğu sonuç (yani V sütunu) sınansın. Doğru olan sonuç yeşil yanlış olan sonuç kırmızı yansın.ilk yazdığınız excel kullanışlıydı ama sade değildi. ben mantık sınaması yoluyla yanlışları tesbit ediyordum ve 5000 tane verginosu içinden yanlış olan 140 tanesini tesbit ettim.ancak kullanacak 3. şahıslar için daha sade bi tablo olsun istedim. çok teşekkür ederim iyi çalışmalar.

 

[mgurten]

valla hocam benim şu an iftara kadar kafam pek çalışmaz ama anladığım kadarıyla bir şey yaptım birde buna bakın

A sütununa bir rakam giriliyor
B sütunu bu rakamın 9 hanesini alıp sizin istediğiniz şekilde hesaplar yaparak 10. rakamı buluyor sonra bunu 9 rakamın sonuna koyarak 10 haneli bir rakam oluşturuyor ve bunu A sütunu ile birebir kontrol ediyor eğer doğruysa DOĞRU yazıyor yeşile boyuyor yanlışsa bulduğu 10 haneli rakamı yazıyor.

 

[olgun1916]

Sayın, mgurten hocam sizin kafanız çalışmadığında yaptığınız buysa çalıştığı zaman ne yapacağını tasavvur edemiyorum. Tam istediğim formulasyonu yapmışsınız teşşekkür ederim.Bende buna benzer bi tabloyu sizin ilk çalışmanızın üstüne bina ederek yaptım acemice olduğundan boyutu bıraz fazla oldu.(mesajımın ekinde mevcut) Ben elimdeki vergi numaralarını yaptığınız excelle tümünü sorguladım yanlışları tesbit ettim.Allah razı olsun.İnşallah birçok kişinin işine yarayacak bu tablo. İyi çalışmalar.

 

[ademb28]

Emeğinize sağlık.Vergi kimlik numarası doğrulama için eklenen dosyaların excel 2003 versiyonu için hazırlanmış olanı varmı?

 

[olgun1916]

Emeğinize sağlık.Vergi kimlik numarası doğrulama için eklenen dosyaların excel 2003 versiyonu için hazırlanmış olanı varmı?

benım en son gönderdiğim mailin ekini kullan ama önce Micorosoft tan Office converter indir kur. http://www.microsoft.com/downloads/t...isplayLang=en#

 

[olgun1916]

gönderemedim..