icozeira

Bom dia Juliana, obrigado pela atenção. Passei com tamanho máximo de 11 digitos. Mas, pelo que percebí o tamanho máximo é calculado pelo próprio acbr com a carteira e o tamanho do convenio. O valor que envio para o componente nos meus testes está em 12165 ele converte para 00000012165. Se eu fizer uma alteração no componente na função function TACBrBancoBrasil.CalcularTamMaximoNossoNumero para resultar 5 ao invés e 11 na linha 170 o acbr gera uma linha digitável quase igual ao Componente proprietário que usamos. A única divergência é nos ultimos cinco digitos do campo 2 da linha digitável. Só que não posso fazer essa alteração no componente, porque se a cobrança for de 17 dígitos aí o ACBR não vai encontrar também. Ou seja, conserto um, estrago o outro.

Entendí Juliana. Obrigado

Utilizamos em nosso sistema um componente de boleto proprietário e estamos fazendo a migração para o ACBRBoletos. Percebí que não havia a leitura do arquivo de retorno dos bancos HSBC e do Bradesco para Febraban240 - c240. Tomei a liberdade de implementar na unit de cada banco que estão anexadas abaixo. Fiz os testes iniciais e está fazendo a baixa do contas a receber corretamente no meu sistema . Inclusive, Já estamos usando em produção em Clientes o banco HSBC e baixando boletos do componente proprietário normalmente. Para o Bradesco sugiro que alguém da comunidade que tenha interesse, ajude nos testes baixando a unit e verificando se está corretamente codificada. Peço aos moderadores fazer a devida análise e caso esteja correto submeter ao trunk2. Sei do carinho e da seriedade que o pessoal da Moderação tem com o Componente, mas, não custa lembrar que trata-se de boletos bancários, por isso, todo cuidado é pouco. Um erro acidental na montagem do código de barras, por exemplo, pode creditar os valores recebidos em conta corrente bancária que não seja do cedente e causar sérios prejuízos ao Usuário do sistema. Banco não tem pressa para corrigir esse tipo de erro. Afinal, não foi ele que errou e quanto mais tempo o dinheiro ficar parado, mais ganham aplicando ele. É tudo que eles querem. ACBrBancoBradesco.pas ACBrBancoHSBC.pas

Percebí na Unit ACBrUtil na linha 760 onde está a seguinte funcão: function PadRight(const AString : String; const nLen : Integer; const Caracter : Char) : String ; var Tam: Integer; begin Tam := Length(AString); if Tam < nLen then Result := AString + StringOfChar(Caracter, (nLen - Tam)) else Result := LeftStr(AString, nLen); end ; Como trata-se de PadRight o ultimo result não seria: Result := RightStr(AString, nLen); Obs- Não fiz a correção, porque não sei onde pode comprometer as demais funcionalidades do componente. Só peço aos moderadores, quando possível dar uma conferida. Postei no Boleto, porque é bastante utilizado pelo componente nas Units do ACBrBoleto.

Utilizamos em nosso sistema um componente de boleto proprietário e estamos fazendo a migração para o ACBRBoletos. Estou tentando fazer a configuração do boleto para o Banco do Brasil com as seguintes características: Cobrança Simples Sem Registro Convenio de 6 dígitos Tamanho NossoNumero 11 dígitos Carteira 18 Var Carteira - 019 (modalidade no acbr) Quando gero a linha digitável está apresentando uma diferença em relação a linha digitável do componente proprietário que utilizo atualmente. Fazendo o Debug percebí que quando o componente chega na function TACBrBancoBrasil.MontarCodigoBarras da unit ACBRBancoBrasil.pas sempre gera o nossonumero como se tivesse 17 dígitos ao invés de 11 dígitos. Está parecendo que foi implementado somente a condição para convenio 6 dígitos, Tamanho nosso numero 17 dígitos e carteira 18. Não sei se é isso ou estou configurando sem algum detalhe para o componente.

