[Webservice Incorreto Para Cidade De Passo Fundo]

Acca90,

 

também havia visto que os links estavam errados para a cidade de Passo Fundo/RS.

 

Corrigi o arquivo "ACBrProvedorThema" trocando os links da cidade na função "GetConfigURL".

  4314100: begin // Passo Fundo/RS
            ConfigURL.HomNomeCidade := 'nfsehomologacao.pmpf.rs.gov.br/thema-nfse';
            ConfigURL.ProNomeCidade := 'nfse.pmpf.rs.gov.br/thema-nfse';
            sHTTPPro := 'http://';
           end;

Deixei em anexo o arquivo modificado.

 

Abraços

ACBrProvedorThema.pas

[Status Aguardando Processamento Prefeitura]

Obrigado!

[Codigocnae Thema - Taquara/rs]

Boa noite pessoal,

 

estou trabalhando na emissão de RPS para a prefeitura de Taquara/RS, na qual utiliza o servidor Thema. Depois de enviada a RPS, a prefeitura me retornou um erro acusando que o Codigo Cnae é inexistente.

 

Analisei o código e percebi que, de fato, o sistema não estava lendo a informação Codigo Cnae do arquivo XML e, portanto, não estava enviando essa informação para o servidor.

 

Realizei uma simples alteração adicionando a seguinte linha na função "LerRPS_ABRASF_V1" do arquivo "pnfsNFSeR.pas".

NFSe.Servico.CodigoCnae                := Leitor.rCampo(tcStr, 'CodigoCnae');

Deixei em anexo o arquivo modificado se houver interesse.

 

 

Obrigado!

 

Túlio

pnfsNFSeR.pas

[Status Aguardando Processamento Prefeitura]

Boa tarde pessoal,

 

Sou novo aqui no fórum, mas gostaria de propor uma modificação super simples no que diz respeito ao Status do componente TACBrNFSe.

 

Quando utilizei o sistema para envio da RPS pela primeira vez, o processamento da prefeitura foi demorado e a mensagem de "Consultando..." ficava piscando na tela de tempos em tempos (isso para o usuário fica bastante confuso). Para solucionar e mostrar para o usuário que o programa esta aguardando o processamento da prefeitura, criei um TStatusACBrNFSe chamado "stNFSeAguardaProcesso" e realizei uma modificação super simples no ACBrNFSeWebServices só para setar o Status do ACBrNFSe para stNFSeAguardaProcesso quando estiver aguardando a RPS ser processada para a prefeitura.

 

Se for possível e se acharem interessante a modificação, anexei as modificações que fiz à este post. Realizei algumas outras alterações também para enviar a RPS para a prefeitura de Araquari/SC que mais tarde eu vou colocar a disposição aqui também.

 

Para aparecer ao usuário a mensagem de "Aguardando RPS", coloquei esse status a mais em ACBrNFSe1StatusChange.

  stNFSeAguardaProcesso : begin
                if ( frmStatus = nil )
                 then frmStatus := TfrmStatus.Create(Application);
                frmStatus.lblStatus.Caption := 'Aguardando RPS ser processado pela prefeitura...';
                frmStatus.Show;
                frmStatus.BringToFront;
               end;

Obrigado!

 

Túlio

ACBrNFSeWebServices.pas

pnfsConversao.pas