EMBarbosa

O componente ACBrTEFD tem todas as suas propriedades necessárias de configuração pulicadas ,(quer dizer, aparecem no Object Inspector), para que você possa alterar no momento de desenvolvimento ou no código. Então você mesmo pode verificar e alterar as configurações. Mas as configurações dos simuladores/gerenciador padrão/etc... devem ser feitas de acordo com a certificadora.

A questão é: Quem é o outro processo?

Tive a oportunidade de pedir alguém para poder gerar para mim o teste de ativar o ECF e depois emitir uma Leitura X. A versão do ACBr é 7026 sem modificações. Os arquivos de log estão abaixo com as respectivas situações. 1) Emulador da MP-2100 TH FI usando o com0com: -------------------------------------------------------------------------------- ATIVAR - 18/06/14 16:13:48:970 - Modelo: Bematech - Porta: COM5 - TimeOut: 17 Device: BAUD=9600 DATA=8 PARITY=N STOP=1 HANDSHAKE=RTS/CTS HARDFLOW MAXBANDWIDTH=0 -------------------------------------------------------------------------------- -- 16:13:48:972 Estado TX -> [sTX][4][NUL][FS][19]/[NUL] 16:13:49:040 RX <- ACK = 6 Falha: 0 16:13:49:242 RX <- [NUL][NUL][NUL][NUL] -- 16:13:49:242 TX -> [sTX][ENQ][NUL][FS]#)h[NUL] 16:13:49:341 RX <- ACK = 6 Falha: 0 16:13:49:542 RX <- [sOH][NUL][sOH][NUL][NUL][NUL][NUL] -- 16:13:49:543 TX -> [sTX][ENQ][NUL][FS]#<{[NUL] 16:13:49:643 RX <- ACK = 6 Falha: 0 16:13:49:844 RX <- BEMATECH MP-2100 TH FI ECF-IF [NUL][NUL][NUL][NUL] -- 16:13:49:845 TX -> [sTX][ENQ][NUL][FS]#[11]J[NUL] 16:13:49:945 RX <- ACK = 6 Falha: 0 16:13:50:146 RX <- [NUL][sOH][NUL][NUL][NUL][NUL] -- 16:13:50:147 TX -> [sTX][ENQ][NUL][FS]#(g[NUL] 16:13:50:247 RX <- ACK = 6 Falha: 0 16:13:50:448 RX <- EMULADOR [NUL][NUL][NUL][NUL] -- 16:13:50:449 Estado TX -> [sTX][ENQ][NUL][FS]#[WAK]P[NUL] 16:13:50:548 RX <- ACK = 6 Falha: 0 16:13:50:750 RX <- [16][NUL][NUL][NUL][NUL] -- 16:13:50:750 TX -> [sTX][ENQ][NUL][FS]#A[128][NUL] 16:13:50:850 RX <- ACK = 6 Falha: 0 16:13:51:051 RX <- [NUL][NUL][NUL][NUL][NUL] -- 16:13:51:052 TX -> [sTX][ENQ][NUL][FS]#[ESC]Z[NUL] 16:13:51:152 RX <- ACK = 6 Falha: 0 16:13:51:353 RX <- [NUL][NUL][NUL][NUL][NUL][NUL][NUL] -- 16:13:51:358 Estado TX -> [sTX][ENQ][NUL][FS]#[WAK]P[NUL] 16:13:51:454 RX <- ACK = 6 Falha: 0 16:13:51:655 RX <- [16][NUL][NUL][NUL][NUL] -- 16:13:51:656 TX -> [sTX][ENQ][NUL][FS]#A[128][NUL] 16:13:51:755 RX <- ACK = 6 Falha: 0 16:13:51:957 RX <- [NUL][NUL][NUL][NUL][NUL] -- 16:13:51:958 TX -> [sTX][ENQ][NUL][FS]#[ESC]Z[NUL] 16:13:52:057 RX <- ACK = 6 Falha: 0 16:13:52:258 RX <- [NUL][NUL][NUL][NUL][NUL][NUL][NUL] -- 16:13:59:548 LeituraX TX -> [sTX][4][NUL][FS][ACK]"[NUL] 16:13:59:601 RX <- ACK = 6 Falha: 0 16:13:59:704 VerificaFimImpressao: Pedindo o Status (19) 16:13:59:802 VerificaFimImpressao: ACK = 6, OK... Aguardando ST1 e ST2 16:14:00:003 RX <- [NUL][NUL][NUL][NUL] -- 16:14:00:004 NumCupom TX -> [sTX][4][NUL][FS][30]:[NUL] 16:14:00:104 RX <- ACK = 6 Falha: 0 16:14:00:305 RX <- [NUL][sOH][135][NUL][NUL][NUL][NUL] -- 16:14:00:333 Estado TX -> [sTX][ENQ][NUL][FS]#[WAK]P[NUL] 16:14:00:406 RX <- ACK = 6 Falha: 0 16:14:00:607 RX <- [16][NUL][NUL][NUL][NUL] -- 16:14:00:607 TX -> [sTX][ENQ][NUL][FS]#A[128][NUL] 16:14:00:708 RX <- ACK = 6 Falha: 0 16:14:00:909 RX <- [NUL][NUL][NUL][NUL][NUL] -- 16:14:00:910 TX -> [sTX][ENQ][NUL][FS]#[ESC]Z[NUL] 16:14:01:009 RX <- ACK = 6 Falha: 0 16:14:01:210 RX <- [NUL][NUL][NUL][NUL][NUL][NUL][NUL] 2) ECF físico MP-4000 TH FI ligado na USB utilizando o driver Bematech (instalação para 64 bits): -------------------------------------------------------------------------------- ATIVAR - 18/06/14 16:18:11:838 - Modelo: Bematech - Porta: COM7 - TimeOut: 17 Device: BAUD=9600 DATA=8 PARITY=N STOP=1 HANDSHAKE=RTS/CTS HARDFLOW MAXBANDWIDTH=0 -------------------------------------------------------------------------------- -- 16:18:11:844 TX -> [sTX][4][NUL][FS][19]/[NUL] 16:18:12:060 RX <- ACK = 6 Falha: 0 16:18:12:162 RX <- [NUL][NUL][NUL][NUL] -- 16:18:12:163 TX -> [sTX][ENQ][NUL][FS]#)h[NUL] 16:18:12:351 RX <- ACK = 6 Falha: 0 16:18:12:453 RX <- [sOH][NUL][sTX][NUL][NUL][NUL][NUL] -- 16:18:12:454 TX -> [sTX][ENQ][NUL][FS]#<{[NUL] 16:18:12:621 RX <- ACK = 6 Falha: 0 16:18:12:814 RX <- BEMATECH MP-4000 TH FI ECF-IF [NUL][NUL][NUL][NUL] -- 16:18:12:815 TX -> [sTX][ENQ][NUL][FS]#[11]J[NUL] 16:18:12:958 RX <- ACK = 6 Falha: 0 16:18:13:060 RX <- [NUL][sOH][NUL][NUL][NUL][NUL] -- 16:18:13:061 TX -> [sTX][ENQ][NUL][FS]#(g[NUL] 16:18:13:247 RX <- ACK = 6 Falha: 0 16:18:13:348 RX <- BE09XXXXXXXXXXXXXXXX[NUL][NUL][NUL][NUL] -- 16:18:13:348 Estado TX -> [sTX][ENQ][NUL][FS]#[WAK]P[NUL] 16:18:13:481 RX <- ACK = 6 Falha: 0 16:18:13:585 RX <- [4][NUL][NUL][NUL][NUL] -- 16:18:13:586 TX -> [sTX][ENQ][NUL][FS]#A[128][NUL] 16:18:13:752 RX <- ACK = 6 Falha: 0 16:18:13:854 RX <- [NUL][NUL][NUL][NUL][NUL] -- 16:18:13:854 TX -> [sTX][ENQ][NUL][FS]#[ESC]Z[NUL] 16:18:13:983 RX <- ACK = 6 Falha: 0 16:18:14:085 RX <- [NUL][NUL][NUL][NUL][NUL][NUL][NUL] -- 16:18:14:098 Estado TX -> [sTX][ENQ][NUL][FS]#[WAK]P[NUL] 16:18:14:272 RX <- ACK = 6 Falha: 0 16:18:14:376 RX <- [4][NUL][NUL][NUL][NUL] -- 16:18:14:377 TX -> [sTX][ENQ][NUL][FS]#A[128][NUL] 16:18:14:563 RX <- ACK = 6 Falha: 0 16:18:14:665 RX <- [NUL][NUL][NUL][NUL][NUL] -- 16:18:14:665 TX -> [sTX][ENQ][NUL][FS]#[ESC]Z[NUL] 16:18:14:789 RX <- ACK = 6 Falha: 0 16:18:14:895 RX <- [NUL][NUL][NUL][NUL][NUL][NUL][NUL] -- 16:18:42:864 LeituraX TX -> [sTX][4][NUL][FS][ACK]"[NUL] 16:18:43:037 RX <- ACK = 6 Falha: 0 16:18:43:129 VerificaFimImpressao: Pedindo o Status (19) 16:18:43:467 VerificaFimImpressao: ACK = 0 - Falhas = 0 - Erro: ESynaSerError Communication error 9997: Timeout during operation 16:18:43:669 VerificaFimImpressao: Pedindo o Status (19) 16:18:43:793 VerificaFimImpressao: ACK = 6, OK... Aguardando ST1 e ST2 16:18:44:097 VerificaFimImpressao: ACK = 6 - Falhas = 0 - Erro: ESynaSerError Communication error 9997: Timeout during operation 16:18:44:300 VerificaFimImpressao: Pedindo o Status (19) 16:18:44:638 VerificaFimImpressao: ACK = 0 - Falhas = 0 - Erro: ESynaSerError Communication error 9997: Timeout during operation 16:18:44:839 VerificaFimImpressao: Pedindo o Status (19) 16:18:45:198 VerificaFimImpressao: ACK = 0 - Falhas = 0 - Erro: ESynaSerError Communication error 9997: Timeout during operation 16:18:45:399 VerificaFimImpressao: Pedindo o Status (19) 16:18:45:759 VerificaFimImpressao: ACK = 0 - Falhas = 0 - Erro: ESynaSerError Communication error 9997: Timeout during operation 16:18:45:960 VerificaFimImpressao: Pedindo o Status (19) 16:18:46:083 VerificaFimImpressao: ACK = 0 - Falhas = 0 - Erro: EACBrECFErro ACK <> 6 16:18:46:285 VerificaFimImpressao: Pedindo o Status (19) 16:18:46:469 VerificaFimImpressao: ACK = 6, OK... Aguardando ST1 e ST2 16:18:46:571 RX <- [NUL][NUL][NUL][NUL] -- 16:18:46:572 NumCupom TX -> [sTX][4][NUL][FS][30]:[NUL] 16:18:46:707 RX <- ACK = 6 Falha: 0 16:18:46:814 RX <- [NUL][16]R[NUL][NUL][NUL][NUL] -- 16:18:46:919 Estado TX -> [sTX][ENQ][NUL][FS]#[WAK]P[NUL] 16:18:47:084 RX <- ACK = 6 Falha: 0 16:18:47:188 RX <- [4][NUL][NUL][NUL][NUL] -- 16:18:47:188 TX -> [sTX][ENQ][NUL][FS]#A[128][NUL] 16:18:47:375 RX <- ACK = 6 Falha: 0 16:18:47:479 RX <- [NUL][NUL][NUL][NUL][NUL] -- 16:18:47:480 TX -> [sTX][ENQ][NUL][FS]#[ESC]Z[NUL] 16:18:47:615 RX <- ACK = 6 Falha: 0 16:18:47:721 RX <- [NUL][NUL][NUL][NUL][NUL][NUL][NUL] 3) ECF Físico MP-4000 TH FI ligado via CONVERSOR de porta Serial para USB. -------------------------------------------------------------------------------- ATIVAR - 18/06/14 16:33:59:039 - Modelo: Bematech - Porta: COM9 - TimeOut: 17 Device: BAUD=9600 DATA=8 PARITY=N STOP=1 HANDSHAKE=RTS/CTS HARDFLOW MAXBANDWIDTH=0 -------------------------------------------------------------------------------- -- 16:33:59:176 TX -> [sTX][4][NUL][FS][19]/[NUL] 16:33:59:194 RX <- ACK = 6 Falha: 0 16:33:59:300 RX <- [NUL][NUL][NUL][NUL] -- 16:33:59:301 TX -> [sTX][ENQ][NUL][FS]#)h[NUL] 16:33:59:315 RX <- ACK = 6 Falha: 0 16:33:59:424 RX <- [sOH][NUL][sTX][NUL][NUL][NUL][NUL] -- 16:33:59:425 TX -> [sTX][ENQ][NUL][FS]#<{[NUL] 16:33:59:437 RX <- ACK = 6 Falha: 0 16:33:59:595 RX <- BEMATECH MP-4000 TH FI ECF-IF [NUL][NUL][NUL][NUL] -- 16:33:59:596 TX -> [sTX][ENQ][NUL][FS]#[11]J[NUL] 16:33:59:608 RX <- ACK = 6 Falha: 0 16:33:59:718 RX <- [NUL][sOH][NUL][NUL][NUL][NUL] -- 16:33:59:719 TX -> [sTX][ENQ][NUL][FS]#(g[NUL] 16:33:59:731 RX <- ACK = 6 Falha: 0 16:33:59:863 RX <- BE09XXXXXXXXXXXXXXXX[NUL][NUL][NUL][NUL] -- 16:33:59:864 Estado TX -> [sTX][ENQ][NUL][FS]#[WAK]P[NUL] 16:33:59:875 RX <- ACK = 6 Falha: 0 16:33:59:984 RX <- [4][NUL][NUL][NUL][NUL] -- 16:33:59:985 TX -> [sTX][ENQ][NUL][FS]#A[128][NUL] 16:33:59:996 RX <- ACK = 6 Falha: 0 16:34:00:105 RX <- [NUL][NUL][NUL][NUL][NUL] -- 16:34:00:105 TX -> [sTX][ENQ][NUL][FS]#[ESC]Z[NUL] 16:34:00:117 RX <- ACK = 6 Falha: 0 16:34:00:229 RX <- [NUL][NUL][NUL][NUL][NUL][NUL][NUL] -- 16:34:00:235 Estado TX -> [sTX][ENQ][NUL][FS]#[WAK]P[NUL] 16:34:00:247 RX <- ACK = 6 Falha: 0 16:34:00:355 RX <- [4][NUL][NUL][NUL][NUL] -- 16:34:00:356 TX -> [sTX][ENQ][NUL][FS]#A[128][NUL] 16:34:00:367 RX <- ACK = 6 Falha: 0 16:34:00:476 RX <- [NUL][NUL][NUL][NUL][NUL] -- 16:34:00:477 TX -> [sTX][ENQ][NUL][FS]#[ESC]Z[NUL] 16:34:00:488 RX <- ACK = 6 Falha: 0 16:34:00:599 RX <- [NUL][NUL][NUL][NUL][NUL][NUL][NUL] -- 16:34:03:928 LeituraX TX -> [sTX][4][NUL][FS][ACK]"[NUL] 16:34:03:939 RX <- ACK = 6 Falha: 0 16:34:03:957 VerificaFimImpressao: Pedindo o Status (19) 16:34:04:460 VerificaFimImpressao: ACK = 6, OK... Aguardando ST1 e ST2 16:34:06:461 VerificaFimImpressao: ACK = 6 - Falhas = 0 - Erro: ESynaSerError Communication error 9997: Timeout during operation 16:34:07:141 VerificaFimImpressao: Pedindo o Status (19) 16:34:07:155 VerificaFimImpressao: ACK = 6, OK... Aguardando ST1 e ST2 16:34:07:260 RX <- [NUL][NUL][NUL][NUL] -- 16:34:07:260 NumCupom TX -> [sTX][4][NUL][FS][30]:[NUL] 16:34:07:270 RX <- ACK = 6 Falha: 0 16:34:07:381 RX <- [NUL][16]S[NUL][NUL][NUL][NUL] -- 16:34:07:467 Estado TX -> [sTX][ENQ][NUL][FS]#[WAK]P[NUL] 16:34:07:479 RX <- ACK = 6 Falha: 0 16:34:07:586 RX <- [4][NUL][NUL][NUL][NUL] -- 16:34:07:586 TX -> [sTX][ENQ][NUL][FS]#A[128][NUL] 16:34:07:598 RX <- ACK = 6 Falha: 0 16:34:07:708 RX <- [NUL][NUL][NUL][NUL][NUL] -- 16:34:07:708 TX -> [sTX][ENQ][NUL][FS]#[ESC]Z[NUL] 16:34:07:719 RX <- ACK = 6 Falha: 0 16:34:07:831 RX <- [NUL][NUL][NUL][NUL][NUL][NUL][NUL]

