Ir para conteúdo
  • Cadastre-se

dev botao

  • Este tópico foi criado há 1201 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á 1201 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...