acbrsat Codigo de Ativação Inválido ou SAT Bloqueado, codigo de ativação incorreto

[Willian Marques]

Bom dia pessoal, estou tentando fazer uma venda aqui com o SAT TANCA SDK Development KIT e ja estou a três dias tentando resolver esse problema, por isso, peço muito a colaboração de vocês.

Pelo o que eu entendi ele o ACBrSAT pega o codigo de ativação através da procedure TForm1.ACBrSAT1GetcodigoDeAtivacao, eu a coloque no meu form dessa forma:

Declaração:    procedure ACBrSAT1GetcodigoDeAtivacao(var Chave: AnsiString);

Implementação:

procedure TfrmVenda.ACBrSAT1GetcodigoDeAtivacao(var Chave: AnsiString);
begin
  Chave := '12345678';
end;

 

Porém quando debugo na função abaixo do componente, a variavel AcondigoDeAtivação não retorna nenhum valor para a função.

//FUNÇÃO DO SAT

function TACBrSAT.GetcodigoDeAtivacao: AnsiString;
var
  AcodigoDeAtivacao: AnsiString;
begin
  AcodigoDeAtivacao := '';

  if Assigned(fsOnGetcodigoDeAtivacao) then
    fsOnGetcodigoDeAtivacao(AcodigoDeAtivacao);

  Result := AcodigoDeAtivacao;
end;

 

Gostaria de saber se estou implementando da forma certa, porque não consegui de forma alguma eliminar esse erro. No software da Tanca, ele está ativado normal, ja fiz o teste.

[Sérgio Assunção]

@William Marques
Qual a versão do Delphi que você está usando ? Tentou fazer essa mesma depuração no SATTeste ?

[Willian Marques]

Olá Sergio, estou utilizando o XE10. O SATTeste não funciona aqui, pois as uses { ACBrSATMFe_integrador, pcnVFPe; } aparecem com o erro: Cannot Resolve Unit Name. Não sei como resolver.

[Wess]

  Em 24/05/2017 at 19:14, Willian Marques disse:

Olá Sergio, estou utilizando o XE10. O SATTeste não funciona aqui, pois as uses { ACBrSATMFe_integrador, pcnVFPe; } aparecem com o erro: Cannot Resolve Unit Name. Não sei como resolver.

Expandir  

Apaga o ACBr e instala novamente pelo ACBrInstall, baixando tudo atualizado. Possivelmente ainda na hora de compilar o SATTeste dará erro de diferença de declaração em duas procedures, ACBrSAT1GetcodigoDeAtivacao e ACBrSAT1GetsignAC (ao menos aqui ocorre), só muda de String para AnsiString na declaração que vai compilar, falei de apagar e instalar novamente com o Install pelo fato do registro dos paths, mas pode fazer manualmente também.

[Willian Marques]

  Em 24/05/2017 at 19:34, Wess disse:

Apaga o ACBr e instala novamente pelo ACBrInstall, baixando tudo atualizado. Possivelmente ainda na hora de compilar o SATTeste dará erro de diferença de declaração em duas procedures, ACBrSAT1GetcodigoDeAtivacao e ACBrSAT1GetsignAC (ao menos aqui ocorre), só muda de String para AnsiString na declaração que vai compilar, falei de apagar e instalar novamente com o Install pelo fato do registro dos paths, mas pode fazer manualmente também.

Expandir  

Wess eu já fiz isso em ambas as procedures, vou tentar reinstalar aqui mas acho que esse não é o caso.

[Wess]

  Em 24/05/2017 at 19:41, Willian Marques disse:

Wess eu já fiz isso em ambas as procedures, vou tentar reinstalar aqui mas acho que esse não é o caso.

Expandir  

Sim, a questão de Cannot Resolve Unit Name é por não achar as Units na máquina, que pode ser resolvido reinstalando tudo atualizado ou adicionando os paths no Delphi manualmente

