Ir para conteúdo
  • Cadastre-se

dev botao

Seja bem-vindo
Regras e orientações da nossa comunidade Participe do Discord do ACBr

Erro alíquota daruma

Herik

Por Herik
em ACBrSerial

 Compartilhar
  • Este tópico foi criado há 4870 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Herik Collaborator

Herik

Postado
Postado

Pessoal, estou tentando emitir um cupom com alíquota = 'N' (não tributada) ao passar no método VenderItem, porém retorna o seguinte erro: "Alíquotanão encontrada: 21." já verifiquei de tudo quanto é jeito, me parece que o modelo FS700 não aceita esse número, estou com duas impressoras idênticas e o erro persiste.

Alguém ai pra me dar uma luz que não seja fluorescente? rsrs

  • Moderadores
Régys Silveira Veteran

Régys Silveira

Postado
  • Moderadores
Postado

utilize:

NN - Não tributado,

FF - Substituicao tributária,

II - Isento

SN - Serviço não tributado,

SF - Serviço Substituição Tributária,

SI - Serviço Isento

Tributados e Serviço com alíquota

- Por Valor da aliquota, Ex: '18', '12,00' '2,56'

- Por Valor da Aliquota especificando o Tipo como sufixo (T = ICMS, ou S = ISS), Ex: '18T', '2,5S'

- Por Indice, adicione o prefixo 'T', Ex: 'T01', 'T03', 'TA', 'TT01' ( o indice deve ser no mesmo formato retornado pela propriedade "Aliquotas[n].Indice" (que varia para cada modelo de ECF) )

Equipe ACBr

Régys Borges da Silveira

http://www.regys.com.br

certificacao delphicertificacao delphi
Herik Collaborator

Herik

Postado
  • Autor
Postado

utilize:

NN - Não tributado,

FF - Substituicao tributária,

II - Isento

SN - Serviço não tributado,

SF - Serviço Substituição Tributária,

SI - Serviço Isento

Tributados e Serviço com alíquota

- Por Valor da aliquota, Ex: '18', '12,00' '2,56'

- Por Valor da Aliquota especificando o Tipo como sufixo (T = ICMS, ou S = ISS), Ex: '18T', '2,5S'

- Por Indice, adicione o prefixo 'T', Ex: 'T01', 'T03', 'TA', 'TT01' ( o indice deve ser no mesmo formato retornado pela propriedade "Aliquotas[n].Indice" (que varia para cada modelo de ECF) )

É ai onde está o problema, já tentei NN também e o erro retornado é o mesmo.

Efetuei o seguinte teste:

1. Carreguei as alíquotas com o método: CarregaAliquotas

e os únicos retornos obtidos foram:

Objects[0] = Índice 01, Tipo: T, Total, 0,00, Alíquota: 25,00

Objects[1] = Índice 02, Tipo: T, Total, 0,00, Alíquota: 18,00

Objects[2] = Índice 03, Tipo: T, Total, 0,00, Alíquota: 12,00

Objects[3] = Índice 04, Tipo: T, Total, 0,00, Alíquota: 7,00

Objects[4] = Índice 05, Tipo: T, Total, 0,00, Alíquota: 5,00

2. Na impressão da leitura X apresenta todas as alíquotas acima, conforme carregado pelo ACBr, mas ao mandar os comandos: NN e N verifiquei que o componente trata da seguinte maneira:

unACBrEFDDaruma.pas:


     case AliquotaICMS[1] of

       'I' : AliquotaStr := IfThen(fpMFD,'19', 'I ') ;

       'N' : AliquotaStr := IfThen(fpMFD,'21', 'N ') ;

       'F' : AliquotaStr := IfThen(fpMFD,'17', 'F ') ;

       'T' :

         begin

            if StrIsAlpha(copy(AliquotaICMS,2,1)) then

               AliquotaICMS := 'T'+copy(AliquotaICMS,1,2)       {Indice TA, TB, TC}

            else

               AliquotaICMS := 'T'+padR(copy(AliquotaICMS,2,2),2,'0') ; {Indice T01, T1, T02}

         end ;

     end;

