[Erro No Limite De Troco No Tef]

Aparentemente está acontecendo um operação de comparação de double com double dentro do if e isto é problema se pelo menos uma das variáveis não for inteira.

[Retorno Do Método Tacbrecfdadosrz.montadadosreducaoz]

Valeu Daniel implementei usando a classe ficou perfeito...

[Retorno Do Método Tacbrecfdadosrz.montadadosreducaoz]

Olá. 

 

Tenho um questão a ser resolvida envolvendo as impressoras Epson.

 

 

O método usado na montagem do nosso arquivo de informações da RZ e de onde é lido a totalização do setores fiscais após a RZ aguarda o retorno de setor Ex.: TaT1700, TbT1800 porém no arquivo é gravada a informação 01T1700 e 02T1800.

 

O índice no caso é retornado de acordo com a posição na leitura porém o índice na impressora efetivamente seria Ta, Tb, Tc...

 

Na unit TAcbrEcfClass (TACBrECFDadosRZ.MontaDadosReducaoZ) na linha 4499 encontra-se o seguinte código:

 

 

  For I := 0 to TodasAliquotas.Count-1 do

  begin

     Result := Result +

-->          FormatFloat('00', I+1 ) +                           -> não deveria ser "TodasAliquotas.Indice"

               TodasAliquotas.Tipo +

               IntToStrZero(Round(TodasAliquotas.Aliquota*100),4) + ' = ' +

               FormatFloat('0.00',TodasAliquotas.Total) + sLineBreak ;

  end ;  

 

 

Pergunta. Tem alguma motivação para que o retorno seja um valor sequencial e não o valor que é efetivamente pois está divergindo com os dados que estou gravando no detalhamento da RZ?

 

 

[Impressora Epson Não Responde (Ack = 0)]

Bom dia a todos. 

 

A atualização do componente resolveu o problema da leitura dos dados da redução Z.

 

Juliomar e EMBarbosa valeu!!!

[Impressora Epson Não Responde (Ack = 0)]

Peço desculpa Juliomar como sou novo no fórum não sabia da sua competência no projeto. 

[Impressora Epson Não Responde (Ack = 0)]

Juliomar e EMBarbosa agradeço imensamente pelas dicas e informações até aqui prestadas.

O grande problema é que a compilação do meu projeto é feita e homologada para o PAF e é datado de outubro de 2012 portanto 1 ano. 

 

Sobre o informado nas linhas anteriores gostaria de uma opinião. Qual é a probabilidade de se eu atualizar o meu repositório do Acbr funcione corretamente a RZ? e se eu não atualizar pode ter alguma configuração salvadora para este caso?

 

Ultima tentativa!!!

 

DataMovimento não retorna ''

 

function TACBrECFClass.GetDadosReducaoZ: AnsiString;

Var

I : Integer ;

AliqZ : TACBrECFAliquota ;

FPGZ : TACBrECFFormaPagamento ;

CNFZ : TACBrECFComprovanteNaoFiscal ;

RGZ : TACBrECFRelatorioGerencial ;

begin

{ Alimenta a class com os dados atuais do ECF }

with fpDadosReducaoZClass do

begin

{ Zerar variaveis e inicializa Dados do ECF }

InitDadosUltimaReducaoZ;

 

with TACBrECF(fpOwner) do

begin

{ REDUЗГO Z }

try DataDoMovimento := DataMovimento; except end ;  <--- esta linha não retorna nada

try NumeroCOOInicial := NumCOOInicial; except end ;

[Impressora Epson Não Responde (Ack = 0)]

Fiz uma pesquisa bem considerável para tentar descobrir a motivação do erro porém acabei por descobrir que possivelmente que a data de movimento não está retornando motivando erros sucessivos do processo de gravação porém o problema é que como não consigo depurar no cliente também não tenho certeza disto.

 

De fato o acbr não está atualizado mas temos outros clientes que possuem o hardware do mesmo fabricante.

 

Certamente se algum desenvolvedor do Acbr olhar os logs que enviei pode vir a descobri o problema.

[Impressora Epson Não Responde (Ack = 0)]

Quem puder ajudar...

 

 

Ao fazer a redução z comandada temos a geração do arquivo com os dados da ultima.

 

------conteúdo------

 

[ECF]

NumSerie = EP081210000000038614

NumLoja = 0001

NumECF = 001

NumCRZ = 93

NumCOO = 378

NumCRO = 1

DataMovimento=

 

[OutrasICMS]

TotalSubstituicaoTributaria = 0

TotalIsencao = 0

TotalNaoTributado = 0

 

[Totalizadores]

TotalDescontos = 0

TotalCancelamentos = 2,5

TotalAcrescimos = 0

TotalNaoFiscal = 0

VendaBruta = 2,5

GrandeTotal = 7089,85

 

[Aliquotas]

01T1700 = 0

02T1200 = 0

03T0700 = 0

04T2500 = 0

05T2700 = 0

 

--------fim do conteúdo-------

 

 

Notei que o arquivo está incompleto faltando diversos dados e também notei a geração de LOG com a mensagem

'' is not a valid integer value.

 

Algum problema pode estar ocorrendo no Acbr?

ACBrECF (3).txt

[Impressora Epson Não Responde (Ack = 0)]

Estou com um problema de comunicação com a impressora Epson TM-T81FBIII que geralmente ocorre na emissão de RZ.

 

Pelo que os colegas do fórum apontaram em diversos post pode ser o Timeout configurado na comunicação com a impressora?

 

Alguma outra sugestão?

 

Obs: não tive permissão para adicionar o arquivo de log completo.

 

-- 11:26:02:121 

                TX -> [sTX][131][TAB][ENQ][FS][NUL][NUL][ETX]00B2

   11:26:03:634 RX <- 

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

Impressora Epson não responde (ACK = 0)

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

 

ACBrDevice.Ativar

 

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

ATIVAR - 06/07/13 06:56:45:931 - Modelo: Epson - Porta: COM1

         Device: BAUD=115200 DATA=8 PARITY=N STOP=1 HANDSHAKE=RTS/CTS HARDFLOW MAXBANDWIDTH=0

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