COBOL - Resumo dos cálculos dos DV's do CNPJ, CPF e PIS/PASEP - www.cadcobol.com.br


Volta ao Menu Principal


Desenvolvido por DORNELLES Carlos Alberto - Analista de Sistemas - Brasília DF. - cad_cobol@hotmail.com

COBOL - Resumo dos cálculos dos DV's do CNPJ, CPF e PIS/PASEP
 CNPJ     :   1    2    3    4    5    6    7    8    0    0    0    1    9  5

 Primeiro X  05   04   03   02   09   08   07   06   05   04   03   02
 dígito      05 + 08 + 09 + 08 + 45 + 48 + 49 + 48 + 00 + 00 + 00 + 02 = 222 

 Cálculo    222 / 11 = resto 2 --> 11 - 2 = 09 (digito 9)

 Segundo  X  06   05   04   03   02   09   08   07   06   05   04   03   02
 dígito      06 + 10 + 12 + 12 + 10 + 54 + 56 + 56 + 00 + 00 + 00 + 03 + 18 = 237 

 Cálculo    237 / 11 = resto 6 --> 11 - 6 = 05 (digito 5)
 CPF      :   1    2    3    4    5    6    7    8    9    0  9

 Primeiro X  10   09   08   07   06   05   04   03   02
 dígito      10 + 18 + 24 + 28 + 30 + 30 + 28 + 24 + 18 = 210 

 Cálculo    210 / 11 = resto 1 --> 11 - 1 = 10 (digito 0)

 Segundo  X  11   10   09   08   07   06   05   04   03   02
 dígito      11 + 20 + 27 + 32 + 35 + 36 + 35 + 32 + 27 + 00 = 255 

 Cálculo    255 / 11 = resto 2 --> 11 - 2 = 09 (digito 9)

 PIS      :   1    0    0    2    7    2    3    0    8    8   8

          X  03   02   09   08   07   06   05   04   03   02  
             03 + 00 + 00 + 16 + 49 + 12 + 15 + 00 + 24 + 16 = 135 

 Cálculo    135 / 11 = resto 3 --> 11 - 3 = 08 (digito 8)
 Em todos os casos:

 Se o resto for 0 (zero) ou 1 (hum) o dígito será 0 (zero)





Códigos fonte em COBOL para calcular ou verificar os DV's do CNPJ, CPF e PIS/PASEP - Clique no LINK desejado