marcosrodrigues

Ola Juliomar, obrigado pela atenção, estou instalando manualmente devido o conflito que tenho com um componente de nota promissora de autoria minha, uso algumas funcionalidades do acbr no componente de nota promissora não sei porque. tenho o costume de instalar o acbr antes, mas como estou autorizando o componente como o da pasta Trunck2 o da nota promissória já esta instalado. Segue em anexo a imagem de onde esta dando o erro.

Bom dia a todos. Estou tentando instalar o ACBrBoletoFCFortesFr (Relatório de boleto o Forte Report) é esta dando um erro na função Imprimir. A linhas do erro: RLLayout.ShowProgress := MostrarProgresso; RLLayout.Title := TituloRelatorio; Não está conseguindo encontrar a propriedade e função da classe ACBrBoletoFCClass na unit ACBrBoleto. Alguém poderia mim dizer o porque não não esta conseguindo encontrar a classe.

Boa tarde, Estou tentando implementar a NT 2015/003, porem não estou conseguindo encontrar na unit pcnNFe a classe CEST e ICMSUFDest, ou seja, não consigo realizar o seguinte codigo: with (ICMSUFDest) do begin //Propriedades end; Pesquisei no foro e encontrei um tópico onde o Régy Borges da Silveira diz: " Se estiver utilizando Trunk2 ele está lá no demo, se estiver utilizando Trunk1 não, porque o Trunk1 foi congelado". O que ele quis dizer e para fazer um checkout no caminho: svn://svn.code.sf.net/p/acbr/code/trunk2/ é isso?

Italo, não sei se você referiu o caminho dos arquivos, desculpe. se for o caminho do arquivo foi na Trunck

Boa tarde, atualizei os arquivos do componente ACBrCTe e quando vou recopilar dá erro no seguinte trecho: if not DirectoryExists(DFeUtil.SeSenao(DFeUtil.EstaVazio(APathSchemas), PathWithDelim(ExtractFileDir(DFeUtil.ExeName))+'Schemas', PathWithDelim(APathSchemas))) then raise Exception.Create('Diretório de Schemas não encontrado'+sLineBreak+ DFeUtil.SeSenao(DFeUtil.EstaVazio(APathSchemas), PathWithDelim(ExtractFileDir(DFeUtil.ExeName))+ 'Schemas',PathWithDelim(APathSchemas))); Mais especifico em DFeUtil.ExeName. Fala que a propriedade do ExeName do DFeUtil não existe. Alguém pode mim dizer o que pode ser.

Boa tarde, Italo. Deu certo muito obrigado pela atenção. Agradeço a atenção de todos. Alguém coloca resolvido no post para mim ou diga como fazer.

Juliomar Marchetti, Desculpe pela gafe no forum. vou dar um lida nos termos do mesmo. Bom mas vamos lá. O quero corrigir pelo que eu lê pode ser corrigido, uma vez que o valor da carga foi errado apenas no CTE, o outro fator e que não quero corrigir o valor do serviço prestado, mas sim o valor da carga que foi transportada. “Art. 58-B Fica permitida a utilização de carta de correção, para regularização de erro ocorrido na emissão de documentos fiscais relativos à prestação de serviço de transporte, desde que o erro não esteja relacionado com: I - as variáveis que determinam o valor do imposto tais como: base de cálculo, alíquota, diferença de preço, quantidade, valor da prestação; II - a correção de dados cadastrais que implique mudança do emitente, tomador, remetente ou do destinatário; III - a data de emissão ou de saída.”

Bom dia. Estou com um problema, acho que deve ser inexperiência minha com CT-e. É o seguinte estou tentando realizar uma carta de correção onde quero corrigir o valor da carga, no entanto, ocorre o seguinte erro: Rejeição: Carta de correção inválida (campo/grupo informado não existe no schema do CT-e ou não existe no grupo informado). No XML está da seguinte forma: <infCorrecao> <grupoAlterado>INFCARGA</grupoAlterado> <campoAlterado>VCARGA</campoAlterado> <valorAlterado>110</valorAlterado> <nroItemAlterado>01</nroItemAlterado> </infCorrecao> Alguém pode mim ajudar. 609-ped-eve.xml

