Tipo de Pagamento

[Souza]

Bom dia Senhores, estou tentando informar as tags 
tpag
vpag

mas toda vez o xml sai da seguinte forma 

 

<pag>

<detPag>

<indPag>1</indPag>

<tPag>01</tPag>

<vPag>0.00</vPag>

</detPag>

<detPag>

<tPag>15</tPag>

<vPag>0.00</vPag>

</detPag>

<detPag>

<tPag>01</tPag>

<vPag>1326.06</vPag>

</detPag>

</pag>

<infRe

não importa qual tipo de pagamento eu informa, sempre sai as tag com vpag zerado, desinstalei os campontes, exclui os arquivos, baixei novamente, reinstalei tudo novamente e o problema ainda persiste, alguem já passou por isso, segue trecho do meu código.

           pag.Add.indPag := ipPrazo ;
            pag.Add.tPag   := fPagamento(StrToInt(FieldbyName('CNF_TPPGTO').AsString));
            pag.Add.vPag   := FieldbyName('TOTAL').AsCurrency;

[RicardoVoigt]

3 horas atrás, Souza disse:

pag.Add.indPag := ipPrazo ;
            pag.Add.tPag   := fPagamento(StrToInt(FieldbyName('CNF_TPPGTO').AsString));
            pag.Add.vPag   := FieldbyName('TOTAL').AsCurrency;

Aqui esta teu erro... vc chamou 3x o método Add... revisa isso ai...

Att

Ricardo

[Souza]

3 horas atrás, RicardoVoigt disse:

Aqui esta teu erro... vc chamou 3x o método Add... revisa isso ai...

Att

Ricardo

Foi isso mesmo Ricardo, obrigado pela dica..!!

[Felipe E. Resende Mesquita]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.