DIEGO J B PIRES

Bom dia, Estou com problemas pra carregar uma tag do xml devido ele ter acentuação. <Discriminacao>Prestação de serviços\s\nRef. 10/2020</Discriminacao> Estou pegando essa tag que fica dentro da tag serviço da NF de serviço da Prefeitura. Veja que no exemplo ela tem acentuação, mas quando carrego pelo acbr atrapalha a acentuação. O que posso fazer pra contornar ? Já tentei remover a acentuação antes de carregar pelo acbr, mas não deu. Alguma ideia ?

Vou testar aqui, QQ coisa eu falo, obrigado.

Deu erro no exemplo do fastReport --------------------------- Acbrboletodemo_fast --------------------------- Access violation at address 00A0C711 in module 'AcbrBoletoDemo_Fast.exe'. Read of address 0000006C. --------------------------- OK ---------------------------

Então, até setei o código, mas estranhamente não funciona; Mas o curioso, que é o banco é setado em cada unit do respectivo banco, por isso que estou achando estranho.

Já testei aqui e não vai. Quando gera o boleto a propriedade banco.numero ta indo 0; Quando gero a remessa dá certo

Boa noite pessoal, Alguem teve problema com a logo dos bancos na impressão dos boletos em pdf, por exemplo? Tive problema não consegui isolar se foi alguma mudança que eu fiz, ou se foi alguma mudança no componente. function TACBrBoletoFCClass.GetArquivoLogo: String; begin Result := PathWithDelim(DirLogo) + IntToStrZero( ACBrBoleto.Banco.Numero, 3)+'.bmp'; end; O arquivo bmp que essa função está retornando é 000.bmp Alguem pode me ajudar ?

resolvido!

Atualizei os arquivos do svn, e está dando erro na unit ACBR\Fontes\ACBrBoleto\WS\ACBrBoletoRet_Itau.pas Erro não foi declarado CriarRejeicaoLista; TRejeicao;

Boa tarde, Foi liberado no svn mas não citou meus créditos pela contribuição ao projeto.

Prezado bigwings, Deu certo em parte. Consegui carregar os xmls e tal, mas como a empresa que estava testando utilizando outro sistema pra manifestar as notas, assim estava vindo o xml completo. No entanto, quando a nf não esta manifestada, não consigo obter o xml. Precisando implementar a captura do resumo da NFe Conseguiria me ajudar tb nisso ? Dei uma olhada no exemplo do ACBR e não achei esse trecho.

Meu caro BigWings Estou com dificuldade nessa parte do resumo do xml... Meu codigo tá assim for i := 0 to nfe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Count -1 do ProcessarRetornoNfeCte(nfe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip); procedure TProcessoManifestoDestinatario.ProcessarRetornoNfeCte(retorno : TdocZipCollectionItem); var s: string; begin if (Trim(retorno.resDFe.chDFe) = '') then Exit; cdsMd.Append; cdsMd.ProximaChave; cdsMd.FieldByName('MANDESTDATAREC').AsDateTime := Now; cdsMd.FieldByName('MANDESTCHAVE').AsString := retorno.resDFe.chDFe; cdsMd.FieldByName('MANDESTSIT').AsInteger := ord(esmPENDENTE); cdsMd.FieldByName('MANDESTEMP').AsInteger := GetSessao.EmpAtiva; cdsMd.FieldByName('MANDESTDATAEMISSAO').AsDateTime := retorno.resDFe.dhEmi; cdsMd.FieldByName('MANDESTNOME').AsString := UpperCase(retorno.resDFe.xNome); cdsMd.FieldByName('MANDESTCNPJCPF').AsString := FormataCNPJ(retorno.resDFe.CNPJCPF); cdsMd.FieldByName('MANDESTPROT').AsString := retorno.resDFe.nProt; cdsMd.FieldByName('MANDESTVALOR').AsFloat := retorno.resDFe.vNF; cdsMd.FieldByName('MANDESTDOC').AsInteger := StrToInt(Copy(retorno.resDFe.chDFe, 26,9)); cdsMd.FieldByName('MANDESTMODELO').AsInteger := StrToInt(Copy(retorno.resDFe.chDFe, 21,2)); cdsMd.FieldByName('MANDESTXML').AsString := retorno.XML; cdsMd.Post; end; Porém nesse retorno ai não está vindo apenas xml cujo meu CNPJ é o destinatário. A outra dica que vc deu foi carregar o xml no componente, tem algum tutorial ai que posso me ajudar ? Obrigado

