Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

sacjamm

digito verificador de codigo de barras

Recommended Posts

Olá amigos não sei se estou na área correta, se eu não estiver favor me orientar até a área correta!

Mais então, estou desenvolvendo um gerador de código de barras EAN13, só que estou com um problema para fazer a checagem do último dígito verificador, achei algumas postagens mostrando como faço pra encontrar , até aí tudo bem pois é a formula, acontece que eu não consigo fazer o calculo que faz o multiplo de 10.

Ex.:

Se o calculo dos valores for: 147, eu preciso achar o valor 150 pra diminuir, porém não consegui verificar isso.

Ex.:

$sete = 7;

$oito = 8;

$nove = 9;

$digitoVerificador = $sete + 1 + $oito * 3 + $nove * 1 + 2 * 3 + 2 * 1 + 3 * 3 + 3 * 1 + 2 * 3 + 2 * 1 + 3 * 3 + 3 * 1 + 5 * 3;

//echo $digitoVerificador . "\n<br>";

//Resultado do calculo acima = 96

for ($j = 0; $j <= 1000; $j++):

if ($j % 10 == 0):

if ($digitoVerificador <= $j):

echo $j."\n";

//Resultado: retorna um loop de 10 em 10 começando com 100;

//A aproximação é justamente o primeiro valor que o resultado é 100

endif;

endif;

endfor;

Eu queria saber como eu faço pra pegar esse valor 100 pra diminuir com o resultado 96, em que eu possa achar o digito verificador?

 

Espero a ajuda, e possiveis esclarecimentos

Compartilhar este post


Link para o post
Compartilhar em outros sites

Segue minha solução para Modulo-10. 

 

 function Mod10($num) { 
   $soma=0; $parcial=0; $fator=2;  $digito=0; $aux='';  $succ=0;  
   settype($num,'string'); 
   # adicionar fator 
   for ($i = strlen($num); $i > 0; $i--) {
        $parcial = ((int) substr($num, $i -1, 1)) * $fator; 
        # testa limite 
        if ($parcial > 9) { 
            $aux = (string) $parcial; 
            $parcial = (int) substr($aux,0,1) + (int) substr($aux,1,1); 
        } 
        $soma += $parcial; 
          
        if ($fator == 2) { 
           $fator = 1; 
        } else $fator = 2; 
   } # for 
   $succ = (ceil($soma / 10) * 10); # dezena superior 
   $digito = $succ - $soma; 
   # resultado 
   if ($digito == 10)
      $digito = 0; 
   
   return (string) $digito; 
 } # Mod10
 

Compartilhar este post


