Resposta do provedor Sabara ISS Digital

[johnbh3]

Isto porque questionei eles que dando um erro

<EnviarLoteRpsResposta xmlns="http://www.abrasf.org.br/nfse.xsd">

<Situacao>3</Situacao>

<ListaMensagemRetorno>

<MensagemRetorno>

<Codigo>

Exxx(RPS 661 já se encontra no sistema, protocolo: 20160007318, IdDeclaracao: ***

</Codigo>

<Mensagem/>

</MensagemRetorno>

</ListaMensagemRetorno>

</EnviarLoteRpsResposta>

 

Resposta deles

1- inclua o numero do lote rps id =670

2- inclua o site da abrasf na tag infdeclaracaoprestacaoservico  o id= desta tag deve conter somente dígitos numéricos sem letras e a sequencia não precisa ser extensa .

3- rps deve ser informado o número do id=

 

 

Eu questionei porque dando que RPS ja exsito. O numero esta sendo sequencial se eu gerar 662, 663, 890 qualquer numero da a mesma mensagem.
O primeiro envio deu certo 660 este protocolo 20160007318 aponta pro xml do sucesso.

Dai ja não sei se eles tem razão devido faltar o lote nessa tag questionada.

662-env-lot.xml

[johnbh3]

Olá
Conseguir resolver a situação para Sabara com provedor ISSDigital
So acho estranho se alguem tinha a solução para o ISSDigital funcionando sendo que recebi instrução do mesmo provedor pra corrigir pontos que impedia o envio.

 

Na Unit pnfsNFSeG
procedure TNFSeG.SetAtributos;
 

Esta assim

  // Atributo Id ===============================================================
  if Identificador <> '' then
  begin
    aIdentificador := ' ' + Identificador + '="' + IdLote + '"';

    if Provedor in [proGovBR, proPronim, proISSDigital] then
      aIdentificador := '';
  end

 

  // Atributo Id ===============================================================
  if Identificador <> '' then
  begin
    aIdentificador := ' ' + Identificador + '="' + IdLote + '"';

    if Provedor in [proGovBR, proPronim, proISSDigital] then
      aIdentificador := '';

    //Para atender Sabara 01/12/2016 // acrescentei 
    if Provedor in [proISSDigital] then // acrescentei
    aIdentificador := ' ' + Identificador + '="' + IdLote + '"'; // acrescentei

 end

 

Você vão dizer claro poderia tirar 
    if Provedor in [proGovBR, proPronim, proISSDigital] then
      aIdentificador := '';

 

Como eu so queria resolver meu problema aqui. Caso alguem queria subir 
Também na unit
pnfsNFSeW_ABRASFv2

procedure TNFSeW_ABRASFv2.GerarXML_ABRASF_v2;

  case FProvedor of
   proABase, proBethav2, proDigifred, proEReceita, proFiorilli, proGovDigital,
   proISSe, proMitra, proNEAInformatica, proNotaInteligente, proPVH,
   proSisPMJP: begin // Tire o ISS Digital daqui 
                 Gerador.wGrupoNFSe('InfDeclaracaoPrestacaoServico ' + FIdentificador + '="' + NFSe.InfID.ID + '"');
                 Gerador.wGrupoNFSe('Rps');
               end;
Passei issDitgital pra ca
Seila porque eles la mandam por o namespace
   proISSDigital: begin
                 Gerador.wGrupoNFSe('InfDeclaracaoPrestacaoServico xmlns="http://www.abrasf.org.br/nfse.xsd" ' + FIdentificador + '="' + NFSe.InfID.ID + '"');
                 Gerador.wGrupoNFSe('Rps ' + FIdentificador + '="' + NFSe.InfID.ID + '"');
                end;

Foi minha primeira experiencia com a NFSe como não obtive muita resposta foi isso que fiz pra sucesso.

 

 

[Italo Giurizzato Junior]

Boa noite a todos,

Favor atualizar todos os fontes de todas as pastas.

Refaça os testes.