Jump to content

logo_acbr_paygo.png

Chegou o TEF ACBr PayGo
Seja um revendedor e ofereça uma solução completa para seu cliente.


botao_saibamais.png

beneficios.png

Curso Dominando o ACBrMonitor
Novo Módulo Soluções de Varejo
Assine o SAC ACBr em qualquer plano e tenha acesso

Saiba Mais

Balança SM100 performance surpreendente

Tecnologia Japonesa   Teclado e Visor resistentes a água
Consumo inteligente de etiquetas   Baixo custo de manutenção
Comunicação Ethernet e WIFI independentes

Saiba Mais

Impressora de Etiquetas ELGIN - L42 PRO

Protocolos PPLA, PPLB, ZPL, EPL (automático)
Porta USB padrão Opcionais: Ethernet, Serial, Paralela
Sensor de Etiquetas Móvel Garantia de 18 meses

Saiba mais

Search the Community

Showing results for tags 'acbrboleto'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Categories

There are no results to display.

Categories

  • ACBrMonitorPLUS - Notas de Lançamento de Versão

Categories

  • ACBrLibNFe - Notas de Lançamento de Versão

Forums

  • Fórum Aberto - ACBr
    • ACBr News
    • Equipamentos testados
    • Base de Conhecimento
    • Dúvidas Gerais sobre o ACBr
    • ACBrSerial
    • ACBrSAT
    • ACBrNFe
    • ACBrMonitor PLUS
    • ACBrDFe
    • Dúvidas sobre TEF
    • ACBrTXT
    • ACBrBoleto
    • ACBrDiversos
    • ACBrTCP
    • ACBrLIB
  • Suporte Pago - SAC
    • Dúvidas gerais
    • ACBrMonitorPLUS
    • NFe/NFCe - Nota Fiscal Eletrônica
    • DFe - Documentos Fiscais Eletrônicos
    • SAT / MFE
    • TEF
    • Boleto
    • ACBrSPED
    • ACBrTXT
    • Paf-ECF
    • Requisitos Fiscais por UF
    • ACBrLIB
  • Outros Assuntos
    • ACBr's Pub
    • Legislação Fiscal e Tributária
    • Object Pascal - Delphi & Lazarus
    • Data Base
    • Classificados
    • Dúvidas não relacionadas ao ACBr

Categories

  • ACBrLib
  • Suporte Pago - SAC
    • ACBrMonitorPLUS - SAC
    • Utilitários - SAC
    • Dia do ACBr 1a edição
    • Dia do ACBr 2a edição
  • Free Download
    • Demos / Testes / Utilitários
    • Apresentações - Palestras

Calendars

  • Eventos - Palestras - Webinars
  • Prazos SEFAZ
  • Community Calendar
  • Feriados Nacionais

Blogs

  • Daniel Simoes' Blog
  • André Ferreira de Moraes
  • Moderadores ACBr
  • Teste de Blog
  • Notícias do ACBr

Categories

  • Suporte Pago - SAC
    • Curso Dominando o ACBrMonitor
    • Webinars
    • Video Aulas
    • Palestras - Dia do ACBr 2a Ediçao
  • Vídeos Abertos
    • Video Aulas
    • Comunicados
    • Dia do ACBr 2a Ediçao
    • Dia do ACBr 1a Ediçao
    • Homologação ACBr
    • TEF ACBr PayGo
  • Campanhas promocionais

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


Website URL


Skype


Localização


Interesses


CNPJ da Empresa


CPF