Favor fazer a limpeza conforme no segundo post deste tópico.

Você pode tentar utilizar algum profiler para medir. Um dos mais simples e gratuitos é o gpProfiler. Eu utilizei ele há um tempo para descobrir e melhorar a E me parece que fizeram alguns ajustes nele por esses dias. Deve estar ainda melhor. Outro que parece ser bom é o ASM Profiler. Mas ainda não o utilizei. Outro modelo de medição é por meio de sampling, e nesse caso há o programa SamplingProfller. Apenas recomendo: faça um backup dos seus códigos antes de utilizar caso você não tenha experiência em mexer com esses programas. . Em outros casos, quando você quer medir algo específico, você pode usar algum destes métodos descritos aqui EDIT: O XE5 não vem com o AQtime? Você pode utilizar ele também.

Dá pra ler. Está na última coluna da página, (lado direito da tela), debaixo do título "COORDENADORIA DA ADMINISTRAÇÃO TRIBUTÁRIA".

Acho que esse tópico está na área incorreta. Qual componente ACBr você está utilizando para fazer isso? Já que você pesquisou nos tópicos, seria bom você também mencionar o que você já tentou fazer e o porquê de não resolver.

Possibilidades: 1) Ainda há arquivos ACBr*.DCU ou ACBr*.bpl, PCN*.dcu ou PCN*.bpl no seu computador 2) Algum dos seus arquivos está com alguma alteração

