Gr@c@

não precisa ser o mesmo numero da NF-e.

O ACBrTEFD está preparado para quais desses módulos de TEF da Software Express: (e qual seria o GP relativo a cada um) Client modular = se comunica através de troca de arquivos Clisitef = Utiliza Dlls

o meu NFC-e com o ACBrDANFEESCPOS já está ok. Estou tentando agora implementar o TEF com o ACBrTEFD. É o ACBrTEFD que controla porta nos eventos.

Minha primeira dúvida está em como tratar o estado da impressora (Est := ACBrECF1.Estado) nos eventos, já que não vou usar o ACBrECF, mas irei usar uma impressora não fiscal ou uma impressora comum. Seria correto colocar estado livre?

nada, está bem dificil conseguir mais informações, mesmo porque quero usar o ACBrTEFD sem o ACBrECF

Qual problema de versão do Delphi 7? Eu uso o mesmo ACBr tanto para o Delphi 7 como para o XE3. O que mudou foi a forma de instalação do ACBr e algumas adequações que fiz no meu aplicativo. Para usar o ACBr com Delphi 7 novamente, você tem que instalá-lo para Delphi 7. Ideal remover todo o ACBr do micro e instalar do zero para ser usado com a versão Delphi 7.

ainda continuo sem saber quais componentes preciso usar no meu aplicativo emissor de NFC-e para emitir TEF. Caso alguém possa me orientar....

Apesar de ser uma regra de validação antiga, presente desde a versão 3.0 do Manual de Integração do Contribuinte, alguns contribuintes ainda se deparam com a Rejeição (201): "O número máximo de numeração de NF-e a inutilizar ultrapassou o limite". Segundo o próprio Manual de Integração do Contribuinte, essa rejeição deve ser apresentada quando : "Quantidade máxima de numeração a inutilizar ultrapassa o limite (1.000 números)". É sabido que o método de Inutilização, disponibilizado nos Web Services da NF-e, tem como parâmetro (entrada) o Número Inicial e o Número Final, que caracterizam a faixa de números que se deseja Inutilizar. Ou seja, o intervalo entre o Número Final e o Número Inicial, não pode ser maior que 1000, como por exemplo: Não é permitido inutilizar de 1 a 1002 , pois, nesse caso, são considerados 1001 números a serem inutilizados. Exemplo: É comum empresas que estão iniciando a implantação da Nota Fiscal Eletrônica, quererem continuar a numeração já utilizada pelo ERP antes da NF-e, para que não seja perdida a sequência de controle interno do sistema. Sendo assim, uma forma de "avisar" ao Sefaz que a numeração 1 até o número atual não serão utilizados, é justamente fazendo a inutilização desses números. Contudo, para a maioria das empresas, esta quantidade de numeração ultrapassa facilmente o limite de 1.000 e, neste caso, é necessário fracionar a quantidade de números que serão inutilizados (máximo 1.000 por requisição), realizando várias requisições até atingir o número desejado. faz um quebra-galho com loop ate atingir o ultimo numero.

você tem que ir inutilizando por faixas, por exemplo de 1000 a 2000 ......

assim deu o mesmo erro

Sim, funciona. Foi o que eu fiz para poder compilar.

Como estou somente com o Delphi7 retirei a diretiva.

imagem do erro

Fernando Rodrigo, vc conseguiu desenvolver o TEF para a NFC-e? Poderia dar alguns detalhes das alterações feitas e quais componentes utilizou?

o post é antigo, mas no meu Delphi 7 o demo do ACBrTEFD está dando o mesmo erro. E não tenho outra versão de Delphi no micro. Estou com o ACBr completamente atualizado via Install. Nenhum fonte ACBr antigo.

Vc tem que solicitar uma permissão especial como desenvolvedor de programa emissor de ct-e em homologação. Em MG isso é feito via SIARE (pelo contabilista da empresa). A sua empresa não precisa ter cnae de transportadora. E lembrando, que tem que pedir essa permissão por tempo indeterminado.

Algum dos colegas conseguiu desenvolver o TEF na NFC-e usando o ACBrTEFD?

Com impressora normal o meu aplicativo já está funcional. Porém, por não usar o ACBrECF, estou com trocentas dúvidas em como implementar o aplicativo para imprimir em impressora não fiscal e também como implementar o TEF com o ACBrTEFD. Como este tópico está muito relacionado ao assunto, gostaria de saber se essa configuração está correta: (o Tipo será configurável no meu aplicativo, sendo A4 ou ESCPOS). Além disso, vi com o ACBrTEFD tem um vinculo com o ACBrECF. Se eu usar o ACBrECFVirtualNFCe precisarei mudar algo ou o ACBrTEFD já reconhecerá todas as propriedades da impressora não fiscal como se fosse um ECF mesmo? If (Tipo = 'ESCPOS') then begin {ACBrECF1} ACBrECF1.Modelo := ecfECFVirtual; ACBrECF1.ECFVirtual := ACBrECFVirtualNFCe; {ACBrECFVirtualNFCe1} ACBrECFVirtualNFCe1.ACBrNFCe := ACBrNFe1; {ACBrPosPrinter1} ACBrPosPrinter1.ArqLOG := 'C:\Escpos' + FormatFloat('000',wpar_Caixa) + '.log'; ACBrPosPrinter1.ColunasFonteNormal := StrToIntDef(cbxDANFeESCPOSColunas.Text,48); ACBrPosPrinter1.ConfigBarras.Altura := 0; ACBrPosPrinter1.ConfigBarras.LarguraLinha := 0; ACBrPosPrinter1.ConfigBarras.Margem := 0; ACBrPosPrinter1.ConfigBarras.MostrarCodigo := FALSE; ACBrPosPrinter1.ConfigGaveta.SinalInvertido := cbxDANFeESCPOSGavetaSinalInvertido.Checked; ACBrPosPrinter1.ConfigGaveta.TempoOFF := StrToIntDef(edtDANFeESCPOSGavetaTempoOFF.Text,200); ACBrPosPrinter1.ConfigGaveta.TempoON := StrToIntDef(edtDANFeESCPOSGavetaTempoON.Text ,50); ACBrPosPrinter1.ConfigLogo.FatorX := 1; ACBrPosPrinter1.ConfigLogo.FatorY := 1; ACBrPosPrinter1.ConfigLogo.IgnorarLogo := FALSE; ACBrPosPrinter1.ConfigLogo.KeyCode1 := 32; ACBrPosPrinter1.ConfigLogo.KeyCode2 := 32; ACBrPosPrinter1.ConfigQRCode.ErrorLevel := 0; ACBrPosPrinter1.ConfigQRCode.LarguraModulo := 0; ACBrPosPrinter1.ConfigQRCode.Tipo := 2; ACBrPosPrinter1.ControlePorta := cbxDANFeESCPOSControleDaPorta.Checked; ACBrPosPrinter1.CortaPapel := cbxDANFeESCPOSCortaPapel.Checked; ACBrPosPrinter1.Device.Porta := cbxDANFeESCPOSPorta.Text; ACBrPosPrinter1.Device.Baud := StrToIntDef(cbxDANFeESCPOSBaud.Text,9600); ACBrPosPrinter1.EspacoEntreLinhas := edtDANFeESCPOSEspacoEntreLinhas.Value; ACBrPosPrinter1.IgnorarTags := cbxDANFeESCPOSIgnorarTags.Checked; ACBrPosPrinter1.LinhasBuffer := 0; ACBrPosPrinter1.LinhasEntreCupons := edtDANFeESCPOSLinhasEntreCupons.Value; ACBrPosPrinter1.Modelo := TACBrPosPrinterModelo(cbxDANFeESCPOSModeloImpressora.ItemIndex); //ACBrPosPrinter1.PaginaDeCodigo := TACBrPosPaginaCodigo(cbxDANFeESCPOSPaginaDeCodigo.ItemIndex); ACBrPosPrinter1.TraduzirTags := TRUE; {ACBrNFeDANFeESCPOS1} ACBrNFeDANFeESCPOS1.Logo := Trim(edtDANFeESCPOSLogo.Text); ACBrNFeDANFeESCPOS1.Sistema := sSistema; ACBrNFeDANFeESCPOS1.Usuario := sUsuario; ACBrNFeDANFeESCPOS1.PathPDF := Trim(edtDANFeESCPOSPDF.Text); ACBrNFeDANFeESCPOS1.Impressora := cbxDANFeESCPOSModeloImpressora.Text; ACBrNFeDANFeESCPOS1.MostrarPreview := bMostrarPreview; ACBrNFeDANFeESCPOS1.MostrarStatus := TRUE; Case cbxDANFeESCPOSImpressao.ItemIndex of 0:ACBrNFeDANFeESCPOS1.TipoDANFE := tiNFCe; 1:ACBrNFeDANFeESCPOS1.TipoDANFE := tiMsgEletronica; 2:ACBrNFeDANFeESCPOS1.TipoDANFE := tiNFCeA4; End; ACBrNFeDANFeESCPOS1.NumCopias := StrToIntDef(edtDANFeESCPOSVias.Text,2); ACBrNFeDANFeESCPOS1.Fax := edtEmitFAX.Text; ACBrNFeDANFeESCPOS1.Site := edtEmitSite.Text; ACBrNFeDANFeESCPOS1.Email := LowerCase(edtEmitEmail.Text); ACBrNFeDANFeESCPOS1.ImprimirDescPorc := cbxDANFeESCPOSDescontoEmPercentual.Checked; ACBrNFeDANFeESCPOS1.ImprimirTotalLiquido := cbxDANFeESCPOSVlrLiquidoNoItem.Checked; ACBrNFeDANFeESCPOS1.MargemInferior := edtDANFeESCPOSMargemInferior.Value; ACBrNFeDANFeESCPOS1.MargemSuperior := edtDANFeESCPOSMargemSuperior.Value; ACBrNFeDANFeESCPOS1.MargemEsquerda := edtDANFeESCPOSMargemEsquerda.Value; ACBrNFeDANFeESCPOS1.MargemDireita := edtDANFeESCPOSMargemDireita.Value; ACBrNFeDANFeESCPOS1.CasasDecimais._qCom := StrToIntDef(cbxDANFeESCPOSCasasqCom.Text,4); ACBrNFeDANFeESCPOS1.CasasDecimais._vUnCom := StrToIntDef(cbxDANFeESCPOSCasasvCom.Text,4); ACBrNFeDANFeESCPOS1.CasasDecimais._Mask_qCom := '###,###,###,##0.00##'; ACBrNFeDANFeESCPOS1.CasasDecimais._Mask_vUnCom := '###,###,###,##0.00##'; ACBrNFeDANFeESCPOS1.ExibirResumoCanhoto := cbxDANFeESCPOSImprimirResumoCanhoto.Checked; ACBrNFeDANFeESCPOS1.FormularioContinuo := FALSE; ACBrNFeDANFeESCPOS1.ExpandirLogoMarca := cbxDANFeESCPOSExpandirLogomarca.Checked; ACBrNFeDANFeESCPOS1.TamanhoFonte_DemaisCampos := 10; ACBrNFeDANFeESCPOS1.ProdutosPorPagina := 0; ACBrNFeDANFeESCPOS1.ImprimirDetalhamentoEspecifico := TRUE; ACBrNFeDANFeESCPOS1.NFeCancelada := FALSE; ACBrNFeDANFeESCPOS1.ImprimirItens := TRUE; ACBrNFeDANFeESCPOS1.ViaConsumidor := TRUE; ACBrNFeDANFeESCPOS1.TamanhoLogoHeight := 0; ACBrNFeDANFeESCPOS1.TamanhoLogoWidth := 0; ACBrNFeDANFeESCPOS1.RecuoEndereco := 0; ACBrNFeDANFeESCPOS1.RecuoEmpresa := 0; ACBrNFeDANFeESCPOS1.LogoemCima := TRUE; ACBrNFeDANFeESCPOS1.TamanhoFonteEndereco := 0; ACBrNFeDANFeESCPOS1.RecuoLogo := 0; ACBrNFeDANFeESCPOS1.TributosSeparadamente := FALSE; ACBrNFeDANFeESCPOS1.FonteTributos := 'IBPT'; ACBrNFeDANFeESCPOS1.ImprimeEmUmaLinha := TRUE; ACBrNFeDANFeESCPOS1.ImprimeDescAcrescItem := TRUE; ACBrNFeDANFeESCPOS1.UsaCodigoEanImpressao := FALSE; If NOT FileExists(Trim(edtDANFEA4Logo.Text)) then begin ACBrNFeDANFeESCPOS1.Logo := ''; ACBrNFeDANFeESCPOS1.LogoEmCima := FALSE; ACBrNFeDANFeESCPOS1.ExpandirLogoMarca := FALSE; end; ACBrNFeDANFeESCPOS1.PosPrinter := ACBrPosPrinter1; ACBrNFe1.DANFE := ACBrNFeDANFeESCPOS1; end; {diretorio do DANFE PDF} wpar_PathDANFE := ComDelimitador(ACBrNFe1.DANFE.PathPDF); If not DirectoryExists(wpar_PathDANFE) then CreateDir(wpar_PathDANFE); end;