Juliana Boa Noite, Consegui resolver o problema. Não é possível dar Clear no Componente ACBrBoleto, mas, tenho que dar Clear na Lista de boletos. Estava passando batido. Quando do inicio da emissão, foi só fazer o seguinte: ACBrBoleto1.ListadeBoletos.Clear; Resolveu o problema. Muito obrigado pela tua atenção Juliana. E pode dar como resolvido o tópico.

Bom Dia Juliana, Infelizmente não consegui ainda. Na chamada do Componente estou configurando assim: ACBrBoleto1.Banco.TipoCobranca := cobNenhum; Depois antes de alimentar a Carteira, logo no início, estou fazendo o seguinte: with pTitulo do begin Carteira := ''; // Limpando a carteira

Oi Juliana, Muito obrigado pela atenção. Fiz o debug no código e as carteiras e TipoCobrança estão sendo setadas corretamente. Pelo menos mostra no debug e também em um showmessage que fiz para tirar a dúvida. O ACBrBoleto não possui um comando Clear, semelhante o ACBrNfe?

Estou tendo um problema semelhante ao reportado no Tópico. Estou utilizando o Trunk2. Estou gerando os boletos para Caixa Registrada(RG) e para HSBC sem Registro (CNR). Quando gero boleto para apenas um Banco não tenho problemas. Mas, quando tento gerar para um outro banco me retorna o erro de Carteira Inválida. Se sair do form da aplicação e retornar gera normalmente, desde que seja para apenas um Banco. Estou fazendo o debug e a carteira está sendo substituida via código corretamente. Meu código está assim: if pACBrBoleto.Cedente.TipoCarteira = tctSimples then begin if pACBrBoleto.Banco.TipoCobranca = cobCaixaEconomica then Carteira := 'SR'; if pACBrBoleto.Banco.TipoCobranca = cobHSBC then Carteira := 'CNR'; end else begin if pACBrBoleto.Banco.TipoCobranca = cobCaixaEconomica then Carteira := 'RG'; if pACBrBoleto.Banco.TipoCobranca = cobHSBC then Carteira := 'CSB'; end;

Bom dia Glauber, no seu xml a tag <xprod> do item 1 tem que ter a seguinte descrição: <xProd>NOTA FISCAL EMITIDA EM AMBIENTE DE HOMOLOGACAO - SEM VALOR FISCAL</xProd>

Quando utilizo o comando de alterar a impressora Padrão, via código, o Fortes continua imprimindo na Impressora que estava padrão anteriormente. Em seguida, quando altero manualmente a Impressora Padrão o Fortes imprime na impressora anterior. Sei que não é o local ideal para postar isso. (sobre o Fortes) Mas, como o pessoal que lidera o ACBR está empenhado em trazer mais esse beneficio (uso do Fortes) para a Comunidade pode ser que tenha uma solução para o problema. Para Clientes (usuários) que usam duas impressoras estou contornando com ESCPOS. Mas, tenho alguns Clientes que utilizam mais de duas Impressoras.

As vezes envio um Evento de cancelamento para a Sefaz e não consigo capturar o retorno. Para resolver faço uma Consulta e me retorna a situação do documento. Só que estou tentando através do retorno da Consulta ao WebService capturar o protocolo e a justificativa do Evento do Cancelamento e não estou conseguindo. Lembrando que não é o protocolo da Consulta, mas o do Evento Cancelamento.

Daniel, Desculpe-me pela demora. Demorei para atualizar e só agora conseguí testar. Está funcionando perfeitamente. Muito obrigado pela atenção. RESOLVIDO

Daniel Desculpe pela demora. Demorei porque não estava conseguindo atualizar o componente. Agora, funcionou perfeitamente. Muito obrigado pela atenção. RESOLVIDO

