[es] - Formula za JMBG?!

MatezYU

Član broj: 4114
Poruke: 1367
*.beotel.net.

Profil

^{02.03.2006. u 20:02}

Da li moze neko da mi kaze kako se racuna zadnja cifra kod JMBG broja. JMBG ima 13 brojeva i kada se pravilno unese 12 cifara onaj trinaesti se izracuna preko formule... Gde mogu to da nadjem? Hvala unapred

http://mdxblog.wordpress.com

^{02.03.2006. u 20:02}

srdjandakic
srdjandakic
Novi Sad / Beograd

Član broj: 11297
Poruke: 412
..mtsns-ns.customer.sbb.co.yu.

Sajt: mobipatrol.com

Profil

Re: Formula za JMBG?!

^{02.03.2006. u 22:25}

http://en.wikipedia.org/wiki/Jmbg :)

www.mobipatrol.com ... buy&sell stuff using your mobile phone

^{02.03.2006. u 22:25}

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.dialup.neobee.net.

Profil

Re: Formula za JMBG?!

^{02.03.2006. u 23:43}

Ne vidim kakve veze to ima sa ovim forumom?!

Someone's sitting in the shade today because someone planted a tree a long time ago.

^{02.03.2006. u 23:43}

Bojan Kopanja
Bojan Kopanja
Senior Web Developer, ZeusSoftware
Stara Pazova

Član broj: 6155
Poruke: 504
80.93.238.*

ICQ: 346697685
Sajt: www.zeussoftware.rs

Profil

Re: Formula za JMBG?!

^{03.03.2006. u 09:28}

Pa verovatno coveku treba to za neki program koji pise u Delphiju/Pascalu/Lazarusu

.

_{[Ovu poruku je menjao Strog dana 03.03.2006. u 10:28 GMT+1]}

ex Strog

http://www.zeussoftware.rs

^{03.03.2006. u 09:28}

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.dialup.neobee.net.

Profil

Re: Formula za JMBG?!

^{03.03.2006. u 12:42}

Ok, samo ja bi to drugačije formulisao. Ovako malo iskače...
Ali ok.. meni lično ne smeta...
pozzz

Someone's sitting in the shade today because someone planted a tree a long time ago.

^{03.03.2006. u 12:42}

Joker
Subotica

Član broj: 646
Poruke: 1406
82.131.178.*

Sajt: www.jokerwatchstraps.info

Profil

Re: Formula za JMBG?!

^{03.03.2006. u 15:27}

http://www.privatizacija.co.yu/New/Usluge/Softver/ProgramJMBG.htm

format c: /udari_disk_o_beton /jako

^{03.03.2006. u 15:27}

marcha
Nikola Marcic
Beograd/Leskovac

Član broj: 6454
Poruke: 108
*.ptt.yu.

ICQ: 156892888

Profil

Re: Formula za JMBG?!

^{04.03.2006. u 09:01}

Code:

function JmbgControlNum(AJmbg:string):byte;
{
   F-ja za izracunavanje kontrolnog broja (13. cifre) JMBG
   JMBG predstavimo kao ABCDFGHAIJKLX, gde je X kontrolni broj.

   CheckSum:
   CS = 11-( 7*(A+G) + 6*(B+H) + 5*(C+I) + 4*(D+J) + 3*(E+K) + 2*(F+L) ) MOD 11
   ako je:
     CS <= 9  ->  X = CS
     CS > 9   ->  X = 0
   Napomena: U nekim slucajevima je u maticnim knjigama unesen pogresan JMBG pa
   korisnicima programa morate omoguciti unos i pogresnih brojeva.
   Ovo je narocito vazno za osobe sa teritorije BiH gde je to veoma cest slucaj.
}
var
  i, j : byte;
  wSum : Word;
begin
  wSum := 0;
  j := 1;
  for i:= 7 downto 2 do
  begin
    wSum := wSum + i * (StrToInt(AJmbg[j]) + StrToInt(AJmbg[j+6]));
    j := j + 1;
  end;
  Result := 11 - wSum mod 11;
  if Result > 9 then Result := 0;
end;

Marcha
-----------------------------------
Pretpostavka je majka zajeba.

^{04.03.2006. u 09:01}

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.dialup.neobee.net.

Profil

Re: Formula za JMBG?!

^{04.03.2006. u 10:24}

http://www.privatizacija.co.yu/New/Usluge/Softver/ProgramJMBG.htm

Skinuo sam sa ovog linka program i nešto mi nije jasno.? Gde mu je BP ili datoteka.txt u koju se unose JMBG brojevi za proveru? Ima samo forma gde unosiš JMBG i edit koji ti govori svaki put po pritisku dugmeteta za proveru da je uneseni JMBG neispravan?!

Someone's sitting in the shade today because someone planted a tree a long time ago.

^{04.03.2006. u 10:24}

MatezYU

Član broj: 4114
Poruke: 1367
*.ru
Via: [es] mailing liste

Profil

Re: Formula za JMBG?!

^{05.03.2006. u 09:52}

Hvala vam svima! Pisem program pa mi treba za kontrolu JMBG brojeva da
li su ispravni. U pitanju su pacijenti koji dolaze na pregled pa ako
onaj koji ukucava brojeve slucajno omane onda da program ne primi los
JMBG. Sada radi i odbija lose JMBG brojeve... Inace probao sam sa 1111111111111 i
onda radi,tj. kaze da je to dobar jmbg...
Da ga ogranicim jos malo recimo da kazem da 5 broj mora biti ili 8 ili
9 jer nema niko da je rodjen 1710 ili sl. godine...

Pozdrav

http://mdxblog.wordpress.com

^{05.03.2006. u 09:52}

mzarko

Član broj: 33636
Poruke: 78
*.ptt.yu.

Profil

Re: Formula za JMBG?!

^{05.03.2006. u 17:32}

Nemoj da vrsis ogranicavanje 5 broja sa 8 ili 9 jer vec imas lica koja su rodjena 2000 godine i mladja (za sada su to deca).

MatezYU, Ajde ako ti nije problem okaci primer kada se u Edit unese JMBG da izvrsi
proveru da li je ispravan ili neispravan taj JMBG.
Hvala.

^{05.03.2006. u 17:32}

Nemanja Avramović
PHP developer, Webinsane
Beograd, Srbija

Član broj: 32202
Poruke: 4169
195.252.99.*

ICQ: 266136396
Sajt: avr.am

Profil

Re: Formula za JMBG?!

^{06.03.2006. u 10:43}

Ako sam lepo skontao kako to radi, evo ti u attachmentu program...

Moj sajt. Engleski?.Moj blog. Moj avatar.

_{[NE PRUŽAM PODRŠKU ZA PHP PREKO PRIVATNIH PORUKA!]}

Prikačeni fajlovi

jmbg.rar - 5.17k

^{06.03.2006. u 10:43}