Jump to content

click.png click.png click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

click.png

Dúvidas sobre o Cancelamento do SAT


Texs
Go to solution Solved by Texs,
  • Este tópico foi criado há 1744 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

Olá.

     Estou com uma dúvida, pois a pessoa que fez a implementação do SAT está de férias, porém ao verificar algumas informações gostaria de saber se o cancelamento está correto.

     Estou alimentando o componente desta forma:

  with ACBrSAT do
  begin
    Modelo  := TACBrSATModelo(satDinamico_stdcall);
    ArqLOG  := 'ACBrSAT.log';
    NomeDLL := VSatDLL;
    Config.ide_numeroCaixa       := VNUM_CAIXA;
    Config.ide_tpAmb             := TpcnTipoAmbiente(Se(VSatAMBIENTE = '1', taProducao, taHomologacao));
    Config.ide_CNPJ              := VNOSSO_CNPJ;
    Config.emit_CNPJ             := VEMP_ATV_CNPJ;
    Config.emit_IE               := VEMP_ATV_IE;
    Config.emit_IM               := VEMP_ATV_IM;
    Config.emit_cRegTrib         := TpcnRegTrib(Se(VPAR2_P2197 = 'S', RTSimplesNacional, RTRegimeNormal));
    Config.emit_cRegTribISSQN    := TpcnRegTribISSQN( RTRegimeNormal );
    Config.emit_indRatISSQN      := TpcnindRatISSQN( irNao ) ;
    Config.PaginaDeCodigo        := StrToInt(VSatPAGINA);
    Config.EhUTF8                := False;
    Config.infCFe_versaoDadosEnt := StrToFloat(Busca_Troca(VSatVERSAO, '.', ','));

    ConfigArquivos.SalvarCFe            := True;
    ConfigArquivos.SalvarEnvio          := True;
    ConfigArquivos.SalvarCFeCanc        := True;
    ConfigArquivos.PastaCFeVenda        := VSatDiretorioEmitidos;
    ConfigArquivos.PastaCFeCancelamento := VSatDiretorioCancelados;
    ConfigArquivos.PastaEnvio           := VSatDiretorioEmitidos;
  end
 

     Meu código de cancelamento é o seguinte:

               ACBrSAT.Inicializado := True;

               ACBrSAT.CFe.LoadFromFile(VSatDiretorioEmitidos + '\' + FieldByName('MOVV_SAT_ARQUIVO').AsString);
               ACBrSAT.CFe2CFeCanc;

               ACBrSAT.CancelarUltimaVenda;

               if ACBrSAT.Resposta.codigoDeRetorno = 7000 then
                   ACBrSAT.ImprimirExtratoResumido
 

      Porém ele está gerando apenas este arquivo (ADC35161153485215000106599000063310000452173344-env.xml)

      Este arquivo já é suficiente para o cancelamento ou teria que ter outro arquivo? Ele irá criar algum arquivo na pasta de Cancelamentos? Como deveria funcionar de fato?

 

       Obrigado, Abraços!

       Marcelo Lucena

CFe35161153485215000106599000063310000452173344.xml

Link to comment
Share on other sites

  • Moderadores

Siga os passos do demo:

    ACBrSAT1.CFe.LoadFromFile( OpenDialog1.FileName );
    ACBrSAT1.CFe2CFeCanc; 
    ACBrSAT1.CancelarUltimaVenda(  ACBrSAT1.CFeCanc.infCFe.chCanc, ACBrSAT1.CFeCanc.GerarXML(True) );  

 

djsystem-logo.png
 youtube.png facebook.png instagram.png linkedin.png
André Ferreira de Moraes | Analista de Sistemas
www.djsystem.com.br | www.djpdv.com.br
www.tefhouse.com.br | www.lambretinha.com.br
Link to comment
Share on other sites

  • Fundadores

Ou então apenas:

ACBrSAT.CFe.LoadFromFile(VSatDiretorioEmitidos + '\' + FieldByName('MOVV_SAT_ARQUIVO').AsString);
ACBrSAT.CancelarUltimaVenda; 

Repare que dentro do método "CancelarUltimaVenda", quando chamado sem parâmetros, ele irá fazer a conversão e chamar o método original...

function TACBrSAT.CancelarUltimaVenda: String ;
var
  dadosCancelamento : string;
begin
  CFe2CFeCanc; // Atualiza para chave carregada para o cancelamento

  dadosCancelamento := CFeCanc.GerarXML( true ); // True = Gera apenas as TAGs da aplicação

  Result := CancelarUltimaVenda( CFeCanc.infCFe.chCanc, dadosCancelamento);
end ;  

 

Consultor SAC ACBr

Daniel Simões de Almeida
O melhor TEF, é com o Projeto ACBr - Clique e Conheça
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr     Telefone:(15) 2105-0750 WhatsApp(15)99790-2976.

Link to comment
Share on other sites

Fiz das duas formas e só criou os dois arquivos que eu anexei no inicio do ticket. Não criou nada na pasta de Cancelamento e na pasta Enviado só ficou estes dois mesmo.

Precisa de um terceiro arquivo pra validar o cancelamento?

Estou utilizando um SAT SWEDA que nós compramos pra testar o SAT aqui.

 

Link to comment
Share on other sites

  • 2 weeks later...
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.