Jump to content

dev botao

ACBRECF e CAT52


dw2ti
  • Este tópico foi criado há 4248 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

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

Wladimir Silveira Masson.

Fone: ( (0xx11) 2262-1285

Fax  : ( (0xx11) 2592-0266

 

Oi      ( (0xx11) 98346-8059

 

Nextel ( (0xx11) 7750-7514

                          ID: 100*954

 

e-mail: * [email protected]

Visite nosso site:, www.dw2ti.com.br

 

 

Link to comment
Share on other sites

  • Fundadores

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);

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link to comment
Share on other sites

Daniel,

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

Abrço

Wladimir Masson

Wladimir Silveira Masson.

Fone: ( (0xx11) 2262-1285

Fax  : ( (0xx11) 2592-0266

 

Oi      ( (0xx11) 98346-8059

 

Nextel ( (0xx11) 7750-7514

                          ID: 100*954

 

e-mail: * [email protected]

Visite nosso site:, www.dw2ti.com.br

 

 

Link to comment
Share on other sites

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;

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

Link to comment
Share on other sites

  • Fundadores

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

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link to comment
Share on other sites

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

Wladimir Silveira Masson.

Fone: ( (0xx11) 2262-1285

Fax  : ( (0xx11) 2592-0266

 

Oi      ( (0xx11) 98346-8059

 

Nextel ( (0xx11) 7750-7514

                          ID: 100*954

 

e-mail: * [email protected]

Visite nosso site:, www.dw2ti.com.br

 

 

Link to comment
Share on other sites

×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.

The popup will be closed in 10 seconds...