Erro Ao Gerar Cat52 Ecfswedastx.

[Riquena]

Bom dia. 

Já pesquisei no fórum. Fiz todas as sugestões, mas continuo com problema.

 

Erro ao executar ECF_DownloadMF.

Cod.: -8

Para a data de: "01/02/2014"

 

Ocorre inclusive com ecfTeste. Oque pode ser? 

[Riquena]

Ninguém? 

[Juliomar Marchetti]

Entrou em contato com o fabricante da ECF e pediu a ultima dll disponível?

[Daniel Simoes]

Lembrando que se trata de um problema de execução da DLL do fabricante, e não do ACBrECF

 

Porém quase que 90% desses casos, é problemas na instalação e configuração da DLL do fabricante...

[Riquena]

Amigos.

 

Tentei de todas as formas mas não estou tento exito.

Estou convicto que o problema não é com a dll pois até o download do ACBr.MF vai bem.

Conversei com suporte da Sweda e eles me passaram este exemplo em delphi que funciona perfeitamente 

http://www.sweda.com.br/v2011/br/suporte_connect.asp.

 

A principal diferença na chamada da função é que no exemplo da sweda é passado o .BIM para a dll e no ACBR é passado o arquivo .MF (Não sei se é a mesma coisa).

 

A pergunta é. Todo mundo consegue gerar CAT52 da forma que esta hoje?

 

Grato.

[Daniel Simoes]

Se tiver alguma proposta de correção para os fontes é só anexar a Unit no post...

 

Por favor leia a observação nos fontes:
 

  { ATENÇÃO !!  Para geração de arquivos programas de cidadania, como Nota
    Fiscal Paulista, Nota Alogoana, etc.. se o seu ECF é MFD (termico), utilize
    o método  ** PafMF_MFD_Cotepe1704 **...
    O Layout de arquivo CAT52 foi criado pelo governo de SP, para ser utilizado
    somente nas seguintes situações:
    - ECF sem MFD (as antigas matriciais)
    - Geração do arquivo com base nas informações do Banco de Dados e não da MFD
    }    

 

 

[Riquena]

Daniel Boa tarde. Obrigado pela atenção.

 

Tentei gerar o PafMF_MFD_Cotepe1704 mas estou com erro também.

Uma pergunta: A função da dll 'xECF_ReproduzirMemoriaFiscalMFD' espera o path do .BIN porque que esta sem passado em branco na ACBrECFSwedaSTX?

[Daniel Simoes]

Verifique o manual da DLL... "connectc.chm"

 

Se não me engano, quando o arquivo é vazio ele mesmo faz o Download....

[Riquena]

Daniel encontrei.

Foi meio falta de atenção, mas agora percebi que o motivo esta sendo passado fixo na classe acbrecf 

Self.ArquivoMFD_DLL(DataInicial, DataFinal, PathArquivo, [docTodos], finMF); ====> finMF 

 

Deveria ser finNFp? Como passar este parâmetro?

 

Grato.

[Daniel Simoes]

Se você modificar nesse ponto, pode quebrar o código de todas as classes de ECF...

 

Você pode chamar: ACBrECF.ArquivoMFD_DLL diretamente, com os parâmetros que achar necessário...

[Luiz Fernando]

Boa tarde, estava testando o CAT 52 e me deparei com um problema nessa parte do fonte.

    repeat
      Dia := FormatDateTime('dd/mm/yyyy', DataInicial);

      Resp := xECF_GeraRegistrosCAT52MFD( FileMF, Dia ) ;
      if (Resp <> 1) then
      raise EACBrECFERRO.Create( ACBrStr( 'Erro ao executar ECF_DownloadMF.'+sLineBreak+
                                 DescricaoErroDLL(Resp) + sLineBreak +
                                 'Para a data de: "' + Dia + '"' ));

      // próximo dia
      DataArquivo := IncDay( DataArquivo, 1 );

    until DataArquivo > DataFinal;
 

Se observar a linha "Dia := FormatDateTime('dd/mm/yyyy', DataInicial);" , sempre esta pegando a data inicial, não esta utilizando a variável "DataArquivo" para extrair os dados.

Em anexo tem o arquivo com a correção proposta para ser analisada, no caso foi somente trocado o a variável para "DataArquivo".

ACBrECFSwedaSTX.pas

[Daniel Simoes]

Obrigado pela correção... já está no SVN