Os componentes do ACBr não foram totalmente preparados ainda para trabalhar em 64 bits. Pode ser que dê problemas nos Mas esse erro está claro. Uma constante está sendo enviada para um método (procedure ou function) que está pedindo um parâmetro tipo var.

Parece que está ok. Obrigado Juliomar.

Me pareceu que no arquivo anexado não dá pra ver o ACBrECF listando as alíquotas e suas descrições...

Talvez possa ser a diferença da versão do Software Básico. Já verificou essa possibilidade?

Normalmente aconselhamos colocar na mesma pasta do Executável.

Conforme o post no site do SPED datado de hoje 16/06/2014: Fiquem atentos.

Este problema é devido a uma alteração feita pelo Juliomar na revisão 6977. Vou precisar verificar com ele o que foi que levou à alteração.

Como? Bem isso a legislação não diz. Mas ele deve ser guardado de maneira que você garanta a recuperação. Ou você pode sofrer a penalidade de receber multas e tributações pelo que você não tem como provar que vendeu ou não vendeu. No entanto, se depois de recuperar o arquivo (seja do campo BLOB ou outro lugar) você não conseguir reproduzir a assinatura digital, isso significa que o arquivo é inválido.

O caso do Pedro_Paulo foi resolvido conforme o

Veja: Aproveitando, crie um tópico novo para uma dúvida nova conforme as regras. Veja neste em especial a "2.2 - Permaneça no assunto".

