Jump to content

Delphi chamada_delphi.png acbr.png

C6 chamada_c6.png botao.png

Impressao Evento Nfc-E Pelo Danfefr Erro


  • Este tópico foi criado há 2828 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

ola, encontrei um erro dentro do arquivo ACBrNFeDANFEFRDM.pas

 

procedure TdmACBrNFeFR.frxReportBeforePrint(Sender: TfrxReportComponent);

var
  qrcode: String;
begin
  qrCode := '';
  if Assigned(NFe) then
  begin
    if (NFe.Ide.modelo = 65) then
    begin
      if cdsParametros.FieldByName('Imagem').AsString = '' then
      begin
        frxReport.FindObject('ReportTitle1').Visible := False;    esses objetos nao existem dentro do formulario EVENTOS.fr3
        frxReport.FindObject('ImgLogo').Visible := False;
      end
      else
      begin
        frxReport.FindObject('ReportTitle1').Visible := True;
        frxReport.FindObject('ImgLogo').Visible := True;
      end;
 
      qrcode := NotaUtil.GetURLQRCode( NFe.ide.cUF,
                                      NFe.ide.tpAmb,
                                      OnlyNumber(NFe.InfNFe.ID),
                                      DFeUtil.SeSenao(NFe.Dest.idEstrangeiro <> '',NFe.Dest.idEstrangeiro, NFe.Dest.CNPJCPF),
                                      NFe.ide.dEmi,
                                      NFe.Total.ICMSTot.vNF,
                                      NFe.Total.ICMSTot.vICMS,
                                      NFe.signature.DigestValue,
                                      TACBrNFe( FDANFEClassOwner.ACBrNFe ).Configuracoes.Geral.IdToken,
                                      TACBrNFe( FDANFEClassOwner.ACBrNFe ).Configuracoes.Geral.Token );
 
      PintarQRCode( qrcode, TfrxPictureView(frxReport.FindObject('ImgQrCode')).Picture );
    end;
  end;
end;
Link to comment
Share on other sites

  • Moderadores

A impressão do evento foi feito para a NF-e, precisaremos criar uma nova para NFC-e, não é interessante utilizar a antiga.

A impressão do evento não é obrigatória, qual é a situação que você está passando onde isso se fez necessário para NFC-e?

Equipe ACBr

Régys Borges da Silveira

http://www.regys.com.br

certificacao delphicertificacao delphi
Link to comment
Share on other sites

  • Moderadores

so quero imprimir a o cancelamento por evento qual melhor opcao ?

 

Para NFC-e não temos nada pronto hoje, você pode ler os dados do XML e imprimir por conta própria, carregue o XML do evento no componente, leia as propriedades e monte um relatório, esse seria o caminho hoje.

Equipe ACBr

Régys Borges da Silveira

http://www.regys.com.br

certificacao delphicertificacao delphi
Link to comment
Share on other sites

  • Este tópico foi criado há 2828 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.