Pesquisar na Comunidade
Showing results for tags 'consultar nota'.
Encontrado 1 registro
-
[resolvido] ACBrNFe - Consultar nota e pegar o xml válido e salvar no BD
um tópico no fórum postou RenataAlbergoni ACBrNFe
Olá Pessoal, pesquisei nos tópicos existentes e não encontrei uma resposta. Caso exista um tópico solucionando o meu problema e alguém me indicar ficarei agradecida. Estou tentando consultar a nota pela chave e salvar o xml válido no banco de dados. Estou fazendo da seguinte maneira. sAux := ACBrNFe1.WebServices.Retorno.ChaveNFe; ACBrNFe1.NotasFiscais.Clear; ACBrNFe1.WebServices.Consulta.NFeChave := sAux; ACBrNFe1.WebServices.Consulta.Executar; case ACBrNFe1.WebServices.Consulta.cStat of // 100|Autorizado o uso da NF-e // 150|Autorizado o uso da NF-e, autorização fora de prazo 100,150: Begin // Alterar no banco de dados como enviado ModelMOVCAB_NFECAB.NFEEMISSAO := 'CONCLUIDO'; ModelMOVCAB_NFECAB.ENVIO_AMBIENTE := StrToIntDef(TpAmbToStr(ACBrNFe1.WebServices.Consulta.TpAmb),0); ModelMOVCAB_NFECAB.ENVIO_CSTAT := ACBrNFe1.WebServices.Consulta.cStat; //ModelMOVCAB_NFECAB.ENVIO_RECIBO := ACBrNFe1.WebServices.Consulta.Recibo; ModelMOVCAB_NFECAB.ENVIO_PROTOCOLO := ACBrNFe1.WebServices.Consulta.Protocolo; ModelMOVCAB_NFECAB.CHAVE_ACESSO := ACBrNFe1.WebServices.Consulta.NFeChave; ModelMOVCAB_NFECAB.MSTAT := '[DUPLICIDADE+ENVIO] ' + ACBrNFe1.WebServices.Consulta.xMotivo; ModelMOVCAB_NFECAB.XML_NFE := ACBrNFe1.WebServices.Consulta.protNFe.XML_NFe; ... O campo que estou tentando pegar o xml válido é "ACBrNFe1.WebServices.Consulta.protNFe.XML_NFe", mas creio que seja o errado. Todos os campos estão preenchidos "belezinha", só preciso mesmo do XML válido! Como devo proceder, alguem pode me dar uma força? Obrigada