Gustavo Agostinho

Então, essa é a função RoundTo que usa SetRoundMode . Acredito que essa funciona sim por causa da proteção no finally. A que eu estava usando é uma outra chamada RoundTo5 e estava nas minhas units. Não faço ideia de onde baixei ela mas outro colega no tópico citado pelo Moderador também a usava e teve o mesmo problema. De qualquer forma entendo que qualquer função que use essa SetRoundMode deve ficar atento a voltar ela para o estado anterior. Valeu

Realmente, você acertou. Consegui reproduzir os erros chamando a função SetRoundMode(rmUP) no preenchimento do titulo. SetRoundMode(rmUP); //forçar o problema Titulo := aDM.ACBrBoleto.CriarTituloNaLista; ..... ..... Titulo.ValorDocumento:=FDQDadosBoletoVALOR_DOCUMENTO.AsCurrency; O meu caso eu tinha a função RoundTo5 também na emissão da NFSe. por isso logo depois da emissão deu problema no boleto e não apresentou problemas nos testes. Quem tiver com o problema procure no código alguma função que use SetRoundMode(rmUP); Retirei a RoundTo5 de todo sistema. Segue uma função que sempre usei desde os primórdios da NFe para arredondamento e sempre funcionou bem. Function TBRoundTo(Value: Extended; Decimals: integer): Extended; var Factor, Fraction: Extended; begin Factor := IntPower(10, Decimals); { A conversão para string e depois para float evita erros de arredondamentos indesejáveis. } Value := StrToFloat(FloatToStr(Value * Factor)); Result := Int(Value); Fraction := Frac(Value); if Fraction >= 0.5 then Result := Result + 1 else if Fraction <= -0.5 then Result := Result - 1; Result := Result / Factor; end; Agradeço o apoio de todos. att Gustavo.

Antônio, o valor está sendo preenchido direto da informação do banco de dados, campo com duas casas decimais. Nos testes funcionou ok, o problema ocorreu juntamente com a impressão torta, aparentemente. Codigo: Titulo.ValorDocumento:=FDQDadosBoletoVALOR_DOCUMENTO.AsCurrency; Titulo.Sacado.NomeSacado:=FDQDadosBoletoSACADO_NOME.AsString;

Pessoal bom dia, Estou com um problema para resolver na minha primeira remessa em produção para o sicoob. Foram enviados 300 boletos com diferença de um centavo na linha digitavel e valor do documento. Eu queria uma sugestão de como corrigir a remessa, já que baixar e gerar novamente vai gerar custo para empresa. Teria como enviar uma remessa de desconto de um centavo, o sicoob aceita? (Meu suporte no banco está muito fraco) Ambiente Windows 10, Delphi Berlin, acbrboleto atualizado e FRCE O problema aparentemente coincidiu com a impressão torta, já que na homologação e testes não apresentou esse problema. Segue anexo. Obrigado.

Boa tarde Italo, Então, eu nem estou cogitando esse opção de lote com mais de um RPS. Acho muito difícil de controlar os retornos. O problema é que são muitas notas e tenho que ficar monitorando se alguma travou e parou a continuidade da emissão. No momento estou fazendo um loop emitindo e pegando retorno de cada RPS, mas tenho que ficar "pageando" a emissão para não parar. Gostaria de saber opiniões de quem tem o mesmo perfil de emissão. Obrigado.

Olá pessoal, Estou com uma demanda de 3000 notas em um único dia do mês e gostaria de perguntar as estratégias que vocês usam. No momento estou emitindo um RPS por lote e aguardando o retorno. O tempo de processamento do Betha está variando muito dependendo do dia. No caso de enviar tudo no mesmo lote corro o risco de invalidar o lote todo devido a falhas de cadastro. Gostaria de saber qual a melhor estratégia. Obrigado.

Por favor mais alguém está com problema de tempo de retorno muito alto. Meus RPS estão demorando de 10 a 15 minutos para processar. Envio normalmente mas fica com status não processado. Passado o tempo de 10 a 15 minutos retornam ok Obrigado.

Pessoal, consegui resolver. Este caso era preciso autorizar mais sequencias de lote RPS para conversão em NFSE. O processo é automático no site do Betha. Segue print anexo para consulta.

Pessoal, Estava emitindo normalmente no Betha e de repente deu erro: E00000 - Erro de validação de scritp-Entre em contato com a prefeitura. O suporte da prefeitura é péssimo e não consegue me ajudar. Alguém já passou por esse erro, qual foi a solução? Estou desesperado para fechar o faturamento mensal e não consigo suporte da prefeitura. <?xml version="1.0" encoding="UTF-8"?> -<ns2:ConsultarSituacaoLoteRpsEnvioResponse xmlns:ns2="http://www.betha.com.br/e-nota-contribuinte-ws"> -<ConsultarSituacaoLoteRpsResposta> -<ListaMensagemRetorno> -<MensagemRetorno> <Codigo>00000</Codigo> <Mensagem>Erro de validacao de Script:</Mensagem> <Correcao>RPS nao autorizado, favor entrar em contato com a Prefeitura.</Correcao> </MensagemRetorno> </ListaMensagemRetorno> </ConsultarSituacaoLoteRpsResposta> </ns2:ConsultarSituacaoLoteRpsEnvioResponse> Obrigado.

