Wellington Alamino

Por enquanto mude para RoundTo({Double}(AValue), -2); E vamos aguardar, eu fiz assim pra liberar o trabalho na empresa;

Pós atualização dos arquivos ACBR-boleto os boletos gerados passaram a sair com valor documento zerado. Verifiquei o log dos arquivos e encontrei a alteração que me trouce problemas, segue: procedure TACBrTitulo.setValorDocumento(const AValue: Currency); begin // O arredondamento é com objetivo de remover as diferenças em arredondamentos posteriores, // que causa uma diferença entre o valor do documento e a linha digitável. fValorDocumento := RoundTo(Double(AValue), -2); end; // Veja: Porem não sei por qual motivo Double(25,55) me retorna zero, e também não entendo a necessidade desta "Conversão" para Double se "AValue" e "fValorDocumento" são Currency; Podo somente o meu Delphi está se comportando desta forma, se alguém puder me orientar, pois parece ser uma coisa boba, mas não gosto de mexer diretamente nos códigos do ACBR. Obrigado desde já.

Pegue um arquivo xml de homologação valide no validador de xml da sefaz RS e depois tente enviar com o demo do acbr. Assim você conseguirá mapear onde está seu problema.

Perfeito!

Fui informado pela SEFAZ de MINAS que existe um correção programada para 25/05, então pode ser isto. Teoricamente seria pra conseguir, mas se quiser envie o xml aqui para darmos uma olhada. Sucesso!

Vou tentar exemplificar o que o @fernandoschulz tentou te falar, Acesse ai ...\ACBRNFe2_Trunk2\Fontes\ACBrBoleto\ACBrBancoBancoob.pas Ai então você querendo informar algo para o banco tem que ver a procedure GerarRegistroTransacao240( ACBrTitulo: TACBrTitulo) porque você escolheu cnab240 e é aí que as informações dos títulos são transcritas pro arquivo de remessa que você envia ao banco, um exemplo, Veja ai que a imagem que você enviou ante mostra caracter 142 até 142 assim como na imagem que te envio acima, assim está claro que no titulo você tem de preencher o TipoDesconto e por ai vai. Uma dica construtiva, tente seguir a linha de como o componente funciona, rastreando os seu passos. Att,

Acho que o cedente não está ai nessas informações, assim pra ser bem simplório, Cedente é você que vai receber o boleto, no banco mais especificamente no sistema de cobrança você é identificado por um numero mais especifico que sua conta em si, isso quer dizer que pode existir dois cedentes para mesma conta bancária, agora se sua gerente não está sabendo te informar isto, se não me engano não é preciso preencher o convênio, mas o código cedente vai aparecer se você emitir um boleto no SicoobNetEmpresarial, pode ser que sua emissão de boletos não esteja devidamente autorizada pelo banco sendo assim você ainda não possuiria um código de cedente. Pense que NossoNumero junto com o Cedente, formam uma chave forte, ou seja não repete. Porem o NossoNumero pode repetir para a mesma conta-bancária, com cedentes diferente é claro. Peça sua gerente pra te encaminhar pra uma pessoa com mais chances de poder te ajudar. É papel dela.

Segue em anexo a Unit alterada, de forma quando a data de abatimento for informada pelo usuário do componente ela apareça na mensagem padrão mas quando não for informada a data de vencimento não mais apareça como uma data limite, compreendo que assim todos podem ser atendidos. E conseguimos não causar conflito com as reais informações registradas no banco. Desde já agradeço a @Juliana Tamizou e @Juliomar Marchetti pela explicação do correto modo de sugerir uma demanda; Att, ACBrBoleto.pas

Perfeito, te marquei errado, mil desculpas;

@Dercide Alvarez Debuga na unit ACBrBancoBancoob às functions CalcularDigitoVerificador, MontarCampoNossoNumero Com certeza você vai descobrir onde está errando; Att,

