PHP modulo_10函数代码示例

function monta_linha_digitavel($codigo)
{
    // Posição 	Conteúdo
    // 1 a 3    Número do banco
    // 4        Código da Moeda - 9 para Real ou 8 - outras moedas
    // 5        Fixo "9'
    // 6 a 9    PSK - codigo cliente (4 primeiros digitos)
    // 10 a 12  Restante do PSK (3 digitos)
    // 13 a 19  7 primeiros digitos do Nosso Numero
    // 20 a 25  Restante do Nosso numero (8 digitos) - total 13 (incluindo digito verificador)
    // 26 a 26  IOS
    // 27 a 29  Tipo Modalidade Carteira
    // 30 a 30  Dígito verificador do código de barras
    // 31 a 34  Fator de vencimento (qtdade de dias desde 07/10/1997 até a data de vencimento)
    // 35 a 44  Valor do título
    // 1. Primeiro Grupo - composto pelo código do banco, código da moéda, Valor Fixo "9"
    // e 4 primeiros digitos do PSK (codigo do cliente) e DV (modulo10) deste campo
    $campo1 = substr($codigo, 0, 3) . substr($codigo, 3, 1) . substr($codigo, 19, 1) . substr($codigo, 20, 4);
    $campo1 = $campo1 . modulo_10($campo1);
    $campo1 = substr($campo1, 0, 5) . '.' . substr($campo1, 5);
    // 2. Segundo Grupo - composto pelas 3 últimas posiçoes do PSK e 7 primeiros dígitos do Nosso Número
    // e DV (modulo10) deste campo
    $campo2 = substr($codigo, 24, 10);
    $campo2 = $campo2 . modulo_10($campo2);
    $campo2 = substr($campo2, 0, 5) . '.' . substr($campo2, 5);
    // 3. Terceiro Grupo - Composto por : Restante do Nosso Numero (6 digitos), IOS, Modalidade da Carteira
    // e DV (modulo10) deste campo
    $campo3 = substr($codigo, 34, 10);
    $campo3 = $campo3 . modulo_10($campo3);
    $campo3 = substr($campo3, 0, 5) . '.' . substr($campo3, 5);
    // 4. Campo - digito verificador do codigo de barras
    $campo4 = substr($codigo, 4, 1);
    // 5. Campo composto pelo fator vencimento e valor nominal do documento, sem
    // indicacao de zeros a esquerda e sem edicao (sem ponto e virgula). Quando se
    // tratar de valor zerado, a representacao deve ser 0000000000 (dez zeros).
    $campo5 = substr($codigo, 5, 4) . substr($codigo, 9, 10);
    return "{$campo1} {$campo2} {$campo3} {$campo4} {$campo5}";
}

function monta_linha_digitavel($codigo)
{
    // Posição 	Conteúdo
    // 1 a 3    Número do banco
    // 4        Código da Moeda - 9 para Real
    // 5        Digito verificador do Código de Barras
    // 6 a 9   Fator de Vencimento
    // 10 a 19 Valor (8 inteiros e 2 decimais)
    // 20 a 44 Campo Livre definido por cada banco (25 caracteres)
    // 1. Campo - composto pelo código do banco, código da moéda, as cinco primeiras posições
    // do campo livre e DV (modulo10) deste campo
    $p1 = substr($codigo, 0, 4);
    $p2 = substr($codigo, 19, 5);
    $p3 = modulo_10("{$p1}{$p2}");
    $p4 = "{$p1}{$p2}{$p3}";
    $p5 = substr($p4, 0, 5);
    $p6 = substr($p4, 5);
    $campo1 = "{$p5}.{$p6}";
    // 2. Campo - composto pelas posiçoes 6 a 15 do campo livre
    // e livre e DV (modulo10) deste campo
    $p1 = substr($codigo, 24, 10);
    $p2 = modulo_10($p1);
    $p3 = "{$p1}{$p2}";
    $p4 = substr($p3, 0, 5);
    $p5 = substr($p3, 5);
    $campo2 = "{$p4}.{$p5}";
    // 3. Campo composto pelas posicoes 16 a 25 do campo livre
    // e livre e DV (modulo10) deste campo
    $p1 = substr($codigo, 34, 10);
    $p2 = modulo_10($p1);
    $p3 = "{$p1}{$p2}";
    $p4 = substr($p3, 0, 5);
    $p5 = substr($p3, 5);
    $campo3 = "{$p4}.{$p5}";
    // 4. Campo - digito verificador do codigo de barras
    $campo4 = substr($codigo, 4, 1);
    // 5. Campo composto pelo fator vencimento e valor nominal do documento, sem
    // indicacao de zeros a esquerda e sem edicao (sem ponto e virgula). Quando se
    // tratar de valor zerado, a representacao deve ser 000 (tres zeros).
    $p1 = substr($codigo, 5, 4);
    $p2 = substr($codigo, 9, 10);
    $campo5 = "{$p1}{$p2}";
    return "{$campo1} {$campo2} {$campo3} {$campo4} {$campo5}";
}

