Ir para conteúdo
  • Cadastre-se

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

Recommended Posts

Postado

Olá amigos, estou desenvolvendo uma solução para geração de notas fiscais de serviço da prefeitura de Barra do Garças. A empresa que gerencia o sistema deles em questão é a Virtual Tecnologia, eventualmente eles não tem nenhuma forma de contato ou suporte. Conversando com um dos técnicos da prefeitura ele me informou que não precisa de certificado para consumir os webservices da prefeitura. Que atualmente oferece apenas duas funções de GerarNFS e CancelarNFS.

Gostaria de saber se isso é realmente possível já que no padrão Abrasf fala que precisa do certificado. Se alguém conseguiu desenvolver para esta cidade, por favor me informe quais procedimentos devo tomar nessa situação será de grande ajuda.

 

Att.

Hugo Henrick

CEO Soluções em TI 

Hugo Henrick

Programador Delphi

CEO Soluções em TI

 

  • Consultores
Postado

Bom dia Hugo,

 

O componente ACBrNFSe já possui o provedor Virtual implementado, inclusive para a cidade Barra do Garças.

 

Favor utilizar o programa exemplo para realizar os testes.

 

No caso deste provedor, você deve utilizar o botão [Gerar e Enviar NFSe].

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

Postado

Bom Dia Italo,

 

Fiz vários testes com o exemplo e é necessário a utilização de certificado digital, e a prefeitura me informou que não se utiliza certificado. Isso é possível?

 

Att.

Hugo Henrick

CEO Soluções em TI 

Hugo Henrick

Programador Delphi

CEO Soluções em TI

 

  • Consultores
Postado

Boa tarde Hugo,

 

Será que esse pessoal da prefeitura, não estam confundindo as coisas?

 

Para se emitir uma NFS-e via site, basta possuir um login e senha.

 

Mas para emitir via WebServices é necessário o certificado, pelo menos acredito que todos os provedores sejam desta forma.

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

Postado

Boa tarde Italo,

Estou fazendo os testes com certificado A1 e estou parado no seguinte erro ao Gerar e Enviar NFSe : 

Não foi possível carregar o arquivo: '<Signature xmlns="http://www.w3.org/2000/09/xmldsig#"><SignedInfo><CanonicalizationMethod Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315" /><SignatureMethod Algorithm="http://www.w3.org/2000/09/xmldsig#rsa-sha1" /><Reference URI=""><Transforms><Transform Algorithm="http://www.w3.org/2000/09/xmldsig#enveloped-signature" /><Transform Algorithm="http://www.w3.org/TR/2001/REC-xml-c14n-20010315" /></Transforms><DigestMethod Algorithm="http://www.w3.org/2000/09/xmldsig#sha1" /><DigestValue></DigestValue></Reference></SignedInfo><SignatureValue></SignatureValue><KeyInfo><X509Data><X509Certificate></X509Certificate></X509Data></KeyInfo></Signature></EnviarLoteRpsEnvio>'

 

Se você puder dar uma ajuda.

 

Obrigado.

Hugo Henrick

Programador Delphi

CEO Soluções em TI

 

Postado

Bom dia Italo,

Foi repassado a mim que eles atualmente trabalham apenas com duas funções do webservice: GerarNfse e CancelarNfse somente essas duas.

Hugo Henrick

Programador Delphi

CEO Soluções em TI

 

Postado

Boa tarde Italo,

 

Atualizei os fontes e o exemplo ao tentar gerar em modo de homologação é gerada a seguinte mensagem: Uma conexão com o servidor não pode ser estabelecida. Mostra a URL e SOAPAction, creio que isso seja problema do servidor deles. Tentei gerar em produção obtive a seguinte mensagem: Cannot Open File "". A sintaxe do nome do arquivo do nome do diretório ou do rótulo do volume está incorreta.

 

Obrigado.

Hugo Henrick

Programador Delphi

CEO Soluções em TI

 

  • Consultores
Postado

Boa tarde Hugo,

 

Fiz algumas alterações, favor atualizar os fontes e testar novamente.

 

Favor entrar em contato com o provedor e solicitar as URLs tanto do ambiente de homologação quanto de produção.

 

As de produção acredito que descobri as corretas, mas de homologação não.

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

  • 2 semanas depois ...
Postado

Boa tarde Italo,

 

Com muita insistência descobri que o webservice de produção para Gerar a NFSe é: http://financas.barradogarcas.com:8080/SCEM/servlet/agerarnfse_barradogarcas?wsdl

E Cancelar : http://financas.barradogarcas.com:8080/SCEM/servlet/anfse_barradogarcas?wsdl

 

Consegui uma ambiente para testes:

Gerar http://200.101.61.84:8080/SCEMBGJavaEnvironment/servlet/agerarnfse_barradogarcas?wsdl 

Cancelar http://200.101.61.84:8080/SCEMBGJavaEnvironment/servlet/anfse_barradogarcas?wsdl

 

