Gr@c@

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.

Se colocar como acréscimo final na NFC-e terá que ratear o valor entre os itens. Se o produto for tributado, incidirá tributação também nesse valor. Melhor mesmo criar um produto não tributado (CST 040 ou 041) e o CFOP não pode ser um CFOP de frete porque senão irá para o registro de frete do SPED e Sintegra (se na NFC-e não pode ter frete, você não pode contabilizar esse valor como frete). Talvez nesse caso, o melhor CFOP seja o 5949 (outras saídas não especificadas), mas somente o contabilista pode dar uma informação precisa.

quando preciso desse tipo de aplicativo, crio como um serviço do Windows.

Dúvida resolvida. Percebi que, sempre antes dos comandos ACBrNFe1.NotasFiscais.ImprimirPDF; ACBrNFe1.NotasFiscais.Imprimir; tenho que setar novamente as propriedades: ACBrNFe1.DANFE := ACBrNFeDANFCeFortesA41; ACBrNFe1.DANFE.TipoDANFE := tiNFCeA4; caso contrário, o DANFE volta a imprimir em formato de 48 colunas. Eu estava fazendo isso apenas uma vez ao ler as configurações como fazia com o ACBrNFe.

Tentei com JVCconvert mas é bem complicado. O GExpert é muito rápido, mas você deve abrir formulário por formulário e selecionar componente rxlib um a um e converter um a um, porque se fizer tudo automático dará erros e não ficará confiável. Campos rxcurrency formatados (por exemplo 000000000) e valores monetários substitua por JvCalcEdit , campos numéricos inteiros sem formato (ex: 0) substitua por JvValidateEdit. No JvCalcEdit coloque ZeroEmpty = False e ShowButton = False No JvValidateEdit coloque ZeroEmpty = False Se tiver componente TDateEdit da rxlib substitua por TJvDateEdit e não precisa mudar nenhuma propriedade Te aconselho a fazer como eu fiz: faça a cópia do projeto e altere um form de movimento (ex pedido de venda) e faça testes neles, incluindo, alterando, excluindo para ver se tudo está ok, inclusive a gravação no banco de dados. Um projeto de gestão que tenho e que é contem muitos forms e muitos componentes rxlib consegui converter um um dia. Com o GExpert é bem tranquilo. Sou muito grata ao Henrique Leonardo por ter me dado essa dica.

Não estou conseguindo imprimir no formato A4 do Fortes. Tanto PDF como impressão ficam no formato 48 colunas. Segue minha configuração: ACBrNFe1.DANFE := ACBrNFeDANFCeFortesA41; ACBrNFe1.DANFE.TipoDANFE := tiNFCeA4; Tentei colocar diretamente no componente mas também não resolveu. Atualizei os componentes ACBr hoje (desmarquei o componente ACBrNFSe porque dá erro ao instalar o pacote), instalei, compilei e deu build no projeto.

Sugiro que, ao postar erro de instalação do ACBr, acrescentem ao titulo : "Erro instalação ACBr Versão ........... + Data + Erro .........(ACBrDFeConsts.dcu failed) Exemplo : Erro de Instalação ACBr Versão 12171 22/08/2016 ACBrDFeConsts.dcu failed Facilita a pesquisa. Eu quase postei um novo tópico sobre o mesmo erro. Além disso, usem as tags de pesquisa. Muitas coisas a gente procura aqui no forum e não encontra por falta dessas tags e titulos incompletos ou que não tem nada a ver com o erro ou dúvida.

Reportei o erro também,no caso de caracteres cortando como no boleto e NFC-e. Já havia reportado antes sobre o boleto. Mas até hoje não tive retorno. No boleto consegui resolver fazendo uma gambiarra (diminuindo a fonte da linha digitavel e movendo o codigo de barras mais para a direita). Mas na NFC-e não tem o que fazer, a impressão fica realmente ruim.

Sim, infelizmente está acontecendo com impressão de boleto, NF-e, NFC-e. Não são todas as impressoras, mas as que percebi são Lexmark, HP Laserjet. Um problemão e não tenho como resolver.

Ao tentar enviar uma NFC-e MG está dando o erro: Sessão "NFCe_MG_H" não encontrada no arquivo "ACBrNFeServicos" Estou configurando o componente para ambiente de homologação e ACBrNFe1.Configuracoes.WebServices.UF := 'AM'; A UF do emitente tem que ser AM também?

Tópico antigo, mas preciso optar por um aplicativo de conexão remota: vi que a conexão do google crome não é muito confiável em termos de privacidade, então descartei. Estou entre TeamViewer e Ammyy. Gostaria da opinião de quem usa esses aplicativos. Vou precisar da conexão em apenas uma máquina e um cliente por vez (com tempo ilimitado de conexão). Tenho dúvidas se o cliente também precisa adquirir uma licença.

Italo, acho que tem que emitir O MDF-e também para carga lotação (e não somente a fracionada) quando for interestadual. Não é isso?