Ir para conteúdo
  • Cadastre-se

dev botao

Sem retorno


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

Recommended Posts

Bom dia amigos, estou utilizando o método 

ACBrNFSe1.Enviar(NumeroRPS);

Mas a função que eu uso para o retorno dos erros:  ACBrNFSe1.WebServices.ConsNFSeRps.RetWS está retornando 'SEM RETORNO' Os Xmls não estão nem salvando, 

alguma dica ? alguém passou por isso?

Estou enviando NFSe para campinas

Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa tarde Ramalho,

O componente esta configurado para salvar os XMLs em disco?

O componente esta configurado para realizar a consulta logo após o envio?

Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

Em 13/09/2016 at 18:07, Italo Jurisato Junior disse:

Boa tarde Ramalho,

O componente esta configurado para salvar os XMLs em disco?

O componente esta configurado para realizar a consulta logo após o envio?

Italo, eu consegui recuperar a msg do erro,

estou com o seguinte problema, segundo eu li no manual, eu preciso passar 'E' para o campo Tributação, mas não estou encontrando no acbr como fazer isso...

é um prestador de campinas e o tomador de sumaré. 

estou tentando fazer da seguinte forma mas não esta dando certo:

NotasFiscais.Add.NFSe.RegRec := regNaoIncidencia

mas acho que não é neste momento. pois segue dando erro. consegue me ajudar por favor?

Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa tarde Ramalho,

Você poderia disponibilizar esse Manual, pois analisando o fonte encontrei onde a TAG <Tributacao> recebe o valor, mas não encontrei entre as possibilidades uma que atribui o valor "E".

Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • Consultores

Ramalho,

Fiz uma alteração no componente, dentro da estrutura DadosServicos inclui as propriedades Operacao e Tributacao.

Operacao poderá receber um dos seguintes valores: [toSemDeducao, toComDeducaoMateriais, toImuneIsenta, toDevolucaoSimplesRemessa, toIntermediacao]

Tributacao poderá receber um dos seguintes valores: [ttIsentaISS, ttNaoIncidencianoMunic, ttImune, ttExigibilidadeSusp, ttNaoTributavel, ttTributavel, ttTributavelFixo, ttTributavelSN, ttMEI]

Inclua na rotina que alimenta o componente essas duas propriedades.

Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

eu criei essa logica para passar do jeito que eu desejo

if cTributacao = 'C' then begin
                  NotasFiscais.Add.Nfse.Servico.Tributacao  := ttIsentaISS;
               end else if cTributacao = 'E' then begin
                  NotasFiscais.Add.Nfse.Servico.Tributacao  := ttNaoIncidencianoMunic;
               end else if cTributacao = 'F' then begin
                  NotasFiscais.Add.Nfse.Servico.Tributacao  := ttImune;
               end else if cTributacao = 'K' then begin
                  NotasFiscais.Add.Nfse.Servico.Tributacao  := ttExigibilidadeSusp;
               end else if cTributacao = 'N' then begin
                  NotasFiscais.Add.Nfse.Servico.Tributacao  := ttNaoTributavel;
               end else if cTributacao = 'T' then begin
                  NotasFiscais.Add.Nfse.Servico.Tributacao  := ttTributavel;
               end else if cTributacao = 'G' then begin
                  NotasFiscais.Add.Nfse.Servico.Tributacao  := ttTributavelFixo;
               end else if cTributacao = 'H' then begin
                  NotasFiscais.Add.Nfse.Servico.Tributacao  := ttTributavelSN;
               end else if cTributacao = 'M' then begin
                  NotasFiscais.Add.Nfse.Servico.Tributacao  := ttMEI
               end;

 

Mas esta dando algum erro na montagem do Xml eu acredito

