Joabe Geraldo

Boa tarde Estou tendo problemas com a geração de uma remessa do Sicoob no CNAB 400. De acordo com o manual eu devo informar no campo 'Código para protesto' os seguintes valores: ' O ACBr está gerando a remessa sempre com a opção '1 - Protestar dias corridos' O problema que o boleto do cliente não vai protestar e o banco não está aceitando informar 'Protestar com dias corridos' e com dias de protesto 0. O que pode ser feito para resolver o problema? Obrigado. Layouts para troca de informações ATUAL.xls ACBrBancoBancoob.pas

Bom dia O usuário utiliza o Avast Free e também está com usuário com permissões de admisnistrador. Realizei alguns testes no nosso ambiente de desenvolvimento e obtive o mesmo problema.

Boa tarde. Eu sei que o problema que vou postar não está diretamente relacionado ao Acbr, mas estou postando a dúvida aqui porque talvez alguém já tenha passado pelo mesmo problema e possa me ajudar. Estou com um problema ao enviar o arquivo PDF e o XML da da Nota Fiscal Eletrônica por email. Eu uso o Componente Indy para envio dos e-mails. Em alguns computadores que tem Avast instalado o arquivo PDF está chegando corrompido no e-mail do destinatário. Se eu desativar o Avast ou o módulo de email do mesmo o arquivo chega normalmente. Já adicionei exceção para o executável do sistema, para a pasta de XML e para a pasta do PDF, ainda sim não deu certo. Alguém já passou por esta situação? Obrigado

Bom dia Estou lendo o arquivo de retorno CNAB400 do Santander e estava acusando erro 'Agencia\Conta do arquivo inválido'. Observando o arquivo AcbrBancoSantander.pas verifiquei que estava sendo usando o campo fpTamanhoConta para identificar a conta do cliente: rConta := PadLeft( OnlyNumber(rConta),fpTamanhoConta,'0'); E observei que no create da classe fpTamanhoConta estava sendo atribuído 11. Como a conta do cliente possui 8 dígitos, fiz um teste, passando foTamanhoConta para 8, e neste teste a leitura do arquivo retorno foi feita corretamente. Existe alguma forma de alterar o fpTamanhoConta sem alterar o arquivo AcbrBancoSantander.pas ou a correção deve ser feita no arquivo mesmo? Obrigado

Resolvi o problema encontrando a solução em: Tive que Executar o C:\Acbr\Fontes\ACBrDFe\ACBrNFe\Compila_RES.bat e Reinstalar o ACBr

Bom dia Estou fazendo uma consulta de Notas Fiscais em Lote. Estou utilizando o comando abaixo dentro de um loop, para adicionar todas as notas que eu quero fazer a consulta: ACBrNFe1.NotasFiscais.LoadFromFile(sXML); E depois, fora do loop, executo o comando de consulta: ACBrNFe1.Consultar; Eu não estou conseguindo pegar o resultado da consulta de cada nota, individualmente. Tentei com os comandos abaixo, mas todos retornam cStat = 0; Retorno := ACBrNFe1.WebServices.Consulta.cStat; Retorno := ACBrNFe1.NotasFiscais.Items[i].NFe.procNFe.cStat;

Pelo que eu percebi nos fontes do Acbr, é feito a leitura do Arquivo XML que é retornado e as informações são gravadas na classe TresCTe (\ACbrDFe\AcbrCTe\PCNCTe\pcteRetDistInt.pas). A classe TresCTe parece ser alimentada pelo método LerXML. CTe_Nota_Tecnica_2015_002.pdf

Boa tarde Estou implementando uma opção para meu cliente fazer o download e importação do CT-e através do WebService de Distribuição e estou com algumas dúvidas. Pelo que eu entendi vai ser distribuído para o cliente todo CT-e que for emitido pelo cliente, ou que ele seja ou destinatário, ou que ele seja o emitente. Nestas condições, é possível adicionar no Resumo da Distribuição que é retornado pelo ACBr um campo de CNPJ e Nome do Destinatário e do Remetente? Também seria possível adicionar o campo Tomador do Serviço? Obrigado

