Ir para conteúdo
  • Cadastre-se

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

Recommended Posts

Postado

Italo, mais alguns ajustes que fiz na procedure procedure TACBrNFSeProviderIPM.TratarRetornoCancelaNFSe, para sua aprovação.

   //Response.Sucesso := (Response.Erros.Count = 0);
      if Response.Erros.Count > 0 then
        if Response.Erros[0].Codigo='00001 - Sucesso' then
          Response.Sucesso := True;


      with Response do
      begin
        NumeroNota := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('numero_nfse'), tcInt);
//        SerieNota := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('serie_nfse'), tcInt);
        Data := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('data_nfse'), tcDatVcto);
        Link := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('link_nfse'), tcStr);
        Protocolo := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('cod_verificador_autenticidade'), tcStr);
        Situacao := ProcessarConteudoXml(ANode.Childrens.FindAnyNs('situacao_codigo_nfse'), tcStr);

IPM.Provider.pas

  • Membros Pro
Postado

Boa noite Italo,

Atualizei os fontes e voltou a mensagem de CONFIG inválido. o que pode estar de errado? já verifiquei os direcionamentos para REST e aparentemente está tudo certo.

Postado
10 horas atrás, junior_gpuava disse:

Boa noite Italo,

Atualizei os fontes e voltou a mensagem de CONFIG inválido. o que pode estar de errado? já verifiquei os direcionamentos para REST e aparentemente está tudo certo.

Config Invalido no programa de testes tambem.

  • Membros Pro
Postado

Sandro, observei que ao inves de Synapse_boundary ele esta gerando Part_1_ .... mas para o cabeçalho de WebserviceMulti esta 

constructor TACBrNFSeXWebserviceMulti.Create(AOwner: TACBrDFe; AMetodo: TMetodo;
  AURL: string);