[Willian Marques]

  Em 24/05/2017 at 19:43, Wess disse:

Sim, a questão de Cannot Resolve Unit Name é por não achar as Units na máquina, que pode ser resolvido reinstalando tudo atualizado ou adicionando os paths no Delphi manualmente

Expandir  

OK Wess, está rodando o SATTeste, mas o erro persiste: 'SAT bloqueado, codigo de ativacao incorreto';

[Sérgio Assunção]

  Em 24/05/2017 at 20:31, Willian Marques disse:

OK Wess, está rodando o SATTeste, mas o erro persiste: 'SAT bloqueado, codigo de ativacao incorreto';

Expandir  

Depure agora o SATTeste e veja qual o conteúdo (Chave) que está sendo enviado ao componente.

[Willian Marques]

  Em 24/05/2017 at 21:58, Sérgio Assunção disse:

Depure agora o SATTeste e veja qual o conteúdo (Chave) que está sendo enviado ao componente.

Expandir  

Sergio nesse função ele não ta pegando nada, ta pegando em branco no result.

function TACBrSAT.GetcodigoDeAtivacao: AnsiString;
var
  AcodigoDeAtivacao: AnsiString;
begin
  AcodigoDeAtivacao := '';

  if Assigned(fsOnGetcodigoDeAtivacao) then
    fsOnGetcodigoDeAtivacao(AcodigoDeAtivacao);

  Result := AcodigoDeAtivacao;
end;

 

Suponha que é nesse função que ele pega o codigo de ativacao certo?

Editado 25 Maio, 2017 por Willian Marques

[Willian Marques]

Nem mesmo a assinatura da saindo nos XML's gerados. Parece que há alguma falha nas funções que pegam esses valores, pois não ta pegando os valores.

AD20170525170209-869746-env.xml

Editado 25 Maio, 2017 por Willian Marques

[Sérgio Assunção]

@Willian Marques
No SATTeste você consegue Inicializar ? Consultar o status operacional?

[Willian Marques]

  Em 25/05/2017 at 20:24, Sérgio Assunção disse:

@Willian Marques
No SATTeste você consegue Inicializar ? Consultar o status operacional?

Expandir  

Sim Sérgio, isso eu consigo, o problema é só na hora da venda mesmo, na hora de enviar a venda.

Editado 25 Maio, 2017 por Willian Marques

[André Ferreira de Moraes]

Vc copiou as funções do demo, ou colocou um novo componente, foi na aba eventos e clicou 2 vezes no OnGetCodigoAtivação?

[Willian Marques]

  Em 26/05/2017 at 13:44, André Ferreira de Moraes disse:

Vc copiou as funções do demo, ou colocou um novo componente, foi na aba eventos e clicou 2 vezes no OnGetCodigoAtivação?

Expandir  

Copiei as funções

 procedure ACBrSAT1GetcodigoDeAtivacao(var Chave: AnsiString);
begin
  Chave := '12345678';
end;

 

e a procedure onGetAssinatura, e coloquei em meu fonte. Não mexi na aba evento. 

Mas a questão é que mesmo no SATTeste esta dando erro, nao esta pegando o codigo de ativacao.

[André Ferreira de Moraes]

Então seu componente não está associado ao evento. Implemente a partir da aba evento.

[Willian Marques]

André, nem acredito, era isso mesmo. E no SATTeste estava dando erro pois eu havia copiado o componente ACBrSat que estava em meu outro projeto substituindo o original, fazendo com que o método se desassociasse no componente. 

Foi muito burro de perceber que os metodos para pegar o codigo de ativacao e assinatura vinham de um evento do componente...

Muito obrigado a todos que me responderam aqui, obrigado mesmo!

 

[Marcelo R]

Eita pessoal, passei a manhã no sufoco por causa disso rs.

resumindo, se eu deletar o demo e rodar de novo fica ok isso? melhor que caçar metodo a metodo.