Geração de Arquivo LMFC Ato Cotep 17/04

[dorivansousa]

estava com a versao da dll da bematech 6.1.0.0 (que acompanha o acbr) e quando gerava o arquivo LMFC Ato Cotep 17/04, gerava o arquivo normal so que quando validava no eECFc ocorria um erro na primeira linha campo 10 (Número Seqüencial do ECF) abri o arquivo e estava vazio da posicao 96 ate 99. nao constava o numero do ecf.

com isso atualizei a dll pra versao 6.1.1.1 pra tentar resolver o problema, so que agora o sistema diz que nao consegue gerar o arquivo, no historico da versao da dll

            *** versão 6.1.1.0 ***

...

. Atualização da nomenclatura do arquivo gerados pela função Bematech_FI_ArquivoMFD.

...

tem essa linha ai e o que acontece agora quando tento gerar a LMFC e o Arquivo MFD é que ele gera um arquivo no diretorio da aplicacao, mas, com o nao com o nome que passo pra ser gerado e apresenta o erro que o arquivo nao foi gerado no sistema... ele o arquivo nesse padrao de nome MFBE050875600000028378_20121021_152712.txt validei o arquivo no cECFc e passou sem erros.

[Daniel Simoes]

Vou baixar as novas DLLs e ajustar o ACBrECFBematech.pas

[EMBarbosa]

Tópico repetido?

http://www.djsystem.com.br/acbr/forum/viewtopic.php?f=10&t=7763

[dorivansousa]

ja exclui o outro

[Daniel Simoes]

Acabei de enviar uma correção para o SVN...

Ela obrigará a atualização da DLL da Bematech, pois torna o método incompatível com a versão antiga

[Daniel Simoes]

Tópico movido para área pública, pois a mudança pode afetar todos usuários...

[dorivansousa]

atualizei primeiro no delphi 7 pra testar e funcionou normal, testei no demo do acbr.

depois fui atualizar no delphi 2010 e ta apresentando essa mensagem de erro:

[DCC Error] ACBrECFBematech.pas(3801): E2033 Types of actual and formal var parameters must be identical

procedure TACBrECFBematech.ArquivoMFD_DLL;

nesta linha FinalidadeToTipoPrefixo( Finalidade, Tipo, Prefixo );

[Régys Silveira]

Acabei de efetuar o acerto, atualize novamente seus fontes e teste.

[dorivansousa]

a atualizacao funcionou. obrigado.

aproveitando o topico, tem uma dica ai de como fazer uma mensagem de aguarde no acbrecf nesses processos demorando, eu pensei em algo como faz na nfe... ate tentei fazer no aguardando resposta mas nao funcionou como eu gostaria,a mensagem ficou so um tempo e fechou, passou um tempo gerando o arquivo apareceu e fechou denovo.

[Daniel Simoes]

teria que ser um Panel ou Form, seguido Application.ProcessMessages, e você desliga-lo no final da chamada do método...

quando o controle passa para DLL, não temos mais como interagir

[Paulinho]

Pessoal, boa tarde, venho pedir ajuda para a geração deste arquivo, pois estou com o mesmo problema que o citado acima:

Estou passando um nome de arquivo e o sistema esta gerando o arquivo com outro nome ai apresenta erro que o arquivo nao foi gerado no sistema... o arquivo é gerado nesse padrao de nome MFBE050875600000028378_20121021_152712.txt

sendo que ao debugar no sistema aparece outro. Isso esta acontecendo no exemplo do ACBrECFTest, quando é gerado o arquivo com a data de 1 mes fechado. ex: 01/10/2012 a 31/10/2012.

As dlls estão todas atualizadas e dentro da pasta do diretorio do sistema.

Alguém poderia dar uma ajudinha quanto a isto?

Obrigado

[Daniel Simoes]

Cave um pouco mais... Open Source é mais do que apenas pedir ajuda... é importante ajudar também...

Acompanhe o processo com o Debug... Que nome de arquivo o ACBrECFBematech.pas está procurando, e qual nome o arquivo está sendo gerado ?

Vá com o Debug passo a passo e analise as variáveis, acompanhe até onde o fluxo é desviado para o exception...

[Paulinho]

Ola Daniel, não quis colocar esses dados aqui pois achei que fosse muita coisa, mas fiz e sempre faço este processo de acompanhamento do debug. Como sou iniciante com o ACBr e quando aparece tais dúvidas tento tirar aqui com vocês do fórum.

Neste caso ele da o erro dentro ACBrECF na procedure TACBrECF.PafMF_LMFC_Cotepe1704(const DataInicial, DataFinal: TDateTime; const PathArquivo: String);

Na ultima linha, Self.AssinaArquivoComEAD(PathArquivo).