Link para o post
Compartilhar em outros sites

  • Conteúdo Similar

    • Por dutopfave
      Boa Tarde Galera, tenho um sistema de etiqueta que nele vai também código de barras, quando eu mostro na tela, funciona perfeitamente, mais quando gero pra pdf, com a biblioteca mPDF, da erro,  e é justo o código de barras q da esse erro, oq pode ser sera, segue o código de como ta:
       
      <?php require '../../Connections/config.php'; include "../Classes/funcoes.php"; include "cod.php"; $largura = 140; $altura = 130; include("mpdf60/mpdf.php"); // INICIO RECUPERA O ID DA ETIQUETA IMPORTADA $Row_Id_Etiqueta = addslashes($_GET['id_etiqueta']); $Recuperacao_Etiqueta = $pdo->prepare("SELECT * FROM tb_sys_etiqueta WHERE e_id = :e_id"); $Recuperacao_Etiqueta->bindValue(":e_id", $Row_Id_Etiqueta); $Recuperacao_Etiqueta->execute(); if($Recuperacao_Etiqueta->rowCount() > 0){ $Row_Recuperacao_Etiqueta = $Recuperacao_Etiqueta->fetch(); } // FIM RECUPERA O ID DA ETIQUETA IMPORTADA $id_etiqueta = $_GET['id_etiqueta']; $Lista_Etiqueta = "SELECT * FROM tb_sys_etiqueta WHERE e_id = '$id_etiqueta'"; $Lista_Etiqueta = $pdo->query($Lista_Etiqueta); if($Lista_Etiqueta->rowCount() > 0){ $etiqueta_id = $Lista_Etiqueta->fetch(); $qtd = $etiqueta_id['e_volume'] + 1; $qtd2 = $etiqueta_id['e_volume']; for ($i>0; $i<$qtd; $i++) { if($i>$etiqueta_id['e_pagina']){ // verificar se a pagina é menor que 10 if($i<10){ $n = '0'; }else{ $n = ''; } // verificar se a quantidade é menor que 10 if($etiqueta_id['e_volume']<10){ $nq = '0'; }else{ $nq = ''; } $html .= '<div class="etiqueta"> <div class="etiqueta-topo"> <img src="../images/logo.fw.png" width="116" height="52"> </div> <div class="etiqueta-empresa"> <div class="etiqueta-empresa-left"> <h1>GYN</h1> </div> <div class="etiqueta-empresa-right"> <h1>VOL: '.$n.''.$i.'/'.$nq.''.$qtd2.'</h1> </div> </div> <div class="etiqueta-endereco"> <div class="etiqueta-endereco-left"> <span><b>Remetente:</b></span><br/> <span>'.$etiqueta_id['e_remetente'].'</span><br/><br/> <span><b>Destinatário:</b></span><br/> <span>'.$etiqueta_id['e_destinatario'].'</span> </div> <div class="etiqueta-endereco-right"> '.geraCodigoBarra('232323232323').' <br /> '.$etiqueta_id['e_codigo_barras'].' <p>Goiânia/GO</p> </div> </div> </div>'; } } } $mpdf = new mPDF('utf-8', array($largura,$altura)); $css = file_get_contents("css/estilo.css"); $mpdf->WriteHTML($css,1); $mpdf->WriteHTML($html); $mpdf->Output(); exit;  
      a função pra gera o código de barras: cod.php
       
      <?php function geraCodigoBarra($numero){ $fino = 1; $largo = 3; $altura = 50; $barcodes[0] = '00110'; $barcodes[1] = '10001'; $barcodes[2] = '01001'; $barcodes[3] = '11000'; $barcodes[4] = '00101'; $barcodes[5] = '10100'; $barcodes[6] = '01100'; $barcodes[7] = '00011'; $barcodes[8] = '10010'; $barcodes[9] = '01010'; for($f1 = 9; $f1 >= 0; $f1--){ for($f2 = 9; $f2 >= 0; $f2--){ $f = ($f1*10)+$f2; $texto = ''; for($i = 1; $i < 6; $i++){ $texto .= substr($barcodes[$f1], ($i-1), 1).substr($barcodes[$f2] ,($i-1), 1); } $barcodes[$f] = $texto; } } echo '<img src="../images/p.gif" width="'.$fino.'" height="'.$altura.'" border="0" />'; echo '<img src="../images/b.gif" width="'.$fino.'" height="'.$altura.'" border="0" />'; echo '<img src="../images/p.gif" width="'.$fino.'" height="'.$altura.'" border="0" />'; echo '<img src="../images/b.gif" width="'.$fino.'" height="'.$altura.'" border="0" />'; echo '<img '; $texto = $numero; if((strlen($texto) % 2) <> 0){ $texto = '0'.$texto; } while(strlen($texto) > 0){ $i = round(substr($texto, 0, 2)); $texto = substr($texto, strlen($texto)-(strlen($texto)-2), (strlen($texto)-2)); if(isset($barcodes[$i])){ $f = $barcodes[$i]; } for($i = 1; $i < 11; $i+=2){ if(substr($f, ($i-1), 1) == '0'){ $f1 = $fino ; }else{ $f1 = $largo ; } echo 'src="../images/p.gif" width="'.$f1.'" height="'.$altura.'" border="0">'; echo '<img '; if(substr($f, $i, 1) == '0'){ $f2 = $fino ; }else{ $f2 = $largo ; } echo 'src="../images/b.gif" width="'.$f2.'" height="'.$altura.'" border="0">'; echo '<img '; } } echo 'src="../images/p.gif" width="'.$largo.'" height="'.$altura.'" border="0" />'; echo '<img src="../images/b.gif" width="'.$fino.'" height="'.$altura.'" border="0" />'; echo '<img src="../images/p.gif" width="1" height="'.$altura.'" border="0" />'; } ?>  
    • Por hermesalvesbr
      Bom dia,

      Eu tenho o nome "fiscal" do produto, mas não tenho o código de barras dele, nem a FOTO. Existe alguma api que eu descubra a foto deste produto e/ou o código de barras deste?

      Quando falo o nome "fiscal", significa que importei pela nota(xml) de compra os produtos, mas entra no meu sistema sem foto ou código de barras. Gostaria de uma ferramenta que me auxiliasse(api) encontrar o código de barras e a FOTO do produto.

      Fico grato com qualquer orientação.
    • Por Erlen Fiuza
      Olá,
       
      Estou precisando de uma fonte EAN-8 para gerar código de barras para produtos pequenos. A empresa onde trabalho já tem um software em vb.net com a EAN-13, mas preciso da EAN-8 para implantar no sistema também, o problema é que a empresa não quer comprar a fonte. Faz 2 dias que estou procurando uma fonte grátis. Se alguém tiver de algum projeto que tenha feito e puder me passar agradeço.
       
      Valeu!
       
       
    • Por ukow
      Olá!
      Estou gerando boletos do banco do Brasil através de um sistema próprio.
      Ao gerar os boletos individualmente não obtive erros, porém ao aplicar o loop para gerar mais de um boleto, houve um erro com o código de barras e linha digitável:
      linha 86
      function mod11(cadeia,limitesup,lflag)
      Já tentei ajustar de diversas formas, mas só consegui gerar os boletos sem código de barras / linha digitável.
      Segue código
      <% response.buffer=true %> <!--#include file="../Connections/ConnectionString.asp" --> <!-- #include file = "../include/generico_data.inc" --> <% 'Valida Acesso dim rsAcesso, sql sql = "select * from acesso_processo_usuario where id_processo = 16 and id_usuario = " & session("id_usuario") set rsAcesso = GetRS(sql) if rsAcesso.eof then response.write "Acesso Negado" response.end end if %> <% session.lcid = 1046 dim idPedido, valor, data_documento, data_vencimento,nome_sacado, endereco_sacado, endereco_sacado2,cedente, cpf_cnpj, agencia, dac_agencia,conta, dac_conta, carteira,layout_boleto,convenio, numero_documento,nosso_numero, instrucoes1,instrucoes2,instrucoes3,instrucoes4, instrucoes5, contrato, especie, especie_doc, aceite, a, fvencimento, valor_str, livre, dac_nosso_numero, codbar, mult, total, pos, nresto, ndig, dac, cmplivre, campo1, res, campo2,campo3,campo4, campo5, linha_digitavel, agencia_codigo, x98, quantidade, data_processamento, valor_unitario, x80, x171,x99,x3,x125,x126,x18,dvNosso_numero '================INFORMAÇÕES BANCÁRIAS============== cedente = "RAZÃO SOCIAL" cpf_cnpj = "00.000.000/0000-00" agencia = "0000" dac_agencia = "0" conta = "00000" dac_conta = "0" convenio = "0000000" carteira = "00" '================INSTRUÇÕES DO BOLETO============== instrucoes1 = "Após o vencimento multa de 2% + 0,1% de mora ao dia." instrucoes2 = "Protestar 03 dias úteis após o vencimento." instrucoes3 = "" instrucoes4 = "" instrucoes5 = "" '===================================================== '===========LOOP==========' dim id_lan, v_item For each item in Request.Form("chkBoleto") v_item = split(item,",") id_lan = v_item(0) Dim rsNumero, vr_tx_boleto sql = "select * from vw_ultimo_boleto" set rsNumero = GetRS(sql) idPedido = rsNumero("nr_documento") + 1 sql = "update lancamento set " sql = sql & " nr_documento = '" & idPedido & "'" sql = sql & " where id_lancamento = " & Request.Form("chkBoleto") call executecmd(sql) vr_tx_boleto = 0.0 dim rsTeste, id_parceiro sql = "select * from lancamento where id_lancamento = " & Request.Form("chkBoleto") set rsTeste = GetRS(sql) id_parceiro = rsTeste("id_parceiro") data_vencimento = rsTeste("dt_vencimento") Dim rsLancamento sql = "select * from vw_lancamento_boleto where id_lancamento = " & Request.Form("chkBoleto") set rsLancamento = GetRS(sql) valor = rsLancamento("vr_curso") + 0 + vr_tx_boleto - rsLancamento("vr_desconto") + rsTeste("vr_juros") + rsTeste("vr_multa") data_documento = date data_processamento = date() nome_sacado = rsLancamento("nome") & " - CPF:" & rsLancamento("cpf") endereco_sacado = rsLancamento("endereco") 'Evite mudar estas variaveis abaixo layout_boleto = "3" numero_documento = idPedido nosso_numero = idPedido dvNosso_numero = mod11(convenio &right("0000000000"&idPedido,10),9,0) contrato = "" especie = "R$" especie_doc = "DM" aceite = "N" function mod11(cadeia,limitesup,lflag) mult=1 + (len(cadeia) mod (limitesup-1)) if mult=1 then mult=limitesup end if total=0 for pos=1 to len(cadeia) total=total+(mid(cadeia,pos,1) * mult) mult=mult-1 if mult=1 then mult=limitesup end if Next nresto=(total mod 11) if lflag = 1 then mod11=nresto else if nresto=0 or nresto=1 or nresto=10 then ndig=1 else ndig=11 - nresto end if mod11=ndig end if end function function mod10(cadeia) mult=(len(cadeia) mod 2) mult=mult+1 total=0 for pos=1 to len(cadeia) res= mid(cadeia, pos, 1) * mult if res>9 then res=int(res/10) + (res mod 10) end if total=total+res if mult=2 then mult=1 else mult=2 end if next total=((10-(total mod 10)) mod 10 ) mod10=total end function function linhadigitavel(codigobarras) cmplivre=mid(codigobarras,20,25) campo1=left(codigobarras,4)&mid(cmplivre,1,5) campo1=campo1&mod10(campo1) campo1=mid(campo1,1,5)&"."&mid(campo1,6,5) campo2=mid(cmplivre,6,10) campo2=campo2&mod10(campo2) campo2=mid(campo2,1,5)&"."&mid(campo2,6,6) campo3=mid(cmplivre,16,10) campo3=campo3&mod10(campo3) campo3=mid(campo3,1,5)&"."&mid(campo3,6,6) campo4=mid(codigobarras,5,1) campo5=int(mid(codigobarras,6,14)) if campo5=0 then campo5="000" end if linhadigitavel=campo1&" "&campo2&" "&campo3&" "&campo4&" "&campo5 end function function fvenc(entra) fvenc = DateDiff("d", CDate("7/10/1997"), CDate(entra)) end function function formatar(valor, comp, ench, tipo) dim str str = valor if tipo = "v" then str = Ccur(str) str = formatnumber(str,2,-2,-2,-2) tipo = "e" :str = cstr(str) str = replace(str,",","") str = replace(str,".","") end if for a=len(str) to (comp - 1) if tipo = "e" then str = ench & str else str = str & ench end if next if tipo = "e" then str = left(str,comp) else str = right(str,comp) end if formatar = str end function function d1d2(entra) d1 = mod10(entra) Do d2 = mod11(entra & d1,7,1) if d2 = 1 then if d2 = 9 then d1 = 0 elseif d1 < 9 then d1 = d1 + 1 else d1 = 0 end if end if Loop while d2 = 1 if d2 > 0 then d2 = 11 - d2 end if d1d2 = Cstr(Cstr(entra) & Cstr(d1) & Cstr(d2)) end function function dv(entra) temp = Cint(mod11(entra,9,1)) if temp < 10 then dv = 11 - temp else dv = 1 end if if dv = 11 then dv = 0 if dv = 10 then dv = "X" dv = Cstr(dv) end function layout_boleto = Cstr(layout_boleto) conta = Cstr(formatar(conta,8,"0","e")) fvencimento = Cstr(fvenc(data_vencimento)) valor_str = Cstr(formatar(valor,10,"0","v")) agencia = Cstr(formatar(agencia,4,"0","e")) carteira = Cstr(formatar(carteira,2,"0","e")) if layout_boleto = "3" then convenio = formatar(convenio,7,"0","e") nosso_numero = formatar(nosso_numero,10,"0","e") livre = "000000" & convenio & nosso_numero & carteira dac_nosso_numero = "" nosso_numero = convenio & nosso_numero else Response.Write("ERRO ! <br> Selecione o layout do boleto inválido, use numero 3") Response.End() end if codbar = Cstr("0019" & fvencimento & valor_str & livre) dac = Cstr(mod11(codbar,9,0)) codbar = Cstr("0019" & dac & fvencimento & valor_str & livre) linha_digitavel = linhadigitavel(codbar) agencia_codigo = agencia &"-"& dac_agencia & "/" & conta &"-"& dac_conta valor = formatnumber(Ccur(valor),2,-2,-2,-2) %> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN"> <html> <head> <title>Boleto BB</title> <meta http-equiv=Content-Type content="text/html;charset=windows-1252"> <meta content="MSHTML 6.00.2800.1400" name=GENERATOR> <style> .Titulo11{ font:11px Arial, Helvetica, sans-serif; } .campo{ font:10px Verdana, Arial, Helvetica, sans-serif; } .CampoTitulo{ font:bold 14px Arial, Helvetica, sans-serif; } .Normal{ font:12px Arial, Helvetica, sans-serif; } @media print { body * { visibility: hidden; } #printable, #printable * { visibility: visible; } #printable { position: fixed; left: 0; top: 0; } } </style> </head> <body bgcolor="White" leftmargin="0" topmargin="0" marginwidth="0" marginheight="0" bgproperties="fixed"> <br> <center><input type="button" name="imprimir" value="Imprimir" onclick="window.print();"> </center><br> <div id="printble"> <table border="0" cellPadding="0" cellSpacing="0" width="660"> <tr> <td class="Normal"> <div align="center"> <b>O pagamento deste boleto também poderá ser efetuado pelo Auto-Atendimento BB na Internet ou pelos Terminais de Auto-Atendimento.</b> </div> <p> <b>Instruções:</b><br> <ol> <li>Imprima em impressora jato de tinta (ink jet) ou laser em qualidade normal ou alta. Não use modo econômico.</li> <li>Utilize folha A4 (210 x 297mm) ou Carta (216 x 279mm) e margens mínimas à esquerda e à direita do formulário.</li> <li>Corte na linha indicada. Não rasure, risque, fure ou dobre a região onde se encontra o código de barras.</li> </ol> </p> </td> </tr> </table> <br> <div style="position:absolute;top:145px;left:5px;height:636px;width:670px;z-index:1;"> <img src="imagens_bb/bbformularioBoleto.gif" width="647" height="636" border="0" alt=""> </div> <div style="position:absolute;top:161px;left:7px;height:22px;width:96px;z-index:2;"> <img src="imagens_bb/bblogoBoleto.gif" width="150" height="22" border="0" alt=""> </div> <div style="position:absolute;top:444px;left:7px;height:22px;width:96px;z-index:2;"> <img src="imagens_bb/bblogoBoleto.gif" width="150" height="22" border="0" alt=""> </div> <div style="position:absolute;top:127px;left:7px;z-index:2;" class="Titulo11"> Corte na linha pontilhada </div> <div style="position:absolute;top:138px;left:5px;z-index:2;" class="Titulo11"> <img src="imagens_bb/bblinhaPontilhada.gif" width="650" height="5" border="0" alt=""> </div> <div style="position:absolute;top:145px;left:549px;z-index:2;" class="Campo"> <b>Recibo do Sacado</b> </div> <div style="position:absolute;top:167px;left:163px;z-index:2;" class="CampoTitulo"> 001-9 </div> <div style="position:absolute;top:166px;left:210px;z-index:2;width:438px;text-align:right;" class="CampoTitulo"> <layer name="helpns" width=438px><%=linha_digitavel%></layer> </div> <div style="position:absolute;top:450px;left:163px;z-index:2;" class="CampoTitulo"> 001-9 </div> <div style="position:absolute;top:449px;left:210px;z-index:2;width:438px;text-align:right;" class="CampoTitulo"> <layer name="helpns" width=438px><%=linha_digitavel%></layer> </div> <div style="position:absolute;top:184px;left:15px;z-index:2;" class="Titulo11"> Cedente </div> <div style="position:absolute;top:184px;left:317px;z-index:2;" class="Titulo11"> Código do Cedente </div> <div style="position:absolute;top:184px;left:438px;z-index:2;" class="Titulo11"> Espécie </div> <div style="position:absolute;top:184px;left:480px;z-index:2;" class="Titulo11"> Quantidade </div> <div style="position:absolute;top:184px;left:536px;z-index:2;" class="Titulo11"> Nosso número </div> <div style="position:absolute;top:209px;left:15px;z-index:2;" class="Titulo11"> Número do documento </div> <div style="position:absolute;top:209px;left:135px;z-index:2;" class="Titulo11"> Contrato </div> <div style="position:absolute;top:209px;left:214px;z-index:2;" class="Titulo11"> CPF/CEI/CNPJ </div> <div style="position:absolute;top:209px;left:353px;z-index:2;" class="Titulo11"> Vencimento </div> <div style="position:absolute;top:209px;left:480px;z-index:2;" class="Titulo11"> Valor documento </div> <div style="position:absolute;top:234px;left:15px;z-index:2;" class="Titulo11"> (-)Desconto/Abatimento </div> <div style="position:absolute;top:234px;left:135px;z-index:2;" class="Titulo11"> (-)Outras opções </div> <div style="position:absolute;top:234px;left:251px;z-index:2;" class="Titulo11"> (+)Mora/Multa </div> <div style="position:absolute;top:234px;left:367px;z-index:2;" class="Titulo11"> (+)Outros acréscimos </div> <div style="position:absolute;top:234px;left:480px;z-index:2;" class="Titulo11"> (=)Valor cobrado </div> <div style="position:absolute;top:259px;left:15px;z-index:2;" class="Titulo11"> Sacado </div> <div style="position:absolute;top:284px;left:15px;z-index:2;" class="Titulo11"> Instruções </div> <div style="position:absolute;top:284px;left:574px;z-index:2;" class="Titulo11"> Autenticação Mecânica </div> <div style="position:absolute;top:415px;left:7px;z-index:2;" class="Titulo11"> Corte na linha pontilhada </div> <div style="position:absolute;top:426px;left:5px;z-index:2;" class="Titulo11"> <img src="imagens_bb/bblinhaPontilhada.gif" width="650" height="5" border="0" alt=""> </div> <div style="position:absolute;top:467px;left:15px;z-index:2;" class="Titulo11"> Local de pagamento </div> <div style="position:absolute;top:467px;left:480px;z-index:2;" class="Titulo11"> Vencimento </div> <div style="position:absolute;top:492px;left:15px;z-index:2;" class="Titulo11"> Cedente </div> <div style="position:absolute;top:492px;left:480px;z-index:2;" class="Titulo11"> Agência/Código do cedente </div> <div style="position:absolute;top:517px;left:15px;z-index:2;" class="Titulo11"> Data do documento </div> <div style="position:absolute;top:517px;left:133px;z-index:2;" class="Titulo11"> Nº do documento </div> <div style="position:absolute;top:517px;left:295px;z-index:2;" class="Titulo11"> Espécie DOC </div> <div style="position:absolute;top:517px;left:364px;z-index:2;" class="Titulo11"> Aceite </div> <div style="position:absolute;top:517px;left:405px;z-index:2;" class="Titulo11"> Data process. </div> <div style="position:absolute;top:517px;left:480px;z-index:2;" class="Titulo11"> Nosso Número </div> <div style="position:absolute;top:542px;left:15px;z-index:2;" class="Titulo11"> Uso do Banco/Convênio </div> <div style="position:absolute;top:542px;left:133px;z-index:2;" class="Titulo11"> Carteira </div> <div style="position:absolute;top:542px;left:223px;z-index:2;" class="Titulo11"> Espécie </div> <div style="position:absolute;top:542px;left:283px;z-index:2;" class="Titulo11"> Quantidade </div> <div style="position:absolute;top:542px;left:405px;z-index:2;" class="Titulo11"> xValor </div> <div style="position:absolute;top:542px;left:480px;z-index:2;" class="Titulo11"> (=) Valor do documento </div> <div style="position:absolute;top:567px;left:15px;z-index:2;" class="Titulo11"> Instrucoes </div> <div style="position:absolute;top:567px;left:480px;z-index:2;" class="Titulo11"> (-) Desconto / Abatimento </div> <div style="position:absolute;top:592px;left:480px;z-index:2;" class="Titulo11"> (-) Outras deduções </div> <div style="position:absolute;top:618px;left:480px;z-index:2;" class="Titulo11"> (+) Mora / Multa </div> <div style="position:absolute;top:643px;left:480px;z-index:2;" class="Titulo11"> (+) Outros acréscimos </div> <div style="position:absolute;top:668px;left:480px;z-index:2;" class="Titulo11"> (=) Valor cobrado </div> <div style="position:absolute;top:573px;left:463px;z-index:2;" class="Titulo11"> 27 </div> <div style="position:absolute;top:620px;left:463px;z-index:2;" class="Titulo11"> 35 </div> <div style="position:absolute;top:596px;left:463px;z-index:2;" class="Titulo11"> 19 </div> <div style="position:absolute;top:693px;left:15px;z-index:2;" class="Titulo11"> Sacado </div> <div style="position:absolute;top:739px;left:480px;z-index:2;" class="Titulo11"> Cód. baixa </div> <div style="position:absolute;top:740px;left:15px;z-index:2;" class="Titulo11"> Sacador/Avalista </div> <div style="position:absolute;top:751px;left:470px;z-index:2;" class="Titulo11"> Autenticação mecânica - Ficha de Compensação </div> <div style="position:absolute;top:197px;left:15px;z-index:2;" class="Campo"> <%=cedente%> </div> <div style="position:absolute;top:197px;left:317px;z-index:2;width:120px;" class="Campo"> <%=agencia_codigo%> </div> <div style="position:absolute;top:197px;left:438px;z-index:2;width:28px;" class="Campo"> R$ </div> <div style="position:absolute;top:197px;left:480px;z-index:2;width:50px;" class="Campo"> 0001 </div> <div style="position:absolute;top:197px;left:531px;z-index:2;width:118px;text-align:right;" class="Campo"> <%=nosso_numero%> </div> <div style="position:absolute;top:222px;left:15px;z-index:2;width:110px;" class="Campo"> <%=right("0000000000"& numero_documento, 10)%> </div> <div style="position:absolute;top:222px;left:135px;z-index:2;width:70px;" class="Campo"> <%=contrato%> </div> <div style="position:absolute;top:222px;left:214px;z-index:2;width:125px;" class="Campo"> <%=cpf_cnpj%> </div> <div style="position:absolute;top:222px;left:353px;z-index:2;width:118px;" class="Campo"> <%=data_vencimento%> </div> <div style="position:absolute;top:222px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> <%=valor%> </div> <div style="position:absolute;top:247px;left:15px;z-index:2;width:108px;text-align:right;" class="Campo"></div> <div style="position:absolute;top:247px;left:133px;z-index:2;width:107px;text-align:right;" class="Campo"></div> <div style="position:absolute;top:247px;left:248px;z-index:2;width:108px;text-align:right;" class="Campo"></div> <div style="position:absolute;top:247px;left:361px;z-index:2;width:108px;text-align:right;" class="Campo"></div> <div style="position:absolute;top:247px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> </div> <div style="position:absolute;top:272px;left:15px;z-index:2;" class="Campo"> <%=nome_sacado%> </div> <div style="position:absolute;top:312px;left:15px;z-index:2;width:498px;text-align:justify;" class="Campo"> <layer name="helpns" width=498px align="left"><%=instrucoes1%><br><%=instrucoes2%><br><%=instrucoes3%><br><%=instrucoes4%><br><%=instrucoes5%></layer> </div> <div style="position:absolute;top:480px;left:15px;z-index:2;" class="Campo"> Pagável em qualquer Banco até o vencimento </div> <div style="position:absolute;top:480px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> <%=data_vencimento%> </div> <div style="position:absolute;top:505px;left:15px;z-index:2;" class="Campo"> <%=cedente%> </div> <div style="position:absolute;top:505px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> <%=agencia_codigo%> </div> <div style="position:absolute;top:530px;left:15px;z-index:2;width:110px;" class="Campo"> <%=data_documento%> </div> <div style="position:absolute;top:530px;left:133px;z-index:2;width:160px;" class="Campo"> <%=right("0000000000"& numero_documento, 10)%> </div> <div style="position:absolute;top:530px;left:295px;z-index:2;width:60px;" class="Campo"> <%=especie_doc%> </div> <div style="position:absolute;top:530px;left:364px;z-index:2;width:35px;" class="Campo"> <%=aceite%> </div> <div style="position:absolute;top:530px;left:405px;z-index:2;width:60px;" class="Campo"> <%=data_processamento%> </div> <div style="position:absolute;top:530px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> <%=nosso_numero%> </div> <div style="position:absolute;top:556px;left:15px;z-index:2;" class="Campo"> </div> <div style="position:absolute;top:556px;left:133px;z-index:2;" class="Campo"> <%=carteira%> </div> <div style="position:absolute;top:556px;left:223px;z-index:2;" class="Campo"> <%=especie%> </div> <div style="position:absolute;top:556px;left:283px;z-index:2;" class="Campo"> </div> <div style="position:absolute;top:556px;left:405px;z-index:2;width:65px;text-align:right;" class="Campo"></div> <div style="position:absolute;top:556px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> <%=valor%> </div> <div style="position:absolute;top:580px;left:15px;z-index:2;width:430px;text-align:justify;" class="Campo"> <layer name="helpns" width=430px align="left"><%=instrucoes1%><br><%=instrucoes2%><br><%=instrucoes3%><br><%=instrucoes4%><br><%=instrucoes5%></layer> </div> <div style="position:absolute;top:580px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> </div> <div style="position:absolute;top:605px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> </div> <div style="position:absolute;top:631px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> </div> <div style="position:absolute;top:656px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> </div> <div style="position:absolute;top:581px;left:480px;z-index:2;width:169px;text-align:right;" class="Campo"> </div> <div style="position:absolute;top:704px;left:15px;z-index:2;" class="Campo"> <%=nome_sacado%> </div> <div style="position:absolute;top:717px;left:15px;z-index:2;" class="Campo"> <%=endereco_sacado%> </div> <div style="position:absolute;top:830px;left:7px;z-index:2;" class="Titulo11"> Corte na linha pontilhada </div> <div style="position:absolute;top:827px;left:7px;z-index:2;" class="Titulo11"> <img src="imagens_bb/bblinhaPontilhada.gif" width="650" height="5" border="0" alt=""> </div> <div style="position:absolute;top:760px;left:12px;height:70px;z-index:2;" class="Titulo11"> <table border=0 cellPadding=0 cellSpacing=0 width="666"> <tr> <td colspan="2"> <% next function fbarcode(valor_barras) Dim f, f1, f2, i Dim texto Const fino = 1 Const largo = 3 Const altura = 50 Dim BarCodes(99) if isempty(BarCodes(0)) then BarCodes(0) = "00110" BarCodes(1) = "10001" BarCodes(2) = "01001" BarCodes(3) = "11000" BarCodes(4) = "00101" BarCodes(5) = "10100" BarCodes(6) = "01100" BarCodes(7) = "00011" BarCodes(8) = "10010" BarCodes(9) = "01010" for f1 = 9 to 0 step -1 for f2 = 9 to 0 Step -1 f = f1 * 10 + f2 texto = "" for i = 1 To 5 texto = texto & mid(BarCodes(f1), i, 1) + mid(BarCodes(f2), i, 1) next BarCodes(f) = texto next next end if %> <img src=imagens_bb/p.gif width=<%=fino%> height=<%=altura%> border=0><img src=imagens_bb/b.gif width=<%=fino%> height=<%=altura%> border=0><img src=imagens_bb/p.gif width=<%=fino%> height=<%=altura%> border=0><img src=imagens_bb/b.gif width=<%=fino%> height=<%=altura%> border=0><img <% texto = valor_barras if len( texto ) mod 2 <> 0 then texto = "0" & texto end if do while len(texto) > 0 i = cint( left( texto, 2) ) texto = right( texto, len( texto ) - 2) f = BarCodes(i) for i = 1 to 10 step 2 if mid(f, i, 1) = "0" then f1 = fino else f1 = largo end if %> src=imagens_bb/p.gif width=<%=f1%> height=<%=altura%> border=0><img <% if mid(f, i + 1, 1) = "0" Then f2 = fino else f2 = largo end if %> src=imagens_bb/b.gif width=<%=f2%> height=<%=altura%> border=0><img <% next loop %> src=imagens_bb/p.gif width=<%=largo%> height=<%=altura%> border=0><img src=imagens_bb/b.gif width=<%=fino%> height=<%=altura%> border=0><img src=imagens_bb/p.gif width=<%=1%> height=<%=altura%> border=0> <% end function %> <%=fbarcode(codbar)%> </td> </tr> </table> </div> </div> </body> </html> Alguém pode me ajudar?
      Obrigado!
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.