Não envia venda com mais de 2 produtos....

[Mário Augusto Pisani]

Boa noite,  estou testando o exemplo do emissor de SAT e quando faço o processo de gerar venda e enviar, só consigo enviar venda de dois produtos apenas, isto é,  que representa duas linhas da minha tabela vendas no sistema... Sinceramente não entendo pq isso acontece, pois se ele envia normal para duas vendas, porquê não envia pra mais?   Testei uma venda de cinco produtos (cindo linhas) da tabela, com 1 iten de cada produto, para ser paga em cheque,  e ele juntamente ao Emulador, me retorna o seguinte erro inesperado:  "Erro no campo CEan", "Erro no campo Prod",  Erro na Emissão 1460 null.  Ai vai em anexo o procedimento mGerarVendaClick., e o erro mostrado no emulador... 

 

 

 

PROCEDIMENTO GERAR VENDA.txt

[Mário Augusto Pisani]

Enfim, como resolver esse problema ?

[Juliomar Marchetti]

Como diz nosso amigo Alan.

remove os with que tu vai achar o erro. creio que esteja tendo confusão ali

[Mário Augusto Pisani]

Você diz pra fazer um with pagto.add para todas as formas de pagamento? Ainda continua dando erro....  o combobox iten index que representa a forma de pagamento, tem que estar ativo em todas as linhas ? Pra venda de um produto de x itens, (uma linha da tabela) ele envia o xml ... Pra mais de uma linha já não envia, agora nem pra duas ...

Editado 16 Fevereiro, 2021 por Mário Augusto Pisani

[Mário Augusto Pisani]

Olha o que eu alterei no procecimento mgerarvenda ...  Um For ai não seria melhor que um While ou pode ser os dois ???

 

 

PROCEDIMENTO GERAR VENDA.txt

Editado 16 Fevereiro, 2021 por Mário Augusto Pisani

[Juliomar Marchetti]

to falando de todos os with
 

with ACBrSAT1.CFe do
begin

with DataModuleEmpresa do
begin