Leao

Olá Vagner, na pasta existe um arquivo chamado apagarAcbr.bat use ele para limpar, depois use o ACBrInstall_Trunk2 para instalar os componentes, se ocorrer erro anexo o arquivo, sempre na mesma pasta no meu caso uso delphi7 log_Delphi_7 Leão

Categoria 12029 = latência da internet (ruim no momento, muito baixa)... Aproveitando, Régys te pergunto em que momento usaria Eu prefiro tratar os codigos de retorno: (pos('12007 - ', E.Message.ToUpper) > 0) or // erro de conexão (pos('12002 - ', E.Message.ToUpper) > 0) or // timeout (pos('12029 - ', E.Message.ToUpper) > 0) or // limite de tempo de conexão (pos('ERRO NAO CATALOGADO', E.Message.ToUpper) > 0) then // erros de tratamento do webservice Obrigado, Leão

Rogerio, anexa o post. Leão

Olá, tive problema com o arquivo synautil.pas, na verdade existia o mesmo em outra pasta e o diretório estava na lista path do delphi, faça uma pesquisa no seu hd, pode encontrar... Leão

Solivan, seu método é muito bom, seria possível compartilhar pelo menos para atualizar o execultavel? Obrigado, Leão

Pois é Juliomar, não veja a faca nem o queijo, gostaria de encontrar o fio a meada... delphi7, win7 trunk2 Obrigado, Leão

Em anexo Isso depois que compila, ao fechar aplicação, essa tela

Olá, meus aplicativos que usa os componentes Acbr, depois de compilar ao sair, seguinte mensagem: delphi 7, win7, trunk2, depois que atualizei para trunk2, tenho nfe, boletos e mdfe, uso somente fortereport Alguém tiver solucionado, post aqui, Obrigado, Leão

Italo, deu certo, muito obrigado, Leão

Olá Italo, vou fazer o teste obrigado, Leão

Olá, (conforme o exemplo mdf-e) visando gravar informações básica, estou com dificuldade para pegar o retorno de: Consultar carregando xml já testei assim: if (ACBrMDFe1.WebServices.Retorno.cStat = 100) or (ACBrMDFe1.WebServices.Retorno.cStat = 101) or (ACBrMDFe1.WebServices.Retorno.cStat = 132) or (ACBrMDFe1.WebServices.Retorno.cStat = 135) then begin if ACBrMDFe1.WebServices.Retorno.cStat = 100 then begin DDADOS.Modifica; DDADOS.STATUS.Conteudo :='AUTORIZADO'; DDADOS.Post; end; //somente para exemplificar falta o 101,132 e 135, end; if (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 100) or (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 101) or (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 132) or (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 135) then begin if ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 100 then begin DDADOS.Modifica; DDADOS.STATUS.Conteudo :='AUTORIZADO'; DDADOS.Post; end; end; ======================{ agora Encerramento }============================= if (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 101) or (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 132) or (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 135) then begin como faço para pegar o retorno? ===================={ agora Cancelamento }================================ if (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 101) or (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.cStat = 135) or (ACBrMDFe1.WebServices.EnvEvento.EventoRetorno.retEvento.Items[0].RetInfEvento.xEvento='Cancelamento') then begin Nenhum desses exemplos deu certo, gostaria que alguém informasse um exemplo de cada um (Consulta com xml, Cancelamento e Encerramento). Obrigado, Leão

Carlos, veja pelo demo, estar correto e funcionando smtp.gmail.com

Olá Carlos, pode ser isso aqui: É preciso fazer modificação no gmail, para envier nf-e e boleto entre na conta gmail e na opção MINHA CONTA No meu caso, uso o GMail, e para funcionar precisei liberar a opção "Acesso para aplicativos menos seguros" nas configurações de segurança da conta. Sem isso, não envia de jeito nenhum. Leão

Olá, agradeço a todos mas o detalhe era estava tentando instalar de outra pasta d:\temp\ Copie para a C:\Program Files (x86)\Borland\Delphi7\Fortesreport-ce Depois executei o instalador frceInstall.exe Instalou certinho, fica aqui a dica. Obrigado, Leão

Olá Docfabio, desistalei o forte do delphi, tirei do path, e execultei o instalador frceInstall.exe, ele não encontra o frce.dpk, mas o mesmo estar na pasta onde baixei. Ainda aguardo....

Olá Earmarques, estou instando também pelo instalador frceInstall.exe conforme instruções: Remover o Package da versão antiga do Delphi Remover os diretórios da versão antiga do Lib Path do Delphi Apagar os fontes e DCUs, e BPLs da versão antiga baixei pelo link https://github.com/fortesinformatica/fortesreport-ce/trunk Parece que tem que instalar primeiro o frce.dpk procurei o fórum do forteReport mas não estou conseguindo, peço ajuda... Leão

Peço desculpa aos moderadores por postar aqui sobre esse assunto, se possível me informe o caminho procurei pelo fórum e não encontrei.... Obrigado, Leão

mas veja http://www.projetoacbr.com.br/forum/topic/24840-erro-ao-instalar-trunk2/#comment-160658 erro ao instalar Fatal: File not found: 'frce.dpk' esse arquivo escontra-se na pasta D:\Temp\outros\Packages

Olá, baixei e ao instalar error: arquivo com o erro em anexo Borland Delphi Version 15.0 Copyright (c) 1983,2002 Borland Software Corporation Fatal: File not found: 'frce.dpk' Compilation failure Como solucionar, arquivo não encontrar estar na pasta de instalação D:\Temp\outros\Packages frce.dpk Obrigado, Leão log_Delphi_7.txt

Olá Daniel, conseguir baixar, muito obrigado, Leão

Daniel, não consigo baixar através dos links informados Para baixar o Fortes Report CE por SVN, use o endereço: https://github.com/fortesinformatica/fortesreport-ce/trunk Para baixar o Fortes Report CE por GIT, use o endereço: https://github.com/fortesinformatica/fortesreport-ce.git Leão

Olá, no MDF-e, como faço para pegar o hdrecbto ao Criar\Enviar? na NFe- é assim: DNF.HORA_AUTORI.Conteudo :=DateTimeToStr(ACBrNFe1.NotasFiscais.Items[0].NFe.procNFe.dhRecbto); Obrigado, Leão

Olá Turbo, faça uma busca PNGImage, inclusive tem o componente pronto para instalar e usar, em delphi7 Obrigado, Leão

Olá Daniel, certinho, era isso mesmo corrigido. ==========={ local }=============== tot.qCTe := 2; tot.vCarga := 3500.00; // UnidMed = (uM3,uKG, uTON, uUNIDADE, uLITROS); tot.cUnid := uTon; tot.qCarga := 2.8000; with lacres.Add do begin nLacre := '123'; end; infAdic.infCpl := 'Empresa optante pelo Simples Nacional.; Caminhao VW.'; infAdic.infAdFisco := ''; end; ACBrMDFe1.Manifestos.GerarMDFe; end; Muito obrigado, Leão

Sim Italo, infMDFe.versao:= onde vejo que valores atribuir a mesma? Obrigado, Leão