Esse trecho ai não seria para enviar os eventos do manifesto (Confirmação da operação, etc) ? Veja o codigo que estou fazendo: procedure TProcessoManifestoDestinatario.ConsultaDocumentosNFe; var ret : string; i : Integer; trans : TDBXTransaction; begin Sucesso := False; try nfe := TACBrNFe.Create(nil); InicializaDadosNfe; if (nfe.DistribuicaoDFePorUltNSU(uf, cnpj, ultNSU)) then begin ret := nfe.WebServices.DistribuicaoDFe.RetWS; trans := IniciarTransacao; for i := 0 to nfe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.Count -1 do ProcessarRetornoNfeCte(nfe.WebServices.DistribuicaoDFe.retDistDFeInt.docZip.resDFe); cdsMd.Commit; CommitTransacao(trans); Sucesso := True;

Boa noite, Podem me ajudar numa situação. Estou mexendo aqui na parte do manifesto destinatário e vi que a sefaz liberar todos os xmls cujo meu cnpj participe do mesmo. Exemplo: sou transportador e recebo notas cujo campo transportador cite meu cnpj. NO ACBR tem alguma forma que verifico se o destinatário sou eu, pois essa nf que dei de exemplo pra fins de manifesto não me interessa, ai queria desprezá-la Obrigado.

E ai Juliomar, Fiz isso, deu certo a principio. Muito obrigado

Boa tarde, Alguem poderia me ajudar a preencher os dados referente ao certificado digital para eu utilizar o recurso do manifesto destinatário? Meu certificado é A1. Quais propriedades preciso preencher para dar certo e se possível com casos de preenchimento e não dar a mensagem --------------------------- WebService Distribuição de DFe: - Inativo ou Inoperante tente novamente. "CarregarCertificadoDeNumeroSerie" não suportado em: TDFeSSLCryptClass.

Consegui homologar junto ao Unicred 136 , a remessa de 240 posições. ACBrBancoUnicredES.pas

Alguém consegue me ajudar no desenvolvimento desse endereço no boleto? Eu não tenho muito a manha no FastReport.

Veja conforme manual que quando cita beneficiário pag. 5: c) Campos de preenchimento obrigatório:  Local de pagamento;  Data de vencimento;  BENEFICIÁRIO (nome, endereço e CNPJ/CPF); Já na página 20 tem o modelo do boleto mas não está explicito que deve ter um campo de endereço. Att Unicred Ficha Compensação Boleto.pdf

Isso é no banco Unicred do Brasil (Código 136) Pois é, o setor de validação exigiu também na ficha de compensação.

Ops, Unicred do Brasil - 136 FastReport Eles estão pedindo na ficha de compensação. No recibo do pagador já tem.

Boa noite Estou validando o layout do boleto e o banco tá questionando que na ficha de compensação é preciso do endereço do beneficiário. Olhei no repositório e não achei. Podem me ajudar ? Att

Boa noite, Precisa de ajuda em assuntos, quem já passou por isso e puder ajudar: 1) Queria enviar os boletos quando for o mesmo cliente, em apenas 1 email. Na rotina de envio de boleto, envia individualmente. Alguem já implementou algo nesse sentido ? 2) Quando envio o boleto por email, como está indo em pdf, está aparecendo "Exportando..." e queria mudar pra "Enviando e-mail". Não consegui achar onde está essa mensagem. Obrigado

O problema era que havia invertido aqui e estava passando no título do arquivo, também o diretório onde o mesmo iria ser salvo. Com isso dava erro. Mudei a ordem aqui e deu certo. Obrigado!

Boa noite, Alguem já teve essa situação que o título do boleto fica errado. Em outro idioma. Veja na imagem anexo. O que fiz de diferente foi comentar o trecho: " frxPDFExport.Title := 'Boleto';" que fica dentro da unit ACBRBOLETOFCFR e coloquei na minha unit " fc.dmBoleto.frxPDFExport.Title := NomeArqBoleto;" Erro.bmp

OK, fiz aqui conforme manual e já enviei ao banco para eles validarem. Dando certo, posto aqui. Obrigado!