pois no  ObterMensagemRetorno(ACBrNFSe1.WebServices.ConsNFSeRps.RetWS

esta retornando que ''' is not a valid integer value, não consegui identificar o motivo.

Link para o comentário
Compartilhar em outros sites

Sem ser a Situação 'E' esta funcionando... com 'E' eu tive o retorno destacado no xml:

 

Assinatura do RPS incorreta. Codigo Hash gerado para o campo assinatura do RPS esta invalido. O codigo hash 'c6517eabffcc3e0c38b91edd0ebf998da3948cb0' gerado para o campo Assinatura do RPS nao esta valido. O campo Assinatura deveria estar com o conteudo '00001233556NF 00000000127020160920E NS000000000001000000000000000000081214000005858780000129' convertido no padrao SHA1 para o valor '3f175f31d3d7bd8bbae5ac1c42ee269645d17dc4'

Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa noite Ramalho,

Será que esse "E"  60920E NS000 tem haver com o valor da propriedade Tributação?

Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

15 horas atrás, Italo Jurisato Junior disse:

Boa noite Ramalho,

Será que esse "E"  60920E NS000 tem haver com o valor da propriedade Tributação?

Mas pela mensagem parece dizer que o valor passado esta certo, o quê estaria dando erro é a conversão para o padrão SHA1,e ele até mostra qual a linha que deveriamos enviar. 

Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa tarde Ramalho,

Pelo contrario, o campo assinatura que a mensagem se refere não esta sendo gerado com a letra "E".

Vou checar a rotina que gera esse campo.

Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • Consultores

Ramalho,

Favor atualizar os fontes e realizar novos testes.

Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • 1 mês depois ...
  • Consultores

Boa noite Ramalho,

É preciso ver se o usuário não esta informação errada que possa estar causando esse problema.

Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • 3 semanas depois ...

 

Em 04/11/2016 at 19:01, Italo Jurisato Junior disse:

Boa noite Ramalho,

É preciso ver se o usuário não esta informação errada que possa estar causando esse problema.

Boa tarde Italo, não tem nada de errado não!

continuamos com algum probleminha na assinatura. não estou conseguindo encontrar.

Você pode me auxiliar? 

Link para o comentário
Compartilhar em outros sites

  • Consultores

Boa noite Ramalho,

Tente colocar um Raise na linha 335 na unit pnfsNFSeW_ISSDSF.pas para mostrar o valor de sAssinatura, desta forma podemos descobrir se o valor dessa variável esta sendo gerado corretamente.

Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • 3 meses depois ...

Boa tarde Italo, apenas nesta semana o mesmo caso se repetiu e agora consigo testar novamente o problema, peço desculpa pela demora.

Sobre a linha indicada, eu estou tentando pegar o retorno do sAssinatura mas não estou conseguindo.... acho que no envio não esta passando por ali

 

sAssinatura := sIEEmit + SerieRPS + NumeroRPS + sDataEmis + sTributacao +
                 sSituacaoRPS + sTipoRecolhimento + sValorServico +
                 sValorDeducao + sCodAtividade + sCPFCNPJTomador;
  showmessage(sAssinatura + 'Teste assinatura');
  raise Exception.Create(sAssinatura);
  sAssinatura := AsciiToHex(SHA1(sAssinatura));
  sAssinatura := LowerCase(sAssinatura);

 

também tentei colocar o showmessage, 

lembrando que utilizo o  ACBrNFSe1.Enviar(NumeroRPS); para o envio.

Link para o comentário
Compartilhar em outros sites

18 horas atrás, ramalho disse:

Boa tarde Italo, apenas nesta semana o mesmo caso se repetiu e agora consigo testar novamente o problema, peço desculpa pela demora.

Sobre a linha indicada, eu estou tentando pegar o retorno do sAssinatura mas não estou conseguindo.... acho que no envio não esta passando por ali

 

sAssinatura := sIEEmit + SerieRPS + NumeroRPS + sDataEmis + sTributacao +
                 sSituacaoRPS + sTipoRecolhimento + sValorServico +
                 sValorDeducao + sCodAtividade + sCPFCNPJTomador;
  showmessage(sAssinatura + 'Teste assinatura');
  raise Exception.Create(sAssinatura);
  sAssinatura := AsciiToHex(SHA1(sAssinatura));
  sAssinatura := LowerCase(sAssinatura);

 

também tentei colocar o showmessage, 

lembrando que utilizo o  ACBrNFSe1.Enviar(NumeroRPS); para o envio.

eu Consegui pegar o retorno, ele esta criando a assinatura normalmente, porém criando errado, na msg de retorno ele fala qual deveria ser a assinatura certa, eu troquei e deu certo!

Mas tive que cravar a certa só pra passar a rps do meu cliente que estava presa.

Editado por ramalho
Link para o comentário
Compartilhar em outros sites

  • 4 semanas depois ...
  • Consultores

Boa tarde Ramalho,

Qual foi a alteração que realizou?

Anexa o fonte alterado para que possamos avaliar.

Consultor SAC ACBr

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

Projeto ACBr

Analista de Sistemas / e-mail: [email protected] / Fone: (16) 9-9701-5030 / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

Italo, o que eu pude fazer é pegar a msg de retorno que trás a Assinatura correta e cravei direto no código lá perto da linha 335

sAssinatura := '26cd21fbdd4b7e4488668f6791e9bf0157b752f1';

sAssinatura := LowerCase(sAssinatura);

Gerador.wCampoNFSe(tcStr, '', 'Assinatura', 01, 2000, 1, sAssinatura, '')

 

Fiz isso apenas para liberar meu cliente, o caso é que continuamos com erro na formação desta assinatura em alguns casos raros.

  • Curtir 1
Link para o comentário
Compartilhar em outros sites

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

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • 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.