@Juliana Tamizou @Juliomar Marchetti Boa tarde, revisei todos os manuais do bancos do AcbrTools. Nenhum deles cita Data de abatimento, nem citam a data de vencimento como limite para concessão do abatimento ao sacado. Então em todos eles o Valor de Abatimento altera o valor Original do boleto em beneficio ao sacado independente de qualquer data; Agradeço desde já. Qual o processo para a correção a partir de agora?

Poderia me falar o caminho, pois não estou encontrando dentro da Trunck2 Agradeço desde já.

E como funciona este processo? Qualquer um pode fazer, tem uma lista de bancos? Obrigado!

Bom dia @Juliana Tamizou! Conforme informa os senhores acima, isto é o que ocorre. No link abaixo está o manual do CNAB240, onde a data de abatimento não existe. https://portal.febraban.org.br/pagina/3053/33/pt-br/layout-240 Abatimento é inerente ao vencimento, diferente do desconto que tem como data limite o vencimento, o abatimento é a forma de alterar o valor total de um boleto e na documentação da febraban que regula o CNAB240 a data de abatimento não aparece uma vez se quer. E o valor do abatimento é apresentado da seguinte forma "Valor do Abatimento, Valor do abatimento (redução do valor do documento, devido a algum problema), expresso em moeda corrente." Ou seja na própria remessa não existe data de abatimento, então se o gerador do boleto acessar o internet banking e imprimir o boleto gerado no componente "Acbr boleto" ele vai sair sem data de abatimento. Então, estes são os fatos. Obrigado desde já.

Vamos lá, Valor abatimento, altera o valor do titulo para menor, ou seja, abate. Ex. de uso : Se parte da sua mercadoria foi devolvida por seu cliente no ato da entrega, você concede uma abatimento para seu cliente, abatimento não tem data limite. Valor desconto tem uma data limite anterior ao vencimento, pode ser até mais de um desconto Ex. de uso: Se o cliente pagar 10 dias antes do vencimento conceder desconto de 15% ou X valor. Se entendi direito: Boleto valor 4,20 desc 0,0 [remessa] Pagar boleto valor 4,20 desc 0,20 valor pago 4,00[retorno] Então o detalhe é que mesmo o boleto sendo registrado dependendo de onde o pagamento foi realizado ou em qual canal de pagamento pode ser informado manualmente um desconto pelo pagador. Ou seja seja se sua aplicação for automatizada você deve criar uma rotina que verifique inconsistências para o usuário analisar e tomar decisões. Possíveis inconsistências desconto indevido, valor pago a menor, pago vencido sem correção, correção indevida[taxas e juros] e por aí vai. Espero ter contribuído.

@Juliana Tamizou,o que você entende sobre esta questão? Obrigado, desde já;

É sim, contacte o seu gerente do banco escolhido, ele pode te passar o passo a passo de como você vai proceder para sofrer menos possível na sua escalada de aprendizagem financeira. Att,

No arquivo atualizado em 19/04/2018 altero a procedure AdicionarMensagensPadroes da seguinte forma Implementação anterior : [line 1978] if ValorAbatimento <> 0 then begin if DataAbatimento <> 0 then AStringList.Add(ACBrStr('Conceder abatimento de ' + FormatCurr('R$ #,##0.00',ValorAbatimento) + ' para pagamento ate ' + FormatDateTime('dd/mm/yyyy',DataAbatimento))) else AStringList.Add(ACBrStr('Conceder abatimento de ' + FormatCurr('R$ #,##0.00',ValorAbatimento) + ' para pagamento ate ' + FormatDateTime('dd/mm/yyyy',Vencimento))); end; Nova Implementação: [line 1978] if ValorAbatimento <> 0 then begin if DataAbatimento <> 0 then AStringList.Add(ACBrStr('Conceder abatimento de ' + FormatCurr('R$ #,##0.00',ValorAbatimento) + ' para pagamento ate ' + FormatDateTime('dd/mm/yyyy',DataAbatimento))) else AStringList.Add(ACBrStr('Conceder abatimento de ' + FormatCurr('R$ #,##0.00',ValorAbatimento))); end; Justificativa: A data de abatimento para os bancos não existe, ou seja o banco não reconhece uma data que condicione o recebimento do boleto com abatimento, tanto é que na remessa não existe campo definido para a data de abatimento. Citação do documento http://www.bb.com.br/docs/pub/emp/empl/dwn/CbrVer04BB.pdf >>> Particularidades BB Leiaute CNAB 240 Na página 10; Então penso que se o cedente quiser reforçar uma data para o abatimento na impressão do titulo, ela pode ser preenchida, mas, se a data de abatimento estiver ausente, a data de vencimento não deve ser apresentada como condicionante a concessão do abatimento a fim de evitar transtorno para o sacado na hora do pagamento do boleto bancário. Agradeço a atenção e aguardo análise do pessoal, para melhorarmos cada vez mais este componente conceituado; ACBrBoleto.pas

