Italo Giurizzato Junior

Bom dia Felipe, Recomendo você a realizar testes usando o programa exemplo do componente ACBrNFSeX (novo). Desta forma você vai conhecer todos os métodos implementados no novo componente e estudando o código que é executado em cada botão, vai aprender como usar um determinado método. No caso do provedor Tecnos ele possui em seu webservice 2 serviços que recepciona o Rps, são eles: EnviarLoteRps e EnviarLoteRpsSincrono. Em ambos é possível o envio de 1 até 50 Rps por lote. Note que no programa exemplo existem um botão para cada um desses dois serviços. Detalhe importante: O EnviarLoteRps trabalha no modo assíncrono, logo existe que em seguida seja executado o ConsultarLote para poder obter o resultado do processamento. Por outro lado o EnviarLoteRpsSincrono, você já tem como resposta o resultado do processamento. Aqui no fórum você encontra diversas postagem que lhe pode ajudar agora no inicio. NFS-e - Projeto ACBr Te recomento a leitura do tópico abaixo como ponto de partida.

Felipe, Você esta usando o componente antigo (ACBrNFSe) ou o novo (ACBrNFSeX)?

Felipe, Você tem certeza? <?xml version="1.0" encoding="UTF-8"?> <Rps xmlns="http://www.abrasf.org.br/nfse.xsd"> <tcDeclaracaoPrestacaoServico> <InfDeclaracaoPrestacaoServico xmlns="http://www.abrasf.org.br/nfse.xsd" Id="135109431000175000000000000425"> (...) Pois para mim é Rps. Esse XML é o XML do Rps e não da NFS-e. O XML do Rps foi enviado? Se sim ele foi enviado no modo Assíncrono ou Síncrono? Se foi no modo Assíncrono se faz necessário executar o método ConsultarLote para obter o resultado do processamento.

Welington, Você sabe me informar qual é provedor contratado pela cidade e quais são as URLs de homologação e de produção?

João, Já esta no SVN.

Boa tarde Duarte, Já esta no SVN.

Boa tarde Welington, Você esta usando o componente antigo ACBrNFSe ou o novo ACBNFSeX ?

Boa tarde Felipe, Você abriu o XML que foi anexado? Qual é a primeira tag que aparece?

Boa tarde João, Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-4220

Bom Dia Joemil, Esse XML (nota.xml) primeiro foi editado, segundo ele não é a nota e sim o retorno do envio. Ele esta no formato ANSI, abra ele com o NotePad++ e veja como ele esta.

Bom dia Ron Luis, Favor verificar: Você tem fontes com alterações locais? Verifica se não tem nenhuma unit do ACBr com uma bolinha vermelha em seu ícone, caso afirmativo delete a unit. Atualize todos os fontes de todas as pastas. Reinstale o ACBr com a opção de apagar arquivos antigos marcada. Compile a aplicação com a opção Build.

Bom dia Adriano, Eu fiz um teste e não tive o erro de validação (X800). A minha configuração é: SSLType é LT_TLSv1_2

Bom dia Wallace, O componente verifica se a propriedade de configuração: Configuracoes.Arquivos.TabServicosExt esta com o valor True, caso afirmativo ele procura pelo arquivo: TabServicos.txt dentro da pasta do EXE se achar procura pelo código do ItemListaServico, se encontrar retorna a descrição. Por outro lado se o valor da propriedade de configuração for False ele procura pelo código em uma tabela interna (código do componente) se achar retorna a descrição. Tanto nessa tabela interna quanto no arquivo TabServicos.txt existe o código 14.13, se não esta aparecendo a descrição do mesmo pode ser que você tenha ativado a propriedade de configuração e não copiou o arquivo txt ou o provedor esta retornando o código de uma forma não esperada pelo componente. Esse arquivo txt se encontra na mesma pasta do programa exemplo feito em Delphi.

Bom dia, Qual é a cidade/provedor?

Boa noite Elisângela, Quanto a sua primeira pergunta a resposta é sim, na propriedade XmlNfse você tem o XML da NFS-e e pode usar o seu conteúdo para salvar no banco de dados. Com relação a sua segunda pergunta, só vamos descobrir se isso ocorre comparando o DANFSE impresso pelo componente com o do link retornado pelo provedor.

Boa tarde Jovito, O componente tem uma propriedade de configuração chamada: NomeLongoNFSe (boolean). Não sei se ela esta disponível na Lib. Se essa propriedade estiver com o valor True, o nome do XML da NFS-e vai ser composto por 37 dígitos: UF (2), Ano (2), Mês (2), CNPJ (14), Modelo (2), Numero (15). Desta forma é possível separa notas com o mesmo numero de empresas distintas, uma vez que o CNPJ vão ser diferentes.

Boa tarde Thiago, Favor atualizar todos os fontes de todas as pastas, reinstale o ACBr e faça novos testes.

Bill, Já esta no SVN.

Marcos, Já esta no SVN.

Boa tarde Marcelo, Se o problema passou a ocorrer de um dia para outro sem atualização da sua aplicação, com certeza o problema é no provedor. Entre em contato com o provedor e relate o problema.

Boa tarde Wallace, A cidade de Sarandi/RS consta sim no arquivo ACBrNFSeXServicos.ini, veja: [4320107] ; Atualizado em 27/09/2021 Nome=Sarandi UF=RS Provedor=TcheInfo Versao=2.04 Com relação ao serviço cuja descrição não esta aparecendo, qual é o código dele?

Boa tarde Bill, Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-4206

Boa tarde Solivan, O problema é que você esta salvando no banco de dados o retorno do ConsultarNfseRps e não o XML da NFS-e propriamente dito. Abra esse XML que você anexou e veja a primeira tag dele. Quando pedimos para estudar o programa exemplo, não é para vocês perderem tempo, mas sim adquirir conhecimento e dicas. Ultimas linhas da procedure ChecarResposta. // Na propriedade XmlNfse temos o XML da NFS-e LoadXML(ACBrNFSeX1.NotasFiscais.Items[i].XmlNfse, WBXmlNotas); Com certeza você esta pegando esse XML que acredita ser o da NFS-e de outra propriedade.

Boa tarde Marcos, Muito obrigado pela colaboração, já inclui na minha lista de tarefas. TK-4205

Boa tarde Elisângela, Note que no retorno do emitir temos tanto o numero do RPS quanto o da NFS-e. Por outro lado ao consultar a NFS-e por Rps só é retornado o numero da NFS-e. Vou lhe pedir um favor. Debugue a procedure TratarRetornoEmitir que esta na unit Giap.Provider. Coloque um ponto de parada na primeira linha dessa procedure. Nessa procedure quero saber se o valor de ANota que esta na linha 306 é diferente de Nil. Coloque outro na primeira linha da function FindByRps que esta na unit ACBrNFSeXNotasFiscais. Nessa função quero saber o valor da variável: AItemIndex Você precisar enviar um Rps para o provedor para fazer esse debugue. Se o valor de AItemIndex for zero (porque esta sendo enviado somente um Rps) e ANota for diferente de Nil, é para ele salvar na pasta Notas o XML da nota.