Encontrei mais uma diferença, no campo Valor da Multa. O Acbr está passando esta instrução: IntToStrZero(round(((ValorDocumento*PercentualMulta)/100)), 10) + //358 até 367 - Valor nominal da multa Desta forma, o valor da multa está gerando a parte inteira como Decimal, ficando o valor errado. O Correto seria: IntToStrZero(round(((ValorDocumento*PercentualMulta)/100)*100), 10) + //358 até 367 - Valor nominal da multa Inicialmente encontrei apenas estas diferenças. Enviei o arquivo de remessa corrigido, de acordo com o manual de 07/2017 e estou aguardando o retorno da validação.

Mas não dá nenhum problema enviar a remessa com a informação do layout anterior? Não deveria ser atualizado não?

Também identifiquei o mesmo problema que o @João Paulo F. Bellucci

Boa tarde Estou homologando caixa e encontrei um erro na geração da remessa CNAB 400 da caixa. O campo Espécie DOC está sendo atribuído com valores incorretos, de acordo com o manual da Caixa. //A partir da Linha 916 { Pegando o tipo de EspecieDoc } if EspecieDoc = 'DM' then ATipoEspecieDoc := '01' // Duplicata Mercantil else if EspecieDoc = 'NP' then ATipoEspecieDoc := '02' // Nota Promissória else if EspecieDoc = 'DS' then ATipoEspecieDoc := '03' // Duplicata de Prestação de Serviços else if EspecieDoc = 'NS' then ATipoEspecieDoc := '05' // Nota de Seguro else if EspecieDoc = 'LC' then ATipoEspecieDoc := '06' // Letra de Câmbio else if EspecieDoc = 'OU' then ATipoEspecieDoc := '09' ;// Outros Onde, de acordo com o manual, o correto deve ser: { Pegando o tipo de EspecieDoc } if EspecieDoc = 'DM' then ATipoEspecieDoc := '02' // Duplicata Mercantil else if EspecieDoc = 'NP' then ATipoEspecieDoc := '12' // Nota Promissória else if EspecieDoc = 'DS' then ATipoEspecieDoc := '04' // Duplicata de Prestação de Serviços else if EspecieDoc = 'NS' then ATipoEspecieDoc := '16' // Nota de Seguro else if EspecieDoc = 'LC' then ATipoEspecieDoc := '07' // Letra de Câmbio else if EspecieDoc = 'OU' then ATipoEspecieDoc := '99' ;// Outros Em anexo envio o arquivo AcbrBancoCaixa,pas corrigido e o manual da caixa Manual_Leiaute_CNAB400_SIGCB.pdf ACBrBancoCaixa.pas

Bom dia Identifiquei uma situação no AcbrBancoBancoob.pas que está gerando uma situação de erro na letitura do arquivo de retorno: O método CodOcorrenciaToTipo (Linha 1069) não tinha a Opção de ocorrência 10 (Baixa solicitada pelo Beneficiário). Com isso, quando o usuário solicitava uma baixa de título o Acbr entendia que o título estava com entrada confirmada. O mesmo problema ocorria no método TipoOCorrenciaToCod. Em anexo envio a sugestão de correção. ACBrBancoBancoob.pas

Bom dia Estou fazendo alguns testes de emissão de NF-e, e percebi que quando transmito uma nota fiscal e a mesma é denegada, o ACBr executa o método de Impressão normalmente, como se a nota tivesse sido autorizada. A diferença está no campo protocolo, onde na nota autorizada vem escrito "Protocolo de Autorização de Uso", enquanto na nota Denegada vem escrito "Protocolo de Denegação". Existe alguma forma de não imprimir esta nota denegada ou imprimir alguma marcação que chame a a atenção do usuário? Fico preocupado, pois a diferença é bem pequena, e o usuário pode não perceber, gerando transtornos ao cliente. O sistema até faz o tratamento do retorno e emite um alerta para o usuário, mas só ocorre depois da impressão do DANFE. Temos todos os tipos de usuários por isso infelizmente temos que criar mecanismos para protege-los deles próprios. Obrigado Agora que vi que postei na categoria NFS-e... Não achei opção de Excluir a postagem.

Bom dia! Como foi publicado pelos Administradores do fórum que a compatibilidade com o Delphi 7 seria mantida até o fim do ano, atualizei os fontes e executei o ACBrInstall_Trunk2.exe. Durante a instalação ocorreu um erro na compilação do ACBr_Comum.dpk: D:\Delphi\Paletas\Acbr\Fontes\ACBrComum\ACBrPAFClass.pas(262) Error: Undeclared identifier: 'TDate' D:\Delphi\Paletas\Acbr\Fontes\ACBrComum\ACBrAAC.pas(44) Fatal: Could not compile used unit '..\..\..\Fontes\ACBrComum\ACBrPAFClass.pas' No Delphi XE 7 instalou normalmente. Estou enviando o arquivo de log completo para análise. log_Delphi_7.txt