Por que não dá uma ajudinha para o seu cliente, fazendo o seu aplicativo avisar que existe MDF-e pendente de encerramento quando você executar o aplicativo na primeira vez do dia? Você pode se basear até por uma data de previsão de encerramento, chegou na data, cliente não encerrou, aplicativo avisa. Só sugestão.

No Sicoob a ocorrencia Entrada de Registro vem com o valor recebido = ao valor do documento e não a taxa cobrada pela entrada. Eu ignoro o valor recebido sim. No seu caso, se está vindo a taxa de despesa, precisa saber se essa taxa não veio em outro tipo de ocorrencia para não haver duplicidade. Infelizmente, esses bancos não seguem um padrão.

Vi esse tópico e, como passei por coisas estranhas com dcu´s e bpl´s no RAD Studio XE3, não só de componentes ACBr como de outros também (inclusive o Fortes ce), só queria acrescentar que esse tipo de coisa acontece quando se instala componentes dentro das pastas do Delphi ou pastas de sistema. O Juliomar há um tempo atrás me aconselhou a criar uma pasta de componentes de terceiros no drive C e instalar todos os meus componentes terceirizados nessa pasta. Foi uma medida simples que, além de deixar tudo muito organizado, solucionou todos os meus problemas.

Já estou enviando a NFC-e utilizando o ACBrNFe (em homologação, porque uso o ambiente do AM porque MG não adotou a NFC-e ainda). Porém, só estou imprimindo em impressora comum e sem o TEF. Porém, preciso: -imprimir em impressoras comuns A4 com TEF -imprimir em impressoras não fiscais com TEF (porque tenho a leve impressão que MG vai acabar obrigando o uso dessas impressorinhas, e tenho clientes do segmento supermercado que com certeza não aceitarão o modelo A4) Daí surgiu a dúvida se usei o componente correto (ACBrNFe) ou se deveria ter usado outro, talvez um que já esteja melhor adaptado para as situações acima. Se for possivel fazer tudo isso com o ACBrNFe sem precisar reinventar a roda (desenvolvendo rotinas que o ACBr já possa ter implementado em outros componentes), beleza. Se não, preciso saber quais os componentes mais indicados. Me parece que o ACBrECFVirtualNFCe seria para ser implementado em aplicativo PAF-ECF (que possa ser configurado para imprimir Cupom Fiscal ou NFC-e, correto?). Tenho meu aplicativo PAF-ECF mas nele não uso o ACBrECF.

Desenvolvi minha NFC-e usando o ACBrNFe. Vi que existe um componente ACBrECFVirtualNFCe mas não encontrei o exemplo nem o manual do mesmo. Já li muitos tópicos sobre a NFC-e o ACBrECFVirtualNFCe, mas tenho muitas duvidas. Preciso que meu aplicativo imprima em impressoras comuns e também em impressoras não fiscais 48 col, e também precisarei do TEF. Para atender a isso, quais os componentes corretos que devo utilizar? ACBrNFe,ACBrECFVirtualNFCe,ACBrDANFEESCPOS? Estou um pouco perdida porque não uso o ACBrECF e pelo que vi o ACBrECFVirturalNFCe tem vinculo ao ECF. Consigo fazer a NFC-e com TEF e imprimir em impressoras não fiscais utilizando somente o ACBrNFe+ACBrDANFEA4+ACBrDANFEESCPOS+ACBRTEFD ou tenho que usar outros? sse ACBrECFVirtualNFCe é somente para quem usar o ACBrECF?

Você tá falando de certificado A3 em cartão. Tenho clientes que já perderam dados de certificado em cartão (nenhum deles é Certisign). Mas nenhum perdeu certificado em token. Então, comece a suspeitar desse tipo de certificado (combinação de leitora+cartão+manuseio). Não indique esse tipo de certificado a seus clientes. Coloque em letras garrafais no seu aplicativo emissor de NF-e que o desenvolvedor recomenda somente o uso de certificados digitais do tipo A1 (pfx) e A3 Token. Agora, eu queria entender por quê esses suportes de credenciadoras de certificado não colocam a culpa neles mesmos, no Windows, no antivirus, no aplicativo emissor gratuito do SEFAZ. Por que o culpado tem que ser o nosso aplicativo emissor? Isso se chama "falta de ética profissional". Eles não tem o direito de colocar a culpa no sistema. E, se o fizerem, tem que dar provas cabíveis. Se o conteúdo do certificado pode ser apagado, então a culpa é de quem criou um certificado que não tem segurança contra perda de dados. Se os dados podem ser apagados por um aplicativo, esse aplicativo pode ser qualquer um, um virus, um malware, um aplicativo bancário, um jogo, um antivirus. Qualquer um. Esse é o argumento que eu apresento.

Resumindo: a máfia dos fabricantes de equipamentos de ECF + órgãos homologadores + interventores de equipamentos ECF .... continua. Nada muda. A não ser a sobrecarga de trabalho e de gasto com homologação e equipamentos de teste que nós, desenvolvedores, sempre tivemos. E o gasto exorbitante dos nossos clientes usuários de ECF que tem que comprar equipamentos caríssimos e pagar por intervenções que muitas vezes são referente a defeitos que já vem de fábrica ou da própria dll do fabricante que não dá retorno correto. Que País é esse? Me desanima não, Brasil.