Pesquisar na Comunidade
Showing results for tags 'getestado'.
Encontrado 1 registro
-
Olá a todos, Gostaria de passar um caso que pegamos: Utilizamos o Compontente: ACBrECFVirtualNaoFiscal, com ACBRECF, para simular a venda na tela para o cliente, após isso finalizamos a venda SAT normalmente. Mas em clientes que trabalham 24 horas estava ocorrendo um problema na venda na mudança de dia. Após algumas validações vimos que na unit: ACBrECFVirtual, no método: function TACBrECFVirtualClass.GetEstado: TACBrECFEstado; existia o seguinte tratamento: if not (fpEstado in [estNaoInicializada,estDesconhecido]) then begin if (CompareDate( now, fpDia) > 0) and ( not (fpEstado in [estBloqueada,estRequerX])) then fpEstado := estRequerZ ; if (fpEstado = estBloqueada) and (CompareDate( now, fpDia) > 0) then fpEstado := estRequerX ; end; Ou seja no meio de uma venda o estado era modificado para RequerZ, bloqueando assim a venda e a finalização. Pensando nisso fizemos a seguinte "Melhoria" no processo, para que só seja modificado o estado para estRequerZ apenas se o estado da impressora for igual a estLivre. Ficando da seguinte forma: if not (fpEstado in [estNaoInicializada,estDesconhecido]) then begin if (CompareDate( now, fpDia) > 0) and ( (fpEstado in [estLivre])) then fpEstado := estRequerZ ; if (fpEstado = estBloqueada) and (CompareDate( now, fpDia) > 0) then fpEstado := estRequerX ; end ; Não achei outra solução, por gentileza se existir alguma outra solução me avise. Agradeço desde já pela atenção de todos. ACBrECFVirtual.pas