function monta_linha_digitavel($codigo)
{
    $banco = substr($codigo, 0, 3);
    $moeda = substr($codigo, 3, 1);
    $k = substr($codigo, 4, 1);
    $fator = substr($codigo, 5, 4);
    $valor = substr($codigo, 9, 10);
    $ch = substr($codigo, -25);
    $p1 = $banco . $moeda . substr($ch, 0, 5);
    $dv_1 = modulo_10($p1);
    $campo1 = substr($p1, 0, 5) . '.' . substr($p1, -4) . $dv_1;
    $p12 = substr($ch, 5, 10);
    $dv_2 = modulo_10($p12);
    $campo2 = substr($p12, 0, 5) . '.' . substr($p12, -5) . $dv_2;
    $p13 = substr($ch, 15, 10);
    $dv_3 = modulo_10($p13);
    $campo3 = substr($p13, 0, 5) . '.' . substr($p13, -5) . $dv_3;
    $campo4 = $k;
    // 5. Campo composto pelo valor nominal pelo valor nominal do documento, sem
    // indicacao de zeros a esquerda e sem edicao (sem ponto e virgula). Quando se
    // tratar de valor zerado, a representacao deve ser 000 (tres zeros).
    $campo5 = $fator . $valor;
    return "{$campo1} {$campo2} {$campo3} {$campo4} {$campo5}";
    /*
    // Composição da Linha Digitável
    // Primeiro Campo
    $Wtemp=$codigobanco.$nummoeda.substr($chaveasbace,0,5);
    $campo1=$Wtemp.modulo_10($Wtemp);
    $campo1=substr($campo1,0,5).".".substr($campo1,5,5);
    // Segundo Campo
    $Wtemp=substr($chaveasbace,5,10);
    $campo2=$Wtemp.modulo_10($Wtemp);
    $campo2=substr($campo2,0,5).".".substr($campo2,5,6);
    // Terceiro Campo
    $Wtemp=substr($chaveasbace,15,10);
    $campo3=$Wtemp.modulo_10($Wtemp);
    $campo3=substr($campo3,0,5).".".substr($campo3,5,6);
    // Quarto Campo
    //$Wtemp=substr($chaveasbace,15,10);
    //$campo4=$Wtemp.modulo_10($Wtemp);
    //$campo4=substr($campo4,0,5).".".substr($campo4,5,6);
    // Quinto Campo
    $campo5=$fator_vencimento.$valor;
    echo "$campo1 $campo2 $campo3 $dv $campo5"; 
    
    //$nossonumero = substr($nossonumero_dv,0,14).'-'.substr($nossonumero_dv,14,1);
    //$agencia_codigo = $agencia." / ". $conta ."-". $conta_dv;
    */
}

