vinisted

É, não funcionou também . Para usar essa consulta ACBrCTe1.WebServices.Consulta.Executar. utilizar o comando ACBrCTe.Conhecimentos.LoadFromString(IBQuery.FieldByName('XML_M').AsString) para carregar o xml já é suficiente? Ele ta reclamando que a UF do emitente está vazia ao utilizar essa forma de consultar, mas ao utilizar ACBrCTe.Consultar; ele ele trás as informações normalmente

Em anexo o arquivo com o nome "XML Gerado após Consulta.xml" é o que contém as informações que desejo para armazenar. Ele é gerado e salvo no path configurado quando eu rodo o comando de consulta após cancelar o CTe. Eu gostaria de salvar o string desse xml após cancelar XML Gerado após Consulta.xml XML Gerado ao enviar o cte.xml Ele está salvando no path que configurei já. A dúvida é saber se existe um comando que me dá acesso a esse xml no ACBr para salvar como string no banco

Ele trouxe o xml assinado dessa forma mas não vieram as informações do evento como no xml que ele salva nos paths quando faço a consulta ACBrCTe.Conhecimentos.Clear; ACBrCTe.Conhecimentos.LoadFromString(IBQuery.FieldByName('XML_M').AsString); ACBrCTe.Consultar;

Bom dia! Estou tentando pegar o XML de um CTe Cancelado completo (O xml autorizado com o tag do evento). Eu vi que esse xml está sendo salvo sempre que consulto o CTe após o envio do cancelamento mas não consigo salvar ele no banco Alguém saberia me informar as propriedades necessárias para salvar esse XML? O código: Try ACBrCTe.EnviarEvento(IdLote); {$Region 'Salvando dados de retorno'} if ACBrCTe.WebServices.EnvEvento.EventoRetorno.cStat = 135 then begin Result := True; Situacao := CTE_CANCELADO; xMotivo := ACBrCTe.WebServices.EnvEvento.EventoRetorno.xMotivo; Protocolo := ACBrCTe.WebServices.EnvEvento.EventoRetorno.retEvento[0].RetInfEvento.nProt; ACBrCTe.Conhecimentos.Clear; ACBrCTe.Conhecimentos.LoadFromString(IBQuery.FieldByName('XML_M').AsString); ACBrCTe.Consultar; XML := ACBrCTe.Conhecimentos.Items[0].XMLAssinado; XMLEV := ACBrCTe.WebServices.Consulta.RetWS; CStat := ACBrCTe.WebServices.Consulta.cStat; ShowMessage('CTe Cancelado com Sucesso!'); end else begin ShowMessage(ACBrCTe.WebServices.EnvEvento.EventoRetorno.xMotivo); end; {$EndRegion} Except on E : Exception do begin ExibirMsg(E.Message); end; end;

Boa tarde, me interesso pela vaga! Contato: viniciusaraujo.145@outlook.com VINICIUS ARAÚJO DE FIGUEIREDO - CURRÍCULO.pdf