NFS-e Valinhos / SP

[[Bruno]]

Boa tarde, preciso de ajuda com emissão de NFS-e para prefeitura de Valilnhos/SP provedor, não consegui encontrar muitas informações a respeito no site, vi que no arquivo "ACBrNFSeXServicos.ini" tem a seguinte configuração:

[3556206]
; Incluído em 20/09/2022
Nome=Valinhos
UF=SP
Provedor=SigISSWeb
ProRecepcionar=https://wsvalinhos.sigissweb.com/

 

o que me leva acreditar componente esta apto para emitir para o provedor, não estou conseguindo concluir a emissão recebendo um retorno estranho, alguém faz emissão de NFSe para Valinhos/SP utilizando o componente poderia me ajudar?

10005-ger-nfse.xml 10005-lista-nfse-ger.xml

[Renato Rubinho]

Boa tarde,

Abrindo o retorno do provedor, acusa um provável problema de autenticação.

The request has not been applied because it lacks valid authentication credentials for the target resource

Veja que nos métodos deste provedor existe um para gerartoken.

../trunk2/Fontes/ACBrDFe/ACBrNFSeX/Provedores/SigISSWeb.Provider.pas

Provavelmente você precisa primeiro preencher Emitente.WSUser, Emitente.WSSenha e consumir este método.

procedure TACBrNFSeProviderSigISSWeb.PrepararGerarToken(
  Response: TNFSeGerarTokenResponse);
var
  AErro: TNFSeEventoCollectionItem;
  Emitente: TEmitenteConfNFSe;
begin
  Response.Clear;
  Emitente := TACBrNFSeX(FAOwner).Configuracoes.Geral.Emitente;
  if EstaVazio(Emitente.WSUser) then
  begin
    AErro := Response.Erros.New;
    AErro.Codigo := Cod119;
    AErro.Descricao := ACBrStr(Desc119);
    Exit;
  end;
  if EstaVazio(Emitente.WSSenha) then
  begin
    AErro := Response.Erros.New;
    AErro.Codigo := Cod120;
    AErro.Descricao := ACBrStr(Desc120);
    Exit;
  end;
  // Aten��o: Neste xml todos os "Ws_" do in�cio das tags devem ter o primeiro "W" em mai�sculo
  Response.ArquivoEnvio := '{"login":"' +
                           OnlyNumber(Emitente.WSUser) + '","senha":"' +
                           Emitente.WSSenha + '"}';
  FpPath := 'rest/login';
  FpMethod := 'POST';
  FpMimeType := 'application/json';
end;

 

[[Bruno]]

15 horas atrás, Renato Rubinho disse:

Boa tarde,

Abrindo o retorno do provedor, acusa um provável problema de autenticação.

The request has not been applied because it lacks valid authentication credentials for the target resource

Veja que nos métodos deste provedor existe um para gerartoken.

../trunk2/Fontes/ACBrDFe/ACBrNFSeX/Provedores/SigISSWeb.Provider.pas

Provavelmente você precisa primeiro preencher Emitente.WSUser, Emitente.WSSenha e consumir este método.

procedure TACBrNFSeProviderSigISSWeb.PrepararGerarToken(
  Response: TNFSeGerarTokenResponse);
var
  AErro: TNFSeEventoCollectionItem;
  Emitente: TEmitenteConfNFSe;
begin
  Response.Clear;
  Emitente := TACBrNFSeX(FAOwner).Configuracoes.Geral.Emitente;
  if EstaVazio(Emitente.WSUser) then
  begin
    AErro := Response.Erros.New;
    AErro.Codigo := Cod119;
    AErro.Descricao := ACBrStr(Desc119);
    Exit;
  end;
  if EstaVazio(Emitente.WSSenha) then
  begin
    AErro := Response.Erros.New;
    AErro.Codigo := Cod120;
    AErro.Descricao := ACBrStr(Desc120);
    Exit;
  end;
  // Aten��o: Neste xml todos os "Ws_" do in�cio das tags devem ter o primeiro "W" em mai�sculo
  Response.ArquivoEnvio := '{"login":"' +
                           OnlyNumber(Emitente.WSUser) + '","senha":"' +
                           Emitente.WSSenha + '"}';
  FpPath := 'rest/login';
  FpMethod := 'POST';
  FpMimeType := 'application/json';
end;

 

Bom dia, já estava sendo preenchido os campos WSUser e WSSenha e imaginei que ao preenche-los o método seria executado automaticamente, mas alterei meu fonte deixando

           if ((ACBrNFSeX1.Configuracoes.Geral.Emitente.WSUser <> '') and (ACBrNFSeX1.Configuracoes.Geral.Emitente.WSSenha <> '')) then
           begin
             ACBrNFSeX1.GerarToken;
             ACBrNFSeX1.Emitir(pFaturaLote, meAutomatico, False);
           end;

e funcionou, ou melhor deu outro erro mas acredito ser algo relacionado a cadastro.

Obrigado pela ajuda!

[Renato Rubinho]

Obrigado por reportar.

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