Ir para conteúdo
  • Cadastre-se

LuisMaracaja

Membros
  • Total de ítens

    11
  • Registro em

  • Última visita

1 Seguidor

Últimos Visitantes

905 visualizações

LuisMaracaja's Achievements

Rookie

Rookie (2/14)

  • First Post
  • Collaborator Rare
  • Week One Done
  • One Month Later
  • One Year In

Recent Badges

0

Reputação

  1. Uma duvida, o que fazer com notas que foram emitidas OFF e deram erro de NCM ? Se o arquivo não pode mais ser alterado.
  2. @Daniel Simoes Pedi para o cliente me enviar o certificado, e aqui no laboratório apresentou o mesmo erro, e como se tivesse apagado algum arquivo dentro do cartão A3. em relação o passo a passo e simples, tentar emitir uma nfce ou consultar , vou te passar a foto de configuração do componente para ver se e algo errado que eu fiz.
  3. Estou com o mesmo problema, na validação da NFC-e ou na consulta aparece a mensagem da foto. O sistema esta em modo de Produção e esta marcado usar ssl 1 e 2 no windows . O cliente levou o certificado na empresa que emite, a empresa falou que foi meu sistema que apagou os dados do CERTIFICADO A3. Hoje pela manha outro cliente ligou e o erro e o mesmo da foto, gostaria de saber se alguém poderia me dar um norte de como resolver, obrigado! Quando consulto o status do Sefaz o mesmo erro retorna .
  4. DM.CDS_MDNFe.FieldByName('xml').value := UTF8Encode( ACBrMDFe1.Manifestos[0].XML); ao gravar no meu campo blob dados firebird o campo fica com um monte de '???????????????????????????????????????????|' alguém poderia me ajudar ?
  5. Bom dia amigo! estou usando a rotina para imprimir os eventos de cancelamento e encerramento; //110111 = CANCELAMENTO //110112 = ENCERRAMENTO //110114 = INCLUSAO DE CONDUTOR 1 : begin if DM.CDS_MDNFeSITUACAO.Value = 'ENCERRADO' then Begin ACBrMDFe1.EventoMDFe.Evento.Clear; ACBrMDFe1.EventoMDFe.LerXML( ACBrMDFe1.Configuracoes.Arquivos.PathSalvar + 'Evento\Encerramento\' + '110112' + DM.CDS_MDNFeCHAVE.value + '01-procEventoMDFe.XML' ); ACBrMDFe1.ImprimirEvento; End; end; 2 : begin if DM.CDS_MDNFeSITUACAO.Value = 'CANCELADO' then Begin ACBrMDFe1.EventoMDFe.Evento.Clear; ACBrMDFe1.EventoMDFe.LerXML( ACBrMDFe1.Configuracoes.Arquivos.PathSalvar + 'Evento\Cancelamento\' + '110111' + DM.CDS_MDNFeCHAVE.value + '01-procEventoMDFe.XML' ); ACBrMDFe1.ImprimirEvento; End; end; esta funcionando muito bem.
  6. Julio consegui resolver aqui, obrigado pela ajuda meu amigo. A rotina ficou com esta modificação if UTF8Encode(DM.CDS_MDNFe.FieldByName('XML').Value) <> '' then Begin XMLstream := TStringStream.Create( UTF8Encode(DM.CDS_MDNFe.FieldByName('XML').Value) ); XMLstream.Position := 0; ACBrMDFe1.Manifestos.LoadFromStream(XMLstream); End else ACBrMDFe1.Manifestos.LoadFromFile(dm._diretorioNFe(DM.CDS_MDNFeDATAHORA_EMISSAO.value )+ DM.CDS_MDNFeCHAVE.value + '-mdfe.xml' ); ACBrMDFe1.Consultar; Funcionou !!!!!! para ler o arquivo do acbr xml e gravando em um campo blob //PEGA XML DM.CDS_MDNFeXML.AsString := UTF8Encode(Fprincipal.ACBrMDFe1.Manifestos[0].XML ); //PEGA CHAVE DM.CDS_MDNFechave.VALUE := Copy(Fprincipal.ACBrMDFe1.Manifestos.Items[0].MDFe.infMDFe.ID, 5, 44);
  7. No No componente de ACBrMDFe1 estou usando a rotina. ACBrMDFe1 DM.CDS_MDNFeXML.AsString := UTF8Encode(Fprincipal.ACBrMDFe1.Manifestos[0].XML ); funciona normal, gostaria de saber qual o procedimento para alimentar o componente .ACBrMDFe1 com o xml gerado na base de dados.
  8. ACBrMDFe1.Manifestos.Clear; XMLstream := TStringStream.Create(dm.CDS_MDFeConsultaXML.AsString); <====== Gravo o xml em dados Firebird; XMLstream.Position := 0; ACBrMDFe1.Manifestos.LoadFromStream(XMLstream); <========= alimenta normal o componente ACBrMDFe1.Consultar; <================================== (ERRO : Nenhum MDF-e ou chave informada ) ///////////////////////////////////////////////////////////////// MDF-e (ERRO : Nenhum MDF-e ou chave informada )
  9. Juliomar Marchetti Estou usando esta rotina no meu emissor de NFC-e e funciona muito bem. vou aguardar, vou debugar e ver se consigo encontrar algo nas rotinas do acbr. sempre salvo o xml e uso impressão e consulta alimentando o componente com o xml Stream . obrigado !
  10. LuisMaracaja

    MDFe Consulta com Erro

    Na minha rotina apresenta o erro ao consultar ACBrMDFe1.Manifestos.Clear; if dm.CDS_MDFeConsultaXML.AsString <> '' then Begin XMLstream := TStringStream.Create(dm.CDS_MDFeConsultaXML.AsString); XMLstream.Position := 0; ACBrMDFe1.Manifestos.LoadFromStream(XMLstream); End else ACBrMDFe1.Manifestos.LoadFromFile(dm._diretorioNFe(DM.CDS_MDNFeDATAHORA_EMISSAO.value )+ DM.CDS_MDNFeCHAVE.value + '-mdfe.xml' ); ACBrMDFe1.Consultar; (ERRO : Nenhum MDF-e ou chave informada ) Preciso usar o .LoadFromStream meu xml esta na base de dados. Obrigado!
×
×
  • 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.