BSN nummer check

[Safetyfox]

Weet iemand hoe je een controle van het bsn nummer kan maken tijdens de invoer, zoals de 11 check?

Het bsn bestaat uit 9 cijfers en voldoet aan een variant op de elfproef. De variant is in het laatste cijfer, dat in plaats van met 1, met -1 wordt vermenigvuldigd. Dit verschil is er opzettelijk ingebracht zodat een abusievelijk ingevoerd bankrekeningnummer als foutief wordt aangemerkt. Als het burgerservicenummer wordt voorgesteld door ABCDEFGHI, dan moet

(9 × A) + (8 × B) + (7 × C) + (6 × D) + (5 × E) + (4 × F) + (3 × G) + (2 × H) + (-1 × I)

een veelvoud van 11 zijn.

[Banach]

Gebruik een scriptactivering bij het verlaten van het invoerveld, of bij de validatie van het veld:

 

http://www.filemaker.com/help/13/fmp/nl/html/script_trigg.38.7.html#1030203

of

http://www.filemaker.com/help/13/fmp/nl/html/script_trigg.38.5.html#1031131

 

Wanneer het je om de formule gaat dan kun je die in werking zien in het bijgevoegde bestandje.

De basis is dit:

 

Let ([

 z = BSN::invoer BSN;
 calc = 9 * Middle(z; 1 ;1) + 8 * Middle(z; 2 ;1) + 7 * Middle(z; 3 ;1) + 6 * Middle(z; 4 ;1) + 5 * Middle(z; 5 ;1) + 4 * Middle(z; 6 ;1) + 3 * Middle(z; 7 ;1) + 2 * Middle(z; 8 ;1) - 1 * Middle(z; 9 ;1)];

 If (Length (calc) = 9 and calc <> 0 and Mod (calc; 11) = 0; "goed"; "fout")

)

BSN.fmp12