Daniel Simoes

Olá para todos... Após estar mais de 2 meses trabalhando no Trunk2... Chegou a hora de abandonar o suporte ao Trunk... Essa semana, é a última que ainda envio correções para o "Trunk" Deixo essa decisão a ser tomada individualmente para cada um dos "commiters"... Ou seja, pode ser que outros commiter ainda esteja efetuando correções para o "Trunk" Motivos para eu deixar de fazer o Merge de minhas correções no "Trunk" Estou usando o "Trunk2" a mais de 2 meses Está cada vez mais difícil efetuar um "merge" entre as versões, sem quebrar ou esquecer de algo Estou gastando muito tempo para efetuar Merges, (tempo que poderia ser aplicados em melhorias dos componentes no trunk2) Apenas em casos de extrema necessidade, efetuarei correções no "trunk" Nesse caso, quando receber relatório de erros... Minha primeira pergunta será: O problema ocorre no "trunk2" ? Se na tentativa de reproduzir o erro... eu detectar que o problema não ocorre nos fontes do "trunk2", então resolvido está... Para reportar problemas no Trunk2, use esse fórum específico: http://www.projetoacbr.com.br/forum/forum/55-trunk2/ Para saber mais sobre o Trunk2, leia esse tópico: http://www.projetoacbr.com.br/forum/topic/22410-bem-vindo-ao-trunk2/

O Regys conseguiu validar as correções no "Trunk2"... já fiz o merge para o "trunk" e enviei para o SVN...

A resposta da Daruma FS800i, quando zerada, sempre vem vazia, Ex: Resposta: SEQ:9 CMD:26 EXT:0 CAT:0 RET:[SOH][NUL][NUL]@ TBR:3 BRS:"4||" CHK:147 o correto seria: Resposta: SEQ:9 CMD:26 EXT:0 CAT:0 RET:[SOH][NUL][NUL]@ TBR:3 BRS:"4|000|" CHK:147 Apliquei um possível workaround... por favor teste com a Unit em anexo, deve corrigir os problemas reportados...(essa Unit é para o trunk2, se necessário faça o Merge para o trunk) ACBrECFEscECF.pas

Analise o LOG... Veja se há alguma configuração a ser feita no TMVirtualPort Aqui não leva esse tempo... Mas no geral o ECF 09 é bem mais lento que o do convênio 85

Ivan, A migração para o trunk2 é aconselhável... Eu deixarei de commitar no "trunk" em breve... Porém faça isso com calma e use uma V.M... Faça seus testes, o "trunk2" está estável, (a não ser para NFSe e GNRE)... E você notará uma grande aumento de velocidade na comunicação de NFe e derivados

Você consegue instalar a impressora como uma Impressora normal do Windows ? Se SIM, você pode seguir as dicas desse Post:

Já passou da hora do Delphi ter uma suite de componentes nativos para Criptografia e acesso a certificados digitais... Talvez esse componente (pago) faça algo do genero: https://www.eldos.com/sbb/

Não tive tempo de analisar

Desculpe.... mas eu não uso Delphi... não estou a par...

Já está no SVN

Italo, Eu aconselho deixarmos a NFSe para o final... assim será um impedimento apenas para quem realmente usa ela... e eu acho que terei tempo para te ajudar

Veja esse post: http://www.projetoacbr.com.br/forum/topic/22540-erro-de-validação-do-conteúdo/

Algum problema com o Editor do Fórum ???

O Help não está no pacote de instalação ? Há uma versão Web nesse endereço: http://acbr.sourceforge.net/ACBrMonitor/ACBrMonitor.html Veja ainda, os links que passei no post anterior...

configure o modelo como "ppEscBematech"

Não sei se a correção proposta é correta... Isso impediria o programador de fazer algo como: ACBrECF1.IdentificaConsumidor( CPF, NOME, ENDERECO ); ACBrECF1.AbreNaoFiscal; compreendi o problema... vou pensar em algo... Experimente dessa maneira: procedure TACBrECFEscECF.AbreNaoFiscal(CPF_CNPJ: String; Nome: String; Endereco: String); begin if Trim(CPF_CNPJ) <> '' then Consumidor.AtribuiConsumidor(CPF_CNPJ,Nome,Endereco); EscECFComando.CMD := 16; EscECFComando.AddParamString(LeftStr(OnlyNumber(Consumidor.Documento),14)) ; EscECFComando.AddParamString(LeftStr(Consumidor.Nome,30)) ; EscECFComando.AddParamString(LeftStr(Consumidor.Endereco,79)) ; Consumidor.Zera; EnviaComando; RespostasComando.Clear; RespostasComando.AddField( 'COO', EscECFResposta.Params[0] ); RespostasComando.AddField( 'DataHora', EscECFResposta.Params[1] ); RespostasComando.AddField( 'VendaBruta', EscECFResposta.Params[2] ); RespostasComando.AddField( 'NumSerie', EscECFResposta.Params[3] ); fsEmPagamento := false ; SalvaRespostasMemoria(False); end;

Veja no LOG o que pode estar ocorrendo...

é Importante gerar apenas as TAGs da A.C. Isso pode ser obtido com: ACBrSAT1.CFe.GerarXML( True ); // True = Gera apenas as TAGs da aplicação

não notei nenhum erro em: LerCampo(tcDatHor, 'dhEmi'); Por favor anexe o seu TXT

Ocorre o mesmo com o Lazarus... parece ser algo na DLL do fisco... mas em modo execução (sem DEBUG) o problema não ocorre... Aqui apenas mando continuar (F9)..

Humm... acho que não há nenhum componente no ACBr que faça exatamente essa tarefa... O ACBrEAD computa assinaturas usando o OpenSSL... A nova classe ACBrDFeSSL (do trunk2), é capaz de assinar digitalmente documentos ficais usando a XMLSec(openssl) ou CAPICOM Talvez lendo os fontes dessas classes seja possível implementar algo... Por linha de comando... se o seu certificado for A1, você pode usar o OpenSSL Veja esse site: http://www.madboa.com/geek/openssl/

Esse grande código em Base64 é o XML... Apliquei as seguintes modificações no SVN... Notei porém, que no emulador podemos recuperar a resposta da sessão anterior apenas uma vez... (aparentemente é um Bug do emulador)

Você pode configurar as notificações no seu Painel de controle Analisei sua modificação... mas acho que ela não está correta... if ((EstadoECF <> 'L') and (StrToTime(FormatDateTime('HH:MM:SS', Date)) > StrToTime('02:00:00'))) then raise EACBrTEFDECF.Create( ACBrStr(CACBrTEFD_Erro_ECFNaoLivre) ) ; Dessa maneira... se houver um erro na impressão... entre 00:00:01 e 02:00:00 ele não exibirá o Erro... Não creio que precisamos dessa modificação... Veja... após as 2:00hs, se não houver Redução Z no ECF, o estado dele será "estRequerZ" (o que a sua aplicação deve responder como "O") e o IF original irá disparar o erro: if EstadoECF <> 'L' then raise EACBrTEFDECF.Create( ACBrStr(CACBrTEFD_Erro_ECFNaoLivre) ) ; Talvez você não esteja respondendo corretamente ao envento OnInfoECF

De mais informações... O que você está tentando fazer ? Quais são os passos para reprodução do problema usando o Demo do ACBr ? Quando o erro ocorre ? Trunk2 ?