Poprawny numer NIP, REGON lun PESEL, Funkcja, PHP4 i 5 Opcje

[ghostrider]

potrzebowałem, nie mogłem znaleźć, napisałem

[PHP] pobierz, plaintext 
<?php
 
function is_nip($nr)
		{
			if ($nr === NULL || empty($nr)) return false;
			$weights = array (6, 5, 7, 2, 3, 4, 5, 6, 7) ;
			if ( preg_match_all("/d/", $nr, $digits) )
				{
				$digits = $digits[0];
				if ( count($digits)-1 != count($weights) ) return false;
				$ctrl_digit = (int) array_pop($digits);
				$all_sum		 = (int) 0;
				foreach ( $digits as $digit )
					{
					$weight	 = (int) current($weights);
					$all_sum += (int) $digit * $weight;
					next($weights);
					}
					$calc_ctrl = (int) ($all_sum % 11 == 10) ? 0 : $all_sum % 11;
					if ($calc_ctrl == $ctrl_digit) return true;
				} 
			return false; 
		}
?>
[PHP] pobierz, plaintext 

sprawdzilem na 1553 numerach NIP, tylko tyle posiadam i funkcjonuje ok.
ale człowiek omylne zwierze wiec uwagi, poprawki, sugestie, pytania bedą mile widziane.

użycie

Kod

sprawdza poprawność podanego numeru NIP
bool is_nip (string nr)

nie trzeba sie martwić o forme wpisywania numeru tzn: może byc XXX-XX-XX-XXX albo XXXXXXXXXX, albo jakikolwiek zestaw znaków zawierający jednak 10 cyfr

Ten post edytował ghostrider 11.11.2005, 13:59:46

[ghostrider]

mike_mech: dzieki za wskazenie drogi co do tematu posta (IMG:http://forum.php.pl/style_emoticons/default/winksmiley.jpg)

powyzsza funkcja zyskala poszerzona funkcjonalnosc, i teraz sprawdza poprawnosc numerow: NIP, REGON, PESEL, zmienila tez nazwe, poprawiłem tez małe niedopatrzenie .

if ($nr === NULL && empty($nr)) return false;

poprawiono na

[PHP] pobierz, plaintext 
<?php
($nr === NULL || empty($nr))
?>
[PHP] pobierz, plaintext 

oki, kod:

[PHP] pobierz, plaintext 
<?php
 
function is_evidence_nr($nr, $type=0)
{
	if ($nr === NULL || empty($nr)) return false;
 
	$types = array(0 => "NIP", 1 => "REGON", 2 => "PESEL");
 
	if ( !array_key_exists($type, $types) ) return false;
	else $type = (string) $types[$type];
 
	$weights["NIP"]		 = array (6, 5, 7, 2, 3, 4, 5, 6, 7) ;
	$weights["REGON_7"] = array (2, 3, 4, 5, 6, 7) ;
	$weights["REGON_9"] = array (8, 9, 2, 3, 4, 5, 6, 7) ;
	$weights["PESEL"]		= array (1, 3, 7, 9, 1, 3, 7, 9, 1, 3);
 
	$mods["NIP"]				= (int) 11;
	$mods["REGON"]			= (int) 11;
	$mods["PESEL"]			= (int) 10;
 
	if ( preg_match_all("/d/", $nr, $digits) )
		{
		$digits			 = $digits[0];
 
		if ($type == "REGON") {
			$digits_count = count($digits);
			if ($digits_count != 9 && $digits_count != 7) return false;
			$idx = (string) sprintf("%s_%d", $type, $digits_count);
		}
		else $idx = (string) $type;
 
		$weights	 = $weights[$idx];
		$mods			= $mods[$type];
 
		if ( count($digits)-1 != count($weights) ) return false;
		$ctrl_digit = (int) array_pop($digits);
		$all_sum		 = (int) 0;
		foreach ( $digits as $digit )
			{
			$weight	 = (int) current($weights);
			$all_sum += (int) $digit * $weight;
			next($weights);
			}
			$calc_ctrl = (int) ($all_sum % $mods == 10) ? 0 : $all_sum % $mods;
			if ($type == "PESEL") $calc_ctrl = (int) (10 - ($all_sum % $mods) == 10) ? 0 : 10 - ($all_sum % $mods) ;
			if ($calc_ctrl == $ctrl_digit) return true;
		} 
	return false; 
}
 
?>
[PHP] pobierz, plaintext 

uzycie :

Kod

sprawdza poprawność podanego numeru NIP, REGON lub PESEL
bool is_evidence_nr(string nr, [int typ] )

typ to 0,1 lub 2 odpowiednio dla NIP, REGON lub PESEL
domyslnie typ = 0, czyli NIP

Ten post edytował ghostrider 11.11.2005, 17:10:03