Olá pessoal,
Eu e André estamos trabalhando para concluir os ECFs Virtuais de SAT e NFCe
Com o ECF Virtual, será possível que uma aplicação adaptada para o ACBrECF consiga comandar um SAT ou NFCe de forma (quase) transparente...
Já está no SVN, uma primeira implementação do ECF Virtual para SAT... Modifiquei o ECFTeste (para Lazarus), para que o mesmo possa demonstrar o funcionamento...
Apenas a título de curiosidade, um ECF Virtual ligado no Emulador de SAT do governo, conseguiu passar na rotina de "Teste de Velocidade", (que gera um cupom fiscal completo de 10 itens)... em apenas 0,7 segundos !!!
Por enquanto apenas o ECFTeste em Lazarus está sendo atualizado... em breve subimos uma implementação para o NFCe...
Você pode baixar e instalar o Lazarus livremente... Acesse: http://www.lazarus.freepascal.org/
(use a versão 32 bits)
Para usar os ECFVirtual eles devem ser associados a um ACBrECF...
Exemplo:
1 - Em um formulário, insira os seguintes componentes: ACBrECF, ACBrECFVirtualSAT, ACBrSAT, ACBrSATExtratoEscPOS
2 - Conecte os componentes...
Em ACBrECF1:
Modelo := ecfECFVirtual
ECFVirtual := ACBrECFVirtualSAT1
Em ACBrECFVirtualSAT1:
SAT := ACBrSAT1
ECF := ACBrECF1
Em ACBrSAT:
Extrato := ACBrSATExtratoEscPOS
3 - No ACBrSAT1, ajuste corretamente os parâmetros de configuração, de acordo com o seu equipamento SAT ou Emulador
4 - Programe os eventos em ACBrECFVirtualSAT1, para informar dados adicionais (PIS, COFINS, etc) no CFe que será gerado:
QuandoAbrirDocumento = procedure(CFe: TCFe) of object;
QuandoVenderItem = procedure(Det: TDetCollectionItem) of object;
QuandoEfetuarPagamento = procedure(Det: TMPCollectionItem) of object;
5 - Use o ACBrECF1 e proceda como um ECF normal..