Pesquisar na Comunidade

Boa ! Ao tentar fazer o cancelamento de uma nfc-e que teve a tentativa de envio sem comunicação com a sefaz eu estou tendo o retorno 493 - Rejeicao: Evento nao atende o Schema XML especifico (Elemento: envEvento/evento[1]/infEvento/detEvento/nProt) . Estou enviando a tag nprot em branco, como não tive retorno do web service a procolo de autorização fica em branco. Como eu vou proceder neste sentido ? Os arquivos de envio e retorno estão anexados. Valeu! 1-eve.xml 1-ped-eve.xml

Boa noite Estou lendo o xml da nfe e estou conseguindo pegar as informações que necessito, porém agora surgiu a necessidade de pegar outros valores e não estou conseguindo. Seria o seguinte: Do código abaixo, preciso pegar o conteúdo da id -<infNFe versao="3.10" Id="NFe35180569012656000120550010000126521114102842"> -<ide> <cUF>35</cUF> <cNF>11410284</cNF> E desse outro código preciso pegar as tags, verAplic, chNFe e nProt. </Signature> </NFe> -<protNFe xmlns="http://www.portalfiscal.inf.br/nfe" versao="3.10"> -<infProt xmlns="http://www.portalfiscal.inf.br/nfe"> <tpAmb>1</tpAmb> <verAplic>SP_NFE_PL_008i2</verAplic> <chNFe>35180569012656000120550010000126521114102842</chNFe> <dhRecbto>2018-05-31T14:18:34-03:00</dhRecbto> <nProt>135180362965223</nProt> <digVal>kx/dfksj1jycogsn3MdNIS/OhwY=</digVal> <cStat>100</cStat> <xMotivo>Autorizado o uso da NF-e</xMotivo> </infProt> </protNFe> </nfeProc> Alguém teria uma luz Obs, preciso fazer isso utilizando o txmlDocument Desde ja agradeço

Estou com problema para gerar o evento de cancelamento de um CTe em especial. O programa é bem simples, o usuario seleciona qual o XML ele deseja cancelar e digita uma justificativa. O XML foi gerado pelo componente e isso já funciona a algum tempo, não consigo entender porque nesse CTe em especial ele não está funcionando. Desde já agradeço a quem puder me dar uma luz; Estou anexando o XML; O erro que foi apresentado: Segue trecho do código que foi citado: if OpenDialog1.Execute then begin ACBrCTe1.Conhecimentos.Clear; ACBrCTe1.Conhecimentos.LoadFromFile(OpenDialog1.FileName); if not(InputQuery('Cancelamento do CTe:', 'Justificativa', vAux))then begin - exit; end; ACBrCTe1.EventoCTe.Evento.Clear; qryEmpresa.Close; qryEmpresa.Open; with ACBrCTe1.EventoCTe.Evento.Add do begin infEvento.nSeqEvento := 1; // Para o Evento de Cancelamento: nSeqEvento sempre = 1 infEvento.chCTe := Copy(ACBrCTe1.Conhecimentos.Items[0].CTe.infCTe.Id, 4, 44); infEvento.CNPJ := qryEmpresacnpj.AsString; infEvento.dhEvento := now; infEvento.tpEvento := teCancelamento; infEvento.detEvento.xJust := trim(vAux); infEvento.detEvento.nProt := ACBrCTe1.Conhecimentos.Items[0].CTe.procCTe.nProt; end; iLote := 1; // Numero do Lote do Evento ACBrCTe1.EnviarEventoCTe(iLote); Memo1.Lines.Text := UTF8Encode(ACBrCTe1.WebServices.EnvEvento.RetWS); memo1.Lines.Text := UTF8Encode(ACBrCTe1.WebServices.EnvEvento.RetWS); LoadXML(Memo1, WBResposta); ShowMessage(IntToStr(ACBrCTe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat)); ShowMessage(ACBrCTe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.nProt); end; 35140809602853000178570000000039661220776052-cte.xml

Pessoal; Já alguns dias tenho notado que os retornos das CCe estavam ficando com o numero de protocolo em branco, fui depurar um pouco o fonte e cheguei a conclusão de que as informações do protocolo e data de registro do evento não estão sendo preenchidas de acordo com o resultado. Bem, resumindo, fiz uma pequena modificação na unit ACBrNFeWebServices, linha 3615; ... if FEvento.Evento.Items.InfEvento.chNFe = EventoRetorno.retEvento.Items[j].RetInfEvento.chNFe then begin { as proximas 3 linhas copian o resultado do processamento de arquivo de retorno para as propriedades originais que criaram os eventos} FEvento.Evento.Items.RetInfEvento.nProt := EventoRetorno.retEvento.Items[j].RetInfEvento.nProt; FEvento.Evento.Items.RetInfEvento.dhRegEvento := EventoRetorno.retEvento.Items[j].RetInfEvento.dhRegEvento; FEvento.Evento.Items.RetInfEvento.cStat := EventoRetorno.retEvento.Items[j].RetInfEvento.cStat; wProc := TStringList.Create; Apenas a titulo de exemplo, segue print de como ficou o pdf da cce;