function monta_linha_digitavel($codigo)
{
    // Posição 	Conteúdo
    // 1 a 3    Número do banco
    // 4        Código da Moeda - 9 para Real
    // 5        Digito verificador do Código de Barras
    // 6 a 9    Fator de Vencimento
    // 10 a 19  Valor (8 inteiros e 2 decimais)
    //          Campo Livre definido por cada banco (25 caracteres)
    // 20 a 26  Código do Cedente
    // 27 a 39  Código do Documento
    // 40 a 43  Data de Vencimento em Juliano (mmmy)
    // 44       Código do aplicativo CNR = 2
    // 1. Campo - composto pelo código do banco, código da moéda, as cinco primeiras posições
    // do campo livre e DV (modulo10) deste campo
    $campo1 = substr($codigo, 0, 4) . substr($codigo, 19, 5);
    $campo1 = $campo1 . modulo_10($campo1);
    $campo1 = substr($campo1, 0, 5) . '.' . substr($campo1, 5, 5);
    // 2. Campo - composto pelas posiçoes 6 a 15 do campo livre
    // e livre e DV (modulo10) deste campo
    $campo2 = substr($codigo, 24, 2) . substr($codigo, 26, 8);
    $campo2 = $campo2 . modulo_10($campo2);
    $campo2 = substr($campo2, 0, 5) . '.' . substr($campo2, 5, 6);
    // 3. Campo composto pelas posicoes 16 a 25 do campo livre
    // e livre e DV (modulo10) deste campo
    $campo3 = substr($codigo, 34, 5) . substr($codigo, 39, 4) . substr($codigo, 43, 1);
    $campo3 = $campo3 . modulo_10($campo3);
    $campo3 = substr($campo3, 0, 5) . '.' . substr($campo3, 5, 6);
    // 4. Campo - digito verificador do codigo de barras
    $campo4 = substr($codigo, 4, 1);
    // 5. Campo composto pelo fator vencimento e valor nominal do documento, sem
    // indicacao de zeros a esquerda e sem edicao (sem ponto e virgula). Quando se
    // tratar de valor zerado, a representacao deve ser 000 (tres zeros).
    $campo5 = substr($codigo, 5, 4) . substr($codigo, 9, 10);
    return "{$campo1} {$campo2} {$campo3} {$campo4} {$campo5}";
}

function monta_linha_digitavel($linha) {
    // Posição 	Conteúdo
    // 1 a 3    Número do banco
    // 4        Código da Moeda - 9 para Real
    // 5        Digito verificador do Código de Barras
    // 6 a 19   Valor (12 inteiros e 2 decimais)
    // 20 a 44  Campo Livre definido por cada banco

    // 1. Campo - composto pelo código do banco, código da moéda, as cinco primeiras posições
    // do campo livre e DV (modulo10) deste campo
    $p1 = substr($linha, 0, 4);
    $p2 = substr($linha, 19, 5);
    $p3 = modulo_10("$p1$p2");
    $p4 = "$p1$p2$p3";
    $p5 = substr($p4, 0, 5);
    $p6 = substr($p4, 5);
    $campo1 = "$p5.$p6";

    // 2. Campo - composto pelas posiçoes 6 a 15 do campo livre
    // e livre e DV (modulo10) deste campo
    $p1 = substr($linha, 24, 10);
    $p2 = modulo_10($p1);
    $p3 = "$p1$p2";
    $p4 = substr($p3, 0, 5);
    $p5 = substr($p3, 5);
    $campo2 = "$p4.$p5";

    // 3. Campo composto pelas posicoes 16 a 25 do campo livre
    // e livre e DV (modulo10) deste campo
    $p1 = substr($linha, 34, 10);
    $p2 = modulo_10($p1);
    $p3 = "$p1$p2";
    $p4 = substr($p3, 0, 5);
    $p5 = substr($p3, 5);
    $campo3 = "$p4.$p5";

    // 4. Campo - digito verificador do codigo de barras
    $campo4 = substr($linha, 4, 1);

    // 5. Campo composto pelo valor nominal pelo valor nominal do documento, sem
    // indicacao de zeros a esquerda e sem edicao (sem ponto e virgula). Quando se
    // tratar de valor zerado, a representacao deve ser 000 (tres zeros).
    $campo5 = substr($linha, 5, 14);

    return "$campo1 $campo2 $campo3 $campo4 $campo5"; 
}

