Xml com nome estranho

[Delmar Grande]

Boa tarde pessoal to migrando para trunk2 e percebi que o xml da nfce esta sendo salvo com o nome estranho

 

salvo assim

ACBrNFe1.NotasFiscais.Items[0].GravarXML;

fica assim

000058-nfe.xml

antes ficava assim

11150919642405000151650010000000561000000567-nfe.xml

 

alguém passou por isso?

[Daniel Simoes]

Forneça um passo a passo de como reproduzir o problema usando o Demo do ACBrNFe

[Delmar Grande]

Então o que eu percebi é que antes essa propriedade 

 

ACBrNFe1.NotasFiscais.Items[0].NomeArq

 

retornava o nome do xml completo ou seja chave de acesso + -nfe.xml  e agora retorna tipo assim 000064-nfe.xml

[Daniel Simoes]

Por favor seja mais objetivo no relato de bugs...

Use o Demo do ACBr, ou forneça um mini-projeto que reproduza o erro...

Sem um passo a passo, não tenho como reproduzir o problema, e chegar no mesmo problema que você

[Delmar Grande]

Mas não tem segredo algum ao clicar o botão do demo gerarnfe

 

procedure TForm1.btnGerarNFEClick(Sender: TObject);
var
 vAux : String;
begin
if not(InputQuery('WebServices Enviar', 'Numero da Nota', vAux)) then
    exit;

  ACBrNFe1.NotasFiscais.Clear;

  GerarNFe(vAux);

  ACBrNFe1.NotasFiscais.Assinar;

  ACBrNFe1.NotasFiscais.Items[0].GravarXML();
  ShowMessage('Arquivo gerado em: '+ACBrNFe1.NotasFiscais.Items[0].NomeArq);
  MemoDados.Lines.Add('Arquivo gerado em: '+ACBrNFe1.NotasFiscais.Items[0].NomeArq);
  MemoResp.Lines.LoadFromFile(ACBrNFe1.NotasFiscais.Items[0].NomeArq);
  LoadXML(MemoResp.Text, WBResposta);
  pgRespostas.ActivePageIndex := 1;
end;

 

o xml ta sendo gerado com o nome da chave de acesso ou com o numero da nota?

 

o normal seria ele criar um xml tipo assim 

11150919542405000151550010000000251000000258-nfe.xml

 e não assim

000026-nfe.xml

 

?

[Daniel Simoes]

Haviam alguns erros no Demo em Delphi (que eu já havia corrigido no demo em Lazarus)

Fiz um merge das correções e enviei para o SVN

O problema principal, era que faltava chamar:

ACBrNFe1.NotasFiscais.GerarNFe;

após alimentar os propriedades do componente...

[Delmar Grande]

Agora ficou certo coloquei no fim da rotina assim

 

    ACBrNFe1.NotasFiscais.GerarNFe;
    ACBrNFe1.NotasFiscais.Items[0].GravarXML;

 

Editado 27 Setembro, 2015 por Delmar Grande