Novo Provedor (Prodata) Rio Verde-Go

[Eliomar0910]

Olá Italo, então com esta na realidade o erro continuou porém o que estava estranho era que dava erro 404

e o endereço a nosso ver estaria faltando o final por isso da alteração. 

http://services.nfse'

 

Obs: Vi que o amigo ai Hugo Moreira Martins subiu uma alteração passando ?wsdl no final dos endereço de configuração pode ser que de certo.. vamos tentar.

[Eliomar0910]

Hem.. Italo no outro pc aqui que tem o win8 esta dando outra mensagem de erro. 

Parâmetro incorreto. - URL:http://mineiros.gdc.net.br/prodataws/service/NfseWSService/ - SOAPAction:http://services.nfse/RecepcionarLoteRps

[eduardo.rj]

Boa tarde! Pessoal o endereço da webservice da Prodata que esta errado!

 

Segue arquivo corrigido!

 

Link do ambiente de homologação:

http://homologacao.rioverdegoias.com.br/prodataws/services/NfseWSService?wsdl

 

 

Prezado Italo, bom dia.

Estavamos recebendo o erro 404, por isso alteramos o endereço do servidor.

Conforme as alterações do colega Hugo, este problema foi solucionado! 

Estamos realizando mais alguns testes.

A princípio, tudo ok!

Editado 26 Julho, 2013 por eduardo.rj

[Eliomar0910]

Bom dia Italo, como já mencionado pelo Eduardo, conseguimos fazer a transmissão dos xml para a prefeitura aqui em mineiros. 

Segue as alterações que foram necessárias para o funcionamento adequado.

 

ACBrProvedorProdata.pas

pnfsNFSeW.pas

[Eliomar0910]

Hem.. Italo já aproveitando que estamos já concluído o ajuste ProData, ao tentar transmitir o arquivo a partir do win8 do meu NoteBook da erro, no win7 esta ok.

 

Parâmetro incorreto. - URL:http://mineiros.gdc.net.br/prodataws/services/NfseWSService?wsdl/ - SOAPAction:http://services.nfse/RecepcionarLoteRps

 

Tem alguma ideia do que pode ser? Melhor criar outro tópico é questão minha aqui mesmo e não tem o que fazer?

[Italo Giurizzato Junior]

Bom dia Eliomar,

 

As suas correções já disponibilizei, favor atualizar os fontes e testar novamente.

 

Quanto ao windows 8 deve ser algum problema com o capicom ou certificado, não tenho muita certeza.

[Marcio Lopes ACBr]

Boa Tarde,

 

 

Estou com um problema na impressão da DANFSe, o formato do XML retornado pelo WebService não é reconhecido pelo componente AcbrDANFSe. Segue arquivo retornado pelo WebService.

<?xml version="1.0" encoding="UTF-8" standalone="yes" ?><Nfse versao="2.01">
                <InfNfse>
                    <Numero>1117</Numero>
                    <CodigoVerificacao>2724348</CodigoVerificacao>
                    <DataEmissao>2013-09-16T12:00:00.000-03:00</DataEmissao>
                    <ValoresNfse>
                        <BaseCalculo>10.00</BaseCalculo>
                        <Aliquota>2.00</Aliquota>
                        <ValorIss>0.20</ValorIss>
                        <ValorLiquidoNfse>10.00</ValorLiquidoNfse>
                    </ValoresNfse>
                    <PrestadorServico>
                        <IdentificacaoPrestador>
                            <CpfCnpj>
                                <Cnpj>05271748000142</Cnpj>
                            </CpfCnpj>
                            <InscricaoMunicipal>10832</InscricaoMunicipal>
                        </IdentificacaoPrestador>
                        <RazaoSocial>SAO JOSE MAQUINAS E FERRAMENTAS LTDA</RazaoSocial>
                        <Endereco>
                            <Endereco>AV.PAUZANES DE CARVALHO</Endereco>
                            <Numero>206</Numero>
                            <Bairro>ST.PAUZANES</Bairro>
                            <CodigoMunicipio>5218805</CodigoMunicipio>
                            <Uf>GO</Uf>
                            <Cep>75903060</Cep>
                        </Endereco>
                    </PrestadorServico>
                    <OrgaoGerador>
                        <CodigoMunicipio>5218805</CodigoMunicipio>
                        <Uf>GO</Uf>
                    </OrgaoGerador>
                    <DeclaracaoPrestacaoServico>
                        <InfDeclaracaoPrestacaoServico>
                            <Rps>
                                <IdentificacaoRps>
                                    <Numero>1</Numero>
                                    <Serie>U</Serie>
                                    <Tipo>1</Tipo>
                                </IdentificacaoRps>
                                <Status>1</Status>
                            </Rps>
                            <Competencia>2013-09-11T12:00:00.000-03:00</Competencia>
                            <Servico>
                                <Valores>
                                    <ValorServicos>10.0000</ValorServicos>
                                    <ValorDeducoes>0.00</ValorDeducoes>
                                    <ValorIss>0.20</ValorIss>
                                    <Aliquota>2.00</Aliquota>
                                    <DescontoIncondicionado>0.00</DescontoIncondicionado>
                                </Valores>
                                <IssRetido>2</IssRetido>
                                <ItemListaServico>1.01</ItemListaServico>
                                <Discriminacao>MAO DE OBRA</Discriminacao>
                                <CodigoMunicipio>2231</CodigoMunicipio>
                                <ExigibilidadeISS>0</ExigibilidadeISS>
                            </Servico>
                            <Prestador>
                                <CpfCnpj>
                                    <Cnpj>05271748000142</Cnpj>
                                </CpfCnpj>
                                <InscricaoMunicipal>10832</InscricaoMunicipal>
                            </Prestador>
                            <Tomador>
                                <Contato>
                                    <Telefone>646212616</Telefone>
                                </Contato>
                            </Tomador>
                            <OptanteSimplesNacional>2</OptanteSimplesNacional>
                            <IncentivoFiscal>0</IncentivoFiscal>
                        </InfDeclaracaoPrestacaoServico>
                    </DeclaracaoPrestacaoServico>
                </InfNfse></Nfse>

