[Problema com acentuação.]

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 ?

 

 

[Problema com logo dos bancos na impressão dos boletos]

Vou testar aqui,

 

QQ coisa eu falo, obrigado.

[Problema com logo dos bancos na impressão dos boletos]

Deu erro no exemplo do fastReport

 

---------------------------
Acbrboletodemo_fast
---------------------------
Access violation at address 00A0C711 in module 'AcbrBoletoDemo_Fast.exe'. Read of address 0000006C.
---------------------------
OK   
---------------------------
 

[Problema com logo dos bancos na impressão dos boletos]

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.

 

 

[Problema com logo dos bancos na impressão dos boletos]

Já testei aqui e não vai.

Quando gera o boleto a propriedade banco.numero ta indo 0;

Quando gero a remessa dá certo

[Problema com logo dos bancos na impressão dos boletos]

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 ?

[Erro na ACBrBoletoRet_Itau.pas]

resolvido!

[Erro na ACBrBoletoRet_Itau.pas]

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;

[Não gerou os registros da remessa Unicred 136 ref. aos dados do título]

Boa tarde,

 

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

[Dúvidas sobre desprezar determinados xmls]

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.

 

 

[Dúvidas sobre desprezar determinados xmls]

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

 

 

[Dúvidas sobre desprezar determinados xmls]

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;

 

 

 

 

[Dúvidas sobre desprezar determinados xmls]

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.

[Problema com certificado digital]

E ai Juliomar,

 

Fiz isso,  deu certo a principio.

Muito obrigado

[Problema com certificado digital]

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.
 

 

 

 

 

[Não gerou os registros da remessa Unicred 136 ref. aos dados do título]

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

 

ACBrBancoUnicredES.pas

[Endereço beneficiário no boleto na ficha de compensação]

Alguém consegue me ajudar no desenvolvimento desse endereço no boleto?

Eu não tenho muito a manha no FastReport.

[Endereço beneficiário no boleto na ficha de compensação]

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

[Endereço beneficiário no boleto na ficha de compensação]

Isso é no banco Unicred do Brasil (Código 136)

Pois é, o setor de validação exigiu também na ficha de compensação.

[Endereço beneficiário no boleto 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.

[Endereço beneficiário no boleto na ficha de compensação]

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

 

 

[Dúvidas ACBR Boleto]

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

[Titulo ficando em outro idioma boleto]

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!

[Titulo ficando em outro idioma boleto]

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

[Não gerou os registros da remessa Unicred 136 ref. aos dados do título]

OK, fiz aqui conforme manual e já enviei ao banco para eles validarem.

Dando certo, posto aqui.

 

Obrigado!