function monta_linha_digitavel($codigo)
{
    $banco = substr($codigo, 0, 3);
    $moeda = substr($codigo, 3, 1);
    $k = substr($codigo, 4, 1);
    $fator = substr($codigo, 5, 4);
    $valor = substr($codigo, 9, 10);
    $cvt = substr($codigo, 19, 1);
    $codigo_cliente = substr($codigo, 20, 7);
    $zero = substr($codigo, 27, 2);
    $nossonumero_dv = substr($codigo, 29, 15);
    $p1 = $banco . $moeda . $cvt . substr($codigo_cliente, 0, 4);
    $dv_1 = modulo_10($p1);
    $campo1 = substr($p1, 0, 5) . '.' . substr($p1, -4) . $dv_1;
    $p12 = substr($codigo_cliente, 4, 3) . $zero . substr($nossonumero_dv, 0, 5);
    $dv_2 = modulo_10($p12);
    $campo2 = substr($p12, 0, 5) . '.' . substr($p12, -5) . $dv_2;
    $p13 = substr($nossonumero_dv, 5, 10);
    $dv_3 = modulo_10($p13);
    $campo3 = substr($p13, 0, 5) . '.' . substr($p13, -5) . $dv_3;
    $campo4 = $k;
    // 5. Campo composto pelo valor nominal pelo valor nominal do documento, sem
    // indicacao de zeros a esquerda e sem edicao (sem ponto e virgula). Quando se
    // tratar de valor zerado, a representacao deve ser 000 (tres zeros).
    $campo5 = $fator . $valor;
    return "{$campo1} {$campo2} {$campo3} {$campo4} {$campo5}";
}

function monta_linha_digitavel($linha)
{
    // Posição 	Conteúdo
    // 1 a 3    Número do banco
    // 4        Código da Moeda - 9 para Real
    // 5        Digito verificador do Código de Barras
    // 6 a 19   Valor (12 inteiros e 2 decimais)
    // 20 a 44  Campo Livre definido por cada banco
    // 1. Campo - composto pelo código do banco, código da moéda, as cinco primeiras posições
    // do campo livre e DV (modulo10) deste campo
    $p1 = substr($linha, 0, 4);
    $p2 = substr($linha, 19, 5);
    //apenas o numero significativo do lado esquerdo da carteira e agencia
    $p3 = modulo_10("{$p1}{$p2}");
    $p4 = "{$p1}{$p2}{$p3}";
    $p5 = substr($p4, 0, 5);
    $p6 = substr($p4, 5);
    $campo1 = "{$p5}.{$p6}";
    // 2. Campo - composto pelas posiçoes 6 a 15 do campo livre
    // e livre e DV (modulo10) deste campo
    //$p10 = substr($linha, 20, 2); //modalidade
    $p1 = substr($linha, 24, 10);
    //cod beneficiario e 1 digito do nosso numero
    $p2 = modulo_10("{$p1}");
    $p3 = "{$p1}{$p2}";
    $p4 = substr($p3, 0, 5);
    $p5 = substr($p3, 5);
    $campo2 = "{$p4}.{$p5}";
    // 3. Campo composto pelas posicoes 16 a 25 do campo livre
    // e livre e DV (modulo10) deste campo
    $p1 = substr($linha, 34, 10);
    //7 digitos restantes do nosso número e numero parcela
    $p2 = modulo_10($p1);
    $p3 = "{$p1}{$p2}";
    $p4 = substr($p3, 0, 5);
    $p5 = substr($p3, 5);
    $campo3 = "{$p4}.{$p5}";
    // 4. Campo - digito verificador do codigo de barras
    $campo4 = substr($linha, 4, 1);
    // 5. Campo composto pelo valor nominal pelo valor nominal do documento, sem
    // indicacao de zeros a esquerda e sem edicao (sem ponto e virgula). Quando se
    // tratar de valor zerado, a representacao deve ser 000 (tres zeros).
    $campo5 = substr($linha, 5, 14);
    return "{$campo1} {$campo2} {$campo3} {$campo4} {$campo5}";
}