Ou seja, a alíquota que vai até a impressora é enviada o número: 21, mas a impressora da o seguinte retorno:

"Alíquota não encontrada: 21".

Tentei então enviar o caractere N, e logo é retornado uma mensagem que diz que só são aceitos números, daí não sei mais pra onde ir, uma vez que também no manual da própria ECF diz que o 21 é igual ao N1.

:cry:

PS: Testado em duas Daruma FS700...

lampada Community Regular

lampada

Postado
Postado

Nossa cara, mas que bizarro.

Sei que essa pergunta é estranha mas na leitura x sai os totalizadores N1,F1,I1?

Quantas reuniões foram mesmo esta semana? Reúna os amigos!

Herik Collaborator

Herik

Postado
  • Autor
Postado

Nossa cara, mas que bizarro.

Sei que essa pergunta é estranha mas na leitura x sai os totalizadores N1,F1,I1?

Pior que sai, mas por incrível que parece, a impressora que compramos para homologar o PAF e o do nosso cliente, ambos idênticos com o mesmo prob. não sei mais o que fazer.. :shock:

leiturax.png

Herik Collaborator

Herik

Postado
  • Autor
Postado

Acabei de fazer os testes aqui e está vendendo corretamente utilizando todas as alíquotas, inclusive passando "NN" no caso do não tributado.

Faça o seguinte, poste o log do ACBrECF para dar uma olhada.

Segue o log:

-- 14:25:34 5/8/2011 Ativar

TX -> [28]R[200]082[188]

14:25:34 RX <- :[200]082010060[CR][194]

-- 14:25:34

TX -> [28]R[200]083[189]

14:25:34 RX <- :[200]083010100[CR][196]

-- 14:25:34

TX -> [28]R[200]139[189]

14:25:34 RX <- :[200]13932[CR]

-- 14:25:34

TX -> [29][8][CR]

14:25:34 RX <- :[CR]

-- 14:25:34 Estado

TX -> [28]R[200]056[181]

14:25:34 RX <- :[200]0561[CR][253]

-- 14:25:34

TX -> [28]R[200]057[180]

14:25:34 RX <- :[200]0571[CR][252]

-- 14:25:34 NumUltimoItem

TX -> [28]R[200]058[187]

14:25:35 RX <- :[200]058000[CR][242]

-- 14:25:35 Subtotal

TX -> [28]R[200]047[181]

14:25:35 RX <- :[200]047000000000000[CR][204]

-- 14:25:35 IdentificaOperador()

TX -> [28]C[209] [142]

14:25:35 RX <- :1007800[209][CR][216]

----------------- ERRO -----------------

Erro retornado pela Impressora: Daruma FS-700H

Documento sendo emitido

Erro estendido (078 -> CF aberto)

----------------------------------------

-- 14:25:35 NumECF

TX -> [28]R[200]107[176]

14:25:35 RX <- :[200]107001[CR][248]

-- 14:25:35 Estado

TX -> [28]R[200]056[181]

14:25:36 RX <- :[200]0561[CR][253]

-- 14:25:36

TX -> [28]R[200]057[180]

14:25:36 RX <- :[200]0571[CR][252]

-- 14:25:36 NumCupom

TX -> [28]R[200]026[178]

14:25:36 RX <- :[200]026000026[CR][207]

-- 14:25:52 Estado

TX -> [28]R[200]056[181]

14:25:53 RX <- :[200]0561[CR][253]

-- 14:25:53

TX -> [28]R[200]057[180]

14:25:53 RX <- :[200]0571[CR][252]

-- 14:25:53 DataHora

TX -> [28]R[200]066[182]

14:25:53 RX <- :[200]06605082011143914[CR][202]

-- 14:25:53 Estado

TX -> [28]R[200]056[181]

