Antonio Gomes

vc preenche a propriedade fora dai, nao precisa mexer no codigo fonte. Assim: Cedente.Conta := ADataSetConfigServicoBanco.FieldByName('CONTA_CCR').AsString; Cedente.ContaDigito := ADataSetConfigServicoBanco.FieldByName('DV_CONTA_CCR').AsString; Cedente.Agencia := ADataSetConfigServicoBanco.FieldByName('AGENCIA_CCR').AsString; Cedente.AgenciaDigito := ADataSetConfigServicoBanco.FieldByName('DV_AGENCIA_CCR').AsString; Cedente.Modalidade := Trim(ADataSetConfigServicoBanco.FieldByName('MODALIDADE_SER').AsString); Cedente.DigitoVerificadorAgenciaConta := ADataSetConfigServicoBanco.FieldByName('DV_AGENCIA_CONTA_CCR').AsString; Sugestão: Cria o campo e deixa seu usuario preencher.

http://wiki.biserp.com.br/index.php/Especificação_de_Guias_e_Boletos

Qual problema está ocorrendo ?

depois de quase um ano, a impressora ainda não chegou, todos que foram, receberam ?

do manual .

O ITAU manda esse identificador errado mesmo, abre o txt, percorre ele e muda o campo para o numero que satisfaz ao cpf. salva arquivo como temporário e passa usar ele.

Nota 2: O órgão responsável pela distribuição e controle desta numeração será a Febraban, devendo a solicitação ser efetuada através do e-mail: [email protected]. pagina 5. Tem uma lista, cada orgão tem o seu atribuido.

Se for acbr boleto, só boleto mesmo. Esse codigo de barras é o leiaute de arrecadacao recebimento. Muito mais fácil para criar que codigo de barras, alem de não precisar de registro. Você mesmo pode cria-lo, basta ter a empresa ou seu codigo na febraban. Também pode ser arrecadado com o prefixo do cnpj. Veja campo livre no manual. https://cmsportal.febraban.org.br/Arquivos/documentos/PDF/Layout - Código de Barras - Versão 5 - 01_08_2016.pdf https://portal.febraban.org.br/pagina/3166/33/pt-br/layour-arrecadacao

Esse é o modo padrão. Alguns poucos bancos já tem opção de webservice. veja aqui: https://suporte.boletosimples.com.br/article/8udp3swan1-conexao-online-com-o-banco-atraves-de-webservice Acbr não tem essa opção. Mas nada impede de gerar no webservice, pois a parte de nf, comunica do mesmo formato...

Como se fosse uma marca d´agua ? Os bancos, (chatos) permitem isso ?