O registro C114 é filho do C110. Você está criando os registros C110 antes? Não consegui reproduzir seu problema com o Demo do ACBrSPEDFiscal. Você fez alguma alteração no código do Demo para testar? Queira disponibilizar para que eu possa averiguar.

Vai ser necessário fazer uma limpeza no seu computador e reinstalar o ACBr. Siga os passos delineados

Você vai precisar usar o debug, usando o F7, e descobrir qual exatamente a linha do método RegistroC114New onde acontece esse problema.

Infelizmente, sem as exatas alterações que eu pedi e sem os logs eu não tenho como aprofundar mais nesse problema até que consiga um ECF físico e tempo para testar...

Bem, eu não tenho um ECF destes aqui para testar... Por favor, faça as alterações que eu sugeri, faça o build e anexe o log depois de cada alteração. Tenha certeza de que só as alterações que eu sugeri estão no código.

Olá EddieBr, Vou pedir para que você faça dois testes. Vou apontar onde você vai alterar no código e vamos ver o comportamento se melhora ok? Você deve fazer o seguinte. Faça uma alteração primeiro. Faça Build dos componentes. Faça o Build do ECFTeste. Faça o teste. Anexe o log. Faça a outra alteração. Faça Build dos componentes. Faça o Build do ECFTeste. Faça o teste. Anexe o log. Aqui vão: Arquivo ACBrECFClass.pas, método TACBrECFClass.DoLeResposta (por volta da linha 1851), aumente o timeout do fpDevice.LeString de 100 para 2000, conforme abaixo: Fim := True ; if not FimLeitura then begin Fim := False ; try fpRespostaComando := fpRespostaComando + { Le conteudo da porta } fpDevice.LeString(2000) ; // ALTERADO AQUI !!!!! // fpDevice.LeString(100) ; // ESTAVA ASSIM!!!!! Segunda e Terceira Alteração são no arquivo ACBrECFBematech.pas. Método TACBrECFBematech.VerificaFimImpressao, por volta da linha 1044. Veja abaixo: try GravaLog(' '+FormatDateTime('hh:nn:ss:zzz',now)+' VerificaFimImpressao: Pedindo o Status (19)' ) ; fpDevice.Serial.Purge ; // Limpa buffer de Entrada e Saida // fpDevice.EnviaString( Cmd ); // Envia comando // // espera ACK chegar na Porta por 1,5s // wACK := fpDevice.LeByte( 3000 ) ; //ALTERADO AQUI !!!! // wACK := fpDevice.LeByte( 1500 ) ; //ESTAVA ASSIM !!!! if wACK = 6 then // ECF Respondeu corretamente, portanto está trabalhando // begin GravaLog(' '+FormatDateTime('hh:nn:ss:zzz',now)+' VerificaFimImpressao: ACK = 6, OK... Aguardando ST1 e ST2' ) ; TempoLimite := IncSecond(now, TimeOut); fsFalhasFimImpressao := 0 ; // Aguarda ST1 e ST2 por mais 2 segundos // RetCmd := fpDevice.LeString( 4000, 2 ) ; // ALTERADO AQUI!!!!! // RetCmd := fpDevice.LeString( 2000, 2 ) ; // ESTAVA ASSIM !!!! Result := (Length( RetCmd ) >= 2) ; end else raise EACBrECFErro.Create( 'ACK <> 6' );

O que a está escrito na wikipédia é justamente o que eu escrevi ali acima. O documento que eu citei tem uma explicação mais profunda. A propósito, esse é um problema de qualquer linguagem. O que acontece é que algumas tem uma precisão maior, então pode ter passado despercebido. Claro, a forma como o compilador trata as variáveis e as constantes também pode influir. Mas sempre haverá o problema da imprecisão por se tentar representar um conjunto infinito de números num espaço limitado de memória ou seja um conjunto finito.