Att,

[Italo Giurizzato Junior]

Bom dia Mário,

 

Favor postar o arquivo como anexo, desta forma fica complicado.

 

Outra coisa, o componente esta salvando a NFS-e exatamente do jeito que você postou?

[Marcio Lopes ACBr]

Bom Dia Ítalo,

 

Desculpa na próxima vez posto o anexo.

 

Me parece que é o arquivo retornado pelo WebService.

 

Estou utilizando método ConsultarLoteRPS conforme abaixo.

// Consulta Lote
NFSe.ConsultarLoteRps(cdsNFSeIDLOTE.AsString, 
                                       cdsNFSePROTOCOLO.AsString,
                                       SomenteNumeros(FQryCfg.FieldByName('CGC').AsString),
                                        SomenteNumeros(FQryCfg.FieldByName('INSCRICAOMUNICIPAL').AsString) );

// Salva XML
cdsNFSeXMLNFE.Value := NFSe.WebServices.ConsLote.NFSeRetorno.ListaNfse.CompNfse.Items[0].Nfse.XML;

Editado 17 Setembro, 2013 por marciotga

[Italo Giurizzato Junior]

Márcio,

 

Ai esta o problema, o conteudo dessa propriedade esta incompleta.

 

O componente salva dentro da pasta NFSe o arquivo completo:

 

 

<?xml version="1.0" encoding="UTF-8"?>
<CompNfse xmlns="http://www.abrasf.org.br/nfse">

  <Nfse>

    (...)

  </Nfse>
</CompNfse>

[Marcio Lopes ACBr]

Italo, vou postar o XML gerado na pasta,  pelo que vi tem uma TAG -<DeclaracaoPrestacaoServico>, que não vi em outros XML de outros provedores.

1117-nfse.xml

Editado 17 Setembro, 2013 por marciotga

[Rodrigo W. Campos]

Boa tarde. Estou com o mesmo problema 

 

FALHA NA VALIDAÇÃO DO LOTE 1. ESTÁ FALTANDO O ATRIBUTO NECESSÁRIO 'VERSAO'.

 

Estou com os schemas e fontes atualizados.

 

Estou usando o provedor WebISS.

 

Muito Obrigado.

[Rodrigo W. Campos]

Resolvi alterando o arquivo pnfsNFSeG.pas

 

 DadosMsg := '<' + Prefixo3 + 'LoteRps'+
               DFeUtil.SeSenao(AProvedor = proISSDigital, '',
                               DFeUtil.SeSenao(Identificador <> '', ' ' + Identificador + '="' + NumeroLote + '"', '')) +
               DFeUtil.SeSenao(AProvedor = proSimplISS, NameSpaceDad, '') +
               DFeUtil.SeSenao(AProvedor in [proAbaco, proBetha, proGinfes, proGoiania, proGovBR,
                                             {proISSDigital, }proIssCuritiba, proISSNET, proNatal,
                                             proRecife, proRJ, proSimplISS, proThema, proTiplan,
                                             proAgili, proFISSLex, proSpeedGov, proWebISS], '',
                DFeUtil.SeSenao(VersaoDados <> '', ' versao="' + VersaoDados + '"', '')) + '>' +
              '<' + Prefixo4 + 'NumeroLote>' +

 

 

