Jump to content

diadoacbr

Como Recupero Xml De Envio Para Carta De Correção Cce


acg.net
Go to solution Solved by acg.net,
  • Este tópico foi criado há 2804 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Recommended Posts

  • Membros Pro

Bom dia a todos

 

Antes eu usava o seguinte código para recuperar o XML da carta de correção

 

UTF8Encode(ACBrNFe1.CartaCorrecao.CCe.Evento[x].InfEvento.WebServices.EnvioWebService.XMLEnvio);

 

Observei que foram feitas algumas adequações quanto à padronização do componente e essa forma antiga não funciona mais.

 

Como posso obter o XML de envio da CCe no novo formato do componente?

Link to comment
Share on other sites

  • Membros Pro
  • Solution

Consegui resolver.

Vou postar aqui o código para quem possa ter o mesmo problema:

 

        bSalvar                                                   := ACBrNFe1.Configuracoes.Geral.Salvar;
        ACBrNFe1.Configuracoes.Geral.Salvar := True;
        ACBrNFe1.EnviarEventoNFe(ibDm.cdCartaCorrecaoCO_LOTE_CC.AsInteger);
        ACBrNFe1.Configuracoes.Geral.Salvar := bSalvar;

        MemoResp.Lines.Text       := UTF8Encode(ACBrNFe1.WebServices.EnvEvento.RetWS);
        memoRespWS.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.EnvEvento.RetornoWS);

        if Pos('Evento registrado e vinculado a NF-e',MemoResp.Lines.Text) > 0 then
        begin
          // pegando o xml de envio da carta de correcao
          sNomeArquivo := ACBrNFe1.Configuracoes.Geral.PathSalvar +
          SomenteNumeros(ACBrNFe1.EventoNFe.Evento.Items[0].InfEvento.id) + '-procEventoNFe.xml';


          cdCartaCorrecao.Edit;
          cdCartaCorrecaoTX_ARQUIVO_XML.LoadFromFile(sNomeArquivo);

          cdCartaCorrecaoDS_PATH_ARQUIVO_XML.AsString := sNomeArquivo;
          cdCartaCorrecao.Post;

          Application.MessageBox('Carta de correção registrada e vinculada a NF-e!', 'ATENÇÃO',
            MB_OK + MB_ICONINFORMATION + MB_DEFBUTTON2);

        end

Link to comment
Share on other sites

  • Este tópico foi criado há 2804 dias atrás.
  • Talvez seja melhor você criar um NOVO TÓPICO do que postar uma resposta aqui.

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
×
×
  • Create New...

Important Information

We have placed cookies on your device to help make this website better. You can adjust your cookie settings, otherwise we'll assume you're okay to continue.