Página 1 de 1
TXT do acbr com troco
Enviado: 20 Nov 2017 19:10
por rubens
Olá...
Alguém já fez uma nfce com troco? tem como postar um txt de exemplo?
Obrigado
Rubens
TXT do acbr com troco
Enviado: 21 Nov 2017 01:53
por fladimir
Tenta assim
Código: Selecionar todos
nFormasPgt := 0
if nDinheiro>0
@ nLin,0 say '[Pag' + STRZERO(++nFormasPgt, 3) + ']' ; nLin++
@ nLin,0 say 'tpag=01' ; nLin++
@ nLin,0 say 'vpag=' + Alltrim( Str( nDinheiro, 12, 2 ) ) ; nLin++
endif
if nCheque>0
@ nLin,0 say '[Pag' + STRZERO(++nFormasPgt, 3) + ']' ; nLin++
@ nLin,0 say 'tpag=02' ; nLin++
@ nLin,0 say 'vpag=' + Alltrim( Str( nCheque, 12, 2 ) ) ; nLin++
endif
if nCartao>0
@ nLin,0 say '[Pag' + STRZERO(++nFormasPgt, 3) + ']' ; nLin++
@ nLin,0 say 'tpag=03' ; nLin++
@ nLin,0 say 'vpag=' + Alltrim( Str( nCartao, 12, 2)) ; nLin++
endif
if nDinheiro + nCheque + nCartao > nTotProd - nDescTot // nTicket nao gera troco
nTroco := nDinheiro+nCheque+nCartao - (nTotProd - nDescTot)
endif
//-- Troco
if nTroco>0
@ nLin,0 say 'vTroco=' + Alltrim( Str( nTroco, 12, 2)) ; nLin++
endif
//-- Fim Troco
e fala se deu certo.
TXT do acbr com troco
Enviado: 21 Nov 2017 10:15
por rubens
Bom dia...
Então Fladimir...
Estou tentando assim... a mesma coisa que voce me passou.... só que com um valor fixo para testes... (sabe se existe alguma critica no valor passado no troco)?
Código: Selecionar todos
@ PROW()+1,00 SAY "[Pag001]"
@ PROW()+1,00 SAY "tpag="+tpag
@ PROW()+1,00 SAY "vPag="+ALLTRIM(STR( NFC->TOTGERAL,10, 2 ))
IF tPAG = '03' .OR. tPAG = '04'
@ PROW()+1,00 SAY "tpIntegra=2"
ENDIF
* @ PROW()+1,00 SAY "CNPJ=01027058000191" // +ALLTRIM(STR( NFC->TOTGERAL,10, 2 ))
* @ PROW()+1,00 SAY "tBand=01" // +ALLTRIM(STR( NFC->TOTGERAL,10, 2 ))
* @ PROW()+1,00 SAY "cAut=01010101" // +ALLTRIM(STR( NFC->TOTGERAL,10, 2 ))
@ PROW()+1,00 SAY "vTroco="+ALLTRIM(STR( 10,10,2))
Gera o TXT com o Troco...
Código: Selecionar todos
[Total]
ValorProduto=50.17
ValorDesconto=0.00
ValorNota=50.17
[Pag001]
tpag=01
vPag=50.17
vTroco=10.00
mas no xml não gera a tag do troco
Eh, bem, assim... até ontem não estava gerando... hoje na hora de responder aqui, fui conferir e não é que funcionou.. !!!
Beleza... Fazer mais uns testes e não ouvir mais a reclamação... "Lá no mercado do fulano imprime o troco !!!"...
Obrg...
Rubens
TXT do acbr com troco
Enviado: 21 Nov 2017 11:03
por fladimir
Legal Rubens... parabéns e obrigado por compartilhar.
TXT do acbr com troco
Enviado: 21 Nov 2017 12:07
por rubens
Só um detalhe..
Só gera as tags na versão 4.0
Rubens
TXT do acbr com troco
Enviado: 21 Nov 2017 12:59
por fladimir
Sim somente na versão 4 pq somente na versão 4 q foi implementado