para

 

 

 DadosMsg := '<' + Prefixo3 + 'LoteRps'+
               DFeUtil.SeSenao(AProvedor = proISSDigital, '',
                               DFeUtil.SeSenao(Identificador <> '', ' ' + Identificador + '="' + NumeroLote + '"', '')) +
               DFeUtil.SeSenao(AProvedor = proSimplISS, NameSpaceDad, '') +
               DFeUtil.SeSenao(AProvedor in [proAbaco, proBetha, proGinfes, proGoiania, proGovBR,
                                             {proISSDigital, }proIssCuritiba, proISSNET, proNatal,
                                             proRecife, proRJ, proSimplISS, proThema, proTiplan,
                                             proAgili, proFISSLex, proSpeedGov], '',
                DFeUtil.SeSenao(VersaoDados <> '', ' versao="' + VersaoDados + '"', '')) + '>' +
              '<' + Prefixo4 + 'NumeroLote>' +

 

[Italo Giurizzato Junior]

Boa tarde Rodrigo,

 

Obrigado pela colaboração.

 

Os schemas que você esta utilizando é o que esta disponivel junto com o programa exemplo ou é outro?

Se for outro, favor anexar aqui no forum.

[Rodrigo W. Campos]

Tudo utilizado com o do exemplo...

[contmaster]

Olá, pessoal.

 

Eu utilizo o ACBrNFSe para importação de NFS-e. Abro arquivo XML, preencho o objeto e, depois, gravo a nota e seus itens no nosso sistema de Escrituração Fiscal.

Fiz umas modificações aqui, especificamente para os municípios de Goiânia/GO e Santo André/SP.

 

Agora, minha dúvida é com relação ao município de Rio Verde/GO - tema desse tópico.

As atualizações feitas por vocês no projeto já permitem a leitura do XML de Rio Verde e, consequentemente, o preenchimento do objeto, com todas as propriedades da NFS-e ?

 

Gostaria de saber se essa funcionalidade está disponível ou em desenvolvimento por algum dos membros.

 

 

Muito obrigado pela atenção.

[Renato Trindade Ribeiro]

URGENTE: Bom dia, alguém teria um xml de exemplo de envio do rps para o rio verde-go? 

 

Muito obrigado pela atenção

[Marcio Lopes ACBr]

Boa tarde,

 

Depois que atualizei a versão do ACBr o provedor prodata começou a dar um erro de schema, esta validando o campo Competencia como DateTime, mas pelo que vi no .xsd o tipo do campo é Date.

 

Alterei o arquivo pnfsNFSeW.pas na linha 879.

 

Att,

 

  if FProvedor in [profintelISS,proSystemPro]
    then begin
      GerarListaServicos;


      if NFSe.Competencia <> ''
        then Gerador.wCampoNFSe(tcStr,    '#4', 'Competencia', 10, 19, 1, NFSe.Competencia, DSC_DEMI)
        else Gerador.wCampoNFSe(tcDatHor, '#4', 'Competencia', 19, 19, 1, NFSe.DataEmissao, DSC_DEMI);
    end
    else begin
      if NFSe.Competencia <> ''
        then begin
         case FProvedor of
          proPVH,
          proMitra,
          proGovDigital,
          proISSDigital,
          proISSe, proSystemPro: Gerador.wCampoNFSe(tcDat,    '#4', 'Competencia', 10, 10, 1, NFSe.Competencia, DSC_DEMI);
          proGoiania,
          proTecnos:  Gerador.wCampoNFSe(tcDatHor, '#4', 'Competencia', 19, 19, 0, NFSe.Competencia, DSC_DEMI);
          else        Gerador.wCampoNFSe(tcStr,    '#4', 'Competencia', 19, 19, 1, NFSe.Competencia, DSC_DEMI);
         end
        end
        else begin
         if FProvedor in [proPVH, proFreire, proISSe, proSystemPro, proFiorilli, proSaatri, proCoplan,
                          proISSDigital, proMitra, proVitoria, proGovDigital, proProdata]
          then Gerador.wCampoNFSe(tcDat,    '#4', 'Competencia', 10, 10, 1, NFSe.DataEmissao, DSC_DEMI)
          else begin
           if not (FProvedor in [proGoiania])
            then Gerador.wCampoNFSe(tcDatHor, '#4', 'Competencia', 19, 19, 0, NFSe.DataEmissao, DSC_DEMI);
          end;
        end;

[Italo Giurizzato Junior]

Boa tarde Márcio,

 

Por favor não poste fragmentos grandes de rotinas.

 

Post como anexo a unit que você alterou e que agora esta 100%, assim a postagem fica curta e é mais fácil fazermos um merge e disponibilizar para todos.

[Marcio Lopes ACBr]

OK , segue em anexo unit alterada.

 

Obrigado

pnfsNFSeW.pas

pnfsNFSeW.pas

Editado 13 Junho, 2014 por marciotga

[Italo Giurizzato Junior]

Bom dia Márcio,

 

Muito obrigado pela colaboração, ainda hoje estarei disponibilizando.

[Renato Gosuen]

Bom dia Italo, estou tentando implementar Rio Verde e me deparei que la não é necessário usar certificado digital.

Como proceder nesses casos. Vi também que ele não esta na lista de cidades do combo.

Obrigado

 

Renato Gosuen

Ribeirão Preto SP