Ecf Virtual Para Sat Já Disponivel Para Testes

[Daniel Simoes]

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..

[Juliomar Marchetti]

Bom dia

Parabéns Daniel e André !!

Tão logo seja possível efetuarei testes

[Agnaldo Prates]

Parabéns, Daniel e André.

 

Testando por aqui.

  ACBrSAT1.DesligarSAT;  Seria   ACBrSAT1.DesInicializar;?

 

Na unit ACBrSat

faltando a variável:

 

     fPathDLL:String;

 

     property PathDLL : String read fPathDLL write fPathDLL ;

 

Abraço.

[André Ferreira de Moraes]

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 !!!

Pra NFCe tá demorando um pouco mais, 3,77 segundos. Estou terminando os últimos ajustes e em breve irei disponibilizar no SVN.

[André Ferreira de Moraes]

Acabei de disponibilizar no SVN as alterações para o ECF virtual para NFCe.

 

Abaixo um vídeo mostrando o ECFTeste emitindo uma NFCe.

 

IMG_1438.MOV

[Daniel Simoes]

 

Parabéns, Daniel e André.

 

Testando por aqui.

  ACBrSAT1.DesligarSAT;  Seria   ACBrSAT1.DesInicializar;?

 

Na unit ACBrSat

faltando a variável:

 

     fPathDLL:String;

 

     property PathDLL : String read fPathDLL write fPathDLL ;

 

Abraço.

 

Agnaldo,

 

Verifique se seus fontes estão atualizados... a propriedade PathDll foi substituida por NomeDLL, e o método DeligarSAT, foi removido...

[tchuck]

Estou com o seguinte problema com o ECFTeste em lazarus quando vou finalizara  venda da o erro Error: failed to load private pem key from ""

Editado 9 Outubro, 2014 por tchuck

[André Ferreira de Moraes]

Estou com o seguinte problema com o ECFTeste em lazarus quando vou finalizara  venda da o erro Error: failed to load private pem key from ""

Você configurou corretamente o certificado na aba NFCe?

[tchuck]

Eu percebi q era isso o problema...

 

Andre uma outra pergunta eu posso usar as mesmas configuração que esta em Lazaru no delphi?

para trabalhar com so ECF virtuais

[Agnaldo Prates]

Certo Daniel. Farei isso.

[Daniel Simoes]

Eu percebi q era isso o problema...

 

Andre uma outra pergunta eu posso usar as mesmas configuração que esta em Lazaru no delphi?

para trabalhar com so ECF virtuais

Você fala dos arquivos .INI ?

 

INI é um padrão, independente de linguagem...

[jamesbr]

Boa tarde, estou fazendo alguns testes no componente AcbrEcfVirtualNFCe. Ele identifica corretamente a propriedade "QuandoAbrirDocumento", no entanto, ao fazer as inclusões dos itens não executa o "QuandoVenderItem". Como posso fazer essa chamada? Grato

[Daniel Simoes]

Como você fez a "inclusão dos Itens" ?  você deve usar o método ACBrECF.VendeItem

[rmadmac]

Boa tarde senhores,

Alguma atualização em relação a este tópico, pois não consigo encontrar alguns componentes (ACBrECFVirtualSAT1) e algumas propriedades citadas no primeiro post.

Editado 29 Junho, 2015 por rmadmac

[Daniel Simoes]

Por favor seja mais específico...

Quais propriedades ??

[rmadmac]

Desculpe-me,

      Deixe-me refazer minha pergunta, como faço a interligação entre os componentes, se o ACBrECFVirtualSAT não existe mais na aba do ACBr.

Obrigado por sua atenção,

[Daniel Simoes]

Vc fala do trunk2 ? 

Esta na aba do SAT... use os recurso de busca da IDE, para procurar pelos componentes

[rmadmac]

 

      Estou baixando o Trunk somente, pode ser este o problema.

      Vou testar com o trunk2, obrigado.

[f.delatin]

Para a implementação do SAT qual é o mais indicado pasta Trunk ou Trunk2 ?

[EMBarbosa]

Para o SAT é melhor você partir para o Trunk2.

[jeilson]

Boa noite, não sei  se esse amigos tópico ja está morto , não estou conseguindo fazer a conexão com os componentes, fiz conforme o Daniel passou, ja uso o ACBRECF , e ja esta ok preciso fazer isso para  começar a programar sat.

erro ao tentar compilar AcbrEcf.ecfvirtual nao foi atribuído , 

desde ja  Obrigado. 

 

[jeilson]

Boa noite até , consegui passando o parâmetro 17 para o modelos que seria equivalente ao ecfvirtual , agora o seguinte pensei que se eu  fosse vender era normal tipo  if AbreCupom(iECF) = 0 then;

 

[jeilson]

Bom dia , Daniel e a todos ,  me desculpem mas eu não estou conseguindo ,  escrever o evento

uso componentes como vc ta falando acima

procedure ACBrECFVirtualSAT1QuandoVenderItem(Det: TDetCollectionItem); esta dando erro de indeclarado.

eu estou clicando no  componente e depois na aba eventos dou  um  duplo clique e  ai ele ja cria o codigo abaixo nos caso a procedure , o restante eu peguei do sat Tesete. 

procedure TDM.ACBrECFVirtualSAT1QuandoVenderItem(Det: TDetCollectionItem);
begin

{

         Imposto.PIS.vBC          := Prod.vItem  ;
         Imposto.PIS.vPIS         := (Prod.vItem * Imposto.PIS.pPIS) / 100 ;
         Imposto.PIS.qBCProd      := 0.000 ;
         Imposto.PIS.vAliqProd    := 0.00 ;

         Imposto.COFINS.vBC       := Prod.vItem ;
         Imposto.COFINS.vCOFINS   := (Prod.vItem * Imposto.COFINS.pCOFINS) / 100  ;
         Imposto.COFINS.qBCProd   := 0.000 ;
         Imposto.COFINS.vAliqProd := 0.00 ;

}

end;

     

 

Editado 3 Abril, 2018 por jeilson

[Daniel Simoes]

Estude os fontes do ECFTeste em Lazarus

[jeilson]

Obrigado , Daniel