Duplicatas - Quadriplicadas

[Marcio Rossato]

Olá pessoal, 

coloquei informações de fatura na nfe e as parcelas foram duplicadas.

 

Este é o código:

 

                      QrCobranca.First;

                      while not QrCobranca.Eof do

                      begin

                        with Cobr.Dup.Add do

                        begin

                            nDup  := QrCobrancaduplicata.AsString;

                            dVenc := QrCobrancadata.AsDateTime;

                            vDup  := QrCobrancavalor.AsCurrency;

                        end;

                        QrCobranca.Next;

                      end;

 

 

e, após gerar o xml fica com os dados duplicados.

-<cobr>

 

 

-<dup>

 

<nDup>1</nDup>

 

<dVenc>2014-02-10</dVenc>

 

<vDup>523.00</vDup>

 

</dup>

 

 

-<dup>

 

<nDup>2</nDup>

 

<dVenc>2014-03-10</dVenc>

 

<vDup>9000.00</vDup>

 

</dup>

 

 

-<dup>

 

<nDup>1</nDup>

 

<dVenc>2014-02-10</dVenc>

 

<vDup>523.00</vDup>

 

</dup>

 

 

-<dup>

 

<nDup>2</nDup>

 

<dVenc>2014-03-10</dVenc>

 

<vDup>9000.00</vDup>

 

</dup>

 

 

-<dup>

 

<nDup>1</nDup>

 

<dVenc>2014-02-10</dVenc>

 

<vDup>523.00</vDup>

 

</dup>

 

 

-<dup>

 

<nDup>2</nDup>

 

<dVenc>2014-03-10</dVenc>

 

<vDup>9000.00</vDup>

 

</dup>

 

 

-<dup>

 

<nDup>1</nDup>

 

<dVenc>2014-02-10</dVenc>

 

<vDup>523.00</vDup>

 

</dup>

 

 

-<dup>

 

<nDup>2</nDup>

 

<dVenc>2014-03-10</dVenc>

 

<vDup>9000.00</vDup>

 

</dup>

 

 

-<dup>

 

<nDup>1</nDup>

 

<dVenc>2014-02-10</dVenc>

 

<vDup>523.00</vDup>

 

</dup>

 

 

-<dup>

 

<nDup>2</nDup>

 

<dVenc>2014-03-10</dVenc>

 

<vDup>9000.00</vDup>

 

</dup>

 

</cobr>

 

 

 

Desde já, obrigado

 

35140212182030000145550010000001711000001711-nfe.xml

[peterson161]

Bom dia.

Aparentemente seu código está correto. Acho que a "QrCobranca" está retornando dados quadruplicados.

Fora isso, você está indicando a forma de pagamento errada:

<indPag>0</indPag>

0 – pagamento à vista;
1 – pagamento à prazo;
2 - outros.

[Marcio Rossato]

Vou verificar, obrigado.

[Leandro Costa]

Bom dia!

 

Alguém teve algum problema ao declarar os Nós da tag de Cobrança? Estou com dificuldades e se alguém puder me ajudar por favor!

 

Na versão 2.0 era apenas eu informar ".items" (ArqXml.InfNFe.Cobr.Dup.Items.nDup) que eu conseguia informar mais de uma parcela, agora que atualizei o acbr para a versão 3.1 da NFe eu não tenho mais a opção .items na duplicata, com isso é gerada apenas a ultima parcela da minha nota fiscal!

 

Att,

 

Leandro