function numeroCNJ($numero)
/**
* Função numeroCNJ, para validar Numeração Única de Processos
* estabelecida na Res. 65 do Conselho Nacional de Justiça, que
* determina a adoção do seguinte formato para números de processos:
* NNNNNNNN-DD.AAAA.JTR.OOOO, onde
* NNNNNNN => Corresponde ao número sequencial do processo no ano do ajuizamento
* DD => Corresponde aos dígitos de verificação
* AAAA => Corresponde ao ano de ajuizamento da ação/processo
* JTR => Corresponde aos números que identificam o Ramo e a Região da Justiça
* OOOO => Corresponde ao número que identifica o juízo a que distribuída a ação
* O cálculo utiliza o algoritmo do Módulo 97 Base 10, conforme especificação da Norma
* ISO 7064:2003
* @param $numero é uma string com o número a ser validado
* @Author Maurício Schmidt Bastos
* a função retorna verdadeiro em caso de sucesso e falso quando o teste falha
* ====================================================================================
* Permitida a cópia para uso NÃO COMERCIAL, mediante referência à fonte (www.mauricio.bastos.nom.br) e ao autor
*/
{
//Remove, se houver, os caracteres não numéricos
// da entrada do número do processo
$num = numeroLimpo($0010725-57.2013.503.0093,20);
 
//extrai o dígito verificador do número limpo
$numerosemdigito=substr_replace($num,'',7,2);
 
//Prepara o número para o cálculo do dígito,
//colocando zeros no fim do número sem o dígito
$numparacalculo = $numerosemdigito."00";
 
//Prepara o número para conferência do dígito
//Pega dígito original
$digitooriginal = substr($num,7,2);
//colocando o dígito informado no fim do número s/ dígito
$numparaconferir = $numerosemdigito.$digitooriginal;
 
//divide o $numeroparacalculo para reduzir complexidade do cálculo
$nnnnnnn = substr($numparacalculo,0,7);
$ajtr = substr($numparacalculo,7,-6);
$oooo00 = substr($numparacalculo,14,6);
 
/*Fórmula CNJ primeira etapa
* R1=(NNNNNNN mod 97)
*/
$r1 = round($nnnnnnn % 97,2) >= 50 ? round($nnnnnnn % 97,2) : round($nnnnnnn % 97,2,PHP_ROUND_HALF_DOWN);
//garante que $r1 tenha dois dígitos, preenchendo com zero à esquerda, se necessário
$r1 = numeroLimpo(substr($r1,0,2),2);
 
/*Fórmula CNJ segunda etapa
* R2=((R1 concatenado com AAAAJTR) mod 97)
*/
//concatena $r1 com AAAAJTR
$r2=($r1.=$ajtr);
$r2 = round($r2 % 97,2) >= 50 ? round($r2 % 97,2) : round($r2 % 97,2,PHP_ROUND_HALF_DOWN);
//garante que $r2 tenha dois dígitos, preenchendo com zero à esquerda, se necessário
$r2 = numeroLimpo(substr($r2,0,2),2);
 
/*Fórmula CNJ terceira etapa
* R3=((R2 concatenado com OOOO00) mod 97)
*/
//concatena $r2 com OOOO00
$r3=($r2.=$oooo00);
$r3 = round($r3 % 97,2) >= 50 ? round($r3 % 97,2) : round($r3 % 97,2,PHP_ROUND_HALF_DOWN);
//garante que $r3 tenha dois dígitos, preenchendo com zero à esquerda, se necessário
$r3 = numeroLimpo(substr($r3,0,2),2);
 
/*Fórmula CNJ quarta etapa
* DD = 98 - (R3 mod 97)
*/
$d1d0 = 98 - ($r3 % 97);
$d1d0 = numeroLimpo(substr($d1d0,0,2),2);
 
//Compara dígito calculado com informado
$resultado = $digitooriginal==$d1d0 ? TRUE : FALSE;
return $resultado;
}