function monta_linha_digitavel($codigo)
{
    // 01-03    -> Código do banco sem o digito
    // 04-04    -> Código da Moeda (9-Real)
    // 05-05    -> Dígito verificador do código de barras
    // 06-09    -> Fator de vencimento
    // 10-19    -> Valor Nominal do Título
    // 20-44    -> Campo Livre (Abaixo)
    // 20-23    -> Código da Agencia (sem dígito)
    // 24-05    -> Número da Carteira
    // 26-36    -> Nosso Número (sem dígito)
    // 37-43    -> Conta do Cedente (sem dígito)
    // 44-44    -> Zero (Fixo)
    // 1. Campo - composto pelo código do banco, código da moéda, as cinco primeiras posições
    // do campo livre e DV (modulo10) deste campo
    $p1 = substr($codigo, 0, 4);
    // Numero do banco + Carteira
    $p2 = substr($codigo, 19, 5);
    // 5 primeiras posições do campo livre
    $p3 = modulo_10("{$p1}{$p2}");
    // Digito do campo 1
    $p4 = "{$p1}{$p2}{$p3}";
    // União
    $campo1 = substr($p4, 0, 5) . '.' . substr($p4, 5);
    // 2. Campo - composto pelas posiçoes 6 a 15 do campo livre
    // e livre e DV (modulo10) deste campo
    $p1 = substr($codigo, 24, 10);
    //Posições de 6 a 15 do campo livre
    $p2 = modulo_10($p1);
    //Digito do campo 2
    $p3 = "{$p1}{$p2}";
    $campo2 = substr($p3, 0, 5) . '.' . substr($p3, 5);
    // 3. Campo composto pelas posicoes 16 a 25 do campo livre
    // e livre e DV (modulo10) deste campo
    $p1 = substr($codigo, 34, 10);
    //Posições de 16 a 25 do campo livre
    $p2 = modulo_10($p1);
    //Digito do Campo 3
    $p3 = "{$p1}{$p2}";
    $campo3 = substr($p3, 0, 5) . '.' . substr($p3, 5);
    // 4. Campo - digito verificador do codigo de barras
    $campo4 = substr($codigo, 4, 1);
    // 5. Campo composto pelo fator vencimento e valor nominal do documento, sem
    // indicacao de zeros a esquerda e sem edicao (sem ponto e virgula). Quando se
    // tratar de valor zerado, a representacao deve ser 000 (tres zeros).
    $p1 = substr($codigo, 5, 4);
    $p2 = substr($codigo, 9, 10);
    $campo5 = "{$p1}{$p2}";
    return "{$campo1} {$campo2} {$campo3} {$campo4} {$campo5}";
}

function monta_linha_digitavel($linha)
{
    // 1º. Campo: composto pelo código de Banco, código da moeda, as cinco primeiras posições  do campo livre e  dígito verificador (módulo 10) deste campo;
    // 2º. Campo: composto pelas  posições 6ª. à 15ª. do  campo livre e dígito verificador (módulo 10) deste campo;
    // 3º. Campo: composto pelas posições 16ª. à 25ª. do campo livre e dígito  verificador (módulo 10) deste campo;
    // 4º. Campo: Dígito verificador do código de barras (dígito de autoconferência);
    // 5º. Campo: Composto pelo Fator de  Vencimento (anexo 7) e o Valor Nominal do documento, com a inclusão  de  zeros entre eles até compor as 14 posições do campo,  e sem edição de ponto e vírgula.
    //            Quando se tratar de bloqueto sem discriminação de valor no código de barras a representação deverá ser com zeros.
    $campo1 = substr($linha, 0, 3) . substr($linha, 3, 1) . substr($linha, 19, 5);
    $campo1Digito = modulo_10($campo1);
    $campo2 = substr($linha, 24, 10);
    $campo2Digito = modulo_10($campo2);
    $campo3 = substr($linha, 34, 10);
    $campo3Digito = modulo_10($campo3);
    $campo4 = substr($linha, 4, 1);
    $campo5 = substr($linha, 5, 4) . substr($linha, 9, 10);
    // Monta linha digitável como deve imprimir
    $linha = substr($campo1, 0, 5) . "." . substr($campo1, 5) . $campo1Digito . " " . substr($campo2, 0, 5) . "." . substr($campo2, 5) . $campo2Digito . " " . substr($campo3, 0, 5) . "." . substr($campo3, 5) . $campo3Digito . " " . $campo4 . " " . $campo5;
    return $linha;
}

