Ir para conteúdo
  • Cadastre-se

dev botao
  • Este tópico foi criado há 3038 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro

A pedido do Régys,  o tópico está sendo criado para iniciar a implementação das tags de serviço no SAT-CFe, vou deixar aqui um xml gerado pelo colega do forúm que já emitiu o serviço pelo SAT-CFe (obs não foi gerado pelo ACBrMonitorPlus).

CFe35151211111111111111591234567890000569343752.xml

Link para o comentário
Compartilhar em outros sites

  • Fundadores

Já não estão lá ???  Quando criamos o componente, todo o XML foi mapeado...

sSecao    := 'ISSQN'+IntToStrZero(I,3) ;
sFim   := INIRec.ReadString( sSecao,'ValorBase',INIRec.ReadString(sSecao,'vBC'   ,'FIM')) ;
if (sFim = 'FIM') then
   sFim   := INIRec.ReadString( sSecao,'vBC','FIM');
if (sFim <> 'FIM') then
 begin
  with ISSQN do
   begin
     if StringToFloatDef( INIRec.ReadString(sSecao,'ValorBase',INIRec.ReadString(sSecao,'vBC','')) ,0) > 0 then
      begin
        vDeducISSQN := StringToFloatDef( INIRec.ReadString(sSecao,'vDeducISSQN','') ,0) ;
        vBC       := StringToFloatDef( INIRec.ReadString(sSecao,'ValorBase'   ,INIRec.ReadString(sSecao,'vBC'   ,'')) ,0);
        vAliq     := StringToFloatDef( INIRec.ReadString(sSecao,'Aliquota'    ,INIRec.ReadString(sSecao,'vAliq' ,'')) ,0);
        vISSQN    := StringToFloatDef( INIRec.ReadString(sSecao,'ValorISSQN'  ,INIRec.ReadString(sSecao,'vISSQN','')) ,0);
        cMunFG    := StrToInt( INIRec.ReadString(sSecao,'MunicipioFatoGerador',INIRec.ReadString(sSecao,'cMunFG','')));
        cListServ := INIRec.ReadInteger(sSecao,'CodigoServico',INIRec.ReadInteger(sSecao,'cListServ',0));
        cServTribMun := INIRec.ReadString(sSecao,'cServTribMun','');
        cNatOp    := INIRec.ReadInteger(sSecao,'cNatOp',0);
        indIncFisc:= StrToindIncentivo(OK,INIRec.ReadString(sSecao,'indIncFisc','0'));
      end;
   end;
 end;

 

imposto.jpg

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 para o comentário
Compartilhar em outros sites

  • Membros Pro
12 horas atrás, Daniel Simoes disse:

Já não estão lá ???  Quando criamos o componente, todo o XML foi mapeado...


sSecao    := 'ISSQN'+IntToStrZero(I,3) ;
sFim   := INIRec.ReadString( sSecao,'ValorBase',INIRec.ReadString(sSecao,'vBC'   ,'FIM')) ;
if (sFim = 'FIM') then
   sFim   := INIRec.ReadString( sSecao,'vBC','FIM');
if (sFim <> 'FIM') then
 begin
  with ISSQN do
   begin
     if StringToFloatDef( INIRec.ReadString(sSecao,'ValorBase',INIRec.ReadString(sSecao,'vBC','')) ,0) > 0 then
      begin
        vDeducISSQN := StringToFloatDef( INIRec.ReadString(sSecao,'vDeducISSQN','') ,0) ;
        vBC       := StringToFloatDef( INIRec.ReadString(sSecao,'ValorBase'   ,INIRec.ReadString(sSecao,'vBC'   ,'')) ,0);
        vAliq     := StringToFloatDef( INIRec.ReadString(sSecao,'Aliquota'    ,INIRec.ReadString(sSecao,'vAliq' ,'')) ,0);
        vISSQN    := StringToFloatDef( INIRec.ReadString(sSecao,'ValorISSQN'  ,INIRec.ReadString(sSecao,'vISSQN','')) ,0);
        cMunFG    := StrToInt( INIRec.ReadString(sSecao,'MunicipioFatoGerador',INIRec.ReadString(sSecao,'cMunFG','')));
        cListServ := INIRec.ReadInteger(sSecao,'CodigoServico',INIRec.ReadInteger(sSecao,'cListServ',0));
        cServTribMun := INIRec.ReadString(sSecao,'cServTribMun','');
        cNatOp    := INIRec.ReadInteger(sSecao,'cNatOp',0);
        indIncFisc:= StrToindIncentivo(OK,INIRec.ReadString(sSecao,'indIncFisc','0'));
      end;
   end;
 end;

 

