Escecf Erro Em Relatório Gerencial Ou Ccd

[Danilo_Gazzoli]

bom dia,

 

estou com problema no relatório gerencial da impressora Bematech MP-4200 TH FI:

 

 

Erro: 7-12 - Erro em Relatório Gerencial ou CCD

Comando enviado não pode ser executado dentro de CCD'.

 

Este erro ocorre na minha aplicação e também na aplicação de testes disponibilizada como demonstração.

 

O que poderá ser?

 

obrigado pela ajuda.

[Juliomar Marchetti]

Bom dia

o que está tentando enviar para a ECF?

[Danilo_Gazzoli]

estou tentando fazer a impressão gerencial que existe no menu de Relatórios Gerenciais do programa exemplo disponibilizado no pacote acbr.

 

Estou enviando um texto "normal"

[Juliomar Marchetti]

Qual o modelo você escolheu para usar essa impressora?

[Danilo_Gazzoli]

Bematech MP-4200 TH FI (ecfEscEcf)

 

Estou utilizando o ecfESCECF.

 

Fiz sangria, suprimento, leitura X, redução Z, impressão de cupom fiscal, tudo funcionando, menos o relatório gerencial

Editado 17 Setembro, 2014 por Danilo_Gazzoli

[André Ferreira de Moraes]

Anexe o log do ECF.

[Danilo_Gazzoli]

Segue o log em anexo, grato pela ajuda

acbrlog.txt

[André Ferreira de Moraes]

Não use o comando ACBrECF1.PulaLinhas dentro do gerencial.

[Daniel Simoes]

Acho que o PulaLinhas até deve funcionar dentro do Gerencial... mas não com o numero 0 de linhas

-- 09:31:25:374 PulaLinhas( 0 )

 

[Danilo_Gazzoli]

olá,

 

este problema ocorre quando eu envio pro método LinhaRelatorioGerencial uma linha que seja vazia ou que extrapole o comprimento de 48 caracteres.

[Daniel Simoes]

Provavelmente o problema é no seu projeto... No Log consta claramente que o erro ocorre no envio de: PulaLinhas( 0 ) e não de LinhaRelatorioGerencial()

 

Para maior analise, por favor poste um passo a passo, de como reproduzir o problema, usando o programa de Teste, ECFTestes.exe

[Danilo_Gazzoli]

oi Daniel,

 

bem tranquilo de simular este erro no próprio demo ACBR:

 

procedure TForm1.Button1Click(Sender: TObject);

var

  ls: TStringList;

  i: integer;

begin

  ls := TStringList.Create;

  ls.LoadFromFile('C:\tmp\texto.txt');

  try

    //ACBRECF1.FechaRelatorio;

    ACBrECF1.AbreRelatorioGerencial;

    for i := 0 to ls.Count - 1 do

    begin

      if Trim(ls) <> EmptyStr then

      begin

        ACBRECF1.LinhaRelatorioGerencial(Copy(ls,1, 48));

      end;

    end;

     //  ACBRECF1.LinhaRelatorioGerencial('LINHA NORMAL 1');

     //  ACBRECF1.LinhaRelatorioGerencial(#14+'EXPANDIDO 1 LINHA');

    //  ACBRECF1.LinhaRelatorioGerencial('LINHA NORMAL 1');

    //  ACBRECF1.LinhaRelatorioGerencial(#15+'ON/OFF MODO CONDENSADO'+#18);

    //  ACBRECF1.LinhaRelatorioGerencial(#27+'W1'+'ON/OFF MODO EXPANDIDO'+#27+'W0');

  finally

    ACBRECF1.FechaRelatorio;

    ls.Free;

  end;

end;

 

 

Basta substitiuir o código do Button1Click() "Fontes do ECF" pelo código acima.

 

Na pasta C:\Tmp salvar em um arquivo "texto.txt":

 

Certif./Apolice.: /1234567890

Bem Segurado....: BICLICLETA SBMMMM X - Branco - 220 vts

Vlr Bem Segurado: 206,52

Num. Titulo.....: 1716527

Parcela.........: 1

 

 

A impressora imprime a primeira linha mas na segunda dá o erro mencionado.

Editado 18 Setembro, 2014 por Danilo_Gazzoli

[Daniel Simoes]

Não fui capaz de reproduzir o erro... alias, não vejo como isso poderia reproduzir o erro... em nenhum lugar do código acima tem a chamada a PulaLinhas

[Daniel Simoes]

Tópico relacionado: