reinaldoacdc
-
Total de ítens
18 -
Registro em
-
Última visita
Tipo de Conteúdo
Blocks
Notes ACBrLibNFe
Fóruns
Downloads
Calendário
Posts postados por reinaldoacdc
-
-
Up para ver se acaba com o meu merge rs..
-
Tive um problema semelhando com outra UF.
Quando enviar Nfc-e em ambiente de Homologacão, não informe o Token.
Exemplo:
AcBrNfe1.Configuracoes.Geral.Token := '';
- 1
-
Eu fiz um teste com isso a um tempo e tinha funcionado.
Eu tinha informado o NCM no evento QuandoVenderItem.
Exemplo:
procedure frmVendas.EcfVirtualQuandoVenderItem(Det :TDetCollection);
begin
Det.Prod.NCM := '92000000';
end;
Não lembro porque fiz isso, mas lembro que funcionou.
Optei por não usar o EcfVirtual então não uso mais isso, mas espero que funcione para ti.
-
Carapicuiba / SP
Código IBGE - 3510609
Provedor - SIMPLISS
Homologacao - http://xxxdnn1203.lo...nfseservice.svc
Producao - http://xxxdnn1203.lo...nfseservice.svc
-
Eu estava fazendo igual o Joemil, precisava só do arquivo XML do Lote (sem assinatura).
O problema é que junto com o arquivo do lote (204-lot-rps.xml) ele também gera os Xmls dos rps individualmente ( 70A-rps.xml, 71Arps.xml...).
Tem como desativar isso e só gravar o Xml do lote ? -
Existe uma propriedade nesse relatório chamada ViaConsumidor, é só manipular ela.
E no evento rlbMensagemFiscalBeforePrint do relatório especificar a mensagem.
Eu fiz da seguinte forma:lNumSerieEmissao.Caption := ACBrStr('Número '+IntToStrZero(Ide.nNF,9)+' Série '+IntToStrZero(Ide.serie,3)+' Emissão '+DateTimeToStr(Ide.dEmi)+IfThen(fACBrNFeDANFCeFortes.ViaConsumidor, ' - Via do consumidor', ' - Via do estabelecimento')); -
-
Que legal essa iniciativa de MG. Cartório é a coisa mais século 19 que existe hoje em dia.
Espero que os outros estados também sigam o exemplo.
Mesmo não precisando disso agora, é sempre interessante ler o fórum AcBr por causa disso, sempre se acha algo interessante.
-
Caso precisem...
Provedor - SIMPLISS
Homologacao - http://xxxdnn1203.locaweb.com.br/ws_nfse/nfseservice.svc
Producao - http://xxxdnn1203.locaweb.com.br/ws_nfse_carapicuiba/nfseservice.svc
Tomei a liberdade de acrescentar aos fontes também:
-
O jorgerp relatou o mesmo problema, talvez isso te ajude:
-
Aconteceu o mesmo comigo. Não sai do Logo da Nf-e. Tinha a ver com as configuracoes do Java da minha máquina. Eu o reinstalei e funcionou, mas.....
Mas não precisa de nada disso, você consegue ativar o Sat-Emulador atravéz do Demo do AcBrSat. =)
Dá uma olhada no Demo e faz uns testes por lá. -
Alterou o tipo de emissão da nota para offline ?
ACBrNFe1.NotasFiscais.Items[0].NFe.Ide.tpEmis := teOffLine;
Esse erro deve ser pq informou xJust com tpEmiss = normal....
- 1
-
Se a Nfc-e não foi autorizada, não vejo motivo para imprimi-la. Apenas informo o erro pro usuário. E volto para que possam corrigir ou cancelar a venda.
-
Logo que li o post fui ver se ocorria o mesmo com o EcfVirtualNFCE, mas não acontece o mesmo erro. No EcfVirtualSAT realmente aconteceu o erro.
-
Bom dia Rafael,
Também uso o Fast Report e aqui fiz desse jeito até usando um exemplo que achei pesquisando aqui no forum.
ACBrNFeDANFEFR1.DescricaoViaEstabelec := 'Via do Consumidor'; ACBrNFe1.NotasFiscais.Imprimir; if rgImprimepdf.ItemIndex = 0 then ACBrNFe1.NotasFiscais.ImprimirPDF else if (rgImprimepdf.ItemIndex = 2) and (MensagemDeConfirmacao('Salvar DANFE NFC-e em PDF?', '') = mrYes) then ACBrNFe1.NotasFiscais.ImprimirPDF; // 2ª via do Estabelecimento - Capítulo 2.2.6 da Nota Técnica da NFC-e if Application.MessageBox(PChar( 'NFC-e Emitida em modo de Contingência off-line.' + sLineBreak + 'Deseja efetuar a Impressão da Via do Estabelecimento?' + sLineBreak + sLineBreak + 'Atenção: Optando por "não" imprimir a segunda via, estará automaticamente optando pela guarda do XML.' + sLineBreak), PChar(Application.Title), MB_YESNO + MB_ICONWARNING) = IDYES then begin ACBrNFeDANFEFR1.DescricaoViaEstabelec := 'Via do Estabelecimento'; ACBrNFe1.NotasFiscais.Imprimir; end;
Não encontrei essa propriedade (ViaConsumidor) implementada na impressão do Nfc-e do ACBrDANFCeFortesFr.
Então adicionei no FortesReport conforme está nos outros Reports.
lNumSerieEmissao.Caption := ACBrStr('Número '+IntToStrZero(Ide.nNF,9)+' Série '+IntToStrZero(Ide.serie,3)+' Emissão '+DateTimeToStr(Ide.dEmi)+IfThen(fACBrNFeDANFCeFortes.ViaConsumidor, ' - Via do consumidor', ' - Via do estabelecimento'));Bem, espero ter contribuido
-
UnRAR.dll da RarLabs... http://www.rarlab.com/rar_add.htm
Inclusive, o WinRar é desenvolvido em Delphi =) -
Os coletores de dados são mais eficientes e rápidos que os outros aparelhos (mobile-Android) para leitura de código de barras e conferências de estoque.
A maioria deles usa Windows-CE, então terá que usar Lazarus e compilar para ARM.
Retorno Do Sefaz "tempo Limite Excedido"
em ACBrNFe
Postado
Para mim, esse procedimento resolveu:
Em "Ferramentas" - "Opções da Internet" clique na aba "Avançadas" desça a barra de rolagem até o fim e desmarque as opções "Verificar revogação de certificados do servidor*" e "Verificar se há revogação de certificados do editor" e teste novamente para ver se o erro ainda ocorre.