
netstart
Membros Pro-
Posts
133 -
Joined
-
Last visited
About netstart

Recent Profile Visitors
The recent visitors block is disabled and is not being shown to other users.
netstart's Achievements
-
netstart started following Correção no Cancelamento NFSeX
-
Boa tarde! Pessoal analisar ao correção no cancelamento, foi inserido um copy na chave para popular o número da NFSe na hora de enviar o cancelamento, mas não são todos os provedores que contém o número da nota na composição da chave, um exemplo é o SmarAPD "PYHD-ENJC". Eu coloquei um "AND" para corrigir o erro na minha aplicação, porém acredito que esse código deveria ser removido do método, pois se eu já informo o número da nota não poderia estar sendo alterado no dentro do método. " ACBrNFSeX.pas
-
NFSeX Birigui Provedor Próprio
netstart replied to netstart's topic in DFe - Documentos Fiscais Eletrônicos
Bom dia @Italo Giurizzato Junior, Pode fechar o tópico e dar com resolvido, obrigado pela atenção! -
NFSeX Birigui Provedor Próprio
netstart replied to netstart's topic in DFe - Documentos Fiscais Eletrônicos
Boa tarde @Italo Giurizzato Junior, Atualizei novamente o componente e tive que fazer 2 ajustes: - Passar na configuração para assinar ao cancelar - Remover o trecho de código do método ProcessarMensagemErros, que já havíamos comentado antes. SmarAPD.Provider.pas -
NFSeX Birigui Provedor Próprio
netstart replied to netstart's topic in DFe - Documentos Fiscais Eletrônicos
Italo, O problema da mascara está no trecho de código abaixo, o property foi apenas porque eu não sabia se poderia tratar diretamente no método sem afetar os demais: procedure TACBrNFSeXProvider.SalvarXmlNfse(aNota: NotaFiscal); var aPath, NomeArq: string; aConfig: TConfiguracoesNFSe; begin aNota.Confirmada := True; aNota.NomeArq := ''; if FAOwner.Configuracoes.Arquivos.Salvar then begin aConfig := TConfiguracoesNFSe(FAOwner.Configuracoes); aPath := aConfig.Arquivos.GetPathNFSe; if aConfig.Arquivos.NomeLongoNFSe then NomeArq := GerarNomeNFSe(aConfig.WebServices.UFCodigo, aNota.NFSe.DataEmissao, aNota.NFSe.Prestador.IdentificacaoPrestador.Cnpj, StrToInt64Def(aNota.NFSe.Numero, 0),aConfig.Arquivos.ApenasNumerosCNPJ) + '-nfse.xml' else NomeArq := aNota.NFSe.Numero + aNota.NFSe.IdentificacaoRps.Serie + '-nfse.xml'; aNota.NomeArq := NomeArq; TACBrNFSeX(FAOwner).Gravar(NomeArq, aNota.XML, aPath); end; end; -
NFSeX Birigui Provedor Próprio
netstart replied to netstart's topic in DFe - Documentos Fiscais Eletrônicos
Bom dia Italo, Os fontes foram atualizados no mesmo dia que enviei as units para tópico. Com relação ao bloco comentado é porque não faz sentido aquele código, sempre estava incluído erro mesmo não existindo erros no xml de retorno. Sobre a propriedade, inserimos porque não encontramos nenhuma propriedade que permitisse remover a mascara de CNPJ ao salvar o arquivo xml da nota, nesse novo componente mudou o padrão que estava no anterior, fizemos isso para não afetar os demais: -
NFSeX Birigui Provedor Próprio
netstart replied to netstart's topic in DFe - Documentos Fiscais Eletrônicos
Boa tarde @Italo Giurizzato Junior Tivemos que dar uma parada na homologação desse provedor com o NFSeX, mas agora já finalizamos, tivemos que fazer alguns ajustes, se puder analisar para colocar em produção e encerrarmos esse tópico agradeço, estou anexando as units para analise. SmarAPD.zip -
NFSeX Birigui Provedor Próprio
netstart replied to netstart's topic in DFe - Documentos Fiscais Eletrônicos
Boa tarde! Achei que você está querendo ver o retorno de quando QDQHQTIW-lista-nfse-con-lot-soap.xmlQDQHQTIW-lista-nfse-con-lot.xmltem erro, vou te enviar um retorno de é feita a consulta... -
NFSeX Birigui Provedor Próprio
netstart replied to netstart's topic in DFe - Documentos Fiscais Eletrônicos
Boa tarde! Segue o arquivo em anexo...006225-rec-soap.xml Acredito que sempre vai ser nesse padrão, aquela coisa de item que está no manual não deve estar sendo usado. -
NFSeX Birigui Provedor Próprio
netstart replied to netstart's topic in DFe - Documentos Fiscais Eletrônicos
Italo, Fiz varios ajustes para conseguir ler os retornos, como não sei que horas vou conseguir mexer amanhã novamente, vou deixar as alterações para analise, como estou usando a impressão do link presente no ini, já consigo fazer o processo de envio, consulta e impressão, porém tem um probleminha na hora de carregar o xml retornado, não faz o parse para NotasFiscais.Items, não da erro mas os dados da nota ficam vazios no objeto, ajustando isso acho que vai faltar apenas o cancelamento... No método TACBrNFSeProviderSmarAPD.TratarRetornoEmitir // Precisa de um tratamento de data para o padrao <datahora>04/08/2021 14:30:56</datahora> // DataRecebimento:= ProcessarConteudoXml(AuxNode.Childrens.FindAnyNs('datahora'), tcDatHor); ACBrNFSeXServicos.ini SmarAPD.Provider.pas -
NFSeX Birigui Provedor Próprio
netstart replied to netstart's topic in DFe - Documentos Fiscais Eletrônicos
Rapaz, é um carma falar com aquele pessoal, vai demorar um século a resposta no e-mail, que vai ser esta no manual, mas vou enviar o e-mail para a prefeitura que vai encaminhar para eles, enquanto isso vou tentando aqui ajustar aqui, fiz um ajuste no tratamento de erro, mas estou perdendo em como conseguir ler o xml de retorno para carregar no componente, se puder me ajudar vou ajustando aqui: BBPDXTRL-lista-nfse-con-lot-soap.xml -
NFSeX Birigui Provedor Próprio
netstart replied to netstart's topic in DFe - Documentos Fiscais Eletrônicos
Simulei um erro aqui, vou anexar a forma como esta chegando, não está como no manual rsrs... 006225-rec.xml 006225-rec-soap.xml -
NFSeX Birigui Provedor Próprio
netstart replied to netstart's topic in DFe - Documentos Fiscais Eletrônicos
Sim, como está no em assicrono, tenho que consultar logo após o envio como aquele código de recibo <codrecibo>, sempre passa pelo método de tratamento de erros e de acordo com o layout é desse jeito que vai vir os erros...,vou colocar uma aliquota de ISS maior só para ver o que vai retornar... -
NFSeX Birigui Provedor Próprio
netstart replied to netstart's topic in DFe - Documentos Fiscais Eletrônicos
Boa tarde, rapaz como é bom conhecer o core do sistema rsrs esse XmlToStr que está fazendo a magica ai, já estou pegando a logica de como montar usando os métodos já existentes, logo consigo arrumar sozinho rsrs. Mas vamos lá, a recepção ocorreu porém precisamos ajustar o ProcessarMensagemErros,: Fiquei na duvida ProcessarMensagemErros(Document.Root, Response, '', 'nfderro')? for I := Low(ANodeArray) to High(ANodeArray) do begin AErro := Response.Erros.New; AErro.Codigo := ProcessarConteudoXml(ANodeArray[I].Childrens.FindAnyNs('codigoerro'), tcStr); AErro.Descricao := ProcessarConteudoXml(ANodeArray[I].Childrens.FindAnyNs('numeronfd'), tcStr); AErro.Correcao := ''; if AErro.Descricao = '' then AErro.Descricao := ANodeArray[I].AsString; end; -
NFSeX Birigui Provedor Próprio
netstart replied to netstart's topic in DFe - Documentos Fiscais Eletrônicos
Bom dia Italo! Estou tentando resolver o problema da consulta, precisei incluir no INI o endereço de consulta de lote, mas estou com problema da formatação do XML, o que fica sempre diferente é o recibo.ECSAELCO-con-lot-soap.xml Fiz essa alteração na tentativa de deixar igual: ACBrNFSeXServicos.ini GeradoNFSe-ApenasParaCompararEstruturaConsultaLote.xml -
NFSeX Birigui Provedor Próprio
netstart replied to netstart's topic in DFe - Documentos Fiscais Eletrônicos
Ok, vou atualizar novamente e retomo os testes a partir da atualização.