Não funcionou permanece tudo igual Endereço da 4.0 e tudo indica 1.0 no xml. Queria saber como a tag VerEvento está preenchida com 1.0 se na sefaz o serviço de evento da nf-e tem versão 4.0? Ambiente de HOMOLOGAÇÃO (Sem Validade Jurídica - Ambiente de testes) SERVIÇO VERSÃO URL RecepcaoEvento 1.00 https://hnfe.fazenda.mg.gov.br/nfe2/services/RecepcaoEvento RecepcaoEvento4 4.00 https://hnfe.fazenda.mg.gov.br/nfe2/services/NFeRecepcaoEvento4

Tem fundamento esta ultima mensagem minha? Desde já agradeço;

Atualizei e testei novamente com o mesmo resultado, O componente monta o xml de forma equivocada para o servidor da sefaz Agradeço novamente;

Estou utilizando o demo para não ter erro e tudo está atualizado, mas segue os arquivos para conferencia ACBrNFeServicos.resACBrNFeServicos.ini

Obtive resposta da sefaz-mg, a seguinte: Ai simulei novamente e fui analisar se o XML do soap de evento 4.0 estava realmente como 4.0 e não é o que parece, vou deixar um print pra alguém que entende mais afundo do assunte em si. Tira o endereço wsdl nada mais indica a versão do evento 4.0, aguarda a análise do pessoal! Desde já agradeço! Tenham um bom dia.

Entendi, vou fazer uma replica para o atendimento da sefaz de minas, e posto aqui o resultado; Obrigado;

Segue a resposta da STI da sefaz de minas. "Ref. a mensagem: 133.783 Senhor(a), Obtivemos retorno da STI em relação a demanda 133.783, correções, conforme abaixo: "No XML de soap que o contribuinte enviou, não informou a tag de cabeçalho do soap, a saber nfeCabecMsg Realizamos um simulação e conseguimos autorizar o XML de NF-e e, em seguida, conseguimos cancelar esse XML autorizado informado a tag de cabeçalho. Quando retiramos a tag de cabeçalho, obtivemos o erro que o contribuinte informou. Assim, solicitamos ao contribuinte um novo envio, informando a tag de cabeçalho como os atributos cUF e versaoDados OBSERVAÇÃO: Para dar continuidade a este atendimento, favor observar, logo abaixo dos ícones de satisfação, a seguinte instrução: "Gostaria de dar sequência a este atendimento? Clique aqui ". À disposição. Atenciosamente, FALE CONOSCO - SEF/MG Superintendência de Arrecadação e Informações Fiscais Tel.: 155 para todo o Estado de Minas Gerais (31) 3303-7995 para outros estados e países" Lembrando que os arquivos a qual eles se referem estão acima neste mesmo post para analise. Será que temos elementos para a correção agora? Parece que procede o que eles falaram, aguardo a análise do pessoal aqui, estou a disposição para mais testes. Desde já agradeço;