Diogo Camelo

vou verificar novamente

Esse é o código Para um consulta ou segunda via o resultado é : PROCOTO ESTÁ sem autorização de uso pela sefaz. Peço ajuda var sXML: string; begin if qrnota.RecordCount = 0 then exit; sXML := qrnota.fieldbyname('nfe_xml').asstring; if sXML = '' then exit; try if FileExists(sXML) then begin ACBrNFeDANFEFR1.Protocolo := ''; ACBrNFeDANFEFR1.FastFile := 'C:\WG\Server\danfe\DANFE.fr3'; ACBrNFe1.NotasFiscais.clear; ACBrNFe1.NotasFiscais.LoadFromFile(sXML); ACBrNFe1.NotasFiscais.Imprimir; //ACBrNFe1.NotasFiscais.Imprimirpdf; end else begin Application.messagebox('Arquivo XML não econtraddo!', 'Erro', mb_ok + mb_iconerror); end; except on E: exception do begin Application.messagebox(PWideChar('Erro ao criar/imprimir NFe!' + #13 + 'Mensagem: ' + E.message), 'Erro', mb_ok + mb_iconerror); end; end; end;

Obrigado funcionou!

Obrigado pela dica, NotaF.NFe.Ide.dEmi := Date; NotaF.NFe.Ide.dEmi := Time; Agora deu erro na data a data ficou 1899-12-30, a hora ficou certa E agora o que faço ou como faria?

Obrigado pela dica, sou novo. não sei bem como fazer o uso do exempo da svn

//DADOS DA NOTA FISCAL NotaF.NFe.Ide.natOp := 'VENDA'; NotaF.NFe.Ide.indPag := ipVista; NotaF.NFe.Ide.modelo := 65; NotaF.NFe.Ide.serie := 1; NotaF.NFe.Ide.nNF := StrToInt(idVenda); NotaF.NFe.Ide.dEmi := Date; NotaF.NFe.Ide.dSaiEnt := Date; NotaF.NFe.Ide.hSaiEnt := Now; NotaF.NFe.Ide.tpNF := tnSaida; NotaF.NFe.Ide.tpEmis := teNormal; NotaF.NFe.Ide.tpAmb := taHomologacao; //Lembre-se de trocar esta variável quando for para ambiente de produção NotaF.NFe.Ide.verProc := '1.0.0.0'; //Versão do seu sistema NotaF.NFe.Ide.cUF := 33; NotaF.NFe.Ide.cMunFG := 3304557; // alterar de acordo com a estado e cidade NotaF.NFe.Ide.finNFe := fnNormal; Está dando erro que. Rejeição 704. Da- Hora de emissão atrasada. Alguém pode ajudar?