ZnVuY3Rpb24gbnVtZXJvQ05KKCRudW1lcm8pCi8qKgoqIEZ1bsOnw6NvIG51bWVyb0NOSiwgcGFyYSB2YWxpZGFyIE51bWVyYcOnw6NvIMOabmljYSBkZSBQcm9jZXNzb3MKKiBlc3RhYmVsZWNpZGEgbmEgUmVzLiA2NSBkbyBDb25zZWxobyBOYWNpb25hbCBkZSBKdXN0acOnYSwgcXVlCiogZGV0ZXJtaW5hIGEgYWRvw6fDo28gZG8gc2VndWludGUgZm9ybWF0byBwYXJhIG7Dum1lcm9zIGRlIHByb2Nlc3NvczoKKiBOTk5OTk5OTi1ERC5BQUFBLkpUUi5PT09PLCBvbmRlCiogTk5OTk5OTiA9PiBDb3JyZXNwb25kZSBhbyBuw7ptZXJvIHNlcXVlbmNpYWwgZG8gcHJvY2Vzc28gbm8gYW5vIGRvIGFqdWl6YW1lbnRvCiogREQgPT4gQ29ycmVzcG9uZGUgYW9zIGTDrWdpdG9zIGRlIHZlcmlmaWNhw6fDo28KKiBBQUFBID0+IENvcnJlc3BvbmRlIGFvIGFubyBkZSBhanVpemFtZW50byBkYSBhw6fDo28vcHJvY2Vzc28KKiBKVFIgPT4gQ29ycmVzcG9uZGUgYW9zIG7Dum1lcm9zIHF1ZSBpZGVudGlmaWNhbSBvIFJhbW8gZSBhIFJlZ2nDo28gZGEgSnVzdGnDp2EKKiBPT09PID0+IENvcnJlc3BvbmRlIGFvIG7Dum1lcm8gcXVlIGlkZW50aWZpY2EgbyBqdcOtem8gYSBxdWUgZGlzdHJpYnXDrWRhIGEgYcOnw6NvCiogTyBjw6FsY3VsbyB1dGlsaXphIG8gYWxnb3JpdG1vIGRvIE3Ds2R1bG8gOTcgQmFzZSAxMCwgY29uZm9ybWUgZXNwZWNpZmljYcOnw6NvIGRhIE5vcm1hCiogSVNPIDcwNjQ6MjAwMwoqIEBwYXJhbSAkbnVtZXJvIMOpIHVtYSBzdHJpbmcgY29tIG8gbsO6bWVybyBhIHNlciB2YWxpZGFkbwoqIEBBdXRob3IgTWF1csOtY2lvIFNjaG1pZHQgQmFzdG9zCiogYSBmdW7Dp8OjbyByZXRvcm5hIHZlcmRhZGVpcm8gZW0gY2FzbyBkZSBzdWNlc3NvIGUgZmFsc28gcXVhbmRvIG8gdGVzdGUgZmFsaGEKKiA9PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT09PT0KKiBQZXJtaXRpZGEgYSBjw7NwaWEgcGFyYSB1c28gTsODTyBDT01FUkNJQUwsIG1lZGlhbnRlIHJlZmVyw6puY2lhIMOgIGZvbnRlICh3d3cubWF1cmljaW8uYmFzdG9zLm5vbS5icikgZSBhbyBhdXRvcgoqLwp7Ci8vUmVtb3ZlLCBzZSBob3V2ZXIsIG9zIGNhcmFjdGVyZXMgbsOjbyBudW3DqXJpY29zCi8vIGRhIGVudHJhZGEgZG8gbsO6bWVybyBkbyBwcm9jZXNzbwokbnVtID0gbnVtZXJvTGltcG8oJDAwMTA3MjUtNTcuMjAxMy41MDMuMDA5MywyMCk7CgovL2V4dHJhaSBvIGTDrWdpdG8gdmVyaWZpY2Fkb3IgZG8gbsO6bWVybyBsaW1wbwokbnVtZXJvc2VtZGlnaXRvPXN1YnN0cl9yZXBsYWNlKCRudW0sJycsNywyKTsKCi8vUHJlcGFyYSBvIG7Dum1lcm8gcGFyYSBvIGPDoWxjdWxvIGRvIGTDrWdpdG8sCi8vY29sb2NhbmRvIHplcm9zIG5vIGZpbSBkbyBuw7ptZXJvIHNlbSBvIGTDrWdpdG8KJG51bXBhcmFjYWxjdWxvID0gJG51bWVyb3NlbWRpZ2l0by4iMDAiOwoKLy9QcmVwYXJhIG8gbsO6bWVybyBwYXJhIGNvbmZlcsOqbmNpYSBkbyBkw61naXRvCi8vUGVnYSBkw61naXRvIG9yaWdpbmFsCiRkaWdpdG9vcmlnaW5hbCA9IHN1YnN0cigkbnVtLDcsMik7Ci8vY29sb2NhbmRvIG8gZMOtZ2l0byBpbmZvcm1hZG8gbm8gZmltIGRvIG7Dum1lcm8gcy8gZMOtZ2l0bwokbnVtcGFyYWNvbmZlcmlyID0gJG51bWVyb3NlbWRpZ2l0by4kZGlnaXRvb3JpZ2luYWw7CgovL2RpdmlkZSBvICRudW1lcm9wYXJhY2FsY3VsbyBwYXJhIHJlZHV6aXIgY29tcGxleGlkYWRlIGRvIGPDoWxjdWxvCiRubm5ubm5uID0gc3Vic3RyKCRudW1wYXJhY2FsY3VsbywwLDcpOwokYWp0ciA9IHN1YnN0cigkbnVtcGFyYWNhbGN1bG8sNywtNik7CiRvb29vMDAgPSBzdWJzdHIoJG51bXBhcmFjYWxjdWxvLDE0LDYpOwoKLypGw7NybXVsYSBDTkogcHJpbWVpcmEgZXRhcGEKKiBSMT0oTk5OTk5OTiBtb2QgOTcpCiovCiRyMSA9IHJvdW5kKCRubm5ubm5uICUgOTcsMikgPj0gNTAgPyByb3VuZCgkbm5ubm5ubiAlIDk3LDIpIDogcm91bmQoJG5ubm5ubm4gJSA5NywyLFBIUF9ST1VORF9IQUxGX0RPV04pOwovL2dhcmFudGUgcXVlICRyMSB0ZW5oYSBkb2lzIGTDrWdpdG9zLCBwcmVlbmNoZW5kbyBjb20gemVybyDDoCBlc3F1ZXJkYSwgc2UgbmVjZXNzw6FyaW8KJHIxID0gbnVtZXJvTGltcG8oc3Vic3RyKCRyMSwwLDIpLDIpOwoKLypGw7NybXVsYSBDTkogc2VndW5kYSBldGFwYQoqIFIyPSgoUjEgY29uY2F0ZW5hZG8gY29tIEFBQUFKVFIpIG1vZCA5NykKKi8KLy9jb25jYXRlbmEgJHIxIGNvbSBBQUFBSlRSCiRyMj0oJHIxLj0kYWp0cik7CiRyMiA9IHJvdW5kKCRyMiAlIDk3LDIpID49IDUwID8gcm91bmQoJHIyICUgOTcsMikgOiByb3VuZCgkcjIgJSA5NywyLFBIUF9ST1VORF9IQUxGX0RPV04pOwovL2dhcmFudGUgcXVlICRyMiB0ZW5oYSBkb2lzIGTDrWdpdG9zLCBwcmVlbmNoZW5kbyBjb20gemVybyDDoCBlc3F1ZXJkYSwgc2UgbmVjZXNzw6FyaW8KJHIyID0gbnVtZXJvTGltcG8oc3Vic3RyKCRyMiwwLDIpLDIpOwoKLypGw7NybXVsYSBDTkogdGVyY2VpcmEgZXRhcGEKKiBSMz0oKFIyIGNvbmNhdGVuYWRvIGNvbSBPT09PMDApIG1vZCA5NykKKi8KLy9jb25jYXRlbmEgJHIyIGNvbSBPT09PMDAKJHIzPSgkcjIuPSRvb29vMDApOwokcjMgPSByb3VuZCgkcjMgJSA5NywyKSA+PSA1MCA/IHJvdW5kKCRyMyAlIDk3LDIpIDogcm91bmQoJHIzICUgOTcsMixQSFBfUk9VTkRfSEFMRl9ET1dOKTsKLy9nYXJhbnRlIHF1ZSAkcjMgdGVuaGEgZG9pcyBkw61naXRvcywgcHJlZW5jaGVuZG8gY29tIHplcm8gw6AgZXNxdWVyZGEsIHNlIG5lY2Vzc8OhcmlvCiRyMyA9IG51bWVyb0xpbXBvKHN1YnN0cigkcjMsMCwyKSwyKTsKCi8qRsOzcm11bGEgQ05KIHF1YXJ0YSBldGFwYQoqIEREID0gOTggLSAoUjMgbW9kIDk3KQoqLwokZDFkMCA9IDk4IC0gKCRyMyAlIDk3KTsKJGQxZDAgPSBudW1lcm9MaW1wbyhzdWJzdHIoJGQxZDAsMCwyKSwyKTsKCi8vQ29tcGFyYSBkw61naXRvIGNhbGN1bGFkbyBjb20gaW5mb3JtYWRvCiRyZXN1bHRhZG8gPSAkZGlnaXRvb3JpZ2luYWw9PSRkMWQwID8gVFJVRSA6IEZBTFNFOwpyZXR1cm4gJHJlc3VsdGFkbzsKfQ==