Pois dentro do ACBrECFBematech, mais especifico nesta linha FileMask := FilePath + LeftStr(Trim(NumSerie),15) + '*_'+

OnlyNumber(DiaIni)+'_'+OnlyNumber(DiaFim)+'.TXT' é passado um nome de arquivo que sera criado como: 'C:\UniComercial\FrenteCaixa\PAF\BE0911101000112*_01102012_31102012.TXT'.

Mas após ele passar por esta linha

Resp := xBematech_FI_ArquivoMFD( '', DiaIni, DiaFim, 'D', Prop, Tipo, cChavePublica, cChavePrivada, 1 ) ,

é gerado o arquivo .TXT com o nome: MFBE091110100011286891_20121116_133713.txt

ai ele não consegue renomear e nem mesmo assinar, sendo que eu digitar um periodo 01/10/2012 a 01/10/2012 faz o mesmo fluxo, gera o arquivo com o nome correto e não dá erro. Como não entendi o porque, vim pedir ajuda a vocês.

[Daniel Simoes]

Acho que seus fontes estão desatualizados.... O fonte atual está como:

  FileMask := FilePath + Prefixo + Trim(NumSerie) + '_' +

              FormatDateTime('yyyymmdd',Now ) + '_*.TXT';  [/code]


No ACBrSerial-Change-Log.txt a mudança é explicada...

Sempre que for relatar algo, por favor verifique antes se os fontes atuais do SVN já não foram corrigidos...

[Paulinho]

Daniel, obrigado pela informação.

Percebo que meu pc deve estar com problema, pois ontem atualizei a pasta do ACBr, e hoje ja procurei este arquivo log.txt que você citou dentor da pasta e não encontrei. Fiz uma nova instalação do ACBr do zero e encontrei o arquivo do log.txt com a explicação das mudanças.

Agradeço novamente.

[sesistemas]

Estou tendo problemas para gera este arquivo com uma impressora Bematech MP-4000 TH FI

o erro é este:

Erro na execução de xbematech_fi_arquivomfd. Arquivo "d:\se\lfmc1704.txt" nao gerado

Estou usando a BEMAFI32.dll versão 6.1.0.8

log da impressora:

-- 11:28:27:844 ArquivoMFD_DLL( 10 , 20 , D:\se\LFMC1704.TXT )

TX -> [sTX][WAK][NUL][FS][bS]000010000020R[185][sTX]

