Ir para conteúdo
  • Cadastre-se

dev botao

Novo Provedor (Prodata) Rio Verde-Go


  • Este tópico foi criado há 3347 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

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.

Atenciosamente.

Eliomar.

Link para o comentário
Compartilhar em outros sites

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 por eduardo.rj
Link para o comentário
Compartilhar em outros sites

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.

 

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

Atenciosamente.

Eliomar.

Link para o comentário
Compartilhar em outros sites

  • Consultores

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.

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • 1 mês depois ...
  • Membros Pro
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,

Atenciosamente,

Márcio Lopes

Analista de Sistemas

Link para o comentário
Compartilhar em outros sites

  • Consultores

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?

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • Membros Pro

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 por marciotga

Atenciosamente,

Márcio Lopes

Analista de Sistemas

Link para o comentário
Compartilhar em outros sites

  • Consultores

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>

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • 2 meses depois ...

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>' +

 

Link para o comentário
Compartilhar em outros sites

  • Consultores

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.

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • 1 mês depois ...
  • 2 semanas depois ...

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.

Link para o comentário
Compartilhar em outros sites

  • 1 mês depois ...
  • 2 meses depois ...
  • Membros Pro

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;

Atenciosamente,

Márcio Lopes

Analista de Sistemas

Link para o comentário
Compartilhar em outros sites

  • Consultores

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.

Consultor SAC ACBr

Italo Giurizzato Junior
Ajude o Projeto ACBr crescer - Assine o SAC

Projeto ACBr

Analista de Sistemas / Araraquara-SP

Araraquara - A era dos Trólebus

Link para o comentário
Compartilhar em outros sites

  • 1 ano depois...
  • Este tópico foi criado há 3347 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Crie uma conta ou entre para comentar

Você precisar ser um membro para fazer um comentário

Criar uma conta

Crie uma nova conta em nossa comunidade. É fácil!

Crie uma nova conta

Entrar

Já tem uma conta? Faça o login.

Entrar Agora
×
×
  • 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.

The popup will be closed in 10 segundos...