Ir para conteúdo
  • Cadastre-se

clodoaldosnascimento

Membros
  • Total de ítens

    4
  • Registro em

  • Última visita

Tudo que clodoaldosnascimento postou

  1. Eu já coloquei as DLL LibXml2 e OpenSSL da pasta ACBR em C:\windows\system32 e C:\Windows\SysWOW64. no ACBRNFE_exemplo quando eu clico em gerar e enviar xml. dá o erro: Projeto ACBRNFE_Exemplo elevou classe exceção 'EConvertError' com a mensagem: "" is an invalid integer. No endereço 100062305
  2. a consulta pela chave de acesso, a impressão xml, está tudo funcionando. só não gera a criação da nfe por xml. me ajudem por favor, agradeço a atenção de vocês.
  3. certo, estou usando o componente. mas, de uma hora para outra não está emitindo nenhuma nota e não dá nenhum erro. já desinstalei o lazarus e instalei novamente. mas, só carrega o xml e não envia para a sefaz. o que posso fazer para resolver este problema?
  4. Boa tarde, o ACBR recebe o xml, mas não está gerando a nota fiscal, e não mostra nenhum erro. eu uso utilizo o lazarus 2.0.10, não utilizo o ACBR MONITOR. vocês poderiam me ajudar? meu código de envio: procedure TForm1.EnviarNotaFiscal(Sender: TObject); var bStatusEnviar, Sincrono, SinContigencia : Boolean; begin Memo1.Lines.Add(''); Memo1.Lines.Add('Enviando NF-e...'); ACBrNFe1.Configuracoes.WebServices.Visualizar := True; vNumLote := '1'; Sincrono := false; SinContigencia := True; bStatusEnviar := ACBrNFe1.Enviar(vNumLote,True,Sincrono); if bStatusEnviar = true then begin if not Sincrono then begin Memo1.Lines.Text := ACBrNFe1.WebServices.Retorno.RetWS; Memo1.Lines.Text := ACBrNFe1.WebServices.Retorno.RetornoWS; end else begin Memo1.Lines.Add(''); Memo1.Lines.Add('NF-e enviada: '+IntToStr(ACBrNFe1.WebServices.Enviar.cStat) +' - '+ACBrNFe1.WebServices.Enviar.xMotivo); end; sChaveNfe := ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.chNFe; Memo1.Lines.Add('Chave da NF-e: ' +sChaveNfe); EdtChaveNfe.Text := sChaveNfe; ACBrNFe1.NotasFiscais.Items[0].GravarXML(LocalArquivos+'XML\'+sChaveNfe+'-nfe.xml'); Memo1.Lines.Add('NF-e gravada em '+LocalArquivos+'XML\'+sChaveNfe+'-nfe.xml.'); end else begin ACBrNFe1.Configuracoes.Geral.FormaEmissao := TpcnTipoEmissao(teContingencia); //ACBrNFe1.Configuracoes.Geral.FormaEmissaoCodigo := 9; ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpEmis := teContingencia; ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.xJust := 'NF-e EMITIDA EM CONTINGÊNCIA'; ACBrNFe1.Enviar(vNumLote,True,SinContigencia); if not SinContigencia then begin Memo1.Lines.Text := ACBrNFe1.WebServices.Retorno.RetWS; Memo1.Lines.Text := ACBrNFe1.WebServices.Retorno.RetornoWS; end else begin Memo1.Lines.Add(''); Memo1.Lines.Add('NF-e em CONTIGÊNCIA enviada: '+IntToStr(ACBrNFe1.WebServices.Enviar.cStat) +' - '+ACBrNFe1.WebServices.Enviar.xMotivo); end; sChaveNfe := ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.chNFe; Memo1.Lines.Add('Chave da NF-e EM CONTIGÊNCIA: ' +sChaveNfe); EdtChaveNfe.Text := sChaveNfe; ACBrNFe1.NotasFiscais.Items[0].GravarXML(LocalArquivos+'XML\'+sChaveNfe+'-nfe.xml'); Memo1.Lines.Add('NF-e EM CONTIGÊNCIA gravada em '+LocalArquivos+'XML\'+sChaveNfe+'-nfe.xml.'); end; end; pedido-nfe-001.xml
×
×
  • 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...