ACBRECF e CAT52

[dw2ti]

Boa tarde caros colegas!

Implementei o AcbrECF em meu projeto, porem não sei como gerar o CAT52 - Arquivo para o SEFAZ da Nota Fiscal Paulista, vi que existe alguns comandos tipo "Efetuar a geração do arquivo" e "Gerar o arquivo no formato do ato Cotepe 17/04", mas nenhum deles gera o arquivo CAT52, atualmente sou Partner da Bematech e utilizo a DLL para geração do arquivo ou mesmo quando a impressora realiza a Redução Z gera o CAT52 automatico.

Como proceder.

Abraço

Wladimir Masson

[Daniel Simoes]

A CAT52 para ECFs com MFD é obrigatoriamente o ATO COTEPE 17/04...

Você pode tentar:

ACBrECF1.PafMF_GerarCAT52(const DataInicial: TDateTime; const DataFinal: TDateTime; const DirArquivos: string);

[dw2ti]

Daniel,

Obrigado por responder prontamente, vou passar este comando e retorno.

Abrço

Wladimir Masson

[Marcelo Bill]

Boa noite

me desculpem me meter na conversa, mas já que o assunto é NFP, vamos lá...

uso XP,D7,MC,Bematech

Porta física Com1, 9600, Termica MFD 2100 THFI

Impressora na mão.

Estou a meses tentando gerar a NPF através da Bematech e até agora nada de sucesso.

Essa noite, decidi pegar a impressora emprestada de um cliente para devolver amanhã cedo.

Já tentei de várias formas e o erro ao iniciar a função

ECF.PafMF_GerarCAT52GerarCat52(Data1,Data2,'local')

Erro: xBematech_FI_Download Cod 0. Erro de Comunicação

ECF.PafMF_GerarCAT52GerarCat52(Data1,Data2,'local+arquivo')

Erro: ECF não ativo (visto que já foi ativado no inicio do sistema e funcionando normalmente para outras funções)

Já coloquei as DLLs dentro da pasta do aplicativo

Já coloquei as DLLs no windows\system32

e o erro permanece a todo esse tempo.

Lembrando que meus clientes a maioria usa Daruma e com a Daruma eu já fiz funcionar perfeitamente

somente depois que modifiquei a velocidade de 9600 para 115200 (USB ou SERIAL) pois se mantenho

9600 ocorre o mesmo erro.

No entanto, na bematech, não tenho como mudar a velocidade da mesma maneira que fiz com a Daruma

através da inicialização pressionando o botão AVANÇO dependendo do modelo.

Se alguem tiver uma dica eu agradeço.

Eis o codigo abaixo pelo qual eu fiz funcionar a Daruma.

####################

  vOrigem:=LerIni('ECF','NFP');

  vDestino:=LerIni('ECF','NFP');

  vDias:=DaysBetween(Data1.DateTime,Data2.DateTime);

  pb.Visible:=True;

  pb.Max:=vDias;

  pb.Position:=0;

  For i:=0 to vDias do begin

    Try

      Screen.Cursor:=crHourGlass;

      dm00.ECF.MsgPoucoPapel:=-1;

      pb.Position:=pb.Position+1;

      vDataProcesso:=IncDay(Data1.DateTime,i);

      Barra.Panels[0].Text:='Aguarde...Gerando arquivos do dia '+FormatDateTime('dd/mm/yyyy',vDataProcesso);

      repaint;

      vExtensao:=RetExtensaoNFP(vDataProcesso);

      vNomeArquivo:=idSerial+Serial+'.'+vExtensao;

      dm00.ECF.PafMF_GerarCAT52(vDataProcesso,vDataProcesso,vDestino+vNomeArquivo);

      Screen.Cursor:=crDefault;

    except

      on e:exception do begin

        Screen.Cursor:=crDefault;

        Barra.Panels[0].Text:='';

        if Pos('ATO_NFPTDM_DATA.TXT',e.Message)=0 then begin

          Dedoduro('ERRONFP',e.Message,DM.LoginFANTASIA.AsString);

          mBox(e.Message,'E',[mbok]);

        end;

      End;

    end;

  end;

########################

[Daniel Simoes]

Não creio que o problema seja a velocidade da porta... embora aumentar a velocidade seja ótimo pois reduz muito o tempo de captura...

Primeiro vamos ter certeza de que a DLL está instalada corretamente... Para isso, recorrendo ao site e suporte do Fabricante, baixe as DLLs mais novas, siga as instruções de instalação do fabricante... Baixe no site do fabricante o "Exemplo em Delphi", e tente rodar o método que captura a CAT52 deste Programa exemplo... se nem assim funcionar... é necessário contactar o suporte do fabricante...

- A DLL da Bematech depende de várias outras DLLs.. no meu DJPDV eu mantenho na mesma pasta do meu .EXE os arquivos:

BemaFI32.dll

BemaMFD.dll

BemaMFD2.dll

sign_bema.dll

BemaMFD2_MP4000THFI.dll

- A DLL pode não conseguir salvar arquivos nas pastas do sistema ou Raiz (certifique-se de que o Path para o arquivo é válido e todos podem gravar nele)

- No Windows 64 o diretório de instalação para DLLs 32 bits é o: c:\Windows\SysWOW64

[dw2ti]

Caros, boa noite!

Ainda não tive tempo de escrever o código no meu projeto, porém quando utilizo as DLL da Bematech não tive problemas, apenas declarei no sistema e funcionou sem maiores problemas, inclusive criei um programa que roda como serviço do Windows e que fica monitorando a pasta onde e criado o Cat52, e envia automaticamente ao SEFAZ, basta configurar com os dados do contabilista e do usuário conforme solicitado no webservice, uma sugestão seria implementar ao projeto Acbr.

Abraço aos colegas