Jump to content

Search the Community

Showing results for tags 'fastreport'.



More search options

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Categories

There are no results to display.

Forums

  • Fórum Aberto - ACBr
    • ACBr News
    • Equipamentos testados
    • Base de Conhecimento
    • Dúvidas Gerais sobre o ACBr
    • ACBrSerial
    • ACBrSAT
    • ACBrNFe
    • ACBrMonitor PLUS
    • ACBrDFe
    • ACBrTEFD e Dúvidas sobre TEF
    • ACBrTXT
    • ACBrBoleto
    • ACBrDiversos
    • ACBrTCP
    • ACBrFramework
    • ACBrLIB
    • Dia do ACBr
  • Suporte Pago - SAC
    • Dúvidas gerais
    • ACBrMonitorPLUS
    • NFe/NFCe - Nota Fiscal Eletrônica
    • DFe - Documentos Fiscais Eletrônicos
    • SAT / MFE
    • TEF
    • Boleto
    • ACBrSPED
    • ACBrTXT
    • Paf-ECF
    • Requisitos Fiscais por UF
    • ACBrLIB
  • Outros Assuntos
    • ACBr's Pub
    • Legislação Fiscal e Tributária
    • Object Pascal - Delphi & Lazarus
    • Data Base
    • Classificados
    • Dúvidas não relacionadas ao ACBr

Categories

  • ACBrLib
  • Suporte Pago - SAC
    • ACBrMonitorPLUS - SAC
    • Utilitários - SAC
    • Dia do ACBr 1a edição
  • Free Download
    • ACBrMonitorPLUS
    • Demos / Testes / Utilitários
    • Apresentações - Palestras

Calendars

  • Eventos - Palestras - Webinars
  • Prazos SEFAZ
  • Community Calendar
  • Feriados Nacionais

Blogs

  • Daniel Simoes' Blog
  • André Ferreira de Moraes
  • Moderadores ACBr
  • Teste de Blog
  • Notícias do ACBr

Categories

  • Suporte Pago - SAC
    • Webinars
    • Video Aulas
    • Palestras - Dia do ACBr 1a Ediçao
  • Vídeos Abertos
    • Video Aulas
    • Comunicados
    • Palestras - Dia do ACBr 1a Ediçao
  • Campanhas promocionais

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


Website URL


Skype


Localização


Interesses


CNPJ da Empresa


CPF

