Mauro Asl

de qual dll da bematech em expecifico ?

Boa tarde.. Após realizar a atualização do ACBr, alguns clientes que utilizam bematech, começaram a reportar que estava gerando erro ao gerar Arq. MFD. Fui dar uma olhada na função e percebi que a formatação em vermelho estava com erro Extração por data: FileMask := FilePath + Prefixo + Trim(NumSerie) + '_' +FormatDateTime('yyyymmdd',Now ) + '_*.TXT'; reescrevi a seguinte linha e resolveu o problema: FileMask := FilePath + Trim(NumSerie) +'_' +FormatDateTime('ddmmyyyy', DataInicial)+'_'+FormatDateTime('ddmmyyyy', DataFinal)+'.TXT'; Extração por COO: FileMask := FilePath + Prefixo + Trim(NumSerie) + '_' +FormatDateTime('yyyymmdd',Now ) + '_*.TXT'; FileMask := FilePath + Trim(NumSerie) + '_' +COOIni+'_'+COOFim+'.TXT'; Obs: Caso já tenham corrigido, desconsiderar, Att: Mauro Asl

Segue o anexo... ACBrECFFiscNET.rar

Gente, consegui resolver o problema !! Estou postando os trechos código da Class ACBrECFFiscNET alterado, para que o(s) desenvolvedores do projeto possam analisar as mudanças, ou possa optar por outras melhorias e atualizar nos fontes do projeto. Lembrando, que eu não testei essas mudanças na DataRegis, somente na termoprinter. Troquei em alguns pontos o PAnsiChar por AnsiString e Resolveu. Gerou o AtoCotep perfeitamente. Trecho do código : //dataregis | termoprinter xGera_PAF : Function ( ComPort : AnsiString; Modelo : AnsiString; RegFileName : AnsiString; COOInicial : AnsiString; COOFinal : AnsiString) : integer; stdcall; //xGera_PAF : Function ( ComPort : PAnsiChar; // Modelo : PAnsiChar; // RegFileName : PAnsiChar; // COOInicial : PAnsiChar; // COOFinal : PAnsiChar) : integer; stdcall; xGera_AtoCotepe1704_Periodo_MFD : Function ( ComPort : AnsiString; Modelo : AnsiString; RegFileName : AnsiString; DataReducaoInicial : AnsiString; DataReducaoFinal : AnsiString) : integer; stdcall; //xGera_AtoCotepe1704_Periodo_MFD : Function ( ComPort : PAnsiChar; // Modelo : PAnsiChar; // RegFileName : PAnsiChar; // DataReducaoInicial : PAnsiChar; // DataReducaoFinal : PAnsiChar) : integer; stdcall; --------------------------------------------------------------------------------------------------- else if pos(fsMarcaECF, 'dataregis|termoprinter') > 0 then begin DiaIni := FormatDateTime('dd/mm/yyyy', DataInicial); DiaFim := FormatDateTime('dd/mm/yyyy', DataFinal); iRet := xGera_AtoCotepe1704_Periodo_MFD( PortaSerial, ModeloECF, NomeArquivo, DiaIni, DiaFim ); //iRet := xGera_AtoCotepe1704_Periodo_MFD( PAnsiChar( PortaSerial ), // PAnsiChar( ModeloECF ), // PAnsiChar( NomeArquivo ), // PAnsiChar( DiaIni ), // PAnsiChar( DiaFim ) ); if iRet <> 0 then raise Exception.Create( ACBrStr( 'Erro ao executar Gera_AtoCotepe1704_Periodo_MFD.'+sLineBreak+ 'Cod.: '+IntToStr(iRet) + ' - ' + GetErroAtoCotepe1704(iRet) )) ; -------------- else if pos(fsMarcaECF, 'dataregis|termoprinter') > 0 then begin //iRet := xGera_PAF( PAnsiChar( PortaSerial ) , // PAnsiChar( ModeloECF ), // PAnsiChar( NomeArquivo ), // PAnsiChar( CooIni ), // PAnsiChar( CooFim ) ); iRet := xGera_PAF( PortaSerial , ModeloECF, NomeArquivo, CooIni, CooFim ); if iRet <> 0 then raise Exception.Create( ACBrStr( 'Erro ao executar Gera_PAF.'+sLineBreak+ 'Cod.: '+IntToStr(iRet) + ' - ' + GetErroAtoCotepe1704(iRet) )) ; if not FileExists( NomeArquivo ) then raise Exception.Create( ACBrStr( 'Erro na execução de Gera_PAF.'+sLineBreak+ ': "'+NomeArquivo + '" não gerado' )) end if not FileExists( NomeArquivo ) then raise Exception.Create( ACBrStr( 'Erro na execução de Gera_AtoCotepe1704_Periodo_MFD.'+sLineBreak+ 'Arquivo: "'+NomeArquivo + '" não gerado' )) end ----------------------- OBS, eu não estou muito familiarizado com os fontes do projeto, aos poucos vamos contribuindo para melhorar cada vez mais... Importante: Fiz um contato com o suporte da Termoprinter, com Sr Vinicius, que ajudou e muito nos problemas. Outra coisa que fica aqui, para o pessoal não bater a cabeça, é que a extração do cotepe, sempre da falha com conversor usb-serial, pelo menos nos que testtei. Após corrigir o fonte acima, erros e mais erros de violação até, que resolvemos fazer o teste em uma serial.. Abraços;

