Nfs-E Barra Do Garças - Mt - 5101803

[wandersonkd]

Queria saber se alguem ja implementou para esse cidade senão o que teria que fazer para implementar ela usa o padrão ABRASF 2.0

[Italo Giurizzato Junior]

Bom dia Wandersonkd,

 

Uma coisa você ja sabe, o XML segue o padrão ABRASF, ótimo.

 

Agora é preciso saber qual é o provedor, ou seja a empresa contratada pela prefeitura para implementar a NFS-e.

 

É preciso também, os schemas, as URLs de homologação e produção, seria também de grande ajuda conseguir os XMLs principalmente os de envio que contenham o que chamados de SOAP ou Envelope.

 

Antes de sair correndo atraz de tudo isso, primeiro verifique se a cidade já esta sendo atendida pelo componente.

Dentro da pasta ...\Exemplos\ACBrNFSe temos um arquivo chamado: Cidades

Abra esse arquivo e procure pela cidade em questão, se ela não estiver nessa lista ai sim, você corre atraz as informações e arquivos acima citados.

 

Espero ter ajudado.

[Leonardo Gregianin]

Fonte: FlexDocs

<homologacao>
	<EnviarLoteRPS SoapAction=""></EnviarLoteRPS>
	<EnviarLoteRPSSincrono SoapAction=""></EnviarLoteRPSSincrono>
	<GerarNfse SoapAction="http://www.abrasf.org.br/nfse.xsdaction/AGERARNFSE_BARRADOGARCAS.Execute">http://financas.barradogarcas.com:8080/SCEM/servlet/agerarnfse_barradogarcas</GerarNfse>
	<CancelaNfse SoapAction="NFSE_BarradoGarcasaction/ANFSE_BARRADOGARCAS.CANCELARNFSE">http://financas.barradogarcas.com:8080/SCEM/servlet/anfse_barradogarcas</CancelaNfse>
	<SubstituirNfse SoapAction=""></SubstituirNfse>
	<ConsultaLoteRPS SoapAction=""></ConsultaLoteRPS>
	<ConsultaNfseRPS SoapAction=""></ConsultaNfseRPS>
	<ConsultaNfseServPrestado SoapAction=""></ConsultaNfseServPrestado>
	<ConsultaNfseServTomado SoapAction=""></ConsultaNfseServTomado>
	<ConsultaNfseFaixa SoapAction=""></ConsultaNfseFaixa>
</homologacao>


<producao>
	<EnviarLoteRPS SoapAction=""></EnviarLoteRPS>
	<EnviarLoteRPSSincrono SoapAction=""></EnviarLoteRPSSincrono>
	<GerarNfse SoapAction="http://www.abrasf.org.br/nfse.xsdaction/AGERARNFSE_BARRADOGARCAS.Execute">http://financas.barradogarcas.com:8080/SCEM/servlet/agerarnfse_barradogarcas </GerarNfse>
	<CancelaNfse SoapAction="NFSE_BarradoGarcasaction/ANFSE_BARRADOGARCAS.CANCELARNFSE">http://financas.barradogarcas.com:8080/SCEM/servlet/anfse_barradogarcas</CancelaNfse>
	<SubstituirNfse SoapAction=""></SubstituirNfse>
	<ConsultaLoteRPS SoapAction=""></ConsultaLoteRPS>
	<ConsultaNfseRPS SoapAction=""></ConsultaNfseRPS>
	<ConsultaNfseServPrestado SoapAction=""></ConsultaNfseServPrestado>
	<ConsultaNfseServTomado SoapAction=""></ConsultaNfseServTomado>
	<ConsultaNfseFaixa SoapAction=""></ConsultaNfseFaixa>
</producao>

[Leonardo Gregianin]

O nome do provedor é "Virtual" da empresa Virtual Tecnologia.

 

Por enquanto atende somente a cidade em questão.

 

Segue anexo as inclusão da cidade.

[Italo Giurizzato Junior]

Boa tarde lvr,

 

Mais uma vez muito obrigado pela colaboração.

 

Só ficou faltando uma coisa, os schemas.

[Leonardo Gregianin]

É verdade, havia esquecido de anexar.

[Italo Giurizzato Junior]

Valeu lvr,

 

Já esta tudo disponivel para o pessoal atualizar os fontes com mais esse provedor.

[Leonardo Gregianin]

Ítalo,

Preciso que atualize a função de leitura do XML da NFS-e para este provedor.

 

Vou anexar o XML que foi feito download do site da prefeitura que contém duas notas e a unit que alterei pnfsNFSeR.pas.

 

Eventualmente em seu teste terá que alterar o LoadFromFile do ACBr que está neste post:

 

Obrigado desde já.

[Leonardo Gregianin]

Ítalo,

 

Mesmo depois das alterações da rev. 5921 ainda não consegui ler corretamente as tags do xml.

 

O problema é que o XML da NFSe tem a tag <Rps> e o código acaba entrando na função que lê o Rps e não a NFSe:

function TNFSeR.LerXml: boolean;
begin
 Result := False;

 if Pos('<Rps', Leitor.Arquivo) > 0
  then Result := LerRPS;

 if Pos('<Nfse', Leitor.Arquivo) > 0
  then Result := LerNFSe;

Editado 27 Setembro, 2013 por lvr

[Italo Giurizzato Junior]

Bom dia Leonardo,

 

Tente inverter os dois IF para ver se resolve o problema.

function TNFSeR.LerXml: boolean;
begin
 Result := False;

 if Pos('<Nfse', Leitor.Arquivo) > 0
  then Result := LerNFSe;

 if Pos('<Rps', Leitor.Arquivo) > 0
  then Result := LerRPS;

[erikepvh]

Caro Italo, gostaria de adicionar no componente a Cidade de Porto Velho/RO, voce poderia ajudar?

 

Padrão: ABRASF – Versão 2.0

 

Endereço URL - Webservice

  Produção http://www.semfazonline.com/nfse/NfseWSService?wsdl

  Homologação http://www.semfazonline.com:7070/nfse/NfseWSService?wsdl

 

Codigo IBGE:1100205

 

Arquivos Shema em anexo.

 

 

 

Schema_NFSe_v2.0.zip

[Leonardo Gregianin]

Bom dia Ítalo,

 

Alterei a ordem da leitura como você sugeriu e funcionou corretamente, será que não causaria problemas para outros provedores?

 

Segue anexo a unit pnfsNFSeR.pas com algumas alterações para este provedor.

[EricMartins]

Prezados,

estão conseguindo realizar o envio para o município Barra do Garças? fiz um teste aqui é retorna o erro A funcionalidade [Enviar Lote] não foi disponibilizada pelo provedor: Virtual. para este caso, eu tenho que enviar as RPSs uma a uma?