function monta_linha_digitavel($dados) {
	// Padrão: Sudameris
	// POSIÇÃO	CONTEÚDO
	// 1 a 3	Número do banco
	// 4		Código da Moeda
	// 5 a 8	Agência
	// 9 a 15	Conta
	// 16		Digitão
	// 17 a 29	Nosso número
	// 30		Dígito do código de barra
	// 31 a 34	Fator de vencimento
	// 35 a 44	Valor

	if (ereg('^([0-9]{5})([0-9]{4})([0-9]{5})([0-9]{5})([0-9]{5})([0-9]{5})([0-9]{1})([0-9]{4})([0-9]{10})$', $dados, $bloco))
		{
		$dv1 = modulo_10($bloco[1] . $bloco[2]);
		if ($dv1 == 10) $dv1 = 0;

		$dv2 = modulo_10($bloco[3] . $bloco[4]);
		if ($dv2 == 10) $dv2 = 0;

		$dv3 = modulo_10($bloco[5] . $bloco[6]);
		if ($dv3 == 10) $dv3 = 0;

		return ($bloco[1] . '.' . $bloco[2] . $dv1 . ' ' . $bloco[3] . '.' . $bloco[4] . $dv2 . ' ' . $bloco[5] . '.' . $bloco[6] . $dv3 . ' ' . $bloco[7] . ' ' . $bloco[8] . $bloco[9]);
		}
	else
		return '';
}

function monta_linha_digitavel($codigo)
{
    // campo 1
    $banco = substr($codigo, 0, 3);
    $moeda = substr($codigo, 3, 1);
    $ccc = substr($codigo, 19, 3);
    $ddnnum = substr($codigo, 22, 2);
    $dv1 = modulo_10($banco . $moeda . $ccc . $ddnnum);
    // campo 2
    $resnnum = substr($codigo, 24, 6);
    $dac1 = substr($codigo, 30, 1);
    //modulo_10($agencia.$conta.$carteira.$nnum);
    $dddag = substr($codigo, 31, 3);
    $dv2 = modulo_10($resnnum . $dac1 . $dddag);
    // campo 3
    $resag = substr($codigo, 34, 1);
    $contadac = substr($codigo, 35, 6);
    //substr($codigo,35,5).modulo_10(substr($codigo,35,5));
    $zeros = substr($codigo, 41, 3);
    $dv3 = modulo_10($resag . $contadac . $zeros);
    // campo 4
    $dv4 = substr($codigo, 4, 1);
    // campo 5
    $fator = substr($codigo, 5, 4);
    $valor = substr($codigo, 9, 10);
    $campo1 = substr($banco . $moeda . $ccc . $ddnnum . $dv1, 0, 5) . '.' . substr($banco . $moeda . $ccc . $ddnnum . $dv1, 5, 5);
    $campo2 = substr($resnnum . $dac1 . $dddag . $dv2, 0, 5) . '.' . substr($resnnum . $dac1 . $dddag . $dv2, 5, 6);
    $campo3 = substr($resag . $contadac . $zeros . $dv3, 0, 5) . '.' . substr($resag . $contadac . $zeros . $dv3, 5, 6);
    $campo4 = $dv4;
    $campo5 = $fator . $valor;
    return "{$campo1} {$campo2} {$campo3} {$campo4} {$campo5}";
}