Concordo com você jaime, visto que pagar R$ 500,00 por um mês, achei salgado (e pra pagar menos, é preciso pagar mais ), mas a idéia do suporte diferenciado sem dúvida é muito boa. A sua idéia de pagar para ter acesso apenas de ver, e pagar por perguntas realizadas, achei bacana, eu estaria disposto. Seria interessante uma discussão sobre isto. Como eu ja disse antes, eu aprovo a idéia, mas acredito que o djsystem (Daniel) poderia abrir um tópido para negociação, para encontrar um meio termo como você mesmo propôs. -- Boa tarde gente.... Porque, que os mentores do projeto, em vez de criar esse suporte dedicado, não pergunta aos milhares de usuários do fórum, quem poderia "colaborar" com uma quantia simbólica mensal de no mínimo R$ 50,00. com isso, as perguntas no fórum dos colaboradores seriam respondidas em até um dia e as demais na medida que um ou outro fosse lendo. No meu ver, esse tipo de arrecadação seria mais vantajosa. Quem não pagasse não teria os privilégios. Falando em nome da minha empresa, contribuiria mensalmente com R$ 100,00 isso para ver o projeto sempre aprimorando mais e mais. Abraços....

Respondendo a sua pergunta: Para os ECFs Daruma,Bematech,Elgin,Sweda e Termoprinter, são todas essas dll´s: DarumaFrameWork.dll, Leitura.dll, LeituraMFDBin.dll, BemaFI32.dll, BemaMFD.dll, BemaMFD2.dll, Elgin.DLL, lebin.dll, ATO17.dll, CONVECF.dll, swmfd.dll, DLLG2.dll, DLLG2_Gerador.dll, libeay32.dll. algumas dll´s depende de outra para o funcionamento, por isso coloquei todas que estou utilizando aqui,,, Reafirmando a minha pergunta, quem tiver uma solução, sou grato !!! Eu envio todas as dll´s sempre pa os meus clientes no instalador.

Bom dia Amigos,,,, Já faz uns 3 meses, que migrei para o projeto ACBr, para o uso com ECF´s, projeto esse que por sinal é maravilhoso !! Já realizei testes com Daruma, Bematech, Elgin e Termoprinter, todas que tenho na minha bancada. A última estou tendo um problema, ao chamar a função "TACBrECF.PafMF_MFD_Cotepe1704", sempre é devolvido as seguintes mensagens: DLL_GERADOR - INFORMA A DATAREGIS O SEGUINTE CÓDIGO :-9 "ERRO AO EXECUTAR Gera_Atocotepe1704_periodo_MFD. Cod: -9 modelo não suportado." Alguem já teve esse erro, como consigo resolver ? Já substitui versões de dll do sites do fabricantes (termoprinter da DataRegis) e nada ! Grato pelo ajuda !