Na Nota de ServicoX - da Cidade de São José do Hortêncio - RS

[RobertoKrug]

Na Nota de ServicoX - da Cidade de São José do Hortêncio - RS

Não Retorna o Código de Verificação, conforme Impressão, em anexo... Mandei email para o Suporte da TECNOS e me retornaram o Seguinte:

"Para resolver essa questão, favor alterar o método "mEnvioLoteRPSSincronoComRetornoLista " dessa forma o Código de verificação será retornado para o prestador.
Segue informações do "help nota":

http://help.nfse-tecnos.com.br/main_ws/contribuinte/consultas/consultaloterps.aspx 
esse ws retorna a tag <CodigoVerificacao>LJ7M1.LZ5P0</CodigoVerificacao>
 

Ao enviar a nota se for utilizado o método mEnvioLoteRPSSincronoComRetornoLista este no retorno de sucesso retorna os dados com a lista de consulta lote rps que conterá o código de verificação, pelo que pude verificar eles estão enviando a nota pelo método convencional mEnvioLoteRPSSincrono este apenas retorna erro se houver e sucesso caso de tudo certo. 

De forma resumida há duas opções para consultar essa informação, realizando a integração pelo ws disposto no link acima, ou alterando o envio da nota para o método mEnvioLoteRPSSincronoComRetornoLista que em seu retorno também conterá o retorno do consulta lote rps. 

[Alexandre de Paula]

Tópico movido para a área do SAC, para que o SLA de respostas seja considerado

Criada a TK-4877 para verificação da ocorrência.

[Italo Giurizzato Junior]

Bom dia Roberto,

Pelo o que eu entendi o provedor Tecnos possui 2 métodos de envio síncrono.

1. mEnvioLoteRPSSincrono - Temos como retorno somente o resultado do processamento (processado com sucesso ou a lista de erros).

2. mEnvioLoteRPSSincronoComRetornoLista - Temos como retorno o XML da nota caso processado com sucesso ou a lista de erros.

Fiz uma alteração na unit que monta o conteúdo do envelope.

Por favor substitua a unit por esta que esta em anexo.

Reinstale o ACBr e faça novos testes.

Tecnos.Provider.pas

[RobertoKrug]

Italo, Boa tarde, tudo bem?

Fiz conforme a sua solicitação... mas o Código de Verificação ainda não OK, olhei os XML's e não entendi... Talvez consegues nos ajudar... segue os arquivos:

104-env-lot-sinc.xml 104-env-lot-sinc-soap.xml 104-lista-nfse-sinc.xml 104-lista-nfse-sinc-soap.xml 4323121487042000013356000000000000104-nfse.pdf

No email, vem o Código de Verificação: 

Código de Verificação:44705BB0.0104D943

 

[Italo Giurizzato Junior]

Boa tarde Roberto,

Favor atualizar todos os fontes de todas as pastas, reinstale o ACBr e faça novos testes.

Acredito que agora ele vai extrair do retorno o XML da nota corretamente.

[RobertoKrug]

Uma dúvida ainda, posso emitir desta forma, usando o meAutomatico:

ACBrNFSeX.Emitir('105', meAutomatico);

 

[Italo Giurizzato Junior]

Roberto,

Sim, pode.

[RobertoKrug]

Ítalo, boa tarde, uma Bom e Melhor 2024 para todos...

Atualizei os Fontes esses dias... e hoje novamente e em nenhum dos dois testes deu certo... segue os arquivos para nova Análise...

107-env-lot-sinc.xml 107-env-lot-sinc-soap.xml 107-lista-nfse-sinc.xml 107-lista-nfse-sinc-soap.xml 4324011487042000013356000000000000107-nfse.pdf 4324011487042000013356000000000000107-nfse.xml

[Italo Giurizzato Junior]

Boa tarde Roberto,

Vou lhe pedir um favor, faça um teste com a unit em anexo.

Tecnos.Provider.pas

[RobertoKrug]

vou testar...

Edited January 4, 2024 by RobertoKrug
não tinha lido a resposta...

[RobertoKrug]

Busquei esta Unit... Reinstalei ACBr e Ainda não... segue Arquivos... 

Caso precisares os Dados da Empresa e Certificado... consigo...

108-env-lot-sinc.xml 108-env-lot-sinc-soap.xml 108-lista-nfse-sinc.xml 108-lista-nfse-sinc-soap.xml 4324011487042000013356000000000000108-rps.xml 4399121487042000013356000000000000108-nfse.xml

[Italo Giurizzato Junior]

Roberto,

Você consegue debugar a procedure TratarRetornoEmitir que se encontra na unit Tecnos.Provider ?

Coloque um ponto de parada na primeira linha:

  Document := TACBrXmlDocument.Create;

Depois vai avançando quero saber se ele entra dentro do IF

      if Response.ModoEnvio in [meLoteSincrono, meUnitario] then

Se entra dentro do FOR

        for I := Low(ANodeArray) to High(ANodeArray) do

Desculpe em pedir isso, é porque eu evito ao máximo em pedir o certificado e os dados da empresa para que eu possa fazer os testes.

[RobertoKrug]

Entrou aqui:

if Response.ModoEnvio in [meLoteSincrono, meUnitario] then

e retornou: 

Response.CodigoVerificacao com a Informação do Código...

e também no AResumo.CodigoVerificacao := CodVerif, até aqui retornou Correto o Código... 

 

e Depois, já no meu Código:

if ACBrNFSeX.Configuracoes.Geral.ConsultaLoteAposEnvio then
begin
    if (ACBrNFSeX.Provider.ConfigGeral.ConsultaSitLote) then

    begin

       ACBrNFSeX.NotasFiscais.Items[0].NFSe.CodigoVerificacao (Aqui o Código não está... está vazio...)

 

[Italo Giurizzato Junior]

Bom dia Roberto,

Doas coisas a esclarecer:

1. pelo fato do envio ser Síncrono e com as mudanças realizadas no envelope soap é para ele retornar o resultado do processamento e isso esta ocorrendo, uma vez que no retorno consta o XML da nota, logo não se faz necessário realizar nenhuma consulta.

2. atualize todos os fontes de todas as pastas, reinstale o ACBr e refaça os testes.

[RobertoKrug]

Agora deu Certo... , Muito Obrigado...

[Alexandre de Paula]

Obrigado por reportar.

Fechando. Para novas dúvidas, criar um novo tópico.