Ir para conteúdo
  • Cadastre-se

Amaury

Membros
  • Total de ítens

    27
  • Registro em

  • Última visita

Tudo que Amaury postou

  1. Olá Tagales, estou com o mesmo problema, você conseguiu resolver ?
  2. Boa Tarde! Meu nome é Amaury, sou iniciante aqui no forum e estou desenvolvendo a rotina de Cancelamento utilizando Evento e estou com com essa mensagem, alguém sabe me dizer o que pode ser? Segue a mensagem e o codigo da rotina // Mensagem de Erro Não foi possivel cancelar a NF-e Erro Original:envEventoCancNFe_v1.00.xsd#schema/element[1][@name = 'envEvento'] Undeclared XSD type : "{http://www.portafiscal.inf.br/nfe}-TEnvEvento" Processament interrompido // Codigo da Rotina ACBrNFe1.NotasFiscais.LoadFromFile(PathWithDelim(ACBrNFe1.Configuracoes.Geral.PathSalvar)+'XML_Load\Nota_'+DadosNFe.TNotaFiscalNOTA.AsString+'.xml'); if not(InputQuery('WebServices Cancelamento', 'Justificativa', MJustificativa)) then exit; idLote := Trim(IntToStr(MProximo_Lote)); nSeqEvento := IntToStr(DadosNFe.TNotaFiscalSEQUENCIA_EVENTO.AsInteger + 1); ACBrNFe1.EventoNFe.Evento.Clear; ACBrNFe1.EventoNFe.idLote :=StrToInt(idLote) ; with ACBrNFe1.EventoNFe.Evento.Add do begin InfEvento.tpAmb := ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpAmb; infEvento.CNPJ := ACBrNFe1.NotasFiscais.Items[0].NFe.Emit.CNPJCPF; InfEvento.cOrgao := ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.cUF; InfEvento.nSeqEvento := StrToInt(nSeqEvento); //1; InfEvento.chNFe := Copy(ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID, 4, 44); InfEvento.dhEvento := Now; InfEvento.tpEvento := teCancelamento; infEvento.detEvento.xJust := MJustificativa; InfEvento.detEvento.nProt := ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.nProt; end; Try //ACBrNFe1.Cancelamento(vAux); // ACBrNFe1.EnviarEventoNFe(StrToInt(idLote)); ACBrNFe1.WebServices.EnvEvento.Executar; Sleep(3000); Except on E:Exception do Begin Abilita_Botoes; raise Exception.Create('Não foi possível cancelar a NF-e'+#13+ 'Erro Original:'+E.Message+#13+ 'Processamento interrompido.'); if ACBrNFe1.NotasFiscais.Items[0].Alertas <> '' then MemoDados.Lines.Add('Alertas: '+ACBrNFe1.NotasFiscais.Items[0].Alertas); Exit; end; end;
×
×
  • Criar Novo...

Informação Importante

Colocamos cookies em seu dispositivo para ajudar a tornar este site melhor. Você pode ajustar suas configurações de cookies, caso contrário, assumiremos que você está bem para continuar.

The popup will be closed in 10 segundos...