Tentei fazer as alterações nos fontes mas acho que devo ter feito alguma coisa errada, pois, gero e envio a nota normalmente e eles me informaram que estão recebendo um arquivo de xml vazio.

 

Vou anexar o pas com as alterações e o XML que foi recebido pela prefeitura.

xml enviado.xml

ACBrProvedorVirtual.pas

Hugo Henrick

Programador Delphi

CEO Soluções em TI

 

  • 5 meses depois ...
  • 1 mês depois ...
Postado

Boa tarde Italo!

Consegui contornar vários problemas com esse provedor, mas agora está retornando o erro List index out of bounds[0] na linha abaixo:

 

FDataRecebimento := NFSeRetorno.ListaNfse.CompNfse[0].Nfse.dhRecebimento;

 

No ACBrNFSeWebServices.pas

 

Tem alguma luz?

Postado

Grande Juliomar!

Realmente, modifiquei esse trecho e agora está consumindo com sucesso...
PORÉM (sempre tem um porém)

 

Está me trazendo um XML vazio, sem nada de informação... :/

 

Processo=Geração/Envio concluído com sucesso
Status=1
RPSSituacao=N
NuNumero=
RPSNumeroNFE=
RPSNumero=5
RPSDataNFE=30/12/1899
RPSVerificacao=
Mensagem=
RetSitRPS=
E-mail=E-mail não enviado
  • 4 semanas depois ...
Postado

Analisando com mais calma os códigos eu cheguei a seguinte conclusão:

Quando fiz essa pergunta:

 

Boa tarde Italo!

Consegui contornar vários problemas com esse provedor, mas agora está retornando o erro List index out of bounds[0] na linha abaixo:

 

FDataRecebimento := NFSeRetorno.ListaNfse.CompNfse[0].Nfse.dhRecebimento;

 

No ACBrNFSeWebServices.pas

 

Tem alguma luz?

 

Na verdade eu tinha esse erro por que a ListaNfse está vazia!

Agora a pergunta que nunca se cala é:

 

Por que a Lista não está sendo alimentada??

Postado

Estou utilizando a Versão 2007 do Delphi (CodeGear RadStudio)

Olha só... dei uns ShowMessage (Ahhh essa debugação de pobre que salva!!) no ACBRNFSeWebServices nesse trecho:

 

    ReqResp.Execute(Acao.Text, Stream);
    ShowMessage('ReqRespExecute OK..');
    StrStream := TStringStream.Create('');
    StrStream.CopyFrom(Stream, 0);
    ShowMessage('Stream OK..' + StrStream.DataString);
Esse showmessage trouxe isso:
 
Stream OK..<?xml version="1.0" encoding="UTF-8"?>
<SOAP-ENV:Body>
<gerarnfse_barradogarcas.ExecuteResponse xmlns="http://www.abrasf.org.br/nfse.xsd">
<SOAP-ENV:Fault>
<faultcode>SOAP-ENV:Client</faultcode>
<faultstring>Error reading gerarnfse_barradogarcas.Execute
</faultstring>
<detail>1</detail>
</SOAP-ENV:Fault>
</gerarnfse_barradogarcas.ExecuteResponse>
</SOAP-ENV:Body>
</SOAP-ENV:Envelope>
 
---------------------------
OK   
---------------------------
 
    FRetornoWS := TiraAcentos(ParseText(StrStream.DataString, True));
    ShowMessage('Acentos removidos..OK, vou chamar o getRetornoWS');
    FRetWS     := FProvedorClass.GetRetornoWS(acGerar, FRetornoWS);
    ShowMessage('getRetornoWS...' + FRetWS);
E esse trouxe isso:
 
getRetornoWS...
---------------------------
OK   
---------------------------
 
 
:/ Socorro!
Postado

O suporte da Virtual me disse que eu não devo mandar assinado, daí eu marco o AssinarRPS = False, daí o xsd diz que o xml está incompleto faltando o campo Signature....
O mesmo suporte me disse que outros clientes já emitem nfse pelo webservice de lá, e que um cliente contatou ele pra dizer que teve que fazer um software em .Net a parte, pois o ACBr não funcionou para esse provedor... 

:/
Continuo na mesma...

  • Moderadores
Postado

O suporte da Virtual me disse que eu não devo mandar assinado, daí eu marco o AssinarRPS = False, daí o xsd diz que o xml está incompleto faltando o campo Signature....

O mesmo suporte me disse que outros clientes já emitem nfse pelo webservice de lá, e que um cliente contatou ele pra dizer que teve que fazer um software em .Net a parte, pois o ACBr não funcionou para esse provedor... 

:/

Continuo na mesma...

Faz um teste com os fontes locais!

modifica para criar essa parte da signature no xml sem assinar!

  • Curtir 1
Consultor SAC ACBr Juliomar Marchetti
 

Projeto ACBr

skype: juliomar
telegram: juliomar
e-mail: [email protected]
http://www.juliomarmarchetti.com.br
MVP_NewLogo_100x100_Transparent-02.png
 

 

  • Este tópico foi criado há 3448 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.