Igor Cibiac

Boa tarde, pode encerrar o tópico, consegui resolver. Grato pelo auxilio.

Boa tarde, pode encerrar o tópico, consegui resolver. Obrigado pelo auxilio.

Obrigado pelo retorno Juliomar. Irei revisar as configurações, como no fortes sempre cai na condição em anexo, ainda não consegui identificar fácil a impressão da linha digitavel retornada no registro. Talvez esteja no local errado tbm, irei olhar o exemplo novamente, pois a UNIT ACBrBoletoFCFortesFr está desta forma.

Boa tarde! Consegui realizar a utilização do Banco do Brasil via API, porém verifiquei não o PDF gerado altera a linha digitavel retornada no registro. Há alguma forma de imprimir essa linha digitável? Verifiquei no componente ao imprimir, ele sempre monta a linha digital.

Ao gerar o DANFE FastReport, não é dastacado as informações de duplicata. Verificado no arquivo ACBrNFeDAFEFRDM existe o método CarregaDuplicatas, onde está com o seguinte código: procedure TACBrNFeFRClass.CarregaDuplicatas; var i: Integer; begin cdsDuplicatas.Close; cdsDuplicatas.CreateDataSet; if (FDANFEClassOwner is TACBrNFeDANFEClass) and Not ((TACBrNFeDANFEClass(FDANFEClassOwner).ExibeCampoFatura) and (FNFe.Ide.indPag = ipVista) and (FNFe.infNFe.Versao <= 3.10)) then begin with cdsDuplicatas do begin for i := 0 to (NFe.Cobr.Dup.Count - 1) do begin Append; with FNFe.Cobr.Dup[i] do begin FieldByName('ChaveNFe').AsString := FNFe.infNFe.ID; FieldByName('NDup').AsString := NDup; FieldByName('DVenc').AsString := FormatDateBr(DVenc); FieldByName('VDup').AsFloat := VDup; end; Post; end; end; end; end; Alterado para: procedure TACBrNFeFRClass.CarregaDuplicatas; var i: Integer; begin cdsDuplicatas.Close; cdsDuplicatas.CreateDataSet; if Not ((TACBrNFeDANFEClass(FDANFEClassOwner).ExibeCampoFatura) and (FNFe.Ide.indPag = ipVista) and (FNFe.infNFe.Versao <= 3.10)) then begin with cdsDuplicatas do begin for i := 0 to (NFe.Cobr.Dup.Count - 1) do begin Append; with FNFe.Cobr.Dup[i] do begin FieldByName('ChaveNFe').AsString := FNFe.infNFe.ID; FieldByName('NDup').AsString := NDup; FieldByName('DVenc').AsString := FormatDateBr(DVenc); FieldByName('VDup').AsFloat := VDup; end; Post; end; end; end; end; É apresentado corretamente da forma citada, para facilitar irei anexar os dois arquivos, com e sem modificação. Caso tenha alguma sugestão ou orientação, favor compartilhar. Grato!ACBrNFeDANFEFRDM.pasACBrNFeDANFEFRDM Modificado.pasACBrNFeDANFEFRDM Modificado.pasACBrNFeDANFEFRDM.pas

Bom dia! Estou iniciando a emissão de NFSe para Recife, utilizando já o componente ACBrNFSeX. O Rps está sendo enviado e está chegando na prefeitura corretamente, porém não consigo o retorno. Desta forma, não consigo via aplicação imprimir o danfe após a emissão. Alguém que já emite para esse muncipio, consegue me auxiliar nas configurações do componente? Consegui fazer a emissão somente no assincrono.

Boa tarde! Passei por essa situação e o problema era o código do item serviço que estava errado com o CNAE que estava sendo utilizado, depois de corrigir, a nota foi emitida com sucesso.

Bom dia! Emitindo normalmente.

Bom dia, acabei de tentar e ainda a mesma situação. Vou tentar contato com o provedor.

Boa tarde! Acessei nfse.goiania.go.gov.br/ws/nfse.asmx?WSDL normalmente, porém estou com a mesma situação dos demais, xml retornando vazio. Tentando contato com provedor, se alguém tiver noticias, reportar para os demais. Grato!

Bom dia! Obrigado pelo retorno, estarei realizando atualização. Pode fechar o tópico por gentiliza, agreço a todos envolvidos no processo e até a próxima.

Bom dia. O banco me passou que essa informação deve ser preenchida 09 para indicar instrução de protesto. Estou anexando a resposta do banco solicitando a inclusão do valor e depois de alterado a resposta confirmando a homologação.

Esse retorno foi feito pelo banco, e a unit atual possivelmente foi feita conforme a necessidade de algum usuário, pois não localizei a regra no layout. Estou anexando o layout que o banco forneceu. BRB Cobrança - Manual e Leiaute.zip

Bom dia. Alteração foi feita na procedure GerarRegistroTransacao400, na linha 314. Estava com if Trim(Instrucao1) = '00' then e alterei para if AnsiMatchText(Trim(Instrucao1),['00', '01']) = True then. Anexando a parte do código alterado.

Ao gerar uma remessa bancária, por mais que as informações de instrução 1 e 2 estejam preecnhidas, as mesmas são sobrepostas conforme validações de juros e multa. Para manter a informação que precisava, tive que fazer um ajuste na unit do brb e a homologação com banco deu certo. Estou anexando o arquivo para análise e se estiver em conformidade, publicar no svn. Aguardo retorno, obrigado. ACBrBancoBRB.pas