lainwir3d/dolibarr
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

New rule for FR siret value check

Browse Source
This commit is contained in:
Maxime Kohlhaas 2018-03-15 09:50:33 +01:00
parent 5392218806
commit 8ae90bebaf
1 changed files with 16 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
htdocs/societe/class/societe.class.php
View File

@ -2888,7 +2888,23 @@ class Societe extends CommonObject
$chaine=trim($this->idprof2);
$chaine=preg_replace('/(\s)/','',$chaine);
if (!is_numeric($chaine)) return -1;
if (dol_strlen($chaine) != 14) return -1;
// on prend chaque chiffre un par un
// si son index (position dans la chaîne en commence à 0 au premier caractère) est pair
// on double sa valeur et si cette dernière est supérieure à 9, on lui retranche 9
// on ajoute cette valeur à la somme totale
for ($index = 0; $index < 14; $index ++)
{
$number = (int) $chaine[$index];
if (($index % 2) == 0) { if (($number *= 2) > 9) $number -= 9; }
$sum += $number;
}
// le numéro est valide si la somme des chiffres est multiple de 10
if (($sum % 10) != 0) return -1;
}
//Verify CIF/NIF/NIE if pays ES