Vou aguardar a correção no SVN. Obrigado pelo retorno.

Bom dia Encontrei uma divergência no campo nosso número na geração da remessa do Bancoob. De acordo com o manual o nosso número deve ser composto por Número Título(10 posições) + Parcela (02 posições) + Tipo Formulario(01 Posição). O Acbr está gerando o nosso número sempre com número de parcela igual a '01', não considerando o que é passado em Titulo.Parcela. Result := Result+PadLeft(NossoNum, 10, '0')+ // 38 a 57 - Carteira PadLeft('01', 02, '0')+ <---aqui não deveria ser PadLeft(ACBrTitulo.Parcela, 02, '0') ? PadLeft(wModalidade, 02, '0')+ '4'+ Space(5); A impressão do Boleto considera o número da parcela, ficando divergente da remessa. Obrigado

Ainda não consegui resolver meu problema, descrito no outro post. Alguém já passou por esta situação?

Boa noite Estou homologando o sistema da empresa para geração de boletos do Banco do Brasil e estou com um problema na impressão da Instrução de protesto. Defini o título para protestar em dias úteis e defini a data de protesto Ex: Data de Vencimento = 21/07/2016, Data de Protesto = 28/07/2016 (05 Dias Úteis após o Vencimento). O problema é que a impressão da instrução de protesto está incorreta: Protestar no 7 dia útil após o vencimento Observando o arquivo AcbrBoleto.pas, na procedure TACBrBoleto.AdicionarMensagensPadroes(Titulo: TACBrTitulo; AStringList: TStrings) , verifiquei que está sendo dado o mesmo tratamento para o cálculo de dias corridos e dias úteis. with Titulo do begin if DataProtesto <> 0 then begin if TipoDiasProtesto = diCorridos then AStringList.Add(ACBrStr('Protestar em ' + IntToStr(DaysBetween(Vencimento, DataProtesto))+ ' dias corridos após o vencimento')) else AStringList.Add(ACBrStr('Protestar no ' + IntToStr(DaysBetween(Vencimento, DataProtesto))+ ' dia útil após o vencimento')); end; (...) end; Alguém pode me dizer se eu estou fazendo alguma coisa errada ou se não estaria correto utilizar a função DaysBetween() para obter o número de dias úteis? Obrigado

A dica do Orion.rs resolveu meu problema.

Bom dia a todos. Estou com o mesmo problema que o Marcos relatou. Isso também vem ocorrendo após a atualização do Acbr. Com uma versão anterior do sistema não ocorre nenhum erro. Curioso é que no meu caso isso acontece somente na máquina de desenvolvimento. Em outro computador esta versão que apresenta problemas está funcionando normalmente. Alguém mais está com este problema?

Bom dia, pessoal. Estamos implementando a impressão de etiquetas com a impressora Zebra TLP-2844 através do AcbrEtq. Já ajustamos o layout e está tudo certo. O problema está na velocidade da impressão. Estamos fazendo um teste com um lote de 54 etiquetas, o que corresponde a 18 linhas. O problema é que a impressora imprime uma linha e pausa a impressão, e depois de alguns instantes continua. Isto está fazendo com que o tempo de impressão seja muito grande. Verificamos na fila de impressão que existe um trabalho para cada linha. A implementação ficou assim: Já fizemos testes com o Imprimir(NumeroCopias, Avanco) fora do While, só que a impressora imprime uma somente a primeira linha e para. Existe alguma forma de otimizar esta impressão? Obrigado

Bom dia! Fiz a atualização do Componente ACBR hoje pela manhã, peguei os Schemas atualizados e coloquei na pasta do meu sistema mas não resolveu. Já havia feito um teste de cancelamento com uma nota fora do Prazo, também me retornou que a nota não pode ser cancelada fora do prazo. Pelo que percebi, a verificação do prazo da nota é feita antes da consulta do registro de passagem. Alguém já conseguiu alguma solução?

Também estamos com o mesmo problema aqui em MG, desde semana passada. Não conseguimos cancelar notas dentro do prazo normal nem por cancelamento extemporâneo.

Vou solicitar ao técnico que verifique, Obrigado