Bom dia, tento realizar uma referenciação de um CT-e e Uma NFe na devolução é não está dando certo veja o código: lNota_Fiscal_Ref_Cte_NFe_DAO := TGIPINOTA_FISCAL_REF_CTE_NFE_DAO.Create(Self.FGIPIConexao); try try lListaRefereciados := lNota_Fiscal_Ref_Cte_NFe_DAO.getListReferencia(pCOD_NF); pGIPIACBR.ACBrNFe.NotasFiscais.Add.NFe.Ide.finNFe := fnDevolucao; with pGIPIACBR.ACBrNFe.NotasFiscais.Add.NFe do begin Ide.finNFe := fnDevolucao; for lCount := 0 to lListaRefereciados.Count - 1 do begin with (Ide.NFref.Add) do begin case (lListaRefereciados.Items[lCount].TIPO) of 0, 1: begin if (lListaRefereciados.Items[lCount].TIPO = 0) then // NFe devolvida begin refNFe := lListaRefereciados.Items[lCount].CHAVE; end; if (lListaRefereciados.Items[lCount].TIPO = 1) then begin refCTe := lListaRefereciados.Items[lCount].CHAVE; //CTe vinculado a NFe end; end else begin RefNF.cUF := Self.getCodigoUF(lListaRefereciados.Items[lCount].UF); RefNF.AAMM := TBibli1.getAnoMesData(lListaRefereciados.Items[lCount].DATA); RefNF.CNPJ := lListaRefereciados.Items[lCount].CNPJ; RefNF.modelo := lListaRefereciados.Items[lCount].modelo; RefNF.serie := lListaRefereciados.Items[lCount].serie; RefNF.nNF := lListaRefereciados.Items[lCount].NUMERO; end; end; end; end; end; except on E: Exception do begin raise Exception.Create(E.Message); end; end; finally lNota_Fiscal_Ref_Cte_NFe_DAO.Destroy; end; O que estou fazendo de errado

Bom dia, juaumkiko, Agradeço pela sua atenção. Depois de alguns dias consegui resolver o problema. Bom era o seguinte: antes tinha todos componente e um DM, e as rotinas de eventos, envio e consulta constava no código que gerava o EXE, após migrar a mesma para uma DLL começou a lentidão, na verdade a lentidão era que eu não havia removido o DM do projeto e nem os componentes. era o DM que causa a lentidão na destruição do objeto. Quanto as linhas FACBrNFeDANFERave.Free; FACBrNFeDANFERave := nil; Já realizei a troca, havia utilizado a anterior para realizar testes. Muito obrigado foi sua primeira resposta que mim fez chegar a solução.

Bom juaumkiko, desde já agradeço sua reposta e o interesse em mim ajudar. O Rave que utilizo: Version 6.01 Build 7601 O Delphi e o XE2. Dei um olhada no Rave Code Base, só que utilizo mais de um modelo de relatório e se um buscar pelo aquivo e melhor para que possa controlar isso. A lentidão na destruição do Data Modulo "dmDanfe". destructor TACBrNFeDANFERave.Destroy; begin dmDanfe.Free; // Aqui acontece a lentidão inherited Destroy ; end;

Bom dia a todos, Uso uso o componente da ACBrNFe e seus respectivos relatório mais ainda o ACBrNFeDANFERave faço da seguinte forma: //Criando o objeto if (Assigned(FACBrNFe)) then begin FACBrNFe.NotasFiscais.Clear; FreeAndNil(FACBrNFe); end; if (not(Assigned(FACBrNFeDANFERave))) then begin FACBrNFeDANFERave := TACBrNFeDANFERave.Create(Application); end; FACBrNFe.DANFE := FACBrNFeDANFERave; FACBrNFeDANFERave.RavFile := pCaminholayout; FACBrNFeDANFERave.PathPDF := pCaminhoPDF; //Destruindo o objeto if (Assigned((FACBrNFeDANFERave))) then begin FACBrNFeDANFERave.Free; FACBrNFeDANFERave := nil; end; Na hora de destruir demora muito em media de 30 a 60 segundos. Pelo que eu vi e quando vai destruir o Data Modulo "dmDanfe" alguém sabe o que pode ser? Utiliza a solução dentro de um DLL por isso crio em Rum Time.

Ops, desculpa é que pelo que vi a atualização foi na hora que eu estava tento descobrir o erro ou seja foi as 13:39 que a atualização foi postada!

