Jump to content

Assista click.png tectoy.png

C6 chamada_c6.png botao.png

Como adicionar mais de um produto no XML


Go to solution Solved by FSoftware,
  • Este tópico foi criado há 1479 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Boa noite amigos,

Como faço para adicionar mais de um produto no XML usando o Det.Add.Prod ?

Seria só informar mais um Det.Add.Prod.nItem no código que o componente já entenderia e criaria mais uma TAG de produto dentro do XML?!

 

Agradeço desde já.

Link to comment
Share on other sites

  • Consultores

Boa noite

chegou a olhar no svn a pasta Exemplos?

nela tem um exemplo de como fazer o uso do componente 

Consultor SAC ACBr Juliomar Marchetti
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

 

Link to comment
Share on other sites

Bom dia,

Sim Juliomar, estou usando o exemplo "ACBRNFe Demo" que tem lá, mas no código dele só mostra fazendo 1 item apenas.

Algum outro exemplo específico lá que tenha o que preciso?

Ou se puder colar um trechinho de um código teu aqui.

Link to comment
Share on other sites

  • Consultores
13 minutos atrás, dmonteiro disse:

Bom dia,

Sim Juliomar, estou usando o exemplo "ACBRNFe Demo" que tem lá, mas no código dele só mostra fazendo 1 item apenas.

Algum outro exemplo específico lá que tenha o que preciso?

Ou se puder colar um trechinho de um código teu aqui.

sim tem o projeto do ACBrMonitorPLUS com uma unit só para NF-e e lá adiciona diversos produtos. ;)

Consultor SAC ACBr Juliomar Marchetti
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Black-02.png
Projeto ACBr - A maior comunidade Open Source de Automação Comercial do Brasil

 

Link to comment
Share on other sites

  • Solution
7 horas atrás, dmonteiro disse:

Ou se puder colar um trechinho de um código teu aqui.

Você deve ter uma estrutura de repetição para os produtos e o trecho ACBrNFe1.NotasFiscais.Items[0].NFe.Det.Add faz com que um novo grupo de produtos seja criado. Algo assim:

while not qr.Eof do
begin
  with ACBrNFe1.NotasFiscais.Items[0].NFe.Det.Add do
  begin
    Prod.cProd := qr.FieldByName('ID').AsString;
    Prod.xProd := qr.FieldByName('PRODUTO').AsString;
  
    // Demais campos necessários para a geração da NF-e
  end;

  qr.Next;
end;

 

  • Like 1
Link to comment
Share on other sites

Em 04/05/2018 at 18:36, FSoftware disse:

Você deve ter uma estrutura de repetição para os produtos e o trecho ACBrNFe1.NotasFiscais.Items[0].NFe.Det.Add faz com que um novo grupo de produtos seja criado. Algo assim:

while not qr.Eof do
begin
  with ACBrNFe1.NotasFiscais.Items[0].NFe.Det.Add do
  begin
    Prod.cProd := qr.FieldByName('ID').AsString;
    Prod.xProd := qr.FieldByName('PRODUTO').AsString;
  
    // Demais campos necessários para a geração da NF-e
  end;

  qr.Next;
end;

 

Muitooo obrigado FSoftware, resposta simples e elucidativa.

O uso deste "Items[0]" era o que eu precisava aprender. Apliquei no meu código dentro de minha estrutura de repetição e BINGO, gerou os itens.

Vou avançar aqui no desenvolvimento e precisando posto de novo.

Obrigado tb Juliomar.

  • Like 1
Link to comment
Share on other sites

  • Este tópico foi criado há 1479 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.