DouglasGV
-
Posts
146 -
Joined
-
Last visited
Content Type
Blocks
Notes ACBrMonitorPlus
Notes ACBrLibNFe
Forums
Downloads
Calendar
Blogs
Videos
Posts posted by DouglasGV
-
-
Agora, Italo Giurizzato Junior disse:
Bom dia Douglas,
Não vou poder aceitar a sua contribuição pelo simples fato de os seus fontes estarem bem desatualizados.
Por favor, delete todas as units que tenham uma bolinha vermelha em seu ícone e atualize todos os fontes de todas as pastas, depois reinstale o ACBr e por fim faça novos testes.
Bom dia!
Estou realizando todos estes procedimentos e irei passar o feedback
-
Boa tarde!
Tudo certo?
Fiz uma alteração, implementei a função: GerarGrupoRPS na unit IPM.GerarXml onde adicionei a validação do município em questão (Cascavel PR);
function TNFSeW_IPM.GerarGrupoRPS: Boolean;
begin
Result := (StrToIntDef(NFSe.IdentificacaoRps.Numero, 0) > 0) and
(not MatchText(NFSe.Servico.MunicipioIncidencia.ToString, ['7493']));
end;Abaixo o print que indica isso na unit e onde seria aplicado na function GerarIdentificacaoRPS
https://prnt.sc/gfnuvvO99JmcTambém a unit alterada
-
1
-
-
2 minutos atrás, Juliomar Marchetti disse:
Caso queira contribuir favor anexar a unit alterada
@Juliomar Marchetti Beleza?
Ajustei apenas na minha aplicação, coloquei letras RPS+número de RPS na propriedade IdentificacaoRPS.numero;
Com isso não cai na parte de alimentar as tags.
Print abaixo (Link) é referente a validação feita na unit IPM.GravarXML
-
Pessoal consegui emitir!
Fui testando e ignorei o trecho que alimenta os dados de RPS aí emitiu a nota...
Ele verifica se o IdentificacaoRPS.Numero > 0;
Criei na minha aplicação uma validação específica para IPM, inserindo na string letras para não cair atender a situação de alimentar as tags
Dentro da unit: IPM.GravarXML função: function TNFSeW_IPM.GerarIdentificacaoRPS: TACBrXmlNode;
function TNFSeW_IPM.GerarIdentificacaoRPS: TACBrXmlNode;
begin
Result := nil;if( StrToIntDef( NFSe.IdentificacaoRps.Numero, 0 ) > 0 ) then
begin
Result := CreateElement('rps');Result.AppendChild(AddNode(tcStr, '#1', 'nro_recibo_provisorio', 1, 12, 1,
NFSe.IdentificacaoRps.Numero, DSC_NUMRPS));Result.AppendChild(AddNode(tcStr, '#1', 'serie_recibo_provisorio', 1, 2, 1,
NFSe.IdentificacaoRps.Serie, DSC_SERIERPS));Result.AppendChild(AddNode(tcDatVcto, '#1', 'data_emissao_recibo_provisorio', 1, 10, 1,
NFSe.DataEmissaoRps, DSC_DEMI));Result.AppendChild(AddNode(tcStr, '#1', 'hora_emissao_recibo_provisorio', 1, 8, 1,
FormatDateTimeBr(NFSe.DataEmissaoRps, 'hh:mm:ss'), DSC_HEMI));
end; -
6 minutos atrás, guilhermeVaz06 disse:
Consegue mostrar um xml de envio de exemplo?
Sim!
O estranho é que ontem consegui emitir 1 nota, utilizando componente ACBrNFSeX, na segunda tentativa me ocorreu a rejeição de:
Código : 00209
Mensagem: Já consta uma NFSe para o referido prestador de serviço com o mesmo IDENTIFICADOR de arquivoPassei a alimentar o campo: IdentificacaoRps.Numero
Começou a surgir a rejeição da série kkkk
00221 - A série do RPS informada no arquivo é diferente da série do RPS utilizada pelo respectivo município.
-
Bom dia!
Testei e infelizmente ocorreu a mesma rejeição.
-
8 horas atrás, Juliomar Marchetti disse:
Certo. mas conversou com o provedor e municipio e olharam no manual ou não tem?
Bom dia!
Tudo certo?
Sim, olhei o manual e conversei com a prefeitura, o estranho que se emito pela minha aplicação vai de boa, apenas utilizando ACBrNFSeX ocorre a rejeição.
No meu caso estou utilizando a série 1;
-
Boa tarde!
Tudo certo?
Também estou com este problema
-
1 hora atrás, DouglasGV disse:
Exatamente neste local que ocorre o problema para mim.
@Italo Giurizzato Junior e @Bravus suporte
Fiz um ajuste na unit: ACBrXmlBase, adicionei uma verificação quando retornado a data no formado yyyy/mm/dd e funcionou perfeitamente!
Em anexo a unit.
-
1
-
-
Exatamente neste local que ocorre o problema para mim.
-
Bom dia!
Tudo certo?
Pronto dentro deste arquivo anexei todos os arquivos gerados ao consultar lote.
-
Em 25/04/2022 at 18:51, Italo Giurizzato Junior disse:
Boa noite Douglas,
Por favor use o programa exemplo e configure ele para salvar os arquivos Soap.
Esse XML não é o soap, os XML soap em seu nome contem a palavra "soap".
ok, vou fazer
-
-
Boa tarde!
No inicio do tópico explico onde ocorre o problema.
-
17 horas atrás, DouglasGV disse:
Ok, irei testar
Bom dia!
Tudo certo?
Atualizando os fontes ocorre o erro na função de ler a data de competência
-
Em 14/04/2022 at 16:09, Italo Giurizzato Junior disse:
Boa tarde Douglas,
Faça uma cópia das units que você alterou e atualize todos os fontes de todas as pastas.
Esta semana foi enviado uma alteração na função EncodeDataHora que se encontra na unit ACBrUtil.DateTime que visa ler corretamente o campo competência com o valor "AAAA-MM"
Não esqueça de reinstalar o ACBr após a atualização dos fontes.
Detalhe importante, o Tortoise não costuma atualizar unit que por ventura tenha sido alterada, neste caso aconselho deletar a unit antes de atualizar os fontes.
Ok, irei testar
-
Boa tarde!
Tudo certo?
Para o provedor issGoiania o retorno não apresenta sucesso e sim um código de erro, mesmo com a nota sendo transmitida.
Ao consultar lote retorna apenas o arquivo, número da nota e XML.
-
Fiz a implementação dos metodos no Publica.lerXml, poderia verificar se minha contribuição ficou de acordo com o padrão utilizado pela ACBr?
O meu problema está no campo NFSe.Competencia que no XML retorna <Competencia>2022-04</Competencia> e ao utilizar o método LerCompetencia(AuxNode);
Dentro da procedure TNFSeR_ABRASFv1.LerInfNfse(const ANode: TACBrXmlNode); retornava o erro acima: '/0' is not a valid integer value
Mudei para este provedor o seguinte:
NFSe.Competencia := StrtoDateTimeDef(AuxNode.Childrens.FindAnyNs('Competencia').ToString, now);
Também adicionei a linha:
NFSe.Link := ObterConteudo(AuxNode.Childrens.FindAnyNs('LinkVisualizacaoNfse'), tcStr); // que no TNFSeR_ABRASFv1 não existe está tag.
Agora estou conseguindo consultar lote sem erro algum.
Desde já agradeço a atenção.
-
1
-
-
Boa tarde!
Sei onde está o erro, porém não sei se consigo ajustar kkkk
procedure TNFSeR_ABRASFv1.LerInfNfse(const ANode: TACBrXmlNode);
NFSe.Competencia := LerCompetencia(AuxNode);
Ao executar o processo: '/0' is not a valid integer value
-
"Aqui não ficou claro. O erro aparece somente ao imprimir ou em outras situações também? Quais?"
Na impressão e no processo de consultar a situação do lote
Erro(s):
Código : X999
Mensagem: Erro de Conexão: '/0' is not a valid integer value
Correção:
--------- -
Bom dia!
Tudo certo?
Estou com problemas no provedor Publica, ao emitir não retorna a url da NFS-e, alterei na unit descrita abaixo e alimentou corretamente.
procedure TNFSeR_ABRASFv1.LerInfNfse(const ANode: TACBrXmlNode);
NFSe.Link := ObterConteudo(AuxNode.Childrens.FindAnyNs('LinkVisualizacaoNfse'), tcStr);
Também estou com problemas na impressão da nota, não é alimentado nada no componente;
Ao emitir a nota não me retorna o XML, então utilizo o método consultar lote e aí me retorna o XML(Porém este não é impresso).
Anexei também o XML editado: "XML EDITADO ERRO BARRA 0"; Nele ocorre o erro ao tentar a impressão.
Gostaria de ajuda
XML EDITADO ERRO BARRA 0.xmlXML RETORNADO CONSULTA LOTE.xml
-
55 minutos atrás, DouglasGV disse:
Boa tarde!
Tudo certo?XMLRetorno : <EnviarLoteRpsSincronoResposta xmlns:xs="http://www.w3.org/2001/XMLSchema-instance" xmlns="http://www.abrasf.org.br/nfse.xsd"><ListaNfse>
Teria como remover as tags acima na leitura do XML retorno referente ao servidor proVitoria, pois com essas tags não imprime a nota;
Desta forma imprime corretamente!
Desta forma não imprime
Reatualizei os componentes e resolveu!
-
Boa tarde!
Tudo certo?XMLRetorno : <EnviarLoteRpsSincronoResposta xmlns:xs="http://www.w3.org/2001/XMLSchema-instance" xmlns="http://www.abrasf.org.br/nfse.xsd"><ListaNfse>
Teria como remover as tags acima na leitura do XML retorno referente ao servidor proVitoria, pois com essas tags não imprime a nota;
Desta forma imprime corretamente!
Desta forma não imprime
-
38 minutos atrás, Italo Giurizzato Junior disse:
Boa tarde Douglas,
Favor atualizar todos os fontes de todas as pastas, reinstale o ACBr e faça novos testes.
Ok, farei isso e te informo
-
1
-
Provedor Publica
in ACBrNFSe
Posted
Bom dia!
Tudo certo? @Italo Giurizzato Junior
Apaguei os fontes e atualizei!
Resolveu meu problema, vi que a unit ACBrXmlBase está totalmente reformulada.
Muito obrigado pela ajuda!