All pastes #99955 Raw Edit

Someone

public text v1 · immutable
#99955 ·published 2006-07-25 19:50 UTC
rendered paste body
        function validaPISPASEP($pis)
        {
        	if (strlen($pis) != 11) {
        		return false;
        	}
        	
        	$dv = substr($pis, 10, 1);
        	$multiplicador = array(3,2,9,8,7,6,5,4,3,2);
        	$soma = 0;
        	$resto = 0;
        	
        	for($i=0; $i<10; $i++) {
        		$soma += $pis{$i} * $multiplicador[$i];
        	}
        	
        	$resto = $soma % 11;
        	
        	$resto = ($soma<2) ? 0 : 11 - $resto;
        	
        	return $resto == $dv;
        	
        }