Boa tarde pessoal, Para os que atualizaram o componente da ACBr e deu erro de validação por conta da tag vICMSDeson para resolver o problema basta comentar a linha da procedure GerarTotalICMSTotal. procedure TNFeW.GerarTotalICMSTotal; begin Gerador.wGrupo('ICMSTot', 'W02'); Gerador.wCampo(tcDe2, 'W03', 'vBC ', 01, 15, 1, nfe.Total.ICMSTot.vBC, DSC_VBC); Gerador.wCampo(tcDe2, 'W04', 'vICMS ', 01, 15, 1, nfe.Total.ICMSTot.vICMS, DSC_VICMS); //Gerador.wCampo(tcDe2, 'W04a','vICMSDeson', 01, 15, 1, nfe.Total.ICMSTot.vICMSDeson, DSC_VICMSDESON); Gerador.wCampo(tcDe2, 'W05', 'vBCST ', 01, 15, 1, nfe.Total.ICMSTot.vBCST, DSC_VBCST); Gerador.wCampo(tcDe2, 'W06', 'vST ', 01, 15, 1, nfe.Total.ICMSTot.vST, DSC_VST); Gerador.wCampo(tcDe2, 'W07', 'vProd ', 01, 15, 1, nfe.Total.ICMSTot.vProd, DSC_VPROD); Gerador.wCampo(tcDe2, 'W08', 'vFrete ', 01, 15, 1, nfe.Total.ICMSTot.vFrete, DSC_VFRETE); Gerador.wCampo(tcDe2, 'W09', 'vSeg ', 01, 15, 1, nfe.Total.ICMSTot.vSeg, DSC_VSEG); Gerador.wCampo(tcDe2, 'W10', 'vDesc ', 01, 15, 1, nfe.Total.ICMSTot.vDesc, DSC_VDESC); Gerador.wCampo(tcDe2, 'W11', 'vII ', 01, 15, 1, nfe.Total.ICMSTot.vII, DSC_VII); Gerador.wCampo(tcDe2, 'W12', 'vIPI ', 01, 15, 1, nfe.Total.ICMSTot.vIPI, DSC_VIPI); Gerador.wCampo(tcDe2, 'W13', 'vPIS ', 01, 15, 1, nfe.Total.ICMSTot.vPIS, DSC_VPIS); Gerador.wCampo(tcDe2, 'W14', 'vCOFINS ', 01, 15, 1, nfe.Total.ICMSTot.vCOFINS, DSC_VCOFINS); Gerador.wCampo(tcDe2, 'W15', 'vOutro ', 01, 15, 1, nfe.Total.ICMSTot.vOutro, DSC_VOUTRO); Gerador.wCampo(tcDe2, 'W16', 'vNF ', 01, 15, 1, nfe.Total.ICMSTot.vNF, DSC_VNF); Gerador.wCampo(tcDe2, 'W16a', 'vTotTrib ', 01, 15, 0, nfe.Total.ICMSTot.vTotTrib, DSC_VTOTTRIB); Gerador.wGrupo('/ICMSTot'); end; O que acontece e que para a NFe 2.0 ele compara a estrutura do Schema 2.0 e devido a criação da tag vICMSDeson e ela não ser encontrada no Schema 2.0 reporta o erro de validação!

O pessoal, para resolver o problema bastou eu reinstalar o Delphi!

Regys encontrei um post seu que diz: "Anexe a unit modificada, mesmo sendo trechos pequenos precisamos do arquivo para comparar no todo. Quanto a modificação, eu tenho aqui o ACBr instalado no XE2 e funciona perfeitamente, não foi necessário fazer nenhum acerto, qual era a mensagem de erro? " em O erro ocorre quando tetamos gera library que usa a unit ACBrNFe, tem um dica de como resolver o problema sem alterar unit padrão ACBrNFe? O erro foi citado no post acima!

Andei dando uma pesquisa e nada consegui, e tentei copilar a ACBrECFDLL e deu o mesmo erro citado acima: [DCC Fatal Error] ACBrNFe.pas(56): F1026 File not found: 'Dialogs.dcu' Alguém pode mim dizer o que pode ser? Alguém consegui copilar? o que fez? Uso Delphi XE2.

Bom dia Regys , não sei se estou fazendo certo mais não estou conseguindo utilizar o ACBrFramework. O que estou fazendo e o seguinte: Uso a unit ACBrNFe2Dll com minha biblioteca, no entanto o erro: [DCC Fatal Error] ACBrNFe.pas(56): F1026 File not found: 'Dialogs.dcu' O erro ocorre na unit ACBrNFe pelo fato de não encontrar a biblioteca Dialogs que no Delphi XE2 e Vcl.Dialogs.

Boa tarde, Estou tentando construir uma DLL, para que atualização das rotinas da NFe do meu sistema fique mais tranquila, no entanto, quanto tento utilizar o componente ACBRNfe no na DLL da o Seguinte erro: [DCC Fatal Error] ACBrBase.pas(90): F1026 File not found: 'Dialogs.dcu' Mas quando uso em um projeto normal não da erro algum! Uso o Delphi XE2. Alguém pode mim dizer o que pode ser!