Erro De Desconto Maior Que O Valor Dos Itens, E Mesmo Assim Imprime A Linha Do Cupom!

[Solivan]

Olá, estou desenvolvendo o meu paf ecf e recentemente me deparei com algo que ainda não sei se é um erro, mas vou postar aqui pra trazer isso a atenção dos desenvolvedores.

 

Ok, vamos la;

 

estou enviando um item de venda para o ecf (Daruma FS700), ao verificar o log notei que o ecf retorna o erro de desconto maior que o valor do item, acho que a mssg é issa, se não for é algo nesse sentido. No entando a minha função retorna False, por causa do erro, mas, mesmo assim com erro a impressora imprime no cupom fiscal e não lança no meu sistema por causa do retorno false da função.

 

Gostaria de saber se isso é um erro e se devo tratar antes de enviar ao ecf?

 

Segue abaixo codigos da função que imprime o item do cupom;

 

function Tf_EmitirCupomFiscal.ImprimirItemCupomFiscal(cCodigo, cDesc, cSigla, cICMS, cUND : string; uQtde, uValorUnit, uValorDesc : Currency) : boolean;

var

  cDesconto : string;

begin

  Result := True;

  repeat

    Application.ProcessMessages;

  until (ACBrECF.AguardandoResposta = False);

  cDesconto := '$';

  try

    if bckInmetro then ACBrECF.LegendaInmetroProximoItem;

    cICMS := TratarICMSZerado( cSigla, cICMS );

    ACBrECF.VendeItem( cCodigo, cDesc, cICMS, uQtde, uValorUnit, uValorDesc, cUND, cDesconto, 'D');

  except

   on E : Exception do

     begin

       Result := False;

       LabelRespostaOperador.Caption := E.Message;

     end;

  end;

end;

 

 

Grato!

 

Solivan Noleto Milhomem

Programador

ECFLog.txt

ECFLog.txt

Editado 5 Abril, 2013 por Solivan

[Isaque Pinheiro]

Bom dia Solivan, cara se entendi bem o que você reportou, jamais você (sua aplicação) poderá deixar o usuário dar um desconto igual ou maior que o valor total do item, isso é um requisito testado na homologação, não pode ter desconto de 100% nem valores negativos, isso serve para acréscimo tb, sendo assim sua aplicação que passará por uma homologação deve tratar isso.

 

Boa sorte

[Juliomar Marchetti]

Vale também lembrar que a ECF bloqueia isso automaticamente

sendo que algumas chega a 99% de desconto ou acréscimo do valor não mais que isso

[Solivan]

Entendo, e obrigado pelo retorno tão rápido, mas a questão é que o ecf está detectando como um erro mas mesmo assim ele imprime o item, eu recebo o retorno da função como falso, mas quando olho na bobina o item está impresso ignorando o desconto dado. Mas tudo bem vou validar pela aplicação, Obrigado.

[EMBarbosa]

Esse retorno e permissão dependerá do ECF. Precisará ler o manual sobre isso. Mas para o PAF-ECF não é permitido como já mencionado.

[Daniel Simoes]

Abra o fonte da Classe ACBrECFDaruma.pas... vá no método de VendeItem...

 

Observe que ele envia dois comandos distintos..  o primeiro para a venda de Item (que funciona) e outro para o desconto de Item anterior (que obviamente não funcionará com 100%).... Por isso o item é vendido...

 

Mas como já foi dito aqui antes... cabe a você fazer um bom tratamento dos dados antes de enviar para o ECF...

[Solivan]

A explicação do Daniel sanou minha duvida por completo, obrigado a você e aos outros que contribuem com o projeto.