14:25:54 RX <- :[200]0561[CR][253]

-- 14:25:54

TX -> [28]R[200]057[180]

14:25:54 RX <- :[200]0571[CR][252]

-- 14:25:54 CarregaAliquotas

TX -> [28]R[200]125[176]

14:25:54 RX <- :[200]1250250001800012000070000500[FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][CR][9]

-- 14:25:55 VendeItem( 3227 , ZARCAO , N , 1 , 33,17 , 0 , GL , $ , D )

TX -> [28]F[207]N000100000003317000000000000003227 GL TZARCAO[FF]l

14:25:55 RX <- :1307400[207]000000000000000[CR][249]

----------------- ERRO -----------------

Erro retornado pela Impressora: Daruma FS-700H

Erro nos parâmetros: Não numérico

Erro estendido (074 -> Utilize apenas dígitos numéricos)

----------------------------------------

-- 14:26:04 Estado

TX -> [28]R[200]056[181]

14:26:04 RX <- :[200]0561[CR][253]

-- 14:26:04

TX -> [28]R[200]057[180]

14:26:04 RX <- :[200]0571[CR][252]

-- 14:26:05 DataHora

TX -> [28]R[200]066[182]

14:26:05 RX <- :[200]06605082011143925[CR][200]

-- 14:26:05 Estado

TX -> [28]R[200]056[181]

14:26:05 RX <- :[200]0561[CR][253]

-- 14:26:05

TX -> [28]R[200]057[180]

14:26:05 RX <- :[200]0571[CR][252]

-- 14:26:05 CarregaAliquotas

TX -> [28]R[200]125[176]

14:26:05 RX <- :[200]1250250001800012000070000500[FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][CR][9]

-- 14:26:07 VendeItem( 3227 , ZARCAO , N , 1 , 33,17 , 0 , GL , $ , D )

TX -> [28]F[207]N000100000003317000000000000003227 GL TZARCAO[FF]l

14:26:08 RX <- :1307400[207]000000000000000[CR][249]

----------------- ERRO -----------------

Erro retornado pela Impressora: Daruma FS-700H

Erro nos parâmetros: Não numérico

Erro estendido (074 -> Utilize apenas dígitos numéricos)

----------------------------------------

-- 14:26:24 NumCupom

TX -> [28]R[200]026[178]

14:26:24 RX <- :[200]026000026[CR][207]

-- 14:26:24 CancelaCupom

TX -> [28]R[200]046[180]

14:26:25 RX <- :[200]0461[CR][252]

-- 14:26:25

TX -> [28]R[200]050[179]

14:26:25 RX <- :[200]050000026[CR][206]

-- 14:26:25

TX -> [28]R[200]026[178]

14:26:25 RX <- :[200]026000026[CR][207]

-- 14:26:25

TX -> [28]F[211][137]

14:26:25 RX <- :0000040[211]000026000000000000000000[CR][212]

-- 14:26:25

TX -> [28]R[200]056[181]

14:26:26 RX <- :[200]0560[CR][252]

-- 14:26:27 Estado

TX -> [28]R[200]056[181]

14:26:27 RX <- :[200]0560[CR][252]

-- 14:26:27

TX -> [29][ACK][ESC]

14:26:27 RX <- :0030B00000C100[CR]

-- 14:27:42 5/8/2011 Ativar

TX -> [28]R[200]082[188]

14:27:42 RX <- :[200]082010060[CR][194]

-- 14:27:42

TX -> [28]R[200]083[189]

14:27:42 RX <- :[200]083010100[CR][196]

-- 14:27:42

TX -> [28]R[200]139[189]

14:27:42 RX <- :[200]13932[CR]

-- 14:27:42

TX -> [29][8][CR]

14:27:43 RX <- :[CR]

-- 14:27:43 Estado

TX -> [28]R[200]056[181]

14:27:43 RX <- :[200]0560[CR][252]

-- 14:27:43

