Erro na geração de Arquivo na Daruma FS800i

[jefferson01]

Amigos, estamos testando o nosso sistema com a Daruma FS800i e as rotinas do ACBr que utilizam a DLL não está funcionando, as demais operações estão todos OK para esse modelo. É necessário fazer algum configuração diferente de apenas selecionar o tipo de ECF como "ecfEscECF" ?

[Daniel Simoes]

Acredito que nunca tenha sido testado...

Não por mim, pois eu não tenho esse modelo...

Qual é a exata msg de erro ?

[jefferson01]

A mensagem é assim:

Erro ao executar rEfetuarDownloadMF_ECF_Daruma

Cod.: -1 Erro do Método

 

Log:

-- 16/11 09:13:59:407     RX <- [SOH][22][26][NUL][NUL][SOH][NUL][NUL]@[20][NUL]16112015|1|50|16275|[161]
-- 16/11 09:14:49:046    xrEfetuarDownloadMF_ECF_Daruma
-- 16/11 09:15:11:354
--------------------------------------------------------------------------------
ATIVAR - 16/11/15 09:15:11:354 - Modelo: EscECF - Porta: COM8 - TimeOut: 3
         Device: BAUD=9600 DATA=8 PARITY=N STOP=1 HANDSHAKE=RTS/CTS HARDFLOW MAXBANDWIDTH=0
--------------------------------------------------------------------------------

-- 16/11 09:15:11:370     Sincronismo TX -> [22]
-- 16/11 09:15:11:385     Sincronismo RX <- [22][NUL]
-- 16/11 09:15:11:385 ArquivoMF_DLL( C:\Desenvolvimento\SYSCOM\versaotrab\EXE\Arquivo MF\ArqMF20151116091403.bin )
-- 16/11 09:15:11:385                 TX -> [SOH][SOH][26][NUL][ENQ][NUL]15|0|[174]
-- 16/11 09:15:11:385                 RX <- [ACK]
-- 16/11 09:15:11:385          Status TX -> [ENQ][NUL]
-- 16/11 09:15:11:385                 RX <- [WAK][16][SOH][NUL][NUL][NUL] (1)
-- 16/11 09:15:11:588          Status TX -> [ENQ][NUL]
-- 16/11 09:15:11:588             Resposta: SEQ:1 CMD:26 EXT:0 CAT:0 RET:[SOH][NUL][NUL]@ TBR:227 BRS:"DARUMA AUTOMA[199][195]O|FS800i|ECF-IF|DR101500000000000821|001|||45.170.289/0001-25|688.023.460-111|3633/72| R|3|3|010000|[ESC]EDARUMA AUTOMA[199][195]O - ECF DESENVOLVIMENTO[LF][ESC]F||Av. Independ[234]ncia, 3500 - Taubat[233] - SP|PONXHSRDWU||02.00|SP||0|0|0|" CHK:90
-- 16/11 09:15:11:604     RX <- [SOH][SOH][26][NUL][NUL][SOH][NUL][NUL]@[227][NUL]DARUMA AUTOMA[199][195]O|FS800i|ECF-IF|DR101500000000000821|001|||45.170.289/0001-25|688.023.460-111|3633/72| R|3|3|010000|[ESC]EDARUMA AUTOMA[199][195]O - ECF DESENVOLVIMENTO[LF][ESC]F||Av. Independ[234]ncia, 3500 - Taubat[233] - SP|PONXHSRDWU||02.00|SP||0|0|0|Z
-- 16/11 09:16:31:394 GrandeTotal
-- 16/11 09:16:31:394                 TX -> [SOH][STX][26][NUL][4][NUL]4|1|}
-- 16/11 09:16:31:409                 RX <- [ACK]
-- 16/11 09:16:31:409          Status TX -> [ENQ][NUL]
-- 16/11 09:16:31:409                 RX <- [WAK][16][SOH][NUL][NUL][NUL] (1)
-- 16/11 09:16:31:612          Status TX -> [ENQ][NUL]
-- 16/11 09:16:31:612             Resposta: SEQ:2 CMD:26 EXT:0 CAT:0 RET:[SOH][NUL][NUL]@ TBR:8 BRS:"1|16275|" CHK:147
-- 16/11 09:16:31:628     RX <- [SOH][STX][26][NUL][NUL][SOH][NUL][NUL]@[BS][NUL]1|16275|[147]

[Daniel Simoes]

Lembre-se que você precisará de uma versão nova da DLL da Daruma para esse ECF... pois ele usa um protocolo completamente diferente...

Qual a versão da DLL da Daruma que você está utilizando  ?

[jefferson01]

Estou utilizando a dll que está na pasta do ACBr.

[Daniel Simoes]

Verifique com o fabricante quais as DLLs recomendadas...

[Luiz Fernando]

Bom dia.

Também tive essa dificuldade e entrei em contato com o pessoal do suporte da Daruma, eles me passaram as seguintes correções. Também é ncessário atualizar as dlls.

No método "ConfigurarDLL" da classe TACBrECFDaruma.

  // Estava assim
  Resp := xregAlterarValor_Daruma( 'START\Produto', 'FISCAL' );
  if Resp <> 1 then
     raise EACBrECFERRO.Create( ACBrStr('Erro: '+IntToStr(Resp)+' '+GetDescricaoErroDLL(Resp)+sLineBreak+
       'ao chamar: '+sLineBreak+
       'xregAlterarValor_Daruma( "START\Produto", "ECF" ) ') );

Porém o correto é como esta na mensagem de erro xregAlterarValor_Daruma( 'START\Produto', 'ECF' );

