Não imprime Informações complementares no DANFSE

[AlexandreSoaresSP]

Bom dia,

Depois que atualizei o acbr não imprime mais informações complementares no envio Padrão Nacional,  Segue arquivo anexado do cliente, testei pelo acbrnfsex teste mas também não sai,  preciso preencher algo novo nessa versão nova para sair?

Obrigado pelo suporte,

Alexandre

35302012206959482000198000000000029326034855054262-nfse.xml

[repiccinin]

Boa tarde, Alexandre.

Estou com o mesmo problema!

No site da NFSe aparece as informações complementares mas na impressão pelo ACBr não sai a informação que enviei.

DANFSe gerado no site do governo:

DANFSe gerado pelo ACBr:

 

Grata,

Regiane

[Geizon T.]

aqui também com o mesmo problema, sempre usei da forma abaixo:

Quote

ACBrNFSeX.NotasFiscais.LoadFromFile(ACBrNFSeX.NotasFiscais.Items[0].NomeArq, False);
ACBrNFSeX.NotasFiscais.Items[0].NFSe.RegimeEspecialTributacao := retImune;
ACBrNFSeX.NotasFiscais.Items[0].NFSe.OutrasInformacoes := 'OBSERVAÇÕES'
ACBrNFSeX.NotasFiscais.Items[0].Imprimir;
ACBrNFSeX.NotasFiscais.Items[0].ImprimirPDF;

E agora parou de aparecer na impressão, alguma dica?

[aslsoftwareltda]

boa tarde, vi que no arquivo ACBrNFSeXDANFSeRLPadraoNacional.pas está comentado essa parte, isso se você usa o Fortes.

 

[AlexandreSoaresSP]

achei mas não vi bpl com essa unidade acoplada. Alguém tem alguma sugestão para ajudar? preciso resolver pois estou a 3 dias sem essa informação nas impressões.

 

Alexandre

[Alisson Suart]

Aqui também estou com problema no impresso.

Editado 18 Março por Alisson Suart

[AlexandreSoaresSP]

Boa tarde, 

Fiz a correção na procedure 

procedure TfrlXDANFSeRLPadraoNacional.rlbBanda13_InformacoesComplementaresBeforePrint(
  Sender: TObject; var PrintIt: Boolean);
begin
  inherited;

  rlmDadosAdicionais.Lines.BeginUpdate;
  try
    rlmDadosAdicionais.Lines.Clear;

    if fpNFSe.Servico.CodigoNBS <> '' then
      rlmDadosAdicionais.Lines.Append(ACBrStr('NBS: ') + fpNFSe.Servico.CodigoNBS);

    if fpDANFSe.OutrasInformacaoesImp <> '' then
      rlmDadosAdicionais.Lines.Add(StringReplace(fpDANFSe.OutrasInformacaoesImp,
        FQuebradeLinha, #13#10, [rfReplaceAll]));

    if fpNFSe.OutrasInformacoes <> '' then
      rlmDadosAdicionais.Lines.Add(StringReplace(fpNFSe.OutrasInformacoes,
        FQuebradeLinha, #13#10, [rfReplaceAll]));

    if fpNFSe.InformacoesComplementares <> '' then
      rlmDadosAdicionais.Lines.Add(StringReplace(fpNFSe.InformacoesComplementares,
        FQuebradeLinha, #13#10, [rfReplaceAll]));
  finally
    rlmDadosAdicionais.Lines.EndUpdate;
  end;

  rllMsgTeste.Visible := (fpDANFSe.Producao = snNao);
  rllMsgTeste.Enabled := (fpDANFSe.Producao = snNao);

  if fpDANFSe.Cancelada or (fpNFSe.NfseCancelamento.DataHora <> 0) or
    (fpNFSe.SituacaoNfse = snCancelado) or (fpNFSe.StatusRps = srCancelado) then
  begin
    rllMsgTeste.Caption := 'NFS-e CANCELADA';
    rllMsgTeste.Visible := True;
    rllMsgTeste.Enabled := True;
  end;

  rllMsgTeste.Repaint;
end;

Por favor se possivel avaliar e atualizarem, se já não foi corrigido por favor avaliarem outras correções dos tópicos:

https://www.projetoacbr.com.br/forum/topic/91131-webservice-retornou-um-xml-vazio-guaibárs/
https://www.projetoacbr.com.br/forum/topic/91271-não-imprime-número-da-nota-e-não-traz-o-código-de-verificação-nfse-ginfes/

muito Obrigado,

Alexandre

[Juliomar Marchetti]

Favor reverterem seus svn aos do SVN

isso já se encontra lá

revert, update, e reinstala 

[Juliomar Marchetti]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.