felipenadaletti

Olá Italo. Efetuei uns testes, e mesmo maracando a opção ConsultaLoteAposEnvio, não alterou as gravções, somente a gravação do rps gerado, não consegui obter o xml com os dados do envio

Bom dia Italo. Qual é a localização e configuração dessas pastas que vc falou? é nas configurações de Path? Nunca vi essas pastas, devo estar esquecendo de configurar algo

Olá Italo! Realmente, ele gravou o xml da nota com a tag inicial rps, mas eu tenho uma dúvida ainda, eu gravava o arquivo xml q tem a tag compNFSe, que possui as informações como data de envio, codigo de verificação, etc., que eu utilizo para gravar os dados no banco de dados, esse xml não consegui salvar, e tentando carregar esse que salvou eu não consigo acessar esses dados. o que eu devo fazer? Não sei se vocês tem um manual com explicações de oq cada função e propriedade do componente fazem, se tiver gostaria de dar uma lida, para não ter q ficar pedindo essas coisas, e a ultima vez q procurei nao encontrei hehehe

Opa! Bacana, vou testar, obrigado!

Olá! Ainda estamos no processo de migração de componente da nfse, e encontrei algo que n consegui solucionar. no componente antigo utilziava após gerar a nfse o ACBRNFSe.NotasFiscais.Items[0].GravarXML, onde fazia a gravação do XML gerado, e após o envio da NFSe, utilizava a mesma função para salvar o XML aprovado. Porém, no componente novo, essas duas linhas de código que utlizava essas funções estão gravando um xml vazio, e não consegui encontrar algo explicando como fazer essa gravação desses arquivos no componente novo. Peço desculpas se for algo simples e que não consegui encontrar, mas ralmente não consegui, e como temos diversos clientes de diversos provedores, acabou ficando mais complicado ainda. Desde já agradeço.

Sim, isso mesmo, em homologação, pelo menos sim.

Olá Italo. Quanto a geração da tag indentificacaorps tudo certo, parou de gerar. Somente o ID q continua com o 'Dec_'. Mas já estamos conseguindo enviar as notas novamente.

Ok. Obrigado!

Bom dia ítalo. Alguma ideia do que possa ser? Fico no aguardo. Agradeço.

Sim, vi agora, já vou ajustar. Já está corrigido o anexo do xml do componente novo na publicação

Olá. Fizemos a migração do componente ACBRNFSe para o ACBRNFSeX recentemente. Ao efetuar o teste da nota de serviço para Erechim-RS, notamos que está gerando as tags do identificacaoRPS, que não eram geradas antes, de acordo com o modelo do xml do provedor. Notamos também uma alteração no ID, que gera com um prefixo: 'Dec_', que não gerava no antigo também. Resumindo, o xml gera igual ao outro componente, porém com o prefixo no ID, e com as tags da identificacaoRPS, que ficam com valores vazios, e causam erro. Segue abaixo a maneira como populamos os campos, de maneira que não geravam as tags. Não consegui de nenhuma maneira não fazer a geração desses campos, por isso vim ao fórum. Segue abaixo o XML de exemplo do provedor, o xml gerado com o componente antigo(correto), e o xml do componente novo, com o erro. Agradeço desde já a ajuda. xml_provedor.xml xml_componente_antigo.xml xml_componente_novo.xml

Bom dia Ítalo, Atualizei os fontes e realizei os testes, obtive o mesmo erro, verificando, o problema persiste o mesmo, ele não consegue extrair o retorno do xml, e fica com a data de recebimento vazia no ExtrairNotasRetorno. Estou anexando um arquivo de texto com o valor da variavel XMLRet, ao final da execução do ExtrairRetorno, XMLRet-ExtrairRetorno.txt

Bom dia Ítalo, A função ExtrairRetorno é atribuída a variável FPRetWS. Esses são os arquivos que ele gera antes de me dar o erro. 434-sub.xml 434-sub-soap.xml 434-ped-sub.xml 434-ped-sub-soap.xml

Italo, em qual unit estaria essa variavel? Nao consegui encontrar nenhuma FPRetRW

