Daniel Simoes

Você precisa sinalizar corretamente retornando "O" para o ACBrTEFD no evento OnInfoECF...
 
Veja o que está escrito no conteúdo da aplicação Demo nesse evento:
 
 
procedure TForm1.ACBrTEFD1InfoECF(Operacao : TACBrTEFDInfoECF;    var RetornoECF : String ); var    ASubTotal: Double; begin    try       if not ACBrECF1.Ativo then          ACBrECF1.Ativar ;    except       { Para CliSiTEF ou V&SPague aplique o IF abaixo em sua aplicação, que         permite saber se o Cupom foi concluido mesmo com o ECF desligado }       if (not ACBrTEFD1.TEF.Inicializado) and   { Está na inicialização ? }          (Operacao = ineEstadoECF) and          { Quer Saber o estado do ECF ? (mas se chegou aqui é pq o ECF já está com problemas) }          (ACBrTEFD1.GPAtual in [gpCliSiTef,gpVeSPague]) then       begin          { Leia o último Documento Gravado no seu Banco de Dados, e verifique            se o Cupom já foi finalizado,ou se já foi aberto um CCD ou Gerencial...            Exemplo:            Documento.Le(0);            if (Documento.Finalizado) or (pos(Documento.Denominacao,'CC|RG') > 0) then               RetornoECF := 'R'            else               RetornoECF := 'O' ;          }          //RetornoECF := 'O';    // Executará CancelarTransacoesPendentes;          RetornoECF := 'R';    // Executará ConfirmarESolicitarImpressaoTransacoesPendentes;          exit ;       end ;       raise ;    end;    

 

Re-homologuei TEF discado e dedicado (SiTEF) na semana passada, e não pediram para modificar isso... Em todo caso a modificação não seria complicada... na linha 2443 de ACBrTEFDClass.pas

Não há evento para isso...
 
O ECF não imprimirá nada, a não ser que você comande... Portanto na sua aplicação você tem como saber o momento do primeiro documento

Instale o package ACBrSerial
 
Os componentes são completamente independentes, e residem em pastas diferentes... não haverá interferência
 
Não se esqueça de estudar detalhadamente o Demo ECFTeste.dpr

Acredito que estamos próximo agora... Tente essa nova versão..
 
 
for I := 0 to fpComprovantesNaoFiscais.Count - 1 do begin   CNFZ := TACBrECFComprovanteNaoFiscal.Create ;   CNFZ.Assign( fpComprovantesNaoFiscais[I] );   P := StrToIntDef(CNFZ.Indice,I+1)-1   CNFZ.Total    := RoundTo( StrToFloatDef( copy(S,(P*14)+1,14),0) / 100, -2) ;   CNFZ.Contador := StrToIntDef( copy(SS,(P*4)+1,4), 0);   TotalizadoresNaoFiscais.Add( CNFZ ) ; end;    

Use o emulador da Urano.. ambas usam o protocolo FiscNET...

Eu uso esse adaptador com sucesso no meu Notebook...
 
O programa da Bematech usa a USB ou o adaptador ?
 
O driver do adaptador está instalado corretamente ? (sem sinal de ? ou ! no painel de controle -> gerenciador dispositivos)
 
Vc está ligando o cabo Serial do ECF entre o adaptador e o ECF ? (não pode ligar o adaptador diretamente ao ECF)

Você nem precisa de evento para isso...
 
Afinal de contas você que está chamando o comando, certo ?  Apenas faça sua rotina de gravação no BD, antes ou depois de onde você chama o comando...

Você precisa instalar o Fortes4Lazarus...

http://fortes4lazarus.sourceforge.net/

(Use a versão do SVN )

Tiago,
 
Estamos reformulando o SAC... acho que aprontamos ainda esta semana o novo portal, que será integrado com este fórum...
 
O pagamento será sempre mensal, no valor de R$ 120,00.
O contrato será sempre mensal, e renovado automaticamente através da emissão de um novo boleto todo mês
O Boleto será gerado automaticamente, e enviado por e-mail
Ha possibilidade de imprimir ou gerar 2a via aqui mesmo no próprio fórum
Haverá opção para Sair do SAC quando o usuário quiser, não gerando o próximo boleto
O não pagamento em até 10 dias significa que o usuário deseja sair do SAC
O usuário pode aderir novamente ao SAC quando quiser, através do botão "Quero Contratar", onde será gerado um novo Boleto
 
Ou seja, o SAC passará a ser mensal, mas com renovação automática...  Haverá um botão "Quero contratar" e outro "Quero Sair"

A porta 25 foi banida no Brasil todo... Entre em contato com o provedor para saber a nova configuração..

Sim...
 
O ACBrECF também é capaz de abrir novo Gerencial quando há muitas linhas impressas e ocorre o "estouro" de linhas no Gerencial... Lembro que há um teste do Pay&Go que verifica se a aplicação é capaz de fazer isso...

Welkson,
 
Acabo de enviar para o SVN uma nova tentativa... por favor baixe e teste...
 
Notei na declaração da DLL que o Parâmetro "TipoPeriodo" era um Char e não um ponteiro para Char...
 
Estou tentando usar AnsiString e Char (ao invés de PChar)  para manter a compatibilidade com todas as versões do Delphi e Lazarus

É o próprio SiTEF quem valida...

Veja... há algo muito errado no seu ambiente (ou no da Seven)... (ou seja, onde ocorre esse erro)
 
Não é nada comum o arquivo da pasta REQ não conseguir ser apagado...
 
Isso não é um problema no componente... é algo externo que está Bloqueando o componente de apagar esse arquivo...
 
 
PS: Se o erro ocorre na Seven.. tente fazer uma transação TEF com o TEFDDemo, apenas para testar o ambiente... Se não ocorrer o problema, então é algo no seu código, que está prendendo este arquivo...

Provavelmente acuse erro em todos os modelos atuais... nas antigas matriciais algumas permitiam sobreposição...
 
Porém, em modo de intervenção funciona... (por isso os Interventores de ECF adoram o programa ECFTeste)

Veja a versão (SVN 25/01/03)...  Mais atualizada impossível

Os download do SAC estão em:
http://www.projetoacbr.com.br/forum/index.php?/files/category/2-acbrmonitor/
 
Não há como inserir mascaras em "path" (como o sistema operacional saberia onde vc quer gravar ?).. apena path absoluto (C:\Monitor\etc\) ou relativo (..\etc\)

Apliquei a seguinte modificação nos fontes do SVN:
 
 
Por favor atualize e teste...

O TEFD invocará eventos para tentar saber qual o estado atual do ECF, (Vendendo, pagando, imprimindo CDC, etc)...
 
Acho que usar o mode ecfNaofiscal seria a maneira mais simples de abstrair essas características, mas você poderia programar os eventos existentes para dar a "resposta" que o ACBrTEFD quer (ou espera ser a correta)... e fazer com que ele continue o trabalho...

Removi o anexo por ser exageradamente grande para uma simples tela (use formato JPG ou PNG)
 
Tente primeiro com projeto Demo "ECFTeste"...
 
- Verifique se a COM está realmente correta.
- Se for adaptador USB-serial, verifique se ele está corretamente instalado
- Verifique a velocidade da porta (tente 38.400 e 115.200)

É bem tranquilo... bem mais simples que o roteiro do G.P. aplicado na Seven e Sw.Express

Apenas por valor...
 
Mas qual é a dificuldade de computar o valor baseado em uma Percentagem ?

Parece que a resposta está no seu próprio post:
 
"NSU: 150001 ou NSU não foi gerado"

Enviei uma possível correção para o SVN...