Ir para conteúdo
  • Cadastre-se

Warlen Librelon

Membros
  • Total de ítens

    115
  • Registro em

  • Última visita

Posts postados por Warlen Librelon

  1. coloquei essa linha para verificar o caminho do schemas:

     

    ACBrNFe1.EnvEvento.EnvEventoNFe.Evento.Clear;

    Esta pegando no diretorio da minha aplicação, onde eu atualizei o arquivo. Estranho porque esta atualizado.

    segue o modo como estou fazendo:

    if not(InputQuery('WebServices Eventos: Carta de Correção', 'Chave da NF-e', Chave)) then
         exit;
      Chave := Trim(OnlyNumber(Chave));
      idLote := '1';
      if not(InputQuery('WebServices Eventos: Carta de Correção', 'Identificador de controle do Lote de envio do Evento', idLote)) then
         exit;
      CNPJ := copy(Chave,7,14);
      if not(InputQuery('WebServices Eventos: Carta de Correção', 'CNPJ ou o CPF do autor do Evento', CNPJ)) then
         exit;
      nSeqEvento := '1';
      if not(InputQuery('WebServices Eventos: Carta de Correção', 'Sequencial do evento para o mesmo tipo de evento', nSeqEvento)) then
         exit;
      Correcao := 'Correção a ser considerada, texto livre. A correção mais recente substitui as anteriores.';
      if not(InputQuery('WebServices Eventos: Carta de Correção', 'Correção a ser considerada', Correcao)) then
         exit;
    
      FENfCUSTNFe2 := TFENfCUSTNFe2.Create(Self);
      FENfCUSTNFe2.Timer1.Enabled := False;
      FENfCUSTNFe2.ACBrNFe1.EnvEvento.EnvEventoNFe.Evento.Clear;
      FENfCUSTNFe2.ACBrNFe1.EnvEvento.EnvEventoNFe.idLote := StrToInt(idLote) ;
      with FENfCUSTNFe2.ACBrNFe1.EnvEvento.EnvEventoNFe.Evento.Add do
       begin
         infEvento.chNFe := Chave;
         infEvento.CNPJ   := CNPJ;
         infEvento.dhEvento := now;
         infEvento.tpEvento := teCCe;
         infEvento.nSeqEvento := StrToInt(nSeqEvento);
         infEvento.detEvento.xCorrecao := Correcao;
       end;
      Showmessage(FENfCUSTNFe2.ACBrNFe1.Configuracoes.Geral.PathSchemas);
      FENfCUSTNFe2.ACBrNFe1.EnviarEventoNFe(StrToInt(idLote));
    
      try
        FCanNFe := TFCanNFe.Create(self);
        FCanNFe.MemoResp.Lines.Text := UTF8Encode(FENfCuSTNFe2.ACBrNFe1.WebServices.EnvEvento.RetWS);
        FCanNFe.memoRespWS.Lines.Text := UTF8Encode(FENfCuSTNFe2.ACBrNFe1.WebServices.EnvEvento.RetornoWS);
        LoadXML(FCanNFe.MemoResp, FCanNFe.WBResposta);
        FCanNFe.ShowModal;
      finally
        FCanNFe.Release;
        FCanNFe := nil;
      end;
      FENfCuSTNFe2.Free;
    
    

    Estou me baseando no exemplo que tem no ACBr.

    Obrigado

    Fabiano

     

    como declarar o

    FENfCUSTNFe2 
  2. Segue exemplo de como enviar, retirado do demo do ACBrNFe2:

    
    
      ACBrNFe1.CartaCorrecao.CCe.Evento.Clear;
    
      ACBrNFe1.CartaCorrecao.CCe.idLote := StrToInt(idLote) ;
    
    
      with ACBrNFe1.CartaCorrecao.CCe.Evento.Add do
    
       begin
    
         infEvento.chNFe := Chave;
    
         infEvento.cOrgao := StrToInt(codOrgao);
    
         infEvento.CNPJ   := CNPJ;
    
         infEvento.dhEvento := now;
    
         infEvento.tpEvento := 110110;
    
         infEvento.nSeqEvento := StrToInt(nSeqEvento);
    
         infEvento.versaoEvento := '1.00';
    
         infEvento.detEvento.descEvento := 'Carta de Correção';
    
         infEvento.detEvento.xCorrecao := TextoCorrecao;
    
         infEvento.detEvento.xCondUso := ''; //Informar vazio, o componente vai colocar o texto correto
    
       end;
    
    
      ACBrNFe1.EnviarCartaCorrecao(StrToInt(idLote));
    
    
    

    Caro Regys,

    fiz um teste com esse exemplo e ocorreu um erro na linha de comando enviar carta.

    "Não encontrei inicio do URI: ID=."

    O que pode ser?

  3. Estou tentando desenvolver a rotina de envio de carta de correção pela primeira vez. E com base no exemplo do ACBR ocorreu o seguinte erro:

    Falha de Validação: Documento não contém exatamente um nó de raiz.

    Percebi que esse erro ocorro na linha de envio: ACBrNFe1.EnviarEventoNFe.

    Utilizo o próprio número da nFe como número de lote.

    Espero que alguém possa me ajudar.

    Obrigado

  4. Aproveitando o assunto, alguém sabe o motivo da mensagem abaixo ao tentar enviar uma carta de correção?

    Falha na validação dos dados do envio do evento

    Falha de validação: documento não contém exatamente um nó de raiz.

    obrigado

  5. AS vezes ocorre o erro de duplicidade da nfe ao tentar transmitir, mas sem que realmente esteja no governo. Tanto que posso fazer a mesma nota no programa gratuíto do governo que não ocorre problema. Eu coloco o número da minha nota na propriedade ide.cnf. Seria melhor deixar essa propriedade em branco para o componente gerar a chave automaticamente? Se eu fizer isso, precisarei checar se existe a chave já criada para evitar duplicação? Qual a melhor solução?

    Obrigado

  6. Conferiu se ele é filho de algum que não tem ?

    Pelo que entendi ele é independente.

    fiz o 0001, 0100, 0110, 0140 e está normal.

    O Registro0200New fica como não declarado.

    obrigado

    DEscobri o erro. Foi vacilada minha.

    Sem eu perceber ele ficou fora do ACBrSPEDPisCofins1.Bloco_0

    Valeu

  7. Componente só lê o XML da NFe mesmo (até aonde eu sei...). Eu tive que fazer uma rotina de leitura desses protocolos para uma integração que fizemos, fiz a leitura na mão mesmo.

    Agora tbem não custa perguntar, pra que dar entrada de uma nota cancelada???

    na verdade, não é dar uma entrada em nota cancelada. O sistema que eu desenvolvi para uma contabilidade, faz a importação do xml da empresa (cliente). Nesse caso eu importo todos arquivos xml, autorizados e cancelados para o controle da contabilidade. Esse sistema não é de emissão de NFe.

    Nesse caso, preciso ler o xml cancelado e registrar alguns dados no sistema. \

  8. Componente só lê o XML da NFe mesmo (até aonde eu sei...). Eu tive que fazer uma rotina de leitura desses protocolos para uma integração que fizemos, fiz a leitura na mão mesmo.

    Agora tbem não custa perguntar, pra que dar entrada de uma nota cancelada???

    na verdade, não é dar uma entrada em nota cancelada. O sistema que eu desenvolvi para uma contabilidade, faz a importação do xml da empresa (cliente). Nesse caso eu importo todos arquivos xml, autorizados e cancelados para o controle da contabilidade. Esse sistema não é de emissão de NFe.

  9. Não custa perguntar: esse xml cancelado que vc esta carregando ele tem a mesma estrutura do XML normal, ou é aquele de protocolo de cancelamento?

    A estrutura é diferente. Mas eu não recebo do fornecedor o xml de outra forma.

    Estou me referindo a notas de entrada, pq fiz uma rotina para importar os arquivos XML do fornecedor e nesse caso o fornecedor me mandou o xml de cancelamento que não tem a mesma estrutura do xml normal. Nesse caso não será posível ler o XML?

  10. Amigo, esse caminho esta correto ? Chegou a colocar um breakpoints para ver se ele esta pegando o caminho e o arquivo certo ?

    Eu coloquei um try antes para ver se a importação esta correta.

    try

    ACBrNFe.NotasFiscais.LoadFromFile(Caminho e Arquivo);

    except

    ShowMessage('Arquivo NFe Inválido');

    exit;

    end;

    Abraços

    Sim. O caminho está correto.

    Inclusive quando pego um arquivo XML autorizado, não ocorre o erro.

  11. Caros amigos. Vejam quem pode me ajudar.

    Estou tentando ler um arquivo XML cancelado e ao buscar carregar o arquivo e tentar pegar o status, apresenta um erro:

    "List index out of bounds(0)". Ou seja, o componente não está conseguindo carregar os dados do XML. Veja a rotina de teste.

    ACBrNFe.NotasFiscais.Clear;

    AcbrNfe.NotasFiscais.LoadFromFile(DirectoryListBox1.Directory+'\'+EdArquivoXml.Text);

    if ACBrNFe.NotasFiscais.Items[0].NFe.procNFe.cStat = 101 then begin

    showmessage('Arquivo XML Cancelado');

    end;

  12. aqui conosco os clientes q notificaram esse problema, era restauração de horário de verão mesmo ...

    Algumas maquinas desativaram o horário no dia 12/02, incorretamente ( sabe-se lá o pq ... )

    Atualização do windows.

    Parcialmente o problema está resolvido. Instalei a minha aplicação em outro computador e está ok.

    Mas ainda não descobri o motivo do problema no comput anterior. Esse problema não foi causado pelo horário de verão, pois ontem quando começou já tínhamos emitido algumas notas. Não foi logo no momento de abrir o computador.

    Vou tentar atulizar o windows. Assim que descobri, posto a solução.

    Abraços e obrigado a todos que tentaram ajudar.

  13. em MG está tudo ok, o único problema é mesmo o horário de verão que alguns computadores com SO desatualizado entraram antes do dia marcado.

    Já verificou antívirus, firewall, proxy, cadeia de certificados, certificado vencido, etc?

    Regis,

    Imagino que qualquer problema dessa natureza que vc especificou impediria tbm o funcionamento do programa da SEF. Ou seja, através do programa da SEF está transmitindo normalmente. Concorda?

  14. Meus caros,

    Desde ontem não consigo transmitir a nfe.

    Ocorre o erro de recepção e com isso não grava a última parte do XML que são as informações de retorno.

    As duas primeiras linhas também não são gravadas.

    <?xml version="1.0" encoding="UTF-8" ?>

    -

    Mens de erro:

    URL:https://nfe.fazenda.mg.gov.br/nfe2/services/nfeRecepcao2 - SOAPAction:http://www.portalfiscal.inf.br/nfe/wsdl/nferecepcao2

    Foi colocado no forum que poderia ser problema com horário de verão. Mas já descartei essa possibilidade.

    Alguém pode me ajudar?

  15. esta ocorrendo mesma coisa comigo

    so que é o certificado erh de SAO PAULO

    HELP MEEEE

    Será que tem mais pessoas com o mesmo problema em outros estados.

    Estamos desesperados, pq a empresa está sem condições de emitir.

    Ninguém merece usar o programa da SEF.

    Quem pode nos ajudar.

×
×
  • 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.