Pesquisar na Comunidade
Showing results for tags 'valor dos itens'.
Encontrado 1 registro
-
Erro De Desconto Maior Que O Valor Dos Itens, E Mesmo Assim Imprime A Linha Do Cupom!
um tópico no fórum postou Solivan ACBrSerial
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