sicoob vc trabalha com o numero do cedente, nao da conta. nessa property: Cedente.CodigoCedente := Trim(ADataSetConfigServicoBanco.FieldByName('CODIGO_CEDENTE_SER').AsString) + Trim(ADataSetConfigServicoBanco.FieldByName('DV_CEDENTE_SER').AsString); No meu caso, eu tenho os possiveis campos no cadastro da conta corrente, de acordo com o que o banco pede eu preencho. Para evitar de ter que ficar inventando de trocar dentro do codigo fonte. Assim: Cedente.Conta := ADataSetConfigServicoBanco.FieldByName('CONTA_CCR').AsString; << sicoob usa so para imprimir o boleto Cedente.ContaDigito := ADataSetConfigServicoBanco.FieldByName('DV_CONTA_CCR').AsString; Cedente.Agencia := ADataSetConfigServicoBanco.FieldByName('AGENCIA_CCR').AsString; Cedente.AgenciaDigito := ADataSetConfigServicoBanco.FieldByName('DV_AGENCIA_CCR').AsString; Cedente.Modalidade := Trim(ADataSetConfigServicoBanco.FieldByName('MODALIDADE_SER').AsString); <<<<<sicoob usa Cedente.DigitoVerificadorAgenciaConta := ADataSetConfigServicoBanco.FieldByName('DV_AGENCIA_CONTA_CCR').AsString; << sicoob, apareceu tem pouco tempo if ADataSetConfigServicoBanco.FieldByName('LEIAUTE_SER').AsInteger = 1 then LayoutRemessa := c240 else LayoutRemessa := c400; Cedente.CodigoCedente := Trim(ADataSetConfigServicoBanco.FieldByName('CODIGO_CEDENTE_SER').AsString) + Trim(ADataSetConfigServicoBanco.FieldByName('DV_CEDENTE_SER').AsString); <<<< sicoob usa Cedente.CodigoTransmissao := ADataSetConfigServicoBanco.FieldByName('CODIGO_TRANSMISSAO_SER').AsString; Cedente.Convenio := ADataSetConfigServicoBanco.FieldByName('NUM_CONTRATO_SER').AsString; na unit Acbrbancobancoob, tem essa funcao: function TACBrBancoob.CalcularDigitoVerificador(const ACBrTitulo: TACBrTitulo ? String; a resposta está nela.

Não é o cliente, é vc... Exemplo: Arquivo := IBDSPai.FieldByName('NOME_ARQUIVO_BOR').AsString; Arquivo := StringReplace(Arquivo, '"', '', [rfReplaceAll]); if not FileExists(Arquivo) then begin Aviso('Arquivo: ' + Arquivo + ' não encontrado.'); Abort; end; // CONTEUDO DO ARQUIVO ARQUIVO_RETORNO_BOR LS.LoadFromFile(Arquivo); P := LS.Count - 1; if (IBDSPai.FieldByName('RETORNO_PAGFACIL_BOR').AsString = 'N') and (IBDSPai.FieldByName('RETORNO_PESSOA_FISICA_BOR').AsString = 'S') then MudarRetornoPosicao2_FisicaJuridica(LS); LS.SaveToStream(ArquivoDeRetorno); funcao: procedure TFCadBorderoBancario.MudarRetornoPosicao2_FisicaJuridica(var ARetornoLido: TStrings); var Linha: string; I : Integer; begin for I := 0 to ARetornoLido.Count - 1 do begin Linha := ARetornoLido; // Mexer nas linhas que correspondem a titulos apenas - iniciados com 1 if (Copy(Linha, 1, 1) = '1') and (Copy(Linha, 2, 2) = '02') then begin Delete(Linha, 2, 2); Insert('01', Linha, 2); ARetornoLido := Linha; end; end; end; Voce pode tratar um arquivo temporario também, caso não queira mexer no do cliente...

Passo por esse problema no banco itau, o retorno de pessoa fisica, vem completado com zeros antes, e o itau insiste em mandar como pessoa juridica, o que eu faço, é abrir o arquivo antes de mandar para o componente, e mudar, engando assim o componente para o que eu quero. assim, eu sei que está certo, tem o cpf dentro do arquivo, e ainda assim vem o numero como se fosse cnpj (talvez o retorno seja feito apenas por cnpj no itau, nao sei...), então quando entra na funcao, o componente aciona aquela funcao de validar o cpf, nisso passa liso. Não que eu queira que faça algo errado, mas tem hora que tem que ser assim... Detalhe: Se isso acontecer com vc, se for arquivo de critica, e mudar o arquivo, sugiro não fazer ação alguma no banco de dados, apenas mostrar em tela para o usuário...

complementando: pelo manual, é digito da conta, olha a capa da planilha que a cooperativa envia.

será que apos o número 6, não pede um numero zero ? "0555576 JVA COBR" entre o 6 e o J, esse campo deu pano para manga outro dia, o componente foi alterado para aceitar esse campo. tenho uma remessa rodando, e veja como ela vai: 2100180MAR, antes da letra M, tem o zero... tem manual ?

Não entendi nada, vc estava sentando o valor com mais de 2 decimais? Se sim, para que finalidade?

você pode mudar isso no fr3 e mandar p/ incorporar... você pode mudar isso no fastreport em tempo de execucao também. ou pode fazer como eu, eu tenho meu próprio modelo, fiz meus fr3, mandei p/ cliente, e hoje, se preciso, edito no cliente, pois fica salvo no banco de dados dele...

Seu campo é ponto flutuante com N dizimas? Em modo debug ele nao fica assim: 1978,546666666667 ?

Olha, sem querer ser chato, mas me parece que o homebank da nonus, ja manipula do jeito que precisa nos sites de banco, tanto é estranho que as vezes uso a pistola também, e tenho que deixar aquela marcação do site do banco para o codigo de barras ser lido ao inves de digitado, com o nomus, so pega digitado. Pelo que reparei, ele coloca como se o operador estivesse digitando o nosso numero, repare: Pelo nomus: 07790001161200000050000816758478377440000034620 pistola: 07793774400000346200001112000000500081675847 Se reparar o do nonus, é igual a linha digitavel. Não vejo como problema isso com vc, se o meu está assim também. Imagem do boleto.

uai! Estão aceitando esse ainda, bom saber, vou mudar então. Valeu a dica.

@Pedro E. Braga por acaso, não lhe criticaram no banco, para informar o juro com 5 decimais? Eu fui homologar um dia desses, dai passei enviar o juro e multa como valor calculado, devido essa deficiência no componente. No CNAB240, na página 18, omde menciona isso:Nota 18: CAMPOS REFERENTES A VALOR . Quando o valor for expresso em moeda corrente, utilizar duas casas decimais: 9(013)v99; . Quando o valor for expresso em moeda variável, utilizar cinco casas decimais: 9(010)v9(05); . Quando o valor se referir à taxa de juros, utilizar cinco casas decimais: 9(010)v9(05);

a data do documento, o que está colocando nela? Pois ela geralmente é a data do dia... dica: Pq nao coloca a data da emissao do seu titulo na tabela de contas a receber? Pois vai esbarrar no problema que está mencionado logo abaixo pela juliana.

tem que ficar atento com o pessoal que mantem @Juliana Tamizou @José M. S. Junior do projeto acbrboleto, no que tange se for preciso criar propriedades no componente.. observe o campo 08.3Y no manual: 02 - Modelo Padrão CAIXA 10 - Genérico Modelo 01 1 11 - Genérico Modelo 02 1 12 - Condomínios 1, 13 - Nota Fiscal 1, 2(*) 14 - Consórcios 1, 2, 3, 4, 5 18 - Similiar a Nota Fiscal 1, 2(*) 19 - Seguradoras 1, 2(*), 3(*) 21 - Escolas 1 22 - Imobiliárias 1 30 - Carnê 1 Cada um pede uma informação.

Altere o fonte no que precisa, sobe para o mantenedor analisar. Ajuda você, e outro que precisar. Nao esquecer de atualizar os fontes.

Mantenedor, gostaria analisasse se posso corrigir hints desse tipo. Pois ao haver raise exception, acredito que o retorno da function, pouco importa... @Juliomar Marchetti @Juliana Tamizou ACBrBoleto.pas