Found 163 results

  1. Peço a alteração dos fontes do ACBRBoleto na leitura do Retorno do Banrisul para que seja carregado o valor correto do "SEUNUMERO" conforme abaixo: procedure TACBrBanrisul.LerRetorno240(ARetorno: TStringList); 822 SeuNumero := Trim(Copy(FSegT, 38, 25)); //--- Valor antigo -->>> NumeroDocumento; procedure TACBrBanrisul.LerRetorno400(ARetorno: TStringList); 966 SeuNumero := copy(Linha,38,25); //--- Valor antigo -->>> copy(Linha,117,10) Atualmente ele esta retornando no "SeuNumero" o valor do "NumeroDocumento". Em anexo a unit ACBRBancoBanrisul.pas que eu alterei. Caso eu tenha cometido algum erro por favor informem. Obrigado a todos que participam do projeto ACBR pelo excelente trabalho e ajuda. ACBrBancoBanrisul.pas
  2. Foi tentar gerar um boleto para bancoob(sicoob) no cnab240 no meu codigo eu passo o valor das datas do juro e a data da multa, quando gero a remessa no meu sistema e mando para o validador ele aparece isso fala que contem a data de vencimento, revisei o codigo e unico lugar que pega a data do juro e da multa é aqui Alguem sabe me dizer o que pode ser ?
  3. Boa noite. Adicionei a propriedade Preview no componente ACBrBoletoFCFR, para a utilização do do TfrxPreview do Fast Report. Segue em anexo a unit para analise. Desde já agradeço! ACBrBoletoFCFR.dfmACBrBoletoFCFR.pas
  4. Bom dia. Estou com um problema na impressão de boletos usando o Fortes Report. Este problema ocorre em alguns marcas de impressora, por exemplo Brother. Já tentei mudar várias configurações na impressora mas nenhuma delas resolveu. O maior problema, como podem ver na primeira imagem, é a margem do lado esquerdo do boleto, que é onde fica o código de barras. A impressora não consegue imprimir o inicio do código de barras, aí quando o cliente vai tentar pagar usando o leitor de código de barras não consegue ler o código. Mas a linha digitável também sai um pouco cortada mas só um pequeno pedaço do último dígito da linha digitável (imagem 2 anexo). Até se verificarem na margem esquerda teria a informação no nome do sistema que está configurado para imprimir ali, mas também está cortando. Algumas impressoras conseguem imprimir esse nome do sistema, mas outras imprime cortado pois o nome do sistema fica bem na borda da página. E no caso se eu salvar o boleto em PDF e imprimir do PDF na impressora sai tudo corretamente. Mas imprimindo diretamente do relatório para a impressora sai com as margens cortadas. Verifiquei que já existe um tópico aberto sobre essa questão. É um tópico um pouco antigo, até eu questionei lá se tiverem alguma solução mas não obtive retorno aí estou abrindo este com o mesmo intuito. Saber se alguém passou pelo mesmo problema ou se conseguiu contornar de alguma forma e puder colaborar. Desde já agradeço.
  5. Estou gerando uma remessa do Santander, e o sequencial do lote do segmento P parece se comportar errado. Esta começando com o lote 1, corretamente, e depois, pula para o 5, ignorando o 2, 3 e 4. Vendo os fontes, o preenchimento ocorre da seguinte forma: function TACBrBancoSantander.GerarRegistroTransacao240(ACBrTitulo: TACBrTitulo): String; ....... ISequencia := (ACBrBoleto.ListadeBoletos.IndexOf(ACBrTitulo) * 4) + 1; O mesmo acontece no trailer do lote e do arquivo, essa multiplicação por 4. Desta forma, o banco me retornou que os totais estão incorretos. "REGISTRO DETALHE - SEGMENTO P REMESSA Posição 09 - 013 Nº seqüencial do registro de lote SEQUENCIAL DEVE INICIAR EM '00001' E SOMAR '1' A CADA LINHA ATÉ O FINAL DO LOTE, LINHA 4." Para corrigir, eu removi o " * 4", do sequencial do segmento P, e do trailer do arquivo e lote. 29052020143508_000005.txt
  6. Boa tarde, No retorno da caixa econômica padrão CNAB400, na procedure TACBrCaixaEconomica.LerRetorno400, o componente está pegando o valor do campo "SeuNumero" na posição errada: SeuNumero := copy(Linha,59,15); A posição acima é a do número do documento, na verdade deveria ser assim: SeuNumero := copy(Linha,32,25); Fiz a correção da unit, segue em anexo. ACBrBancoCaixa.pas
  7. Prezados(a), Estou com o mesmo problema que encontrei nesse topico que foi fechado por falta de respota . ,Verifiquei que foi instruido usar a rotina de NossoNumeroSemFormatacaoLerRetorno Porem a mesma é adaptada para o layout 240, assim não sendo possivel utilizar a mesma para layout 400 Visto isso, acredito que melhor solução seria a emprega nesse topico que citei acima
  8. Bom dia fiz uma atualização do ACBR hoje e a palheta do ACBRBoleto sumiu. Utilizo o Delphi 7. Estou fazendo a migração para Delphi Rio, porém tenho muita coisa ainda no Delphi 7 e preciso dessa palheta funcionando. Na aba package o componente aparece como instalado, porem clicando no botão components não tem nada. Alguem pode ajudar?
  9. Bom dia, se utilizar o metodo <ACBrMail>.Send consigo enviar de forma a imagem embedded, mas se por exemplo utilizar o metodo <ACBrBoleto>.EnviarEmail eu não consigo o mesmo resultado. Acabou sendo enviável alterar todo o meu fluxo de envio para outro método, desta forma na unit ACBrBoleto, alterei o comportamento para conseguir o resultado esperado. na rotina : dessa forma no envio de email estou passando assim xAssinatura.Add('<center><img src="cid:'+ExtractFileName(tabEmpresaEMAIL_HEADER.AsString)+'"></center>'); e no anexo : Anexos.Add(tabEmpresaEMAIL_HEADER.AsString); <ACBrBoleto>.EnviarEmail(xEMAIL_BOLETO, xRAZAO_SOCIAL+' :: Boleto B ancário', xAssinatura, true // Enviar PDF junto ,nil ,Anexos); Desde já agradeço a moderação. ACBrBoleto.pas
  10. Bom dia, iniciei um processo de homologação do banco safra (cobBancoSafra) e me deparei com dois problemas que não estou conseguindo resolver... 1º o nosso numero gerado no arquivo de remessa esta divergente do impresso pois ele esta adicionando um digito verificador na 9ª posição do NN. IfThen(NossoNumero = '000000000', '000000000', PadLeft(RightStr(NossoNumero,8),8,'0') + CalcularDigitoVerificador(ACBrTitulo)) + não consegui realizar a impressão utilizando esse digito verificador. 2º o banco esta obrigando que não tenha uma logo e esteja escrito 'BANCO SAFRA S/A' em seu lugar, esse eu posso simplesmente alterar para que escreva o texto, mas na próxima vez que o ACBR for atualizado eu teria que alterar novamente.
  11. Bom dia, Fiz a implementação para exportar boleto em formato Jpg, estou disponibilizando caso possível seja adicionado no repositório SVN. Esta alteração se fez necessário para efetuar a impressão em uma impressora Bluetooth portátil. Segue unit alterada para analise. ACBrBoleto.pas ACBrBoletoFCFR.dfm ACBrBoletoFCFR.pas
  12. Bom dia pessoal A empresa que trabalho necessitou a geração de remessa para o banco Safra 240 posições. Como não tinha no ACBR eu criei seguindo o padrão e estou disponibilizando. Pasta destino do arquivo: ...\Fontes\ACBrBoleto\ Grato ACBrBancoSafra.pas
  13. Bom dia, recentemente (Maio/2019) o Sicredi alterou seu layoute de cobrança CNAB400 para atender já no registro de títulos a opção de Negativação. Desta forma torna-se possível enviar já na remessa de cadastro de título a informação da Negativação. A utilização desta funcionalidade de negativação ficou muito semelhante ao já existente procedimento de protesto. Sendo assim alterei os fontes do ACBr para atender tal alteração. Porém só fiz a alteração para o layoute CNAB400. O manual atualizado da cobrança Sicredi CNAB400 onde possui agora os campos para informação da negativação está no link https://www.sicredi.com.br/html/para-sua-empresa/recebimentos/cobranca/arquivos/manual-cnab-400.pdf (Pág. 36 do manual, posição 193-194 e 195-196 do registro detalhe do arquivo de remessa). Também envio em anexo os fontes do ACBr alterados para atender essa opção de negativação. Peço que analisem os fontes abaixo para uma possível submissão para o repositório de fontes no SVN. ACBrBoleto.pas ACBrBancoSicredi.pas
  14. Tenho olhando e continuo olhando o código da demo, por dificuldades na instalação do componente acabei tendo que não instalar o fortes report e uso o fastreport, o fast funciona para minhas aplicações que usam o componente mas não consigo alterar o arquivo ini de forma correta para a demo funcionar com o fast, Mas minha dúvida é a seguinte, estou gerando o pdf do boleto com valor total mas quero parcelar, alimentei o campo parcela mas creio que não seja o jeito correto também selecionei carne no layou mas aparentemente eu não estou alimentando a variável certa: Mesmo atribuindo '10' para parcela ele não alimenta o campo de setparcela, estou bem perdido mas pesquisando dentro do código do componente, alguém pode me dar uma luz de como parcelar para que o pdf gerado sai com por exemplo uma entrada de valor: 1000,00R$ e saia com 10 boletos de 100,00R$ no mesmo pdf?
  15. Boa tarde, Estou tendo dificuldades para gerar boleto, estou recebendo o erro "Not enough timers available", logo após a chamada de "ACBrBoleto1.Imprimir" Debuguei o ACBRBoleto.pas mas não identifiquei o momento da falha, o debug passa por duas funções após a chamada de "Imprimir" dentro delas não ocorre parada Logo que finaliza ele retorna esse erro: Segue a baixo o código de tentativa de impressão: procedure TFrmBoletos.IMPRIMIRClick(Sender: TObject); var Titulo : TACBrTitulo; begin Titulo := ACBrBoleto1.CriarTituloNaLista; with Titulo do begin Vencimento := Now; DataDocumento := Now; NumeroDocumento := '123'; EspecieDoc := '1234'; if 'SIM' = 'SIM' then Aceite := atSim else Aceite := atNao; DataProcessamento := Now; NossoNumero := '1245'; Carteira := '12456'; ValorDocumento := 1.40; Sacado.NomeSacado := '12456'; Sacado.CNPJCPF := '12456'; Sacado.Logradouro := '12456'; Sacado.Numero := '12456'; Sacado.Bairro := '12456'; Sacado.Cidade := '12456'; Sacado.UF := '12456'; Sacado.CEP := '12456'; ValorAbatimento := 0; LocalPagamento := '12456'; ValorMoraJuros := 0; ValorDesconto := 0; ValorAbatimento := 0; DataMoraJuros := 0; DataDesconto := 0; DataAbatimento := 0; DataProtesto := Now; PercentualMulta := 0; Mensagem.Text := '12456'; OcorrenciaOriginal.Tipo := toRemessaBaixar; Instrucao1 := '12456'; Instrucao2 := '12456'; Parcela := 1; end; // grava o nosso numero na conta // Atualiza a consulta ACBrBoleto1.ACBrBoletoFC.DirLogo := 'C:\Users\Trial\Desktop\B.Texte\LogoColorido'; ACBrBoleto1.ACBrBoletoFC.Filtro := fiNenhum; ACBrBoleto1.ACBrBoletoFC.LayOut := lPadrao; ACBrBoleto1.Banco.Digito := 123456; ACBrBoleto1.Banco.Numero := 12345; ACBrBoleto1.Cedente.Nome := 'Fulano'; ACBrBoleto1.Cedente.CodigoCedente := 'Fulanoteste'; ACBrBoleto1.Cedente.Agencia := 'Fulanoteste'; ACBrBoleto1.Cedente.AgenciaDigito := 'Fulanoteste'; ACBrBoleto1.Cedente.Conta := 'Fulanoteste'; ACBrBoleto1.Cedente.ContaDigito := 'Fulanoteste'; ACBrBoleto1.Cedente.UF := 'Fulanoteste'; ACBrBoleto1.NomeArqRemessa := 'TESTE'; ACBrBoleto1.Imprimir; end;
  16. Bom dia, gostaria de saber se existe alguma forma de listar as ocorrências de remessa de um banco específico? Vi que o a classe TACBrBoleto boleto tem a função GetOcorrenciasRemessa, porém a mesma retorna sempre as mesmas ocorrências de remessa independente do banco configurado. Pergunto isto pois estou migrando do CobreBem e no mesmo existe uma função para listar as remessas específicas para o banco configurado. Att. Deivis.
  17. O ACBrBancoBanese não estava de acordo com o Manual do banco, inclusive no cálculo do digito verificador do nosso número, então fiz algumas mudanças no mesmo. Fiz os testes e homologuei a remessa e os boletos junto ao banco. A homologação foi feita com sucesso. Seguem as alterações realizadas e o arquivo ACBrBancoBanese.pas com as alterações realizadas. Seria bom subir o pas não? function TACBrBancoBanese.CalcularDigitoVerificador( const ACBrTitulo: TACBrTitulo ): String; var ADigitoNossoNumero : string; begin Modulo.CalculoPadrao; Modulo.MultiplicadorFinal := 13; Modulo.Documento := ACBrTitulo.NossoNumero; Modulo.Calcular; AdigitoNossoNumero :=IntToStr(Modulo.DigitoFinal); Result:= AdigitoNossoNumero; end; // NÃO LEVAVA EM CONTA A AGÊNCIA NO DOCUMENTO (AAANNNNNNNN) E PARA QUE MultiplicadorFinal:= 13 ? // TROCADO POR function TACBrBancoBanese.CalcularDigitoVerificador( const ACBrTitulo: TACBrTitulo ): String; begin Modulo.CalculoPadrao; Modulo.Documento:= PadLeft(ACBrTitulo.ACBrBoleto.Cedente.Agencia, 3, '0') + RightStr(ACBrTitulo.NossoNumero, 8); Modulo.Calcular; Result:= IntToStr(Modulo.DigitoFinal); end function TACBrBancoBanese.MontarCampoNossoNumero ( const ACBrTitulo: TACBrTitulo ) : String; begin ACBrTitulo.NossoNumero := IntToStrZero( StrToIntDef((Trim(ACBrTitulo.NossoNumero)+Trim(CalcularDigitoVerificador(ACBrTitulo))),0) ,Self.TamanhoMaximoNossoNum); Result := ACBrTitulo.NossoNumero; end; // ACBrTitulo.NossoNumero:= ... MODIFICA O NOSSO NÚMERO, ACRESCENTANDO O DIGITO AO MESMO. // E SE VC PRECISAR CHAMAR A FUNÇÃO UMA SEGUNDA VEZ (PARA GRAVAR O NOSSO NRO MONTADO POR EXEMPLO) VAI BUGAR // PORQUE VC ESTARÁ CRIANDO UM NOVO NOSSONUMERO (AGORA COM O DIGITO) PARA CALCULAR UM NOVO DIGITO // TROCADO POR function TACBrBancoBanese.MontarCampoNossoNumero ( const ACBrTitulo: TACBrTitulo ) : String; begin result:= IntToStrZero( StrToIntDef((Trim(ACBrTitulo.NossoNumero)+Trim(CalcularDigitoVerificador(ACBrTitulo))),0) ,Self.TamanhoMaximoNossoNum); end; function TACBrBancoBanese.CalcularCampoASBACE(const ACBrTitulo: TACBrTitulo): string; ANossoNumero := Copy(Trim(ACBrTitulo.NossoNumero), 1, ACBrTitulo.ACBrBoleto.Banco.TamanhoMaximoNossoNum); // TROCADO POR ANossoNumero := MontarCampoNossoNumero(ACBrTitulo); ACBrBancoBanese.pas
  18. Bom dia Estou gerando boletos e as remessas c240, mas ao Enviar para Homologação ao Banco Sicoob o mesmo retorna o seguinte: 'Corrigir no segmento P, posições 38 a 47 e no boleto o nosso número, os boletos devem possuir numeração crescente e está sendo informado o mesmo número para todos os boletos.' Possuí 6 parcelas. Nosso Numero informado: 5500 O calculo para todos os códigos de barras está sendo feito corretamente, mas no Campo Nosso Numero no Boleto e no arquivo c240 fica sempre o mesmo. Estou anexando as 3 primeiras parcelas para análise, há algum meio de fazer essa ordem crescente?
  19. Boa tarde, estou tento problemas com o banco safra. a ultima remessa que foi enviada foi negada. so que ja tinha enviado 64 remessas e todas passaram. a ultima que foi aceita, foi dia 5 desse mes. nao foi mudado nada. e pelo que eu to vendo os dados estao de acordo com o layouts, tanto os que foram aceitos quantos os que foram negados. estou anexando o ultimo que funcionou e o primeiro que deu negacao. tambem notei uma coisa. no caso da conta usada a agencia é a 0029 e nao tem digito ai eu passo 0. mas quando eu alimento o sistema com agencia 0029 ele automaticamente muda pra 0002 entao tive que cadastrar a conta como 0290 pra no componente tratar a agencia como 0029 a remessa 64 foi a que passou. a 65 foi a rejeitada. REMESSA_SAFRA_64.txt REMESSA_SAFRA_65.txt
  20. Boa tarde pessoal, Então a alguns dias já, estou passando um dificuldade bem irritante. Ressalvo que não tenho muita experiência com a geração de boletos... Mas enfim, estou tentando gerar boletos para o banco Sicredi e já conseguir configurar quase tudo, mas devo estar errando em algo por sempre fica acusando que o DV - Nosso número, está errado. Para fazer esse teste utilizo uma planilha do excel, que baixei daqui mesmo dos foruns da acbr. Se alguém ai, poder me dar uma força na resolução do problema desde já agradeço.
  21. Ao tentar gerar o pdf de um boleto é gerada a seguinte exceção em TACBrBoletoFCFR.PreparaRelatorio: 'Could not convert variant of type (String) into type (Double)'. O boleto era gerado normalmente, porém após as atualizações do ACBr e Fast está ocorendo este erro. Já verifiquei se não existe nenhuma sctring com valor incorreto que possa estar causando este erro.
  22. Boa Tarde Pessoal, Estou homologando boleto do banrisul, nos testes de homologação da geração de remessa o banco me deu este retorno - posição 157-158 incluir a instrução de multa '18'; - posição 159-160 incluir a instrução de protesto '09'; Analisando o procedimento GerarRegistroTransacao400 da unit ACBrBancoBanrisul o campo Instrucao1 esta recebendo o código de protesto 09 e Instrucao2 esta recebendo 18 onde os mesmos estão invertidos. 08A27061918091000000000100 - Trecho do arquivo de remessa do banco 08A28061909181000000000100 - Trecho do arquivo de remessa da ACBrBancoBanrisul Ajustamos a ACBrBancoBanrisul ?
  23. Olá! Configurei o ACBrBoleto em um de meus clientes utilizando o Banco Safra, tanto a impressão do boleto quanto o arquivo de remessa foram homologados e já efetuei testes em ambiente de produção. Tive que realizar apenas uma alteração na leitura do arquivo de retorno, tendo em vista que a propriedade TACBrTitulo.OcorrenciaOriginal.CodigoBanco sempre retornava o valor '02'. O arquivo ACBrBancoSafra.pas com a alteração está anexado nesta mensagem. A minha alteração pode ser visualizada na linha 546 do arquivo na procedure LerRetorno400. 546: OcorrenciaOriginal.Tipo := CodOcorrenciaToTipo(StrToIntDef(copy(Linha, 109, 2), 0)); ACBrBancoSafra.pas
  24. Caros Boa Noite Estou com um problema aqui no ACBrBoleto no Itaú Carteira 109 no retorno CNAB 400, ele dá uma mensagem dizendo que o "CNPJ é inválido" se estiver LeCendenteRetorno := True e caso contrário dá uma mensagem dizendo "CNPJ/CPF: 00001111111111 do arquivo não corresponde aos dados do Cedente!" com o CPF do cliente precedido de zeros... O problema é que a conta do meu cliente é uma conta jurídica, mas o cedente do boleto é uma pessoa física e o Banco faz assim e com certeza está errado, pelo próprio manual do Banco, e pelo que vi vai ser bem complicado de solicitar um acerto pela TI do Banco. Ou seja o Itau gera um retorno com identificação de CNPJ para um CPF. Tem alguma forma de contornar isto, sem mudar o código por nós mesmos??? Agradeço Oswaldo dos Santos Araujo
  25. Fazendo testes para impressão de boletos com juros de moral mensal, na impressão estava saindo: "Cobrar juros de R$ 10,00 por dia a partir de dd/mm/yyyy" Quando o correto seria 10,00% ao mês Fiz uma alteração simples no ACBRBoleto para correção. Anexo arquivo com alteração para análise. ACBrBoleto.pas
×
×
  • Create New...