imposto.jpg

bom dia Daniel, eu acredito que realmente deva ter já,mas eu abri um post anterior com um problema, onde eu coloco as tags de serviço no meu arquivo, porém pelo retorno do acbrmonitorplus elas não aparecem no xml, e devolve como erro desconhecido, já no emulador aparece o retorno de falta da tag de ICMS, se você puder dar uma analisada de repente está mais fácil que pensamos.

SAT.TXT

daniel caso queira dar uma olhada no post que estava aberto

http://www.projetoacbr.com.br/forum/topic/26984-erro-sat-cfe-de-serviço-issqn/?do=findComment&comment=175820

Link para o comentário
Compartilhar em outros sites

  • Moderadores

O ACBrMonitor está preparado para receber as tags, bastaria enviar:

[ISSQN???]
vDeducISSQN  = 
vBC          = 
vAliq        = 
vISSQN       = 
cMunFG       = 
cListServ    = 
cServTribMun = 
cNatOp       = 
indIncFisc   = 

O problema é que o SAT vai avaliar o XML enviado e aceitar ou não as tags, alterando o XML original, isso implica que mesmo você enviando corretamente, o SAT pode não aceitar, desconsiderar as tags e valores enviados e o XML então ficar inválido que aparentemente é o que ocorre visto a mensagem de erro apresentada.

Verifique o XML retornado pelo SAT, se nele as tags não existem mas você as enviou, então está ocorrendo o que descrevi acima.

Compare o XML enviado com o XML recebido e provavelmente verá que no XML enviado constam as tags e no recebido não.

Equipe ACBr

Régys Borges da Silveira

http://www.regys.com.br

certificacao delphicertificacao delphi
Link para o comentário
Compartilhar em outros sites

  • Membros Pro
1 hora atrás, Régys Silveira disse:

O ACBrMonitor está preparado para receber as tags, bastaria enviar:


[ISSQN???]
vDeducISSQN  = 
vBC          = 
vAliq        = 
vISSQN       = 
cMunFG       = 
cListServ    = 
cServTribMun = 
cNatOp       = 
indIncFisc   = 

O problema é que o SAT vai avaliar o XML enviado e aceitar ou não as tags, alterando o XML original, isso implica que mesmo você enviando corretamente, o SAT pode não aceitar, desconsiderar as tags e valores enviados e o XML então ficar inválido que aparentemente é o que ocorre visto a mensagem de erro apresentada.

Verifique o XML retornado pelo SAT, se nele as tags não existem mas você as enviou, então está ocorrendo o que descrevi acima.

Compare o XML enviado com o XML recebido e provavelmente verá que no XML enviado constam as tags e no recebido não.

no xml de envio, criado pelo acbrmonitorplus não consta as tags de issqn que coloquei no arquivo, acho que o problema está aí.

 

AD20151229093231-988441-env.xml

Link para o comentário
Compartilhar em outros sites

  • Membros Pro
49 minutos atrás, Régys Silveira disse:

Por favor poste o comando que está enviando.

SAT.CriarEnviarCfe("[infCFe]

segue em anexo o arquivo completo que estou gerando.

obs: Régys está muito chato no fórum essa trava que foi colocada, ao responder rapidamente mais de uma mensagem.

Novas mensagens dentro de um curto espaço de tempo são limitadas. Por favor, aguarde 93 segundos antes de enviar.

SAT.TXT

Link para o comentário
Compartilhar em outros sites

  • Fundadores
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 para o comentário
Compartilhar em outros sites

  • Este tópico foi criado há 3038 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.
Visitante
Este tópico está agora fechado para novas respostas
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...