TX -> [29][ACK][ESC]

14:27:43 RX <- :0030B00000C100[CR]

-- 14:27:43 IdentificaOperador()

TX -> [28]C[209] [142]

14:27:43 RX <- :0000000[209][CR][214]

-- 14:27:43 NumECF

TX -> [28]R[200]107[176]

14:27:43 RX <- :[200]107001[CR][248]

-- 14:27:44 Estado

TX -> [28]R[200]056[181]

14:27:44 RX <- :[200]0560[CR][252]

-- 14:27:44

TX -> [29][ACK][ESC]

14:27:44 RX <- :0030B00000C100[CR]

-- 14:28:22 Estado

TX -> [28]R[200]056[181]

14:28:22 RX <- :[200]0560[CR][252]

-- 14:28:22

TX -> [29][ACK][ESC]

14:28:23 RX <- :0030B00000C100[CR]

-- 14:28:23 AbreCupom( , , )

TX -> [28]F[200][FF][FF][FF]m

14:28:23 RX <- :0000000[200]000027000009[CR][195]

-- 14:28:23 NumCupom

TX -> [28]R[200]026[178]

14:28:23 RX <- :[200]026000027[CR][206]

-- 14:28:23 DataHora

TX -> [28]R[200]066[182]

14:28:23 RX <- :[200]06605082011144144[CR][192]

-- 14:28:23 NumCCF

TX -> [28]R[200]030[181]

14:28:24 RX <- :[200]030000009[CR][197]

-- 14:28:24 DataHora

TX -> [28]R[200]066[182]

14:28:24 RX <- :[200]06605082011144145[CR][193]

-- 14:28:24 Estado

TX -> [28]R[200]056[181]

14:28:24 RX <- :[200]0561[CR][253]

-- 14:28:24

TX -> [28]R[200]057[180]

14:28:25 RX <- :[200]0571[CR][252]

-- 14:28:25 CarregaAliquotas

TX -> [28]R[200]125[176]

14:28:25 RX <- :[200]1250250001800012000070000500[FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][CR][9]

-- 14:28:32 Estado

TX -> [28]R[200]056[181]

14:28:32 RX <- :[200]0561[CR][253]

-- 14:28:32

TX -> [28]R[200]057[180]

14:28:32 RX <- :[200]0571[CR][252]

-- 14:28:33 DataHora

TX -> [28]R[200]066[182]

14:28:33 RX <- :[200]06605082011144153[CR][198]

-- 14:28:33 Estado

TX -> [28]R[200]056[181]

14:28:33 RX <- :[200]0561[CR][253]

-- 14:28:33

TX -> [28]R[200]057[180]

14:28:33 RX <- :[200]0571[CR][252]

-- 14:28:41 Estado

TX -> [28]R[200]056[181]

14:28:41 RX <- :[200]0561[CR][253]

-- 14:28:41

TX -> [28]R[200]057[180]

14:28:41 RX <- :[200]0571[CR][252]

-- 14:28:41 DataHora

TX -> [28]R[200]066[182]

14:28:41 RX <- :[200]06605082011144202[CR][193]

-- 14:28:41 Estado

TX -> [28]R[200]056[181]

14:28:41 RX <- :[200]0561[CR][253]

-- 14:28:41

TX -> [28]R[200]057[180]

14:28:42 RX <- :[200]0571[CR][252]

-- 14:28:49 NumCupom

TX -> [28]R[200]026[178]

14:28:49 RX <- :[200]026000027[CR][206]

-- 14:28:49 CancelaCupom

TX -> [28]R[200]046[180]

14:28:49 RX <- :[200]0461[CR][252]

-- 14:28:49

TX -> [28]R[200]050[179]

14:28:49 RX <- :[200]050000027[CR][207]

-- 14:28:49

TX -> [28]R[200]026[178]

14:28:50 RX <- :[200]026000027[CR][206]

-- 14:28:50

TX -> [28]F[211][137]

