Paulo Starling Perdigao

Boa tarde é o seguinte ao gerar a operação de gerar xml , assinar , validar , enviar e receber o retorno , uma serie de arquivos são criados na minha pasta definida no PathNFe do componente, como faço para redirecionar esses arquivos para outra pasta ou seja uma pasta de log ou temporaria pois elas estão definidas criadas mas os arquivos não vão pra lá -env-lot -env-lot-soap.xml -rec-soap.xml Aguardo

Obrigado , resolvido....

Isaque Pinheiro é isso mesmo , esse é o form que que faz o envio e o retorno e que esta o componente visual AcBr. Ou seja , quando ele é fechado , parece que algo fica em abrto e não é fechado. as linhas que estão no evento onclose dele são essas ACBrNFe1.SetStatus(stIdle); FrmACBrStatus_sics.release; try FrmACBrStatus_sics.close; except showmessage('Erro de Status');end; FrmGeraNotaAcBr.Release; FrmGeraNotaAcBr:=nil; Action:=cafree;

Pessoal bom dia Na virada do lay-out da Nfe3.10 mudei meu sistema para começar a usar ACBr. Desde a mudança tenho tido o erro de access violation , o sistema funciona normalmente , só que quando vou gerar assinar, validar e transmitir a nota a primeira funciona normalmente. ao finalizar a primeira , fecho a tela e volto a tela anterior pra selecionar outra nota da erro de access violation e não consigo achar o erro via breakpoint. Algum processo ficou aberto e não fechou ao fechar o form que envia a nota Ai tenho que sair e entrar no sistema de novo. Alguém ai pode ajudar ? como finalizar tudo (thead , socket, ws, ao fechar o form?)

Pessoal sou novo no Acbr já temos uma rotina de impressão do danfe , tem como desabilitar a impressão do danfe do ACBR???? Tem como desativer a impressao do Danfe do Acbr?

Boa tarde, Juliana! Obrigado pela dica, mas acabei fazendo diferente... O nosso sistema está parametrizado.. Há uma empresa que usa o retorno da caixa e outra do Itaú... Sendo assim, criei um combo box que fica desabilitado mas já é aberto setado com o banco referente à parametrização.. Aí eu configuro o componente de acordo com o banco... e ele mesmo dispara as procedures de leitura do retorno 240 ou 400 de acordo com a parametrização... eu uso um XML pra gravar as informações de ambos os retornos para fazer umas validações antes de gravar no banco... na verdade o problema estava com o XML... eu fiz umas alterações e o problema foi resolvido... Muito obrigado pela ajuda!

Bom dia, pessoal! Tudo bem? Gostaria de tirar uma dúvida.. Eu estou criando uma rotina para dar baixa no arquivo de retorno Caixa SICOB 240, utilizando o componente ACBr (Boleto). Está tudo funcionando, tirando um problema que estou tendo... Quando clico no botão que criei para a baixa do arquivo, pela primeira vez, o sistema acusa Access Violation.. Se clico novamente no botão, ele faz a baixa de forma correta... O que eu fiz foi criar uma String List e carregá-la com o conteúdo do arquivo... Depois disso, defino o nome do arquivo e chamo a procedure ACBrCaixaEconomicaSICOB.LerRetorno240 passando a String List como parâmetro... Já tentei dar um open no arquivo para ver se era esse o problema, mas não resolveu... Será que alguém pode me ajudar? Desde já, agradeço! Rafael Hassegawa Estou anexando a tela que criei com o erro relatado!

Juliana, muito obrigado! Estava marcada já... Na verdade, as informações estavam sendo lidas... O que estava acontecendo era que ao debugar, eu estava verificando, por exemplo, a propriedade NossoNumero... o Delphi mostrava como inacessível... Passei a verificar a classe Titulo ao debugar e notei que as propriedades estavam sendo lidas corretamente... Muito obrigado!!!

Boa tarde! Informei nas propriedades... coloquei o tipo de cobrança cobCaixaSicob, ele preencheu o número da caixa 104 Obrigado

Bom dia pessoal, tudo bem? Estou com uma dúvida com relação ao componente ACBrBoleto: Eu estou a usando para ler um arquivo de retorno da Caixa Economica Federal. Dentro da procedure TACBrCaixaEconomicaSICOB.LerRetorno240(ARetorno: TStringList), estou com uns problemas, como: - o nome, CNPJ, Agencia, etc do cedente não estão sendo lidos dentro da procedure (vou colocar um print do código) - valorMoraJuros, valorDesconto, valorAbatido, etc não estão sendo lidos... porém, ele lê o código da agência, o CNPJ da empresa, e também o arquivo está sendo carregado normalmente e ele percorre cada linha (no meu caso o arquivo tem 86 linhas e quando eu debugo, a linha está lá carregada na variável linha da procedure). Vou colocar os prints do código pra ver se alguem pode me dar um help? Muito obrigado! Rafael Hassegawa

Bom dia, Tiago! Tudo bem? Dei um search no código e o Free é usado uma outra vez... Comentei e deixei só na hora de fechar o sistema... O access violation ainda acontece... Obrigado

Bom dia, Juliomar, tudo bem? O componente já está em um Data Module... Ele se chama FrmDados... Então.. eu comentei a linha do FrmDados.ACBR.Free agora e fiz um teste.. ao fechar o sistema ele dá Access Violation do mesmo jeito... E com certeza é alguma coisa relacionada ao componente, pois, se eu abro o sistema e não envio nenhuma nota fiscal eletronica, eu fecho o sistema normalmente sem Access Violation, mas, se eu abro o sistema e envio mais de uma NFE, ao fechar ele sempre dá o Access Violation... Por isso estou procurando alguma forma de contornar isso... Já tentei dar um FreeAndNil... Free.. Destroy... Já coloquei o Free no Close do form, no Destroy... sempre dá access violation! Não consigo entender o porquê... Obrigado

Bom dia, Tiago! Muito obrigado! Bom, o código como está agora estou anexando aqui nesta mensagem. Hoje, não sei porque, começou a dar Access Violation ao enviar a segunda nota. Mas de qualquer forma, este é o Close da tela principal do sistema (que contém o menu). Sempre que fecho o sistema tentando dar um Free no ACBR, ele dá access violation. Obrigado

Tudo bem, Tiago? Então... Eu consigo enviar as notas normalmente... E o erro só acontece quando eu fecho o sistema após o envio de mais de uma NFE... Se eu envio apenas uma e fecho o sistema, o erro não acontece... Uma coisa eu reparei.. Eu coloquei uns ShowMessages entre o Close do sistema e o Destroy e o erro acontece entre um e outro... Por isso eu tentei dar o free e o destroy do componente tanto no close quando no destroy pra ver se adiantava, mas o erro persiste... É meu primeiro post... vou ver se consigo movê-lo.. Obrigado pela ajuda! Rafael Hassegawa

Boa tarde, pessoal! Tudo bem? Gostaria de pedir ajuda com um erro que estou tendo com o componente ACBR. Estou usando o Delphi XE6, windows 8.1 64 bits.. O componente está num DataModulo chamado FrmDados... O erro acontece apenas após o envio de mais de uma NFE e ao fechar o sistema, estou anexando um print... Já tentei o seguinte: (na unit principal do sistema, no CLOSE)... - FreeAndNil(FrmDados.ACBR)... - try FrmDados.ACBR.Free; except end; - try FrmDados.ACBR.Destroy; finally end; já tentei colocar FrmDados.ACBR.Free... no Destroy da mesma unit e o mesmo erro aconteceu... será que alguém tem alguma dica do que possa estar acontecendo? Obrigado, Rafael Hassegawa

Boa tarde, estou finalizando a NF310 porem tenho um problema Quando ocorre qualquer erro durante o processo de geração da nota ao voltar ou fechar a aplicação da um erro de Acess Violation alguem tem alguma dica? Parece que o certificado fica preso ou algum processo Alguém tem esse problema?

Bom dia Senhores envie uma nota em homologação para no na forma de emissao 6 - Contingência SVC-AN (SEFAZ Virtual de Contingência do AN) A nota foi gerou o recibo , gerou o protocolo mas não estou conseguindo fazer a consulta dela no Ambiente nacional mas se tento mandar ela de novo recebo a mensagem da que a nota esta em duplicidade.. Estou mandando o seguinte comando para consulta mas não recebo o numero do protocolo no retorno ////// se tiver chave preenchida e protocolo em branco enviar consulta ACBrNFe1.WebServices.Consulta.NFeChave :=Dmala.CDSQlocFaturasPchave_nfe.AsString; MemoResp.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.Consulta.NFeChave); memoRespWS.Lines.Text := UTF8Encode(ACBrNFe1.WebServices.Retorno.RetornoWS); LoadXML(MemoResp, WBResposta); MemoDados.Lines.Add(''); MemoDados.Lines.Add('Consulta NFe'); MemoDados.Lines.Add('tpAmb: '+ TpAmbToStr(ACBrNFe1.WebServices.Retorno.TpAmb)); MemoDados.Lines.Add('verAplic: '+ ACBrNFe1.WebServices.Retorno.verAplic); MemoDados.Lines.Add('cStat: '+ IntToStr(ACBrNFe1.WebServices.Retorno.cStat)); MemoDados.Lines.Add('cUF: '+ IntToStr(ACBrNFe1.WebServices.Retorno.cUF)); MemoDados.Lines.Add('xMotivo: '+ ACBrNFe1.WebServices.Retorno.xMotivo); MemoDados.Lines.Add('cMsg: '+ IntToStr(ACBrNFe1.WebServices.Retorno.cMsg)); MemoDados.Lines.Add('xMsg: '+ ACBrNFe1.WebServices.Retorno.xMsg); MemoDados.Lines.Add('Recibo: '+ ACBrNFe1.WebServices.Retorno.Recibo); MemoDados.Lines.Add('Protocolo: '+ ACBrNFe1.WebServices.Retorno.Protocolo); ////////// fim consulta

Ola pessoal comecei a usar o ACBr aqui e estava tudo indo bem ,ai fiz a atualização do componente e as tags NFe.Ide.dhEmi NFe.Ide.dhSaiEnt: A versão do componente tá 3.10 não aparecem mais porem as só esta aparecendo as tags da versao 2.00 NFe.Ide.dEmi e NFe.Ide.dSaiEnt Alguém pode pode dar uma sugestão uma vez que antes da atualização estava correto atualizei ontem 14/01/2015 e meu componente esta configurado ACBRNFE1.Configuracoes.Geral.ModeloDF := moNFe; // moNFe ou moNFCe ACBRNFE1.Configuracoes.Geral.VersaoDF := ve310; // Versão 3.10 e a unit pcnNFer tem as sentenças de comparação de versao if NFe.infNFe.Versao >= 3 then begin (*B09*) NFe.ide.dEmi := Leitor.rCampo(tcDatHor, 'dhEmi'); (*B10*) NFe.ide.dSaiEnt := Leitor.rCampo(tcDatHor, 'dhSaiEnt'); end else begin (*B09*) NFe.ide.dEmi := Leitor.rCampo(tcDat, 'dEmi'); (*B10*) NFe.ide.dSaiEnt := Leitor.rCampo(tcDat, 'dSaiEnt'); (*B10a*)NFe.ide.hSaiEnt := Leitor.rCampo(tcHor, 'hSaiEnt'); Conto com o apoio de vcs obrigado