Ir para conteúdo
  • Cadastre-se

Paulo Henrique Panico

Membros
  • Total de ítens

    29
  • Registro em

  • Última visita

Posts postados por Paulo Henrique Panico

  1. Bom dia, 

    O LinkURL da prefeitura de São José do Rio Preto foi modificado, conforme abaixo.

    Gentileza verificar se é possível atualizar.

    [3549805]
    Nome=Sao Jose do Rio Preto
    UF=SP
    Provedor=Ginfes
    ProLinkURL=https://sjrp.ginfes.com.br/report/consultarNota?__report=nfs_ver99&cdVerificacao=%CodVerif%&numNota=%NumeroNFSe%&cnpjPrestador=%Cnpj%
    HomLinkURL=https://sjrp.ginfesh.com.br/report/consultarNota?__report=nfs_ver99&cdVerificacao=%CodVerif%&numNota=%NumeroNFSe%&cnpjPrestador=%Cnpj%
     

  2. Prezados, boa noite!

    A prefeitura de Macatuba/SP migrou para o provedor Fiorilli.

    Segue configuração do ACBrNFSeXServicos.ini

    [3528007]
    Nome=Macatuba
    UF=SP
    Provedor=Fiorilli
    Versao=2.00
    ProRecepcionar=https://iss.macatuba.sp.gov.br:8443/IssWeb-ejb/IssWebWS/IssWebWS
    ProLinkURL=https://iss.macatuba.sp.gov.br:8443/issweb/formGerarNF.jsf?nroNota=%NumeroNFSe%&codVerificacao=%CodVerif%&cnpj=%Cnpj%&hash=%ChaveAcesso%
     

    Obs. Para funcionar, foi necessário definir os parâmetros de assinatura como FALSE

    ACBrNFSeX1.Provider.ConfigAssinar.Rps           := False;
    ACBrNFSeX1.Provider.ConfigAssinar.LoteRps       := False;
    ACBrNFSeX1.Provider.ConfigAssinar.RpsGerarNFSe  := False;
    ACBrNFSeX1.Provider.ConfigAssinar.CancelarNFSe  := False;
     

  3. Boa noite Italo, tudo bem?

    Poderia avaliar a possibilidade de anexar ao acbr a implementação para captura de serviços tomados de barueri.

    No arquivo ACBrNFSeXServicos.ini, acrescentei a linha em destaque para a consulta do serviço tomado.

    [3505708]
    ; Incluído em 28/03/2022
    Nome=Barueri
    UF=SP
    Provedor=ISSBarueri
    ProRecepcionar=https://www.barueri.sp.gov.br/nfeservice/wsrps.asmx
    HomRecepcionar=https://testeeiss.barueri.sp.gov.br/nfeservice/wsrps.asmx
    ProConsultarNFSeServicoTomado=https://servicos.barueri.sp.gov.br/nfewsxml/wsgeraxml.asmx
     

     

    Sds

     

    ISSBarueri.LerXml.pas ISSBarueri.Provider.pas

    • Curtir 1
  4. Italo, boa noite! Tudo bem?

    Por gentileza, analise a alteração, em anexo, no tratamento do retorno do cancelamento da NFS-e.

    O ID ao invés de retornar 'OK' (como é feito na validação do lote), retornar a literal 'EXITO'.

      if (xId <> 'OK') and (xId <> 'EXITO') then
        begin
          AErro := Response.Erros.New;
          AErro.Codigo := xId;
          AErro.Descricao := ObterConteudoTag(ANodeArray[I].Childrens.FindAnyNs('Description'), tcStr);
          AErro.Correcao := '';
        end;
      end;

     

    Obrigado,

    Conam.Provider.pas

    • Curtir 1
  5. Italo, boa tarde!

    Foi necessário realizar mais uma correção na leitura do XML para que o ISS retido seja carregado corretamente do XML.

    Também fiz uma modificação para carregar as descrições dos serviços. Antes só listava o primeiro serviço.

    Peço a gentileza em analisar as alteração em anexo.

          if aValor = 'true' then
          begin
            NFSe.Servico.Valores.IssRetido := stRetencao;
            NFSe.Servico.Valores.ValorIssRetido := ObterConteudo(ANode.Childrens.FindAnyNs('ISSQNCliente'), tcDe2);
          end

        with NFSe.Servico.ItemServico[i] do
        begin
          Quantidade := ObterConteudo(ANodes[i].Childrens.FindAnyNs('Quantidade'), tcDe2);
          ItemListaServico := ObterConteudo(ANodes[i].Childrens.FindAnyNs('CodigoAtividade'), tcStr);
          Descricao := ObterConteudo(ANodes[i].Childrens.FindAnyNs('Servico'), tcStr);

          if NFSe.Servico.Discriminacao > '' then
            NFSe.Servico.Discriminacao := NFSe.Servico.Discriminacao + ';';
          NFSe.Servico.Discriminacao := NFSe.Servico.Discriminacao + descricao;

     

    Att.

    Paulo

    smarapd.xml

    SmarAPD.LerXml.pas

    • Curtir 1
  6. Prezados, boa tarde!

    Gentilza analisar a alteração em anexo para que a leitura do XML do provedor SmarAPD, carregue corretamente o campo inscrição municipal.

          with IdentificacaoPrestador do
          begin
            InscricaoMunicipal := Trim(copy(aValor, 22, (pos('CPF/CNPJ:', aValor) -23)));
            CpfCnpj := Trim(copy(aValor, pos('CPF/CNPJ:', aValor) +10,
                                                                length(aValor) -1));
          end;
     

    A string retornada pela prefeitura está assim : Inscrição Municipal: 1783 CPF/CNPJ: 47.616.321/0001-89

    SmarAPD.LerXml.pas

  7. Boa tarde Italo, desculpe a demora

    A resposta do provedor foi "Foram alterados alguns links, nem todos usam o mesmo endereço. Caso você preste serviço para alguma outra cidade que utilizam os sistemas 4R, entre em contato para passarmos o endereço correto."

    Obrigado.

     

  8. Italo, bom dia!

    O provedor 4r, modificou a url de acesso.

    anterior : http://%NomeURL_P%.sistemas4r.com.br/abrasf/aconsultarloterps.aspx?wsdl

    atual : http://%NomeURL_P%.4rtec.com.br/abrasf/aconsultarloterps.aspx?wsdl

    Gostaria de solicitar sua ajuda para incluir a cidade de Macatuba/SP

    [3528007]
    Nome=Macatuba
    UF=SP
    Provedor=4R
    NomeURL_H=macatuba
    NomeURL_P=macatuba

     

  9. Italo, boa tarde.

    Faltou ainda um tratamento na pnfsNFSeR.pas, conforme abaixo. Se puder verificar agradeço.

     

      if (Leitor.rExtrai(1, 'Rps') <> '') or (Leitor.rExtrai(1, 'RPS') <> '') or (Leitor.rExtrai(1, 'rps') <> '') or
         (Leitor.rExtrai(1, 'LoteRps') <> '') then
      begin
        case LayoutXML of
          loABRASFv1:    Result := LerRPS_ABRASF_V1;
          loABRASFv2:    Result := LerRPS_ABRASF_V2;
          loEGoverneISS: Result := False; // Falta implementar
          loEL:          Result := LerRps_EL;
          loEquiplano:   Result := LerRPS_Equiplano;
          loGoverna:     Result := LerRps_Governa;
          loInfisc:      Result := False; // Falta implementar
          loISSDSF:      Result := LerRPS_ISSDSF;
          loAgili:       Result := LerRPS_Agili;
          loSP:          Result := LerRPS_SP;
          loSMARAPD:     Result := LerNFSe_Smarapd;
          loAssessorPublico: Result := LerRPS_AssessorPublico;
          loSiat:        Result := LerRPS_Siat;
        else
          Result := False;
        end;

    pnfsNFSeR.pas

×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.