14:28:50 RX <- :0000040[211]000027000000000000000000[CR][213]

-- 14:28:50

TX -> [28]R[200]056[181]

14:28:51 RX <- :[200]0560[CR][252]

-- 14:28:51 Estado

TX -> [28]R[200]056[181]

14:28:51 RX <- :[200]0560[CR][252]

-- 14:28:51

TX -> [29][ACK][ESC]

14:28:51 RX <- :0030B00000C100[CR]

-- 14:29:23 5/8/2011 Ativar

TX -> [28]R[200]082[188]

14:29:23 RX <- :[200]082010060[CR][194]

-- 14:29:23

TX -> [28]R[200]083[189]

14:29:23 RX <- :[200]083010100[CR][196]

-- 14:29:23

TX -> [28]R[200]139[189]

14:29:23 RX <- :[200]13932[CR]

-- 14:29:23

TX -> [29][8][CR]

14:29:23 RX <- :[CR]

-- 14:29:23 Estado

TX -> [28]R[200]056[181]

14:29:23 RX <- :[200]0560[CR][252]

-- 14:29:23

TX -> [29][ACK][ESC]

14:29:23 RX <- :0030B00000C100[CR]

-- 14:29:23 IdentificaOperador()

TX -> [28]C[209] [142]

14:29:24 RX <- :0000000[209][CR][214]

-- 14:29:24 NumECF

TX -> [28]R[200]107[176]

14:29:24 RX <- :[200]107001[CR][248]

-- 14:29:24 Estado

TX -> [28]R[200]056[181]

14:29:24 RX <- :[200]0560[CR][252]

-- 14:29:24

TX -> [29][ACK][ESC]

14:29:25 RX <- :0030B00000C100[CR]

-- 14:29:31 Estado

TX -> [28]R[200]056[181]

14:29:31 RX <- :[200]0560[CR][252]

-- 14:29:31

TX -> [29][ACK][ESC]

14:29:31 RX <- :0030B00000C100[CR]

-- 14:29:31 AbreCupom( , , )

TX -> [28]F[200][FF][FF][FF]m

14:29:32 RX <- :0000000[200]000028000010[CR][196]

-- 14:29:32 NumCupom

TX -> [28]R[200]026[178]

14:29:32 RX <- :[200]026000028[CR][193]

-- 14:29:32 DataHora

TX -> [28]R[200]066[182]

14:29:32 RX <- :[200]06605082011144252[CR][196]

-- 14:29:32 NumCCF

TX -> [28]R[200]030[181]

14:29:32 RX <- :[200]030000010[CR][205]

-- 14:29:33 DataHora

TX -> [28]R[200]066[182]

14:29:33 RX <- :[200]06605082011144253[CR][197]

-- 14:29:33 Estado

TX -> [28]R[200]056[181]

14:29:33 RX <- :[200]0561[CR][253]

-- 14:29:33

TX -> [28]R[200]057[180]

14:29:33 RX <- :[200]0571[CR][252]

-- 14:29:35 CarregaAliquotas

TX -> [28]R[200]125[176]

14:29:35 RX <- :[200]1250250001800012000070000500[FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][FF][CR][9]

-- 14:29:41 Estado

TX -> [28]R[200]056[181]

14:29:41 RX <- :[200]0561[CR][253]

-- 14:29:41

TX -> [28]R[200]057[180]

14:29:41 RX <- :[200]0571[CR][252]

-- 14:29:41 DataHora

TX -> [28]R[200]066[182]

14:29:41 RX <- :[200]06605082011144302[CR][192]

-- 14:29:41 Estado

TX -> [28]R[200]056[181]

14:29:42 RX <- :[200]0561[CR][253]

-- 14:29:42

TX -> [28]R[200]057[180]

14:29:42 RX <- :[200]0571[CR][252]

-- 14:29:52 Estado

TX -> [28]R[200]056[181]

14:29:52 RX <- :[200]0561[CR][253]

-- 14:29:52

