
Leao
Membros-
Total de ítens
446 -
Registro em
-
Última visita
Tudo que Leao postou
-
Problemas na imigração Trunk -> Trunk2
Leao replied to Leandro Chmereha's tópico in Dúvidas Gerais sobre o ACBr
Rogerio, anexa o post. Leão -
Compatibilidade com Delphi 10 Seattle
Leao replied to J Pereira's tópico in NFC-e - Nota Fiscal do Consumidor Eletrônica
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 -
Distribuir sistema em rede interna
Leao replied to armando.boza's tópico in Object Pascal - Delphi & Lazarus
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
-
Erro ao instalar componente ACBr_SATExtratoRL.dpk
Leao replied to João Paulo F. Bellucci's tópico in ACBrSAT
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 -
Erro ao instalar componente ACBr_SATExtratoRL.dpk
Leao replied to João Paulo F. Bellucci's tópico in ACBrSAT
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
-
Erro ao instalar componente ACBr_SATExtratoRL.dpk
Leao replied to João Paulo F. Bellucci's tópico in ACBrSAT
Olá Daniel, conseguir baixar, muito obrigado, Leão -
Erro ao instalar componente ACBr_SATExtratoRL.dpk
Leao replied to João Paulo F. Bellucci's tópico in ACBrSAT
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
-
Olá Italo, em nenhum local informei infMDFe.Versao, somente verproc=1.1.1
-
Onde encontra-se infMDFe.Versao não localizo