n-systems

Depois de atualizar o ACBr quando abro o XE5 é exibida a mensagem de erro conforme aquivo anexo. Aguardo a ajuda dos colegas.

Como gerar o DACTE em PDF com a função ImprimirPDF e informar o nome que se quer? Atenciosamente, Tadeu

Boa tarde Régys. O DANFE em PDF funcionou era mesmo o arquivo errado, estava pegando o DANFE.fr3 e não o DANFERetrato.fr3, obrigado. No entando estou tentando fazer o mesmo com o CTE no caso o DACTE e o erro da mensagem anterior continua acontecendo. Já tentei com todos os arquivos fr3 disponíveis para o DACTE e não da certo. Se puder ajudar agradeço. Tadeu.

Ocorreu um fato muito estranho, eu informei o caminho via código compilei e rodei e deu certo na primeira vez mas depois quando tentei rodar novamente ele exibe a mensagem de erro em anexo. Este programa tem que ler o xml e imprimir o DANFE partindo das informações do XML, com certeza preciso mexer em algumas propriedades. Aguardo sua ajuda. Obrigado. Tadeu.

Ok, vou tentar e qualquer problema posto novamente. Desde já agradeço sua atenção e ajuda. Obrigado. Tadeu.

Exatamente, quando informo o fr3 na propriedade FastFile ele exibe as mensagens que estão em anexo. Obrigado.

Meu caro já fiz isso porém o projeto de exemplo trabalha com o Rave e não tenho ele instalado no meu Delphi. Preciso utilizar com o Fast Report ou com o Fortes Report. Obrigado. unit fXMLtoPDF; interface uses Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics, Vcl.Controls, Vcl.Forms, Vcl.Dialogs, ACBrNFeDANFEClass, ACBrNFeDANFEFR, ACBrNFe, Vcl.ExtCtrls, Vcl.StdCtrls, Vcl.Buttons, ACBrBase, ACBrEnterTab, ACBrCTeDACTEClass, ACBrCTeDACTEFR, ACBrCTe; type TfrmXMLtoPDF = class(TForm) OpenDialog1: TOpenDialog; ACBrNFe1: TACBrNFe; ACBrNFeDANFEFR1: TACBrNFeDANFEFR; Label1: TLabel; Edit1: TEdit; SpeedButton1: TSpeedButton; BitBtn1: TBitBtn; BitBtn2: TBitBtn; Panel1: TPanel; GroupBox1: TGroupBox; RadioButton1: TRadioButton; RadioButton2: TRadioButton; ACBrEnterTab1: TACBrEnterTab; ACBrCTe1: TACBrCTe; ACBrCTeDACTEFR1: TACBrCTeDACTEFR; procedure SpeedButton1Click(Sender: TObject); procedure FormCreate(Sender: TObject); procedure BitBtn1Click(Sender: TObject); procedure BitBtn2Click(Sender: TObject); private { Private declarations } public { Public declarations } end; var frmXMLtoPDF: TfrmXMLtoPDF; implementation {$R *.dfm} procedure TfrmXMLtoPDF.BitBtn1Click(Sender: TObject); begin ACBrNFe1.NotasFiscais.ImprimirPDF; end; procedure TfrmXMLtoPDF.BitBtn2Click(Sender: TObject); begin Application.Terminate; end; procedure TfrmXMLtoPDF.FormCreate(Sender: TObject); begin OpenDialog1.Title := 'Selecione a NFE'; OpenDialog1.DefaultExt := '*-nfe.XML'; OpenDialog1.Filter := 'Arquivos NFE (*.XML)|*.XML|Arquivos XML (*.XML)|*.XML|Todos os Arquivos (*.*)|*.*'; OpenDialog1.InitialDir := 'C:\'; end; procedure TfrmXMLtoPDF.SpeedButton1Click(Sender: TObject); begin if OpenDialog1.Execute then begin Edit1.Text := OpenDialog1.FileName; ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.NotasFiscais.LoadFromFile(OpenDialog1.FileName); end; end; end.

Fiz uma aplicação para o usuário selecionar um arquivo xml de um DANFE e imprimir em PDF. Ao tentar imprimir é exibida a mensagem de erro da imagem em anexo. Com certeza estou fazendo algo errado. Não sei em que propriedade devo informar o caminho solicitado. Aguardo a ajuda dos colegas e desde já agradeço. Obrigado. Tadeu.

Meus caros, bom dia. Estou tendo problemas ao compilar os pacotes para DANFE E DACTE para os geradores de relatórios Fast Report e Fortes Report, apresenta erro na compilação. Preciso da ajuda dos colegas com relação a isso. Caso alguém tenha tido o mesmo problema ou saiba como posso resolver por favor me ajudem. Segue anexo imagem do erro apresentado. Obrigado. Tadeu.

Meus caros, preciso de ajuda!!! Seguindo as intruções do arquivo leiame.txt que vem com o ACBr na tentativa de instalar o pacote de componentes ACBr recebo a mensagem que segue em arquivo anexo. Desde já agradeço. Tadeu.