11:28:34:154 RX <- [NUL][NUL][NUL][NUL] S.E. SISTEMAS LTDA[LF]R:PROF. ISIS MARIA. P.,410A - SL:01- BELA VISTA[LF] CEP:35570-000 - FORMIGA - MG[LF]CNPJ:03.341.645/0001-86 [LF]IE:0010987620070 [LF]16/11/2012 10:56:12 COO:000697[LF] LEITURA MEM[224]RIA FISCAL [LF] REDU[128][199]O: 0010 a 0020[LF]Contador Geral de Opera[135][198]o N[198]o-Fiscal: 000066[LF]Contador de Redu[135][228]es Z: 0063[LF]Contador de Rein[161]cio de Opera[135][198]o: 001[LF]Contador de Fita-detalhe: 000000[LF] REIN[214]CIO OPERA[128][199]O [LF]CRO DATA HORA[LF]001# 12/04/2012 16:38:12 [LF] IMPRESS[199]O FITA DETALHE [LF]CFD DATA HORA COOi COOf[LF]CNPJ:[LF] USU[181]RIOS [LF]Usu[160]rio:0001 CRO:001 12/04/2012 16:38:12 [LF]CNPJ: 03.341.645/0001-86 [LF]IE: 0010987620070 [LF]IM: [LF]GT: 45.628,58[LF] REDU[128][228]ES DI[181]RIAS [LF] Usu[160]rio:0001[LF]CRZ CRO COO DATA HORA[LF] VENDA BRUTA DI[181]RIA (R $)[LF]DT=desconto ICMS DS=desconto ISSQN[LF]AT=acr[130]scimo ICMS AS=acr[130]scimo ISSQN[LF]CT=canc.ICMS CS=canc. ISSQN[LF]ON=opera[135][198]o n[198]o-fiscal[LF]0020 001 000209 02/06/2012 09:15:30 [LF] R $ 29,00[LF]F1=29,00 [LF][LF]Total do m[136]s 06 de 2012[LF]Venda Bruta (R $) 29,00[LF]F1=29,00 [LF]0019 001 000207 28/05/2012 10:05:14 [LF] R $ 247,90[LF]DT=3,56 AT=3,60 CT=208,50 F1=34,64 N1=1,20 [LF]0018 001 000202 25/05/2012 16:28:42 [LF] R $ 1.730,57[LF]DT=17,00 AT=5,50 CT=1004,30 03T18,00%=521,16 F1=174,07 N1=14,04 [LF]0017 001 000189 24/05/2012 09:37:17 [LF] R $ 269,70[LF]F1=268,70 N1=1,00 [LF]0016 001 000181 24/05/2012 09:32:46 [LF] R $ 0,00[LF][LF]0015 001 000179 23/05/2012 15:29:25 [LF] R $ 261,65[LF]DT=7,80 CT=109,03 F1=144,82 [LF]0014 001 000172 22/05/2012 08:36:34 [LF] R $ 240,00[LF]F1=200,00 I1=10,00 N1=30,00 [LF]0013 001 000163 18/05/2012 08:11:47 [LF] R $ 76,81[LF]F1=76,81 [LF]0012 001 000156 15/05/2012 16:26:55 [LF] R $ 1.857,50[LF]DT=25,00 CT=728,00 01T07,00%=176,96 F1=927,54 [LF]0011 001 000104 10/05/2012 14:25:09 [LF] R $ 752,71[LF]CT=447,73 F1=203,00 I1=50,75 N1=51,23 [LF]0010 001 000100 09/05/2012 14:19:52 [LF] R $ 101,50[LF]F1=101,50 [LF][LF]Total do m[136]s 05 de 2012[LF]Venda Bruta (R $) 5.538,34[LF]DT=53,36 AT=9,10 CT=2497,56 T07,00%=176,96 T18,00%=521,16 F1=2131,08 I1=60,75 N1=97,47 [LF][LF]Total do per[161]odo:[LF]Venda Bruta (R $) 5.567,34[LF]DT=53,36 AT=9,10 CT=2497,56 T07,00%=176,96 T18,00%=521,16 F1=2160,08 I1=60,75 N1=97,47 [LF][LF]N[163]mero de Redu[135][228]es Restantes: 3285[LF] DADOS GERAIS [LF] SOFTWARE B[181]SICO [LF]01.00.02 09/02/2012 09:49:56V[LF]MOEDA: R 12/04/2012 16:38:11 [LF]QUANTIDADE: 03 12/04/2012 16:38:12 [LF]VALOR UNIT[181]RIO: 03 12/04/2012 16:38:12 [LF]MFD:[LF]392204112100121874 [LF][LF]CODIFICA[128][199]O GT[LF]a partir de 12/04/2012 16:38:11 [LF]0=Q, 1=W, 2=E, 3=R, 4=T, 5=Y, 6=U, 7=I, 8=O, 9=P[LF]7HJCDJNR MJSN82HR NT&ZDRWA 7HJ64CLI HFRF327LMITNBEMATECH MP-4000 TH FI ECF-IF[LF]VERS[199]O:01.00.02 ECF:001 LJ:0001[LF]QQQQQQQQQQQTYUEOYO 16/11/2012 10:56:17 [LF]FAB:BE091210100011295418 [LF][LF][LF][LF][LF][LF][ETX]

CRZ Inicial: 10 - COO: 100

CRZ Final: 20 - COO: 209

-- 11:28:34:163

TX -> [sTX][ENQ][NUL][FS]#[11]J[NUL]

11:28:34:291 RX <- [NUL][sOH][NUL][NUL][NUL][NUL]

-- 11:28:34:296

TX -> [sTX][ENQ][NUL][FS]#(g[NUL]

11:28:34:445 RX <- BE091210100011295418[NUL][NUL][NUL][NUL]

--------------------------------------------------------------------------------

ATIVAR - 16/11/12 11:29:50:993 - Modelo: Bematech - Porta: COM1 - TimeOut: 3

Device: BAUD=9600 DATA=8 PARITY=N STOP=1 HANDSHAKE=RTS/CTS HARDFLOW MAXBANDWIDTH=0

--------------------------------------------------------------------------------

-- 11:29:50:999

TX -> [sTX][4][NUL][FS][19]/[NUL]

11:29:51:125 RX <- [NUL][NUL][NUL][NUL]

-- 11:29:51:131

TX -> [sTX][ENQ][NUL][FS]#)h[NUL]

11:29:51:260 RX <- [sOH][NUL][sTX][NUL][NUL][NUL][NUL]

-- 11:29:51:266

TX -> [sTX][ENQ][NUL][FS]#<{[NUL]

11:29:51:441 RX <- BEMATECH MP-4000 TH FI ECF-IF [NUL][NUL][NUL][NUL]

-- 11:29:51:445

TX -> [sTX][ENQ][NUL][FS]#(g[NUL]

11:29:51:596 RX <- BE091210100011295418[NUL][NUL][NUL][NUL]

[Daniel Simoes]

Provavelmente seus fontes do ACBr estão desatualizados...

Sua DLL tb está desatualizada... mesmo no Trunk do ACBrECF a versão é 6.1.1.1