Camila Santos

Bom Dia EMBarbosa, Obrigada pelos links li os sites e deu pra entender um pouco de como funciona esses "Intenals Errors", consegui instalar todos os componentes que eu precisava com a versão do meu backup. Creio que durante a instalação dos componentes na máquina nova o técnico responsável pode ter salvo alguma modificação feita nos componentes e depois o delphi não conseguiu compilá-los novamente como você disse. Mais uma vez obrigada pela atenção e ajuda.

Mas isso ocorre nas 4 máquinas que possuem esses componentes aqui na empresa... Encontrei aqui um backup de uns 2 meses atrás e consegui já consegui compilar o AcbrCapicom, estou terminando de instalar o restante. Obrigada pela atenção.

Bom dia a todos, Eu tinha instalado no Delphi 7 alguns componentes do Acbr como: AcbrNfe, ACBrNfse, AcbrSped entre outros. Ontem fiz a instalação desses mesmos componentes em uma outra máquina aqui da empresa e hoje quando fui complicar meu projeto aparece a seguinte mensagem de erro: [Fatal Error] ACBrCapicom.dpk(40): Internal error: URW3954 - Desinstalei todos os componentes - Exclui os arquivos Acbr*.bpl da pasta \projects\bpl, - Atualizei os componentes Mas durante a re-instalação dos componentes aparece a mesma mensagem quando compilo o AcbrCapicom.dpk. E ele seleciona em vermelho a ultima linha desse bloco da Unit AcbrCapicom.pas contains ACBrCAPICOM_TLB in '..\..\Fontes\ACBrCapicom\ACBrCAPICOM_TLB.pas', ACBrMSXML2_TLB in '..\..\Fontes\ACBrCapicom\ACBrMSXML2_TLB.pas', JwaWinCrypt in '..\..\Fontes\ACBrCapicom\JwaWinCrypt.pas', JwaWinDLLNames in '..\..\Fontes\ACBrCapicom\JwaWinDLLNames.pas', JwaWindows in '..\..\Fontes\ACBrCapicom\JwaWindows.pas', JwaWinType in '..\..\Fontes\ACBrCapicom\JwaWinType.pas', JwaWinNT in '..\..\Fontes\ACBrCapicom\JwaWinNT.pas'; E não consigo instalar nem esse nem os demais componentes.

Bom dia, jocgom Ainda não consegui resolver este problema, para falar a verdade não tive muito tempo de mexer com ele. Mas o mais engraçado no meu caso é que em outro módulo do mesmo sistema que também usa NFe não ocorre esse erro.

Estava testando a impressão após o retorno de Rejeição do Sefaz e percebi que após mostrar a janela que pergunta se quer visualizar ou imprimir o danfe o componente executa este bloco de código e a variável "FNFe" possui valor corretamente. procedure TdmACBrNFeRave.RvSystem1BeforePrint(Sender: TObject); begin //processo para não exibir o quadro ISSQN no DANFE_Rave513 if ((FNFe.Total.ISSQNtot.VServ=0) and (FNFe.Total.ISSQNtot.VBC=0) and (FNFe.Total.ISSQNtot.VISS=0)) then rvPROJECT.SetParam('wISSQN','N') else rvPROJECT.SetParam('wISSQN','S'); end; Após esse bloco ele passa imediatamente para o bloco do erro, onde a mesma variável está como "nil". procedure TdmACBrNFeRave.CustomDadosProdutosCXNOpen( Connection: TRvCustomConnection); begin Connection.DataRows := FNFe.Det.Count; end; Ambas procedures estão na Unit AcbrNfedanfeRaveDM eu fiz uma execução passo-a-passo utilizando a opção "trace into" em todas as linhas.

FocusRJ tentei fazer como você sugeriu, limpando os campos do componente e associando a nota novamente. Mas não deu certo, ainda ocorre o erro. juaumkiko não encontrei o Rave Code Base para download, mas a versão que utilizo em minha máquina é a 5.0 há uma versão desse componente para essa versão do Rave?

Rômulo, não consegui ainda não, o mais estranho é que é somente após a rejeição, se eu fecho todo o sistema e vou para imprimir a mesma nota novamente não ocorre o erro.

Você já rodou um passo-a-passo para ver em qual linha está dando o erro exatamente? No meu caso eu uso AcbfNfe e o AcbrDanfeRave para geração e impressão das notas. Antes de imprimir faço a rotina de configuração do componente. Se as notas forem geradas sem rejeição funciona normalmente, mesmo imprimindo várias notas. //Configurações do Danfe nomerav := ExtractFileDir(application.ExeName)+'\'+'NotaFiscalEletronica.rav'; if fileexists(nomerav) then ACBrNFeDANFERave1.RavFile := nomerav else begin ACBrNFeDANFERave1.RavFile := ''; showmessage('Arquivo de Layout de relatório não encontrado: ' + chr(13) + nomerav); end; ACBrNFeDANFERave1.NumCopias := 1; ACBrNFeDANFERave1.TipoDANFE := tiRetrato; // (tiRetrato, tiPaisagem) if fileexists(ExtractFileDir(application.ExeName) + '\Dados\logotemp.bmp') = false then VendasGBD.DBImage3.Picture.SaveToFile(ExtractFileDir(application.ExeName) + '\Dados\logotemp.bmp'); ACBrNFeDANFERave1.Logo := ExtractFileDir(application.ExeName) + '\Dados\logotemp.bmp'; ACBrNFeDANFERave1.CasasDecimais._qCom := 3;

Eu pensei a mesma coisa que o Peterson e tentei sempre inicializar o Danfe antes de imprimir, mas o erro continua. Talvez o componente possa estar tirando o Danfe da memória com um "nil", para esse caso inda não testei. FocusRJ, no seu caso o erro também é só após uma rejeição ou é sempre que acontece?

Alguém sabe se quando ocorre uma rejeição pelo site da receita ele exclui o form do Rave, ou melhor ele libera a memória que está sendo usada pelo Rave e por isso que o mesmo não consegue acessar a variável "FNFe.Det.Count" ?

Eu coloquei essa verificação agora, mas infelizmente o erro persiste... O que mais me intriga é que mesmo que eu faça muitas notas sem fechar o sistema e as notas não apresentam rejeição do sefaz a impressão de todas ocorre normalmente, sem nenhum erro, mas se uma é rejeitada, após feita a correção, a nota é gerada novamente, sem fechar o sistema quando vai imprimir da erro.

André, no Demo não ocorre o erro, mas eu fiz um procedimento um pouco diferente do que eu uso na prática, eu usei o botão "Carregar XML e enviar" porque não estava conseguindo gerar um nota de teste utilizando a função "Criar e enviar", que é muito parecida com a que eu uso no sistema aqui da empresa. Não sei se isso pode influenciar no erro.

Bom dia, No sistemas que desenvolvemos está ocorrendo Access Violation ao tentar imprimir o Danfe, estou usando o AcbrNfe e o AcbrNfeDanfeRave com Delphi 7. O erro ocorre na seguinte situação: 1) Faço uma nota fiscal normalmente, mas fica um erro que provoque uma rejeição quando é validado no Sefaz, por exemplo um endereço sem número. 2) Vem a mensagem de erro, eu deixo a tela da nota aberta e conserto a informação na tela de cadastro. 3) Volto e tento gerar a nota. Ela gera normalmente, vem a mensagem de lote processado e pergunta se quer imprimir o Danfe. 4) Quando coloco imprimir e clico em ok aparece a mensagem de Access Violation. Nessa procedure da unit "AcbrNfeDanfeRaveDM" procedure TdmACBrNFeRave.CustomDadosProdutosCXNOpen( Connection: TRvCustomConnection); begin Connection.DataRows := FNFe.Det.Count; end; Para conseguir imprimir tenho que fechar o sistema e inicializá-lo novamente. Outra coisa, se gero a nota sem nenhuma mensagem de Rejeição do Sefaz a impressão é feita normalmente. Pesquisando na internet achei que poderia ser falta de configuração do componente ao tentar imprimir, mas já coloquei para sempre configurar o componente antes de imprimir e o erro persiste. Alguém tem mais alguma solução. Obrigada

Certinho, vou pesquisar um pouco sobre os padrões do layout e ver se consigo algo, obrigada.

Bom dia, Passado o erro de envio e consulta, agora estou com uma dúvida na geração do Danfse. Quando uma nota é gerada pelo site da prefeitura é feita uma impressão da Nota Fiscal Eletrônica Inteligente como o modelo anexo. Mas se uso o componente "ACBrNFSeDANFSeQR" imprime um documento diferente, existe algum componente que faça a impressão da NF-ei? NFSe.rar