TX -> [28]R[200]057[180]

14:29:52 RX <- :[200]0571[CR][252]

-- 14:29:52 DataHora

TX -> [28]R[200]066[182]

14:29:52 RX <- :[200]06605082011144313[CR][192]

-- 14:29:52 Estado

TX -> [28]R[200]056[181]

14:29:52 RX <- :[200]0561[CR][253]

-- 14:29:52

TX -> [28]R[200]057[180]

14:29:53 RX <- :[200]0571[CR][252]

-- 14:29:58 NumCupom

TX -> [28]R[200]026[178]

14:29:58 RX <- :[200]026000028[CR][193]

-- 14:29:58 CancelaCupom

TX -> [28]R[200]046[180]

14:29:58 RX <- :[200]0461[CR][252]

-- 14:29:58

TX -> [28]R[200]050[179]

14:29:58 RX <- :[200]050000028[CR][192]

-- 14:29:58

TX -> [28]R[200]026[178]

14:29:58 RX <- :[200]026000028[CR][193]

-- 14:29:58

TX -> [28]F[211][137]

14:29:59 RX <- :0000040[211]000028000000000000000000[CR][218]

-- 14:29:59

TX -> [28]R[200]056[181]

14:30:00 RX <- :[200]0560[CR][252]

-- 14:30:00 Estado

TX -> [28]R[200]056[181]

14:30:00 RX <- :[200]0560[CR][252]

-- 14:30:00

TX -> [29][ACK][ESC]

14:30:00 RX <- :0030B00000C100[CR]

Herik Collaborator

Herik

Postado
  • Autor
Postado

Note que no trecho em que dá o seguinte erro:

Erro retornado pela Impressora: Daruma FS-700H

Erro nos parâmetros: Não numérico

Erro estendido (074 -> Utilize apenas dígitos numéricos)

Foi em uma tentativa desesperada de enviar o comando: N no lugar do código "21'... mas em vão tb.

Herik Collaborator

Herik

Postado
  • Autor
Postado

Nas duas tentativas de venda de item que estão no log, está sendo informado "N" ao invés de "NN".

Exato, tentei NN mas tb não dá certo, note que na msg abaixo diz que só aceita valores inteiro..

A tentativa em mandar o caractere N já foi no desespero de fazer funcioná-la... :lol:

  • Membros Pro
ivan Collaborator

ivan

Postado
  • Membros Pro
Postado

Hmm.. me parece que o valor do produto, "33,17" é o que está atrapalhando a execução da função.

  • Membros Pro
ivan Collaborator

ivan

Postado
  • Membros Pro
Postado

Hmm.. me parece que o valor do produto, "33,17" é o que está atrapalhando a execução da função.

[]´s

Ivan

Herik Collaborator

Herik

Postado
  • Autor
Postado

O mais estranho e que aqui funciona perfeitamente e estou testando em uma FS700, você está com os fontes atualizados.

Copie a linha que efetua a venda do item e cole aqui por favor.


function TACBrECFFacade.VenderItem(ACodigo, ADescricao, AUnidade: String; var AAliquota: String;

  AQtde, AValorUnitario, ADescontoAcrescimo: Double): Integer;

var

  lTP: TACBrECFAliquota;

  I: Integer;

begin

  CheckEstadoECF([estVenda], 'Você não pode adicionar mais itens a este cupom.');

  with fACBrECF do

  begin

    lTP := AchaICMSAliquota( AAliquota );



    VendeItem(

      ACodigo,

      ADescricao,

      AAliquota,

      AQtde,

      AValorUnitario,

      Abs(ADescontoAcrescimo),

      AUnidade,

      '$',

			IIFVar(ADescontoAcrescimo >= 0, 'D', 'A'));


    AtualizarArquivoAuxiliar;


    Result := NumUltItem;


    { **** Totalizador Parcial **** }

    case AAliquota[1] of

      'I': AAliquota := 'I1' ;

      'N': AAliquota := 'N1' ;

      'F': AAliquota := 'F1' ;

    else

      if lTP <> nil then

        AAliquota := IntToStrZero(lTP.Sequencia, 2) + lTP.Tipo +

                     IntToStrZero(Round(lTP.Aliquota * 100), 4)

      else

        AAliquota := '';

    end;

  end;