Obrigado Felipe, vou fazer os testes em produção e posto os resultados para inclusão da cidade Paraguaçu/MG. Em homologação já esta ok. att

Boa tarde, Fiz a implementação da NFSe usando o ACBR para cidade de Paraguaçu/MG. Deu tudo certo em homologação, usando o próprio certificado emitido pelo ambiente e fly notas Betha. Já em produção está rejeitando a assinatura. Erro 00008. Gostaria de perguntar se será preciso adquirir o certificado A1 ou A3 para trabalhar em produção. Obrigado.

Olá pessoal! Eu gostaria implementar um rotina apenas para o nosso suporte de poder alterar o conteudo do XML antes de assinar, em casos de emergência. Pensei que o evento AntesDeAssinar poderia dar certo lendo e alterando a variável ConteudoXML mais o componente não assina após modificar a variável. Vocês podem me dar uma idéia de como fazer? Obrigado.

Gabriel, estou emitindo em modo SVC para MG. Único modo que consegui. Como o webservice SVC cai em SP e funciona, creio que o problema é de adequação da cadeia V5 no webservice de MG mesmo.

Pessoal boa tarde! Alguém já conseguiu autorizar em MG com cadeia V5 certificado serasa? Não estou conseguindo mesmo instalando a cadeia de certificados.

Show de bola Juliomar! Já implementei aqui. Valeu!

Olá pessoal! O que vocês usando para traduzir as mensagens no delphi XE7 em diante?. Dei uma procurada no google mas não encontrei as units DbConsts,Consts,ibconst etc para compilar como faziamos no delphi 7. Obrigado.

Emilio, acabou de me ajudar essa sua dica. Será que tem como colocar uma mensagem de aviso que vai expirar dentro de x dias, quando o cliente for assinar a Nfe ou CTe? Valeu!

Boa tarde pessoal! Porque será que a rejeição cita um determinado item (nItem:nnn)? Mensagem da rejeição == > Rejeição: Não informado Nota Fiscal referenciada (Lançamento relativo a Cupom Fiscal) [nItem:nnn]

Bom dia pessoal! Desde o dia 23/12 estamos recebendo a mensagem 2999 Falha não tratada ao enviar a NFe em modo SVC-AN a partir de MG. Só esta aceitando no modo assincrono e mesmo assim tem nota que fica retornando somente Lote em Processamento e não autoriza. Gostaria de saber se esta acontecendo com vocês também. Obrigado!

jairobernardesjunior bom dia! Aproveitando o tópico, você e os demais de MG também estão com problemas nos servidores de MG? Parece que depois da semana santa ficou um caos aqui pra mim. Vários problemas de recepção e consulta de e status do serviço. Obrigado.

Bom dia! Alguém esta fazendo testes nos WS 3.10 de MG? Ainda estou recebendo a mensagem de "Rejeicao: Erro nao catalogado" no envio da NFe pelo NFeAutorizacao tanto no modo síncrono com assíncrono. Gostaria de confirmar com mais alguém. t+.

Já o envio da NFe usando o novo WS Nfeautorizacao parece estar com problema considerando que a mesma nfe está autorizando usando a contigência SVCAN. Veja o retorno de envio em modo sincrono. <?xml version="1.0" encoding="utf-8" ?> - <retEnviNFe xmlns="http://www.portalfiscal.inf.br/nfe" versao="3.10"> <tpAmb>2</tpAmb> <verAplic>13_1_33</verAplic> <cStat>103</cStat> <xMotivo>Lote recebido com sucesso</xMotivo> <cUF>31</cUF> <dhRecbto>2014-04-01T14:20:37-03:00</dhRecbto> -<protNFe versao="3.10"> - <infProt> <tpAmb>2</tpAmb> <verAplic>13_1_33</verAplic> <chNFe>31140408058140000122550010000000161428647632</chNFe> <dhRecbto>2014-04-01T14:20:37-03:00</dhRecbto> <digVal>h2I/TI+W0n2oJ4rkrqlWNhSMHOc=</digVal> <cStat>999</cStat> <xMotivo>Rejeicao: Erro nao catalogado</xMotivo> </infProt> </protNFe> </retEnviNFe> t+

Boa tarde! Voltou a funcionar sem alteração alguma. Deve ser algum problema de implementação do WS novos 3.10 na SEFAZ/MG <?xml version="1.0" encoding="utf-8"?><retConsStatServ xmlns="http://www.portalfiscal.inf.br/nfe" versao="3.10"> <tpAmb>2</tpAmb> <verAplic>13_1_33</verAplic> <cStat>107</cStat> <xMotivo>Servico em operacao</xMotivo> <cUF>31</cUF> <dhRecbto>2014-04-01T14:13:14</dhRecbto> <tMed>1</tMed> </retConsStatServ> t+

Bom dia! Estou com o mesmo problema aqui em modo de homologação em MG. Em modo de produção o status do serviço retorna em operação.

Boa tarde! Está com problema mesmo aqui em MG. Pode ser algum problema na implementação dos novos webservices 3.10 como disse o colega acima, acabou afetando a versão 2.00