Provedor SystemPro - CodigoVerificacao

[Adriano Wolff]

Tenho um cliente da cidade de Erechim-RS que utiliza provedor SystemPro para emissão de Nota de Serviço.

Acontece que não estamos recebendo retorno do Código de Verificação.

Debugando fonte, verifiquei que na TACBrNFSeX.Emitir, FWebService.Emite.ModoEnvio recebe meLoteSincrono, e este não é verificado, assim não retornando o Código de Verificação.

Vocês conseguem verificar se é possível realizar este ajuste e se isto está realmente correto?

Desde já, grato!

[Renato Rubinho]

Boa tarde, 

Por favor, envie o SOAP do retorno da emissão para [email protected] para que seja analisado.

Mencione este tópico para que seja identificado.

[Renato Rubinho]

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

[Adriano Wolff]

Enviei e-mail com arquivos solicitados ontem pela manhã, aguardando retorno. Obrigado!

[Renato Rubinho]

Não localizei seu e-mail.

Por favor, encaminhe novamente para [email protected] e mencione a url deste tópico para que seja identificado.

[Adriano Wolff]

Reenviei e-mail.

[Renato Rubinho]

Não estamos recebendo seus e-mails, confirmei com os colegas aqui.

Por favor veja se está recebendo o retorno do provedor por alguma eventual rejeição.

Se não identificar o problema, pode enviar por mensagem privada para análise.

[Diego Foliene]

Bom dia!

Arquivos recebidos e anexados na #TK-5399 que foi criada para análise do caso e parecer por parte da equipe de consultores.

[Italo Giurizzato Junior]

Bom dia @Adriano Wolff,

Checando os fontes do componente, mais precisamente a unit ACBrNFSeXProviderABRASFv2 responsável pela leitura do XML retornado ao executar o método Emitir (procedure TratarRetornoEmitir).

Consta sim a leitura da tag CodigoVerificacao e essa informação é armazenada tanto em Response.CodigoVerificacao quanto em AResumo.CodigoVerificacao 

Você pode ler essa informação da seguinte forma:

ACBrNFSeX1.WebService.Emite.CodigoVerificacao

ou

ACBrNFSeX1.WebService.Emite.Resumos[ x ].CodigoVerificacao   (onde x varia de 0 até Resumos.Count -1 

Vide o programa exemplo, procedure ChecarResposta.

[Adriano Wolff]

Então, usando programa exemplo, CodigoVerificacao fica vazio.
na procedure TACBrNFSeX.Emitir(const aLote: String; aModoEnvio: TmodoEnvio; aImprimir: Boolean);
não entra em  if Configuracoes.Geral.ConsultaLoteAposEnvio and
     (FWebService.Emite.ModoEnvio = meLoteAssincrono) then, pois o ModoEnvio é meLoteSincrono.
Quando adiciono meLoteSincrono na rotina, recebe CodigoVerificacao no checarResposta.

[Italo Giurizzato Junior]

Boa tarde @Adriano Wolff,

Não ficou claro para mim como você esta executando o método Emitir.

Segundo o programa exemplo temos:

  {
     O método Emitir possui os seguintes parâmetros:
     aNumLote (String)
     aModEnvio [meAutomatico, meLoteAssincrono, meLoteSincrono, meUnitario, meTeste]
     aImprimir (Boolean) Valor Padrão = True, portanto imprime o DANFSE
  }
  // como não foi informado o segundo parâmetro o método assume o valor
  // meAutomatico, isso faz com que ele se ajusta ao provedor selecionado
  ACBrNFSeX1.Emitir(vNumLote);

O provedor SystemPro segue a versão 2.01 do Layout da ABRASF.

Na unit ACBrNFSeXProviderABRASFv2 define que o modo de envio padrão para o provedores que seguem a versão 2.xx do layout da ABRASF é meLoteSincrono.

Sendo assim ao usar o método Emitir somente com o primeiro parâmetro (Numero do Lote) o segundo parâmetro que defini o modo de envio é assumido como sendo meAutomatico, neste caso é usado o modo de envio da configuração apresentado acima.

Veja na unit ACBrNFSeXProviderBase:

procedure TACBrNFSeXProvider.Emite;
var
  AService: TACBrNFSeXWebservice;
  AErro: TNFSeEventoCollectionItem;
begin
  EmiteResponse.Erros.Clear;
  EmiteResponse.Alertas.Clear;
  EmiteResponse.Resumos.Clear;

  TACBrNFSeX(FAOwner).SetStatus(stNFSeRecepcao);

  if EmiteResponse.ModoEnvio = meAutomatico then
    EmiteResponse.ModoEnvio := ConfigGeral.ModoEnvio;

(...)

 

[Adriano Wolff]

Então, o ChecarResposta, ta recebendo o CodigoVerificacao vazio, usando programa exemplo.
Nos teus testes, ele preenche este valor?

[Italo Giurizzato Junior]

Bom dia @Adriano Wolff,

O Código de Verificação só é retornado quando o RPS é processo com sucesso e transformado em uma NFS-e.

Esse RPS que você enviou foi rejeitado e os motivos estão listados ai na lista de erros.

São 4 erros:

Opção Simples Nacional que não confere com o cadastro do contribuinte;

O CNPJ/CNPJ do tomador invalido;

Regime Especial de Tributação inválido;

Item da Lista de Serviços 09.01 inválido para o contribuinte informado.

[Adriano Wolff]

Realmente, realizei testes, ajustei valores para validar teste corretamente, e CodigoVerificacao retorna corretamente quando a nota é validada com sucesso.
Com isso, consegui identificar onde estava o problema no meu sistema e resolver.
Obrigado pelo tempo em me ajudar a entender meu problema.
Até mais!

[Diego Foliene]

Obrigado por reportar.

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