end;

  • Moderadores
Régys Silveira Veteran

Régys Silveira

Postado
  • Moderadores
Postado

Veja o log do meu teste aqui comparado ao teu log com os mesmos dados:



SEU LOG

-- 14:25:55 VendeItem( 3227 , ZARCAO , N , 1 , 33,17 , 0 , GL , $ , D )

            TX -> [28]F[207]N000100000003317000000000000003227 GL TZARCAO[FF]l

   14:25:55 RX 


MEU LOG

-- 18:28:42 VendeItem( 3227 , ZARCAO , NN , 1 , 33,17 , 0 , GL , $ , D )

            TX -> [28]F[207]21000100000003317000000000000003227          GL TZARCAO[FF](

   18:28:42 RX 
[/code]



Veja que a diferença no comando enviado é justamente no início onde fica o índice da alíquota, a única informação diferente que passei foi justamente "NN" como pode ser visto pelo log.

Equipe ACBr

Régys Borges da Silveira

http://www.regys.com.br

certificacao delphicertificacao delphi
Herik Collaborator

Herik

Postado
  • Autor
Postado

Veja o log do meu teste aqui comparado ao teu log com os mesmos dados:


SEU LOG

-- 14:25:55 VendeItem( 3227 , ZARCAO , N , 1 , 33,17 , 0 , GL , $ , D )

            TX -> [28]F[207]N000100000003317000000000000003227 GL TZARCAO[FF]l

   14:25:55 RX <- :1307400[207]000000000000000[CR][249]


MEU LOG

-- 18:28:42 VendeItem( 3227 , ZARCAO , NN , 1 , 33,17 , 0 , GL , $ , D )

            TX -> [28]F[207]21000100000003317000000000000003227          GL TZARCAO[FF](

   18:28:42 RX <- :0000000[207]001000000003317[CR]
Veja que a diferença no comando enviado é justamente no início onde fica o índice da alíquota, a única informação diferente que passei foi justamente "NN" como pode ser visto pelo log.
Obrigado pelo atenção todos vcs, em especialmente a Regys, pois já descobri o problema, e pasmem, era algo bem simples... no meu algorítimo está: 

function TACBrECFFacade.VenderItem(ACodigo, ADescricao, AUnidade: String; var AAliquota: String;

  AQtde, AValorUnitario, ADescontoAcrescimo: Double): Integer;

var

  lTP: TACBrECFAliquota;

  I: Integer;

begin

  CheckEstadoECF([estVenda], 'Você não pode adicionar mais itens a este cupom.');

  with fACBrECF do

  begin

    //AAliquota = 'N'

    lTP := AchaICMSAliquota( AAliquota );

    //AAliquota = 21    


    VendeItem(

      ACodigo,

      ADescricao,

      AAliquota,

      AQtde,

      AValorUnitario,

      Abs(ADescontoAcrescimo),

      AUnidade,

      '$',

			IIFVar(ADescontoAcrescimo >= 0, 'D', 'A'));


    AtualizarArquivoAuxiliar;

O problema, é justamente a função: "AchaICMSAliquota" ele está convertendo o comando: 'N' pelo código 21 que estava sendo passado na função: VendeItem.. se comentar essa linha, realmente o comando VendeItem com o parâmetro Aliquota = N ou NN passa tranquilo..

O motivo pelo qual utilizei esta função, era pra realizar a totalização das alíquotas nas tabelas do sistema que na Bematech funciona perfeitamente, vou rever isto. Abrçs.

  • Este tópico foi criado há 4870 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
 Compartilhar
Ir para a lista de tópicos
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...