-
Total de ítens
7 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por Zildo Sousa
-
-
Não consigo gerar o xml, e por fim também não a chave de emissão (vi muitos tópicos, porém os mesmos sem resposta)
Obs.: Sem modo de contingência passa normalmente
ACBRNFCe.NotasFiscais.GerarNFe;
ACBRNFCe.NotasFiscais.Assinar;
ACBRNFCe.NotasFiscais.Validar;
cStatus := 0;
ChaveNFCE := ACBRNFCe.NotasFiscais.Items[0].NFe.infNFe.Id;
NumeroNFCe := strtoint(vAux);
ACBRDANFENFCe.FastFile := 'C:\SISTEMA\PDV\Schemas\DANFeNFCe.fr3';
if FileExists(frmPrincipal.LerINi(sConfiguracoes, 'PDV',
'CAMINHO_LOGO', '')) then
ACBRDANFENFCe.Logo := frmPrincipal.LerINi(sConfiguracoes, 'PDV',
'CAMINHO_LOGO', '');
ACBRDANFENFCe.Detalhado := true;
ACBRDANFENFCe.vTroco := ed_troco.value;ACBRDANFENFCe.Impressora := edImpressora;
ACBRDANFENFCe.DescricaoViaEstabelec := edDescEsta;
ACBRDANFENFCe.EspessuraBorda := edMargem;
ACBRDANFENFCe.MargemDireita := edMargDir;
ACBRDANFENFCe.MargemEsquerda := edMargEsq;
ACBRDANFENFCe.MargemSuperior := edMargSup;
ACBRDANFENFCe.MargemInferior := edMarginf;
ACBRDANFENFCe.MostrarPreview := edPreview;
ACBRNFCe.NotasFiscais.Imprimir;
ACBRNFCe.NotasFiscais.clear;
-
Em 24/04/2016 at 12:14, Ess disse:
Olá Italo Boa Tarde Muito Obrigado por me ajudar!! Por favor desconsidere o post anterior não sei como edita-lo.
Tinha me esquecido do consumo indevido vou arrumar aqui.
Mas tenho algumas dúvidas:
Sobre a consulta estou fazendo dessa forma:
ACBrNFE1.WebServices.Consulta.NFeChave :=ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.chNFe;
Mas acontece que possui outra forma de consultar que seria ACBrNFe1.Consultar(chave), qual o método correto?
Depois de executar o método enviar em caso de retorno de erro e dessa forma que obtenho a chave ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.chNFe ? Ou existe outra forma?
Estou usando fazendo a consulta dessa forma ACBrNFE1.WebServices.Consulta.NFeChave se nota estiver tudo ok na sefaz então terei o retorno do protocolo autorizado dessa forma: ACBrNFe1.WebServices.consulta.Protocolo ?
Caso retorne vazio estou tentando reenviar em caso de negativa novamente então mudo para forma offline:
ACBrNFe1.NotasFiscais.Clear;
ACBrNFe1.Configuracoes.Geral.FormaEmissao:= teOffLine;
ACBrNFe1.Configuracoes.Geral.ModeloDF := moNFCe;
ACBrNFe1.Configuracoes.Geral.VersaoDF := ve310;
GerarNFCe(vnumnfce,vnumserienfce);
ACBrNFe1.NotasFiscais.GerarNFe;
ACBrNFe1.NotasFiscais.Validar;
ACBrNFe1.NotasFiscais.Imprimir;Ele gera o xml corretamente e imprimi em modo contingencia tudo certo.
Ae vem 2 dúvidas:
Como faço pra obter a chave quando e gerado na forma de emissão offline?
Estou tentando dessa forma ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.chNFe mas me retorna vazio. Qual a forma correta?
Pode ser assim Copy(ACBrNFe1.NotasFiscais.Items[0].NFe.infNFe.ID, 4, 44)?
E por fim no caso de gerar um novo xml na forma offline esta ficnado 2 xmls gerados pra um mesmo cupom pois além da forma offline fica na pasta o que gerado na forma normal, será pq estou usando ACBrNFe1.NotasFiscais.Clear? Se eu tirar ele nesse caso do offline ele vai sobrepor o xml gerado na forma normal?
Mais uma vez Muito Obrigado pela Ajuda e Atenção!!!
Também estou com esse problema, conseguiu resolver? Pode dizer como?
-
Estou com o mesmo problema, como conseguiu resolver? GERO A NOTA EM CONTIGÊNCIA, MAS NÃO VEM A CHAVE DE ACESSO
-
alguem pode me passar um exemplo para implantar nfce no meu projeto delphi 7 todos que ja peguei nao funcionam!
procedure TFrmPadraoPafECf.BematechNFCEClick(Sender: TObject);
begin
Application.CreateForm(TUBemaNFCe, UBemaNFCe);
UBemaNFCe.showmodal;
end;end.
como e que eu declaro aqui pra imprimir nfce??
-
Pode me mandar o link para o download do ACBR atualizado com NFC-e
-
Alguem pode me ajudar implantar acbr nfce
Como conseguir a chave de acesso? (CONTINGÊNCIA "teOffLine")
em NFC-e - Nota Fiscal do Consumidor Eletrônica
Postado
Não encontrei o exemplo de NFC-e em contingência...
Configurações passo assim, fui vendo em tópicos.
if frmmodulo.qrconfigpdv.fieldbyname('CONTINGENCIA').asinteger = 1 then
begin
Ide.tpEmis := teOffLine;
Ide.dhCont := date;
Ide.xJust := 'Problemas técnicos no envio da nota fiscal do consumidor eletrônico';
frmmodulo.ACBRNFCe.Configuracoes.Geral.FormaEmissao :=teOffLine ;
frmmodulo.ACBRDANFENFCe.ViaConsumidor := false;//imprime uma via pro estabelecimanto
frmmodulo.ACBRDANFENFCe.NumCopias := 2; //imprime duas vias
end
else
begin
Ide.tpEmis := teNormal;
end;
O resto de todas as configurações são iguais ao exemplo para poder emitir NFC-e normal, porém quando ele entra em modo "teOffLine" ele não gera um XML