Found 129 results

  1. Boa tarde, Pequeno ajuste na função "AjustaDiscriminacao" na unit para impressão com o FastReport "ACBrNFSeDANFSeFR.pas", esta função é responsável por separar os itens quando esta nota contiver mais de um item. PS: Anexo Unit alterada. Favor analisar a alteração !. ACBrNFSeDANFSeFR.pas
  2. Boa tarde. Gostaria de relatar um problema que ocorreu com nosso sistema emissor, com relação ao preview/impressão da Carta de Correção da NF-e. O que acontece é que após exibir um DANFE e depois tentar exibir o preview de uma Carta de Correção ocorre um Access Violation, nesse caso testei apenas usando a engine FastReport. Percebi que o erro ocorre nos métodos "PrepareReport" e "frxReportBeforePrint" da unit "Fontes\ACBrDFe\ACBrNFe\DANFE\NFe\Fast\ACBrNFeDANFEFRDM.pas". Ao que parece o objeto NFe (FNFe) que é usado dentro deles está assigned mas suas propriedades estão nil, ele passa na verificação do Assigned(), mas ao acessar as propriedades elas estão nil. Se carregar uma NF-e no componente ACBrNFe e emitir um DANFE ele fica com referências apontadas internamente no DANFE associado ao ACBrNFe, então mesmo se der um ACBrNFe.NotasFiscais.Clear e carregar somente o XML do evento de CCe o erro ocorre. O que eu fiz foi apenas passar nil para as variáveis FNFe e FEvento ao final de cada método "ImprimirDANFE", "ImprimirDANFEResumido", "ImprimirDANFEPDF", "ImprimirEVENTO", "ImprimirEVENTOPDF", "ImprimirINUTILIZACAO", "ImprimirINUTILIZACAOPDF", para assim não apontar para uma referência inválida e a verificação funcionar corretamente em "PrepareReport" e "frxReportBeforePrint". // Está em "ImprimirDANFE", "ImprimirDANFEResumido", "ImprimirDANFEPDF", "ImprimirEVENTO", "ImprimirEVENTOPDF", "ImprimirINUTILIZACAO", "ImprimirINUTILIZACAOPDF": { DONE -oLeandro : (03/09/2019) - Alteração para não causar AccessViolation após: 1 - Imprimir um DANFE; 2 - Imprimir um Evento (Carta de Correção); AccessViolation ocorre nos métodos: * PrepareReport * frxReportBeforePrint Provável motivo: Objeto NFe (FNFe) está assigned mas suas propriedades estão nil. } FNFe := nil; FEvento := nil; Segue o arquivo ACBrNFeDANFEFRDM.pas em anexo, as alterações estão marcadas com um "DONE -oLeandro :" , se a alteração proceder e for útil, peço aos administradores que adicionem a alteração no svn. Muito obrigado. ACBrNFeDANFEFRDM.pas
  3. Ola, estou tentando fazer a instalação do ACBr no meu que esta no disco D: e estou tendo o erro de {dynamic link library} conforme na imagem: O erro segue em todos os componentes da parte do FastReport. já tentei o procedimento de outros posts que encontrei no fórum mas ainda sem solução. poderia ser por meu Delphi estar no disco D? grato pela ajuda.
  4. Olá, realizei algumas alterações no layout do DANFCe bobina desenvolvido em Fast. Renomeei o arquivo para "DANFeNFCe5_00.fr3", o adaptando conforme o Manual de Padrões versão 5.0, o último liberado pelo Encat. Foram necessárias algumas alterações na unit ACBrNFeDANFEFRDM.pas também. No seguintes locais: 1) Na geração do valor a pagar, conforme: Antes: FieldByName('ValorApagar').AsFloat := VProd - VDesc - vICMSDeson + VOutro; Agora: FieldByName('ValorApagar').AsFloat := VProd + FNFe.Total.ISSQNtot.vServ; Deixei como já está no modelo EscPos, que imagino ser o mais usado e consequentemente o mais apurado. Não concordo com fazer cálculos na impressão do Danfe, os cálculos já devem ser feitos ao gerar o XML. 2) No preenchimento do nome do cliente: Antes: if EstaVazio(FieldByName('CNPJCPF').AsString) then FieldByName('Consumidor').AsString := ACBrStr('CONSUMIDOR NÃO IDENTIFICADO') else FieldByName('Consumidor').AsString := IfThen(Length(CNPJCPF) = 11, 'CPF: ', 'CNPJ: ') + Trim(FieldByName('CNPJCPF').AsString) + ' ' + trim(FieldByName('XNome').AsString); Agora: if EstaVazio(FieldByName('CNPJCPF').AsString) then FieldByName('Consumidor').AsString := ACBrStr('CONSUMIDOR NÃO IDENTIFICADO') else FieldByName('Consumidor').AsString := IfThen(Length(CNPJCPF) = 11, 'CONSUMIDOR CPF: ', 'CONSUMIDOR CNPJ: ') + Trim(FieldByName('CNPJCPF').AsString) + ' ' + trim(FieldByName('XNome').AsString); Apenas inseri o prefixo "CONSUMIDOR" antes do CPF ou do CNPJ do cliente. 3) Na geração do texto da área de mensagem fiscal: Antes: if (FNFe.Ide.Modelo = 65) then begin FieldByName('DEmi').AsString := FormatDateTimeBr(FNFe.Ide.DEmi); if FNFe.Ide.TpAmb = taHomologacao then FieldByName('MensagemFiscal').AsString := ACBrStr('EMITIDA EM AMBIENTE DE HOMOLOGAÇÃO - SEM VALOR FISCAL') else begin if (FNFe.Ide.tpEmis <> teNormal) and EstaVazio(FNFe.procNFe.nProt) then FieldByName('MensagemFiscal').AsString := ACBrStr('EMITIDA EM CONTINGÊNCIA'+LineBreak+'Pendente de autorização') else FieldByName('MensagemFiscal').AsString := ACBrStr('ÁREA DE MENSAGEM FISCAL'); end; . . . . Agora: if (FNFe.Ide.Modelo = 65) then begin FieldByName('DEmi').AsString := FormatDateTimeBr(FNFe.Ide.DEmi); if (FNFe.Ide.tpEmis <> teNormal) and EstaVazio(FNFe.procNFe.nProt) then FieldByName('MensagemFiscal').AsString := ACBrStr('EMITIDA EM CONTINGÊNCIA'+LineBreak+'Pendente de autorização'); if FNFe.Ide.TpAmb = taHomologacao then FieldByName('MensagemFiscal').AsString := FieldByName('MensagemFiscal').AsString+LineBreak+LineBreak+ACBrStr('EMITIDA EM AMBIENTE DE HOMOLOGAÇÃO - SEM VALOR FISCAL'); if EstaVazio(FieldByName('MensagemFiscal').AsString) then FieldByName('MensagemFiscal').AsString := ACBrStr('ÁREA DE MENSAGEM FISCAL'); . . . . Alterei para que a frase "EMITIDA EM CONTINGÊNCIA Pendente de autorização" seja gerada sempre que a NFCe estiver pendente, independente do ambiente utilizado (produção ou homologação) Se alguém puder validar e encaminhar ao repositório. ACBrNFeDANFEFRDM.pas DANFeNFCe5_00.fr3
  5. Fui implementar o modelo de DANFCe em Fast DANFeNFCe4_20, e obtive o erro abaixo ao tentar visualizá-lo: "Script Error at 22:9: Undeclared identifier: 'Memo25' " Não sei se alguém está utilizando esse layout, mas o erro se deve ao trecho abaixo no fonte desse modelo: A última linha se refere a um componente que não existe, "Memo25". Remvi a linha, fiz algumas impressões e não constatei algum componente que correspondesse (talvez o componente existisse mas apenas o nome estava errado). Enfim, estou anexando o arquivo, se alguém puder dar uma olhada e subir. Grato. DANFeNFCe4_20.fr3
  6. Bom dia a todos, Estou com o seguinte problema: Usando o Fast Report tenho mo Footer dois subreportes. Um em baixo do outro, quando o de cima aumenta ele passa por cima do de baixo. Tem algum método de resolver isso ? Obrigado desde já
  7. Na impressão do boleto usando Fast Report (unit ACBrBoletoFCFR), a logo do banco é carregada sempre pelo diretório de logos, através do método ImprimeLogoMarca. Anexei a unit com as alterações para chamar o método CarregaLogo da TACBrBoletoFCClass no ImprimeLogoMarca, com o objetivo de disparar primeiro o evento OnObterLogo e, se não tratado, daí carregar a imagem do diretório de logos. Olhei os fontes da impressão usando Fortes Report e lá é usado o CarregaLogo. ACBrBoletoFCFR.pas
  8. bom dia, estou tentando imprimir em A4 o danfe da NFCe, com 3 ou mais casas decimais e não está aceitando, ele está fixo 2 casas, nas propriedades qCom e na vUnCom. fiz testes usando os seguintes arquivos: DANFeNFCeA4.fr3 - DANFeNFCe.fr3 - estes estão fixos as 2 casas e - DANFeNFCe4_20.fr3 esta dando erro "Script Error at 22:9: Undeclared identifier: 'Memo25' " grato pela ajuda.
  9. Boa tarde, Estamos com travamento na visualização de várias danfes ao mesmo tempo. Até 10 registros é bem rápido, dai para frente vai ficando extremamente lento, acima de 15 fica travado. Utilizamos o código para impressão: ACBrDanfeObj.MostraStatus := False; ACBrDanfeObj.PreparedReport.PreviewOptions.Buttons := [pbPrint, pbExport, pbZoom, pbFind, pbOutline, pbPageSetup, pbTools, pbNavigator, pbExportQuick]; // Aqui jo método PreparedReport já é lento . ACBrNFeObj.NotasFiscais.Imprimir; percebemos que a lentidão a partir da 10 NFe ocorre nesse ponto da unit ACBrNFeDANFEFRDM: Tem alguma ideia do que possa ser?
  10. Bom Dia, Estou com o seguinte, problema, na visualização do DANFE saiu tudo belelza, mas quando mando pra impressora só imprimi no formato A4. Estou usando o FastReport.
  11. Boa dia a todos! Gostaria de tirar algumas dúvidas sobre NFCe: Não está pré-visualizando a impressão: Ao executar o método Imprimir de uma NFCe com a propriedade MostraPreview=True está sendo exibido a tela de impressão direto, sem a pré visualização. Troco na impressão e no XML: O valor do troco, quando 0, não está sendo enviado no XML (não sei se este é o procedimento correto). Impressão da NFCe sem troco (FastReport) imprime a palavra Troco duas vezes e com um valor bizarro, na casa dos milhões. O cabeçalho da NFCe está cortando os dados do endereço Segue anexo o pdf de uma NFCe emitida com os detalhes citados. nfce.pdf
  12. Gandalf

    DANFE FastReport

    Bom dia, atualizei os componentes e percebi que foi tornada privada a propriedade dmDanfe. O problema agora é que quando eu tento acessar a propriedade PreparedReport, não consigo, porque ela está nula. Eu vi que já teve um tópico igual aqui, mas o usuário relatou que conseguiu resolver e o tópico foi fechado. Infelizmente ele não postou como conseguiu resolver. Abaixo vai meu código. Minha classe herda da TACBrNFe. var Fixos: TDadosFixos; OK: Boolean; VersaoDF: TpcnVersaoDF; begin inherited; PegouCertificado := False; Fixos := TDadosFixos.Consulta; if (not Fixos.VersaoNFe.HasValue) or (Fixos.VersaoNFe = '3.10') then VersaoDF := ve310 else if Fixos.VersaoNFe = '4.00' then begin VersaoDF := ve400; Configuracoes.Arquivos.PathSchemas := Fixos.EndSchemas + '\Schemas'; end else raise Exception.Create('Versão NFe não definida na classe MeuACBrNFe'); Configuracoes.Geral.Salvar := True; Configuracoes.Geral.VersaoDF := VersaoDF; Configuracoes.Arquivos.Salvar := True; Configuracoes.Certificados.NumeroSerie := Fixos.NSerieCertDigital; Configuracoes.WebServices.UF := Fixos.Cidade.UF; Configuracoes.WebServices.Ambiente := StrToTpAmb(OK, IntToStr(Fixos.TIPONFELETRONICA)); Configuracoes.WebServices.TimeOut := 15000; Configuracoes.Geral.FormaEmissao := StrToTpEmis(OK, IntToStr(Fixos.TIPOEMISSAONFE + 1)); Configuracoes.Geral.RetirarAcentos := True; //Configuracoes.Geral.SSLLib := libCapicom; Configuracoes.Geral.SSLLib := libWinCrypt; Configuracoes.Geral.SSLXmlSignLib := xsMsXML; if Fixos.UsarTSL12 then SSL.SSLType := LT_TLSv1_2; //DownloadNFe.Download.CNPJ := Fixos.CNPJ; MinhaDANFE := TACBrNFeDANFEFR.Create(nil); MinhaDanfe.IncorporarBackgroundPdf := False; // feito para diminuir o tamanho da danfe MinhaDANFE.IncorporarFontesPdf := False; // feito para diminuir o tamanho da danfe //MinhaDANFE. ImprimirUnQtVlComercial := iuComercial; with MinhaDANFE do begin FastFile := Fixos.ArquivoDANFE; FastFileEvento := Fixos.ArquivoDANFE; Sistema := 'GAF - Gerenciador Administrativo Financeiro'; MostraPreview := False; Logo := Fixos.ArquivoLogoDANFE; end; Self.DANFE := MinhaDANFE; if Fixos.MensagemRodapeNFe <> '' then (Self.DANFE as TACBrNFeDANFEFR).PreparedReport.Script.Variables['MensagemRodape'] := Fixos.MensagemRodapeNFe ---> aqui já dá o erro else (Self.DANFE as TACBrNFeDANFEFR).PreparedReport.Script.Variables['MensagemRodape'] := ''; FreeAndNil(Fixos);
  13. Boa tarde a todos! Nosso software em Delphi, efetua a impressão de um recibo através do Fast Report em impressoras térmicas (Epson T20, Bematech MP 4200, CIS, etc...). Porém está ocorrendo alguns casos, onde o documento fica preso no Spool dessas impressoras e consequentemente não é impresso mais os recibos. Ao desligar e ligar a impressora geralmente ela volta a imprimir, ou as vezes, temos que remover o cabo USB e conectar novamente, ou reiniciar o micro. Porém isso ocorre somente quando o sistema faz essa impressão em Fast Report. Alguém já passou por isso? Tem alguma alguma dica? Obrigado.
  14. Bom dia. Eu atualizei o meu fastReport para a versão 6.0 e a partir de então começou a dar erros no acbrBoleto na units correspondente ao fastReport; (ACBr_BoletoFR) Estou a instalar novamente o ACBr porém está dando o seguinte erro: Packages 'frxe25' and 'frx25' both contain unit 'frxNetUtils' Tudo que esteja relacionado com o fastReport dá erro: ACBr_NFeDanfeFR.dpk(94) Error: E2199 Packages 'frxe25' and 'frx25' both contain unit 'frxNetUtils' ACBr_NFeDanfeFR.dpk(94) Fatal: F2220 Could not compile package 'frxe25' Compilation failure Erro ao compilar o pacote "ACBr_NFeDanfeFR.dpk". Abortando... Ocorreram erros na compilação dos pacotes. Alguém pode me ajudar?
  15. Segue correção para carregar o logotipo do DACTe em FastReport a partir de um Stream. DACTE_Ve300.fr3 DACTE.fr3 DACTE_OS.fr3
  16. Amigos, boa noite. Esta acontecendo um problema no Fastreport utilizando os textos. Coloco um componente de texto alinhamento certinho no relatório, com outro dado vindo da tabela. Na tela esta ok, quando rodo o relatório, o texto fica abaixo do colocado no relatório, desalinhando tudo. Alguem pode me ajudar? Já estou a 2 dias nisto sem solução.Abaixo o exemplo como fica.
  17. Bom dia, sempre gosto de pesquisar bem antes de publicar qualquer dúvida, já procurei em vários fóruns e nada até o momento então peço que me auxiliem por favor... [Descrição do erro] Application Error Error reading frxReport.OnProgressStart: Invalid property value. [Suposição] Acredito que o problema deve estar no meu componente ACBrBoletoFCFR ou ACBrBoleto pois são únicos que iniciam com meu Data Módulo, não permitindo que o sistema funcione... se eu remover esse DM do auto create consigo iniciar normalmente.. [Meu erro] Fiquei um certo período sem atualizar o ACBr, alguns meses, e agora após atualizar o SVN e remover e recompilar o Trunk2 novamente me deparei com esse problema, creio que outros estão por vir rsrs.
  18. Efetuei uma pequena correção nas quebras de linhas dos Dados Adicionais na Danfe do FastReport. Ao concatenar as informações dos campos infAdFisco e infCpl não estava quebrando a linha. Método alterado: Function TACBrNFeFRClass.ManterInfAdi( swObs : String ) : String; var i : Integer; TmpStr, TmpInfoFisco : String; begin result := swObs; TmpStr := ''; TmpInfoFisco := ''; with FNFe.InfAdic do begin for i := 0 to ObsFisco.Count - 1 do begin with ObsFisco.Items do TmpStr := TmpStr + XCampo + ': ' + XTexto + ';'; end; //Fisco if Length(InfAdFisco) = 0 then TmpInfoFisco := '' else TmpInfoFisco := InfAdFisco + ';'; result := result + TmpStr + TmpInfoFisco; TmpStr := ''; for i := 0 to ObsCont.Count - 1 do begin with ObsCont.Items do TmpStr := TmpStr + XCampo + ': ' + XTexto + ';'; end; //Inf. Complementar if Length(InfCpl) = 0 then InfCpl := ''; result := result + TmpStr + InfCpl; end; end; ACBrNFeDANFEFRDM.pas
  19. Estou instalando o acbr do zero, usando a nfe, nfce e sat mas com o relatório do fortes. Na opção de gerador de relatórios (Fastreport) não selecionei nenhuma opção. Porém ao complicar o sistema recebo: ACBrDAMDFEFR.as(44): F2063 Could not compile used unit 'frxClass' A minha dúvida é se preciso instalar o fast report mesmo que não use ele? Desde já obrigado.
  20. Boa Tarde! Estou com um problema que depois que atualizei a versão do ACBr as notas fiscais emitidas estão saindo com as Observações em duas filhas quando era para sair somente em uma. Revisei os parametros mas não encontrei nada de diferente #FAST REPORT <infAdic> <infAdFisco>I - "DOCUMENTO EMITIDO POR ME OU EPP OPTANTE PELO SIMPLES NACIONAL" | II - "NAO GERA DIREITO A CREDITO FISCAL DE IPI".</infAdFisco> <infCpl>PAGTO A VISTA</infCpl> </infAdic>
  21. Olá pessoal, atualizei recentemente para o FastReport 5 (5.3.16) e estou com problemas quando exporto o DANFSe para PDF. A exportação ocorre normalmente mas ao abrir o PDF recebo esta mensagem: Dando um OK o PDF fica assim: O que achei mais estranho é que somente os dados do prestador de serviços tem esse problema, os dados do tomador são exibidos corretamente. Mesmo se tratando do pretador, os campos de IM e Tel são exibidos também. Dei uma olhada no arquivo .fr3 e não encontrei diferença alguma nos Memos usados e todos usam a fonte "arial" com style "fsBold". Procurei por algo no código que pudesse alterar alguma propriedade mas não encontrei nada. Problemas com instalação da fonte em si não pode ser pois os outros campos também usam a mesma fonte/style. Alguém enfrentou este problema? Alguém mais usa esta versão do Fast? Desde já agradeço a atenção.
  22. Depois da ultima atualização do ACBr (Trunk2), o Danfe do Manifesto aparece sujeiras na impressão, utilizo o XE10 Seattle e para o danfe o componente do FastReports Alguem sabe como contornar este problema? DAMDFe_Retrato.pdf
  23. Consultoria/Desenvolvimento Delphi/Lazarus Firebird/PostGreSQL/SQL Server/MySQL/MariaDB/SQLite/Oracle Consultoria/Desenvolvimento Delphi/Lazarus Firebird/PostGreSQL/SQL Server/MySQL/MariaDB/SQLite/Oracle
  24. Realizamos uma modificação para que, durante a exportação do DACTE e do DANFE para PDF, não seja disparada a mensagem do FastReport: "Exportando página 1" seguida de um botão "Cancelar". Ver o print abaixo. O que motivou essa alteração é o fato dessa janela ficar sendo exibida (piscando) ao ser feita a exportação em lote de vários arquivos para PDF. Seguem os arquivos ACBrCTeDACTEFR.pas e ACBrNFeDANFEFRDM.pas com as modificações. No DAMDFE já está desabilitado. ACBrCTeDACTEFR.pas ACBrNFeDANFEFRDM.pas
×
×
  • Create New...