Erro ao enviar Lote ACBrNFSeX provedor Tecnos

[marcelo.hgv]

Italo, Efetuei um teste pelo ERP enviando duas notas pelo componente antigo usando os schemas 2.01 Tecnos e o envio foi normalmente.

Não sei mais que teste podemos fazer, fico no aguardo de mais orientações.

Até.

[Italo Giurizzato Junior]

Bom dia Marcelo,

É bem provável que o componente antigo não esteja validando o lote antes do seu envio.

Já o novo realiza a validação.

Com os Schemas que temos não é possível validar um lote com 2 ou mais Rps.

Podemos seguir dois caminhos:

1. Alterarmos os Schemas;

2. Solicitar ao provedor Schemas atualizados.

No meu entendimento o correto é solicitar ao provedor os Schemas atualizados.

[marcelo.hgv]

Bom dia Italo.

Enviei um e-mail para o provedor falando sobre estas questões, assim que tiver um posicionamento lhe retorno. 

Porem queria ver com você se não existe a possibilidade de deixar sem a validação assim como é feito no componente antigo?

Obrigado.

[marcelo.hgv]

Boa tarde 

Estava fazendo um teste comentando a linha que faz a validação e as notas foram enviadas normalmente com algumas resalvas.

1 - Percebi que o consulta lote apos envio não conseguiu fazer a consulta (não debuguei para saber o motivo)

2 - Não gerou o arquivo xml da nota. Somente apos consultar o RPS por RPS.

Seria possivel talvez criar uma propriedade tipo "ValidaNFSeAntesEnvio"?

 

[Italo Giurizzato Junior]

Boa tarde Marcelo,

O problema de criar essa propriedade, pode fazer com que o desenvolvedor ative ela para um provedor que não disponibilizou os Schemas, neste caso vai ocorrer um erro.

Não vejo com bons olhos criar essa propriedade.

Como lhe disse, o correto é o provedor fornecer os Schemas atualizados, pois o que temos não prevê o envio de 2 ou mais Rps.

[marcelo.hgv]

Boa tarde @Ita Júnior 

Entrei em contato com o provedor por telefone e email conforme sugeriu mas não obtivemos nenhuma resposta até agora.

Diante disto, efetuei algumas alterações em duas units do componente para atender as nossas  necessidades, e por enquanto está funcionando para todos os testes que fiz.

Estou enviando as units caso ache interessante analizar os código.

1- ACBrNFSeXProviderBase.pas (Procedure ValidarSchema)

2- ACBrNFSeXProviderABRASFv2.pas (procedure TratarRetornoConsultaNFSeporRps)

Os códigos estão com os comentários.

 

ACBrNFSeXProviderABRASFv2.pas ACBrNFSeXProviderBase.pas

[Italo Giurizzato Junior]

Boa tarde Marcelo,

Obrigado pela contribuição, já inclui na minha lista de tarefas. TK-2002

[Italo Giurizzato Junior]

Bom dia Marcelo,

Fiz uma alteração no Schema de envio de lote para que ele aceite um lote contendo 1 ou mais Rps.

Logo a sua alteração em ACBrNFSeXProviderBase não se faz necessário.

Outra coisa, temos que evitar ao máximo os If provedor (...) 

Não compreendi direto a sua alteração na unit ACBrNFSeXProviderABRASFv2, pois o ConsultarNFSePorRps por via de regra não tem como requisito carregar o XML do Rps.

Você esta checando se tem algum tem algum documento com o numero da NFS-e ou do Rps.

Me explica melhor o motivo dessa alteração.

Detalhe importante os seus fontes estão desatualizados.

[marcelo.hgv]

Boa tarde @Ita Júnior

Vou atualizar os schemas, obrigado pela atenção neste caso.

Sobre  a unit ACBrNFSeXProviderABRASFv2, é um pouco dificil explicar mas vamos lá, no nosso caso não temos um numero de nota e outro de RPS, ambos são enviados o mesmo para a nota e RPS, porem se por algum motivo ou outro der algum problema com esta numeração, no provedor a numeração da nota vai seguir incrementando de 1 a 1, porem o RPS é somente validade se não tem o mesmo. Então quando alimentamos o Componente o numero da nota e RPS são o mesmo, após a consulta, o componente da um find pelo numero da nota, caso não encontre procura pelo RPS, como falei, adaptei as nossas necessidades.

A alteração que fiz, se faz necessária quando enviamos um lote e logo apos fizemos a consulta nota por nota ainda com o componente alimentado. O código original, dava um clear na procedure tratarRetornoConsultaNFSeporRps, quando é consultado somente uma nota, funciona, quando o componente já tem algo, ai não funciona.

Não sei se consegui explicar.

 

[Italo Giurizzato Junior]

Boa tarde Marcelo,

Preciso estudar melhor essa situação.

[marcelo.hgv]

Boa tarde @Ita Júnior

Somente para dar um feedback sobre a alteração do schema que passaste funcionou perfeitamente. Obrigado pela atenção em alterar o schema.

Porem para o nosso caso ainda continuo com a alteração personalizada na unit ACBrNFSeXProviderABRASFv2, procedure TratarRetornoConsultaNFSeporRps para suprir nossas necessidades. Na verdade, comentando a linha //TACBrNFSeX(FAOwner).NotasFiscais.Clear; no nosso caso já funcionaria, as demais alterações foram preventivas.

Abraço.

[Italo Giurizzato Junior]

Boa tarde Marcelo,

Como lhe disse vou estudar melhor esse caso.

[Italo Giurizzato Junior]

Bom dia Marcelo,

Favor atualizar os fontes e faça novos testes.

[marcelo.hgv]

Boa tarde. @Ita Júnior

Realizei os testes e está funcionando.

Pode fechar.

Muuito obtigado.

[Juliana Tamizou]

Obrigado por reportar.

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