Ir para conteúdo
  • Cadastre-se

clodoaldosnascimento

Membros
  • Total de ítens

    4
  • Registro em

  • Última visita

Últimos Visitantes

O bloco dos últimos visitantes está desativado e não está sendo visualizado por outros usuários.

clodoaldosnascimento's Achievements

Newbie

Newbie (1/14)

  • First Post
  • Conversation Starter
  • Week One Done
  • One Month Later
  • One Year In

Recent Badges

0

Reputação

  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...
The popup will be closed in 10 segundos...