Tenho conhecimento que a NFSe não está funcional no trunk2, mas, tenho conseguido sempre compilar e instalar no Delphi normalmente. Ainda que não está conseguindo enviar a NFSe para alguns provedores. Só que nesse momento, acabei de atualizar o ACBR e o Instalador Compilou e Instalou normalmente o ACBR_NFSe, incluindo ai o Fortes Report da NFSe também. Não vou utilizar em produção, apenas quero ir testando e tentando ajudar na correção de erros, naquilo que meu conhecimento me permite, pra deixarmos funcional o componente. Quanto ao Fortes Report estão todos de parabéns pela feito, lembrando que não consegui instalar pelo aplicativo frceInstall.exe. Tive que compilar e instalar direto no Delphi. Mas, funcionou sem problemas. Creio que será necessário alguém com conhecimento criar um arquivo bat parecido com o apagarAcbr.bat para fazer uma limpeza geral antes de instalar pelo frceInstall.exe. Aproveitei para anexar o log do FortesReport. log_FortesReportDelphi_XE.txt

Estou tentando atualizar o ACBR com o novo instalador (29/09) e está apresentando um erro na compilação do pacote da NFSe (ACBR_NFSe.dpk). Ocorre o erro também no pacote do fortes report, mas, provavelmente é porque a NFSe não consegue compilar. Tem alguma orientação diferente para atualizar. Segue o arquivo de log. log_Delphi_XE.txt

Daniel muito obrigado pela atenção. O problema é que não está incluindo o link no qrcode. Se você fizer uma leitura na imagem está tudo correto, mas, faltando o link antes. No arquivo ACBrNFeServicos.ini está o link. Por isso, mesmo que estive errado teria que escrevê-lo. Não sei se consegui me fazer entender.

Não sei se estou esquecendo de alguma configuração. Mas, já tentei inclusive com o Exemplo do ACBR e sempre a impressão do DAMDFe do MDFe só sai em Homologação. Estou postando um xml para teste, que foi gerado em produção. 14150922905533000155580010000005991000000015-mdfe.xml

Estou imprimindo em fase de teste no trunk2 o danfe da NFCe em EscPos (PosPrinter) perfeitamente. Somente está ocorrendo que quando faço a leitura não está inserido a URL da sefaz de Roraima logo no inicio. Não sei se estou esquecendo algum detalhe para que isso ocorra. Segue uma copia da imagem do qrcode.

Ítalo, Estou a disposição no que for preciso para testar essa funcionalidade. Por isso, quando qualquer alteração for executada, por favor me avise, assim faço o teste e retorno. O pessoal da comunidade deveria ir fazendo os testes para os seus respectivos servidores para a Nfse funcionar em sua totalidade no trunk2. Como só uso o Saatri, não tenho como testar os demais. Se algum colega que utilize um outro servidor estiver disposto, fica a sugestão.

Bom dia Italo, Configurei o componente para salvar como solicitado. Segue os três xmls gerados. O que observei é que o arquivo 116-ger-nfse-soap está em branco, mas, está anexado. 116-ger-nfse.xml 116-ger-nfse-soap.xml 116UNICA-rps.xml

Boa tarde Italo, Estou anexando o xml gerado para você fazer a análise também. 116UNICA-rps.xml

Bom dia Italo, Copiei o arquivo INI da ultima atualização do ACBR (hoje cedo) do provedor Saatri (é o que eu utilizo para teste) para a pasta do executável. Mesmo assim, persiste o erro. Se tiver algum teste diferenciado que eu possa executar, pode pedir que estou a disposição.

Italo, Desculpe a demora. Atualizei todos os fontes e fiz novo teste, mas, ainda apresentou problemas. Segue uma imagem que capturei do debug do Delphi.

Italo, Demorei, mas fiz o teste. Ainda não deu certo. Segue uma imagem do erro. Pelo visto, também te dei uma resposta errada Italo. Fiz o debug e o erro ocorreu na unit ACBrDFeCapicomDelphiSoap na procedure OnBeforePost. Havia te informado que utilizava Capicom, mas, pelo jeito é CapicomDelphiSoap. Para te subsidiar estou utilizando: Maquina Virtual VirtualBox windows 7 32 bits delphi xe Certificado A3.