begin
  inherited Create(AOwner, AMetodo, AURL);

  FPBound := IntToHex(Random(MaxInt), 😎 + '_Synapse_boundary';
  FPMimeType := 'multipart/form-data; boundary=' + AnsiQuotedStr(FPBound, '"');
end;

Postado
20 minutos atrás, junior_gpuava disse:

Sandro, observei que ao inves de Synapse_boundary ele esta gerando Part_1_ .... mas para o cabeçalho de WebserviceMulti esta 

constructor TACBrNFSeXWebserviceMulti.Create(AOwner: TACBrDFe; AMetodo: TMetodo;
  AURL: string);
begin
  inherited Create(AOwner, AMetodo, AURL);

  FPBound := IntToHex(Random(MaxInt), 😎 + '_Synapse_boundary';
  FPMimeType := 'multipart/form-data; boundary=' + AnsiQuotedStr(FPBound, '"');
end;

Nos meus testes ja estava gerando Part_1 e não estava ocorrendo erro...

Postado
1 hora atrás, Italo Giurizzato Junior disse:

Boa tarde Sandro,

Notei que nos arquivos que você anexou o 8 o tomador é uma pessoa jurídica e tem todos dados, já o 44 é uma pessoa física e não contem os dados.

Será que o problema não é esse?

Creio que não seja o caso, até a consulta esta retornando erro de CONFIG...

7583738027207714738720220826082021124728-con-lot.xml 7583738027207714738720220826082021124728-con-lot-soap.xml 7583738027207714738720220826082021124728-lista-nfse-con-lot.xml 7583738027207714738720220826082021124728-lista-nfse-con-lot-soap.xml temp.xml

Postado
1 hora atrás, Italo Giurizzato Junior disse:

Boa tarde Sandro,

Notei que nos arquivos que você anexou o 8 o tomador é uma pessoa jurídica e tem todos dados, já o 44 é uma pessoa física e não contem os dados.

Será que o problema não é esse?

Fiz a mesma consulta com o programa que meu cliente esta rodando (versao ate ontem do acbr) e a consulta de hoje com os mesmos dados, mas com o acbr atualizado hoje que ta retornando o erro de config, mas nao parece ser nada no xml, sera no envio?

hoje_7583738032207714738720220831082021148608-lista-nfse-con-lot.xml hoje_7583738032207714738720220831082021148608-lista-nfse-con-lot-soap.xml hoje_7583738032207714738720220831082021148608-con-lot.xml 7583738032207714738720220831082021148608-con-lot.xml 7583738032207714738720220831082021148608-con-lot-soap.xml 7583738032207714738720220831082021148608-lista-nfse-con-lot.xml 7583738032207714738720220831082021148608-lista-nfse-con-lot-soap.xml hoje_7583738032207714738720220831082021148608-con-lot-soap.xml

Postado
1 hora atrás, Italo Giurizzato Junior disse:

Boa tarde Sandro,

Notei que nos arquivos que você anexou o 8 o tomador é uma pessoa jurídica e tem todos dados, já o 44 é uma pessoa física e não contem os dados.

Será que o problema não é esse?

URL de produção https://guarapuava.atende.net/atende.php?pg=rest&service=WNERestServiceNFSe&cidade=padrao?eletron=1

Ta sobrando esse eletron

Postado

Houve alguma alteração no retorno do envio da NFSe?

ate´ontem estava funcionando hoje baixei a nova versão do ACBRNFSex e ao enviar uma nota o xml de retorno veio assim:

<?xml version="1.0" encoding="UTF-8"?><a><ListaMensagemRetorno><MensagemRetorno><Codigo></Codigo><Mensagem>CONFIG inválido</Mensagem><Correcao></Correcao></MensagemRetorno></ListaMensagemRetorno></a>

Postado

Mas encontrei outro problema, no IPM.gravavar.pas

Gerando sempre retenção:    

Result[i].AppendChild(AddNode(tcDe2, '#', 'valor_issrf', 1, 15, 0,   NFSe.Servico.ItemServico[I].ValorISS, DSC_VISS)) mudei de volta para     Result[i].AppendChild(AddNode(tcDe2, '#', 'valor_issrf', 1, 15, 0,   NFSe.Servico.ItemServico[I].ValorIr, DSC_VISS))

9 minutos atrás, Sandro Andre Reghelin disse:

Houve alguma alteração no retorno do envio da NFSe?

ate´ontem estava funcionando hoje baixei a nova versão do ACBRNFSex e ao enviar uma nota o xml de retorno veio assim:

<?xml version="1.0" encoding="UTF-8"?><a><ListaMensagemRetorno><MensagemRetorno><Codigo></Codigo><Mensagem>CONFIG inválido</Mensagem><Correcao></Correcao></MensagemRetorno></ListaMensagemRetorno></a>

Houve alteração no .ini, mas o Italo ja esta a par e corrigindo.

Postado
7 horas atrás, junior_gpuava disse:

Sandro, observei que ao inves de Synapse_boundary ele esta gerando Part_1_ .... mas para o cabeçalho de WebserviceMulti esta 

constructor TACBrNFSeXWebserviceMulti.Create(AOwner: TACBrDFe; AMetodo: TMetodo;
  AURL: string);
begin
  inherited Create(AOwner, AMetodo, AURL);

  FPBound := IntToHex(Random(MaxInt), 😎 + '_Synapse_boundary';
  FPMimeType := 'multipart/form-data; boundary=' + AnsiQuotedStr(FPBound, '"');
end;

URL de produção https://guarapuava.atende.net/atende.php?pg=rest&service=WNERestServiceNFSe&cidade=padrao?eletron=1

Ta sobrando esse eletron

Houve alteração no .ini, mas o Italo ja esta a par e corrigindo.

  • Consultores
Postado

Sandro,

Isso não esta certo, pois o campo ValorIR se refere ao valor do Imposto de Renda e não o valor do ISS retido na fonte.

Outra coisa,

A tag <Valor_issrf> que é opcional fica dentro de uma lista chamada <lista> e o seu valor deve ser atribuído ao campo:

NFSe.Servico.ItemServico[I].ValorISS

Já a tag <valor_ir> que é obrigatória fica dentro do grupo <nf> e seu valor deve ser atribuído ao campo:

NFSe.Servico.Valores.ValorIr

Reveja a sua rotina que alimenta o componente.

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

Postado (editado)
14 minutos atrás, Italo Giurizzato Junior disse:

Sandro,

Isso não esta certo, pois o campo ValorIR se refere ao valor do Imposto de Renda e não o valor do ISS retido na fonte.

Outra coisa,

A tag <Valor_issrf> que é opcional fica dentro de uma lista chamada <lista> e o seu valor deve ser atribuído ao campo:

NFSe.Servico.ItemServico[I].ValorISS

Já a tag <valor_ir> que é obrigatória fica dentro do grupo <nf> e seu valor deve ser atribuído ao campo:

NFSe.Servico.Valores.ValorIr

Reveja a sua rotina que alimenta o componente.

ok, voce esta certo, confundi os campos Servico.Valores.ValorIssRetido x Servico.Valores.ValorIss, nesse provedor só tem uma tag (valor_issrf).

 

Editado por Sandro Felipe Adad
  • Curtir 1
Postado
15 horas atrás, Italo Giurizzato Junior disse:

Sandro,

Isso não esta certo, pois o campo ValorIR se refere ao valor do Imposto de Renda e não o valor do ISS retido na fonte.

Outra coisa,

A tag <Valor_issrf> que é opcional fica dentro de uma lista chamada <lista> e o seu valor deve ser atribuído ao campo:

NFSe.Servico.ItemServico[I].ValorISS

Já a tag <valor_ir> que é obrigatória fica dentro do grupo <nf> e seu valor deve ser atribuído ao campo:

NFSe.Servico.Valores.ValorIr

Reveja a sua rotina que alimenta o componente.

Senhores bom dia, houve alguma alteração no modo como o response de retorno e tratado?

acabei de enviar uma NFSe, veio com o codigo de retorno 00001, o response veio como sucesso, mas não trouxe os dados como numero_nfse, data, protocolo...

segue em anexo arquivo com response de retormo

 

reponseRetorno.xml

Postado
2 minutos atrás, junior_gpuava disse:

Sandro.... não sei se percebeu mas o XML de retorno do ambiente de produção vem completo e não apenas o cabeçalho como no ambiente de homologação

Estou testando em homologação, e antes estava funcionando, estou com a ultima versão do ACBR...

não enviei nenhuma para ambiente de produção ainda...

 

Postado
8 minutos atrás, junior_gpuava disse:

Sandro.... não sei se percebeu mas o XML de retorno do ambiente de produção vem completo e não apenas o cabeçalho como no ambiente de homologação

que como estava ok até na sexta o retorno do ambiente de homologação, na terça quando fui testar o erro do "eletron" no arquivo ini, então atualizei hoje cedo os fontes do ACBR, com a correção do arquivo ini, e aí parou de vir o retorno do response em homologação....então antes de mandar para produção, preciso ver o que fazer, medo de mandar para produção e começar a ficar nota pendente lá...

  • Este tópico foi criado há 1261 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...
The popup will be closed in 10 segundos...