Pelo oq eu vi, passei '1' no ini na configuração 'FPConfiguracoesNFSe.Geral.ConfigGrupoMsgRet.Substituir', mas pelo oq eu vi, nao mudou nada, o problema está na ExtrairNotasRetorno acredito eu, pois ele retorna de lá com a data 30/12/1899 na data de emissao da substituição. na função 'TNFSeWebService.ExtrairRetorno(const GrupoMsgRet, AGrupo: String): String;', os valores da GrupoMsgRet = '', e o AGrupo = 1 nessa função, ele cai na linha de quando nao foi possivel extrair o retorno, como mostra na imagem Apos isso, ele chega na variável XMLRet com o valor que está no arquivo de texto XMLRet que anexei Apos essa execução, o valor de result que ele retorna para a Variavel FPRetWS é o valor no arquivo de texto FPRetWS Então ele entra na função ExtrairNotasRetorno, e ali, o count do FRetornoNFSe.ListaNFSe.CompNFSe.Count, já está em 0 na primeira passada. Apos isso, ele tbm verifica o count da 'FRetornoNFSe.ListaNFSe.MsgRetorno.Count' que tbm esta zerado Novamente, ele verifica mais um count, da 'FRetornoNFSe.ListaNFSe.CompNFSe.Count', novamente, tbm zerada o que faz com que ele pule para o fim da função, mantendo a data 30/12/1899, ou seja, vazia e na verificação final, passando para o result, fica false. Desculpe todo esse incomodo, estamos com essa questão da nota substituta faz um tempo aqui na empresa, e obrigado por toda a ajuda, aguardo uma resposta XMLRet.txt FPRetWS.txt

Entendi Ítalo, depurei, e as na função de extrairRetorno, as variaveis: 'FPConfiguracoesNFSe.Geral.ConfigGrupoMsgRet.GrupoMsg' e 'FPConfiguracoesNFSe.Geral.ConfigGrupoMsgRet.Substituir' estão vazias.

Imaginei essa situação, porém não entendo o fato de a função 'TratarResposta' estar vazia, e sempre trazer False.

Na unit ACBrDFeWebService, ele chama a função TDFeWebService.Executar, dentro dessa função, a linha: Result := TratarResposta;' sempre trazia valor false, mesmo quando funcionava a substituição. Então, dentro dessa TratarResposta, na mesma unit ACBrDFeWebService, Comentei o código, que era: 'Result := False; GerarException(ACBrStr('TratarResposta não implementado para: ') + ClassName);' e coloquei um 'Result := True;' Porém, dessa forma, acredito que deveria haver uma validação nessa função. porém, só tinha esse código passando fixo o false sempre.

Bom dia Ítalo, Continuo com o problema ainda, comentando o código dentro do tratar resposta, obtive funcionamento, pois ele esta assinando e substituindo a nota, só que dentro do TratarResposta, ele retorna um valor false, gerando a exceção.

Boa tarde Ítalo, Verifiquei e efetuei os testes novamente, continua caindo na mesma função de tratar resposta, que só passa False para o Result, e gera a exceção. Fui testar novamente, só mandando executar com as mesmas notas, aí sim, recebo o retorno de um erro pois a nota foi subtituida corretamente. Ou seja, ele esta enviando, e funcionando corretamente, porém nessa função, ele me retorno false em uma variável que acaba gerando a exceção que n deveria gerar.

Obrigado Italo, fico no aguardo, abraço.

Ele diz não estar implementado na função TratarResposta, Anexei os prints do código.

A função TDFeWebService.TratarResposta retorna false, pois está passando o valor fixado, e diz não ter implementação. Ali que ele retorna o false que gera a exceção.

ítalo, comparei os xmls gerados agora, e funcionou, porém, o result da função interna do acbr retorna False, e gera uma exceção com uma mensagem em branco. vou tentar atualizar os fontes e testar novamente.

Bom dia Ítalo. Acabei de testar a alteração, e obtive a mesma mensagem. O que faço é carregar a nota de serviço nova no componente, e executar a função de substituição, substituindo a nota que informo na função, pela que carreguei no componente. Seria isso mesmo? Não encontrei muito sobre a explicação de como funciona. Indo mais a fundo, verifiquei que dentro da função SubstituirNFSe, A linha de Assinar(), tem como parâmetro: 'Configuracoes.Geral.ConfigAssinar.RPS' e está vindo com o valor 'False'.