Existe também, uma tag no DarumaFrameWork.xml denominada ECF\SCU\Habilitar, que serve para quando utilizarmos o protocolo EscECF.
  Resp := xregAlterarValor_Daruma( 'ECF\SCU\Habilitar', '1' );
  if Resp <> 1 then
     raise EACBrECFERRO.Create( ACBrStr('Erro: '+IntToStr(Resp)+' '+GetDescricaoErroDLL(Resp)+sLineBreak+
       'ao chamar: '+sLineBreak+
       'xregAlterarValor_Daruma( "ECF\SCU\Habilitar", "1" ) ') );

Outra coisa, o pessoal me passou que a velocidade precisa ser sempre 115200, então teríamos que alterar o método CriarECFClassPorMarca da classe ACBrECFEscECF, para quando criar a ECFDaruma, colocar sempre a velocidade 115200.

    if IsBematech then
        Result := TACBrECFBematech.create(fpOwner)
    else if IsDaruma then begin
        Result := TACBrECFDaruma.create(fpOwner);
        Result.Device.Baud  := 115200;
    end else if IsEpson then
    begin
        Result := TACBrECFEpson.create(fpOwner);
        Result.Device.Desativar;
        fsDeviceParams := fpDevice.Porta+':'+fpDevice.ParamsString;
        Result.Device.Porta := 'USB';         // Força DLL em USB
        Result.Device.Baud  := 115200;
    end;
 

Caso precisem de mais informações, fico a disposição.

Editado 23 Novembro, 2015 por Luiz Fernando

[Daniel Simoes]

Se deseja sugerir correções nos fontes, por favor anexe as Units modificadas

[Luiz Fernando]

Segue em anexo units alteradas.

ACBrECFDaruma.pas

ACBrECFEscECF.pas

[Régys Silveira]

Enviado ao repositório, por favor na próxima utilize espaços ao invés de TAB, facilita na hora de verificar as diferenças entre os arquivos já que o ACBr segue o padrão de espaços para edentação.

Obrigado pela contribuição.

[jefferson01]

Bom dia!

Estava ausente e não pude enviar mensagem no fórum.

Na verdade apenas atualizando as DLL's do fabricante já funciona, porém o que percebi em testes aqui que ao gerar o AC 17/04 por exemplo e logo em seguida tentar emitir um cupom fiscal, o ACBr retorna que a ecf não está ativa. Acredito que é a DLL que ainda não liberou a porta. Alguém está com esse problema também? Vou entrar em contato com a Daruma para verificar se a DLL está com algum problema. Desde já agradeço a todos.

[Luiz Fernando]

O meu caso funciona perfeitamente, seguindo as configurações que o pessoal da Daruma me passou.

[Paulinho]

Em 23/11/2015 at 12:01, Régys Silveira disse:

Enviado ao repositório, por favor na próxima utilize espaços ao invés de TAB, facilita na hora de verificar as diferenças entre os arquivos já que o ACBr segue o padrão de espaços para edentação.

Obrigado pela contribuição.

Bom dia Regys, poderia me informar se estas modificações foram enviadas para trunk ou trunk2?

Obrigado

[Daniel Simoes]

Trunk2

[katcharowski]

Em 25/11/2015 at 17:15, Luiz Fernando disse:

O meu caso funciona perfeitamente, seguindo as configurações que o pessoal da Daruma me passou.

estou tentando fazer funcionar um ecf daruma fs800 utilizando o demo do acbr, porém não estou conseguindo, ja atualizei as dll, fiz as alterações que Luiz Fernando citou, quando tento ativar a impressora, volta a mensagem "impressora daruma não esta respondendo"  quando utilizo o modelo ecfdaruma.

se utilizar o modelo ecfescecf, diz que não está em linha.

qual modelo devo utilizar ??

outra coisa que está me deixando intrigado, é que fiz as alterações no "acbrecfdaruma" e no "acbrescecf", e tentei acompanhar via debug,porém o programa não passou nas procedures que alterei !! o que estou fazendo errado ?

se alguém já conseguiu fazer funcionar o demo nesta impressora, e puder me dara algumas dicas ficaria agradecido.

 

 

[Daniel Simoes]

Esse modelo usa o protocolo "EscECF"

[katcharowski]

quando uso este modelo retorna a mensagem "impressora escecf não está em linha", porém utilizando o programa demo da própria daruma,

a impressora funciona perfeitamente.

a dll da impressora precisa ter algum nome especifico ? tem que ficar em alguma pasta especifica ?

 

segue o log;

 

--------------------------------------------------------------------------------
ATIVAR - 29/01/16 10:21:26:646 - Modelo: EscECF - Porta: COM4 - TimeOut: 10
         Device: BAUD=9600 DATA=8 PARITY=N STOP=1 HANDSHAKE=DTR/DSR MAXBANDWIDTH=0
--------------------------------------------------------------------------------

    Sincronismo TX -> [22]
    Sincronismo RX <- [22][NUL]
-- 10:21:36:681 
----------------- ERRO -----------------
Impressora EscECF não está em linha
----------------------------------------

[Daniel Simoes]

O ACBrECF não usa a DLL do fabricante... ele se comunica diretamente pela Serial usando o protocolo nativo do ECF...

Experimente mudar a velocidade para 115.200 em ACBrECF.Device.Baud

[katcharowski]

Daniel, muito obrigado pela sua atenção, consegui resolver meu problema, após várias tentativas acabei alterando o HANDSHAKE

para XON/XOFF, e aí funcionou.