DadosUltimaReducaoZ não retornando informações para ECF: BEMATECH MP-4200 TH FI II

[Pedro E. Braga]

Bom Dia,

Ao realizar a consulta dos DadosUltimaReducaoZ na ECF valores não são retornados, foi verificado que ele carrega os dados do ECF com Base em uma LMF pela serial contudo ele não estava carregando os dados corretamente pois ao localizar a primeira linha ele não considerava os valores "------------------------------------------------" do cabeçalho assim retornava a linha de forma incorreta, foi adicionado a função "BematechObtemDadosUltimaReducaoZDeLeituraMemoriaFiscal" para localizar a linha de inicio a partir da descrição da "LEITURA MEMÓRIA FISCAL" assim não gerando mais o problema descrito.

// Achando a linha de inicio //
      if not EncontrarLinha('LEITURA MEMÓRIA FISCAL') then
        Exit;

      if not EncontrarLinha(LinhaTracejada) then
        Exit;

      if not EncontrarLinha('CRZ') then
        Exit;

 

Redução Z foi gerada em uma intervenção técnica e a atual numeração da Redução Z está em 433.

Peço que adicione essa nova regra ao método.

[Daniel Simoes]

Para sugerir modificações nos fontes, favor anexar as Units modificadas...

[Pedro E. Braga]

Boa Tarde Daniel, conforme solicitado segue Unit, o Método alterado foi o "BematechObtemDadosUltimaReducaoZDeLeituraMemoriaFiscal" demais alterações devem ser desconsideradas.

ACBrECFEscECF.pas

[EliasCesar]

Olá,

Foi aplicada a correção com um pequena alteração.
Disponível no SVN, Rev: 12945 

Obrigado pela contribuição.

[Pedro E. Braga]

@EliasCesar A Implementação como foi aplicada ira gerar problema o motivo é que se olhar no exemplo da Leitura da Memória Fiscal verá que tempos 3 linhas tracejadas incluindo as 2 do cabeçalho e duas linhas que iniciam como CRZ, assim a implementação aplicada ira parar na primeira linha que tem CRZ assim não trazendo os dados corretamente. por esse motivo as regras existentes foram mantidas e adicionado para iniciar após a localização da identificação do relatório.

[EliasCesar]

Olá,

Alterações estão disponíveis no SVN, Revs: 12952 e 12953.

Não foi mantida a comparação com a string "LEITURA MEMÓRIA FISCAL" pelo risco de falhar caso o texto seja retornado pelo ECF sem acento por exemplo.
Com essa alteração, a função irá verificar apenas o início das linhas buscando inicialmente pela string "CRZ" e depois pelo próprio número do CRZ. 

Dessa maneira acredito que ficará mais versátil e sem risco de falha caso algum ECF retorne a LMF de maneira um pouco diferente.

[Pedro E. Braga]

@EliasCesar não cheguei a testar mas olhando a implementação adotada acredito que irá funcionar corretamente, devo implementar a alteração futuramente no fonte utilizado pela Aplicação.