Página 1 de 1
Apagando arquivo do FastReport
Enviado: 13 Out 2015 16:14
por Daiane
Galera é a primeira vez q to usando o fastreport e toda vez que vou abrir o relatório algo exclui o arquivo.fr3
dei olhada se no meu codigo tem alguma comando para apagar o arquivo e não achei
alguem pode me ajudar?
vou colocar o codigo fonte
Código: Selecionar todos
METHOD Build() class RelCtps
NomeEmp := 13->NOME
CnpjEmp := 13->CGC
oFrPrn := frReportManager():new() // instancia o objeto FasReport
oFrPrn:LoadLangRes( 'brazil.xml') //arquivo de idioma
oFrPrn:SetWorkArea("RELCTPS", select("RELCTPS"))
3->(DBGOTOP())
3->(ORDSETFOCUS(1))
3->(DBSEEK(1->CCUSTO+1->CCUSTO1))
IF 3->(FOUND())
CCFunc := 1-CODIGO + "." + 1->CODIGO1 + " - " + 3->DESCRICAO
ELSE
CCFunc := ""
ENDIF
oFrPrn:SetTitle(NomeEmp) // USAR VARIAVEIS
oFrPrn:SetTitle(CnpjEmp)
NomeFunc := 1->NOME
CodFunc := 1->CODIGO
AdmissaoF := 1->ADMISSAO
DemissaoF := 1->DEMISSAO
CtpsFunc := STRTRAN(1->CRPROF,"/")
PisFunc := ALLTRIM(1->PISPASEP)
CpfFunc := 1->CPF
oFrPrn:SetTitle(NomeFunc)
oFrPrn:SetTitle(CodFunc)
oFrPrn:SetTitle(AdmissaoF)
oFrPrn:SetTitle(DemissaoF)
oFrPrn:SetTitle(CCFunc) //CODIGO+CODIGO1
oFrPrn:SetTitle(CtpsFunc)
oFrPrn:SetTitle(PisFunc)
oFrPrn:SetTitle(CpfFunc)
oFrPrn:PreviewOptions:SetAllowEdit( .f. ) // inibe o botão de edição do relatório pelo usuário
oFrPrn:LoadFromFile("C:\MFOLHA\RELATORIOS\RELCTPS.FR3") // para leitura direta de arquivo FR3
oFrPrn:DesignReport() // abre em modo desinr
// oFrPrn:ShowReport() // Abre ol relatorio em preview
oFrPrn:DestroyFR()
RETURN
Apagando arquivo do FastReport
Enviado: 14 Out 2015 11:15
por Kapiaba
Código: Selecionar todos
METHOD Build() class RelCtps
NomeEmp := 13->NOME
CnpjEmp := 13->CGC
oFrPrn := frReportManager():new() // instancia o objeto FasReport
oFrPrn:LoadLangRes( 'brazil.xml') //arquivo de idioma
oFrPrn:SetWorkArea("RELCTPS", select("RELCTPS"))
3->(DBGOTOP())
3->(ORDSETFOCUS(1))
3->(DBSEEK(1->CCUSTO+1->CCUSTO1))
IF 3->(FOUND())
CCFunc := 1-CODIGO + "." + 1->CODIGO1 + " - " + 3->DESCRICAO
ELSE
CCFunc := ""
ENDIF
oFrPrn:SetTitle(NomeEmp) // USAR VARIAVEIS
oFrPrn:SetTitle(CnpjEmp)
NomeFunc := 1->NOME
CodFunc := 1->CODIGO
AdmissaoF := 1->ADMISSAO
DemissaoF := 1->DEMISSAO
CtpsFunc := STRTRAN(1->CRPROF,"/")
PisFunc := ALLTRIM(1->PISPASEP)
CpfFunc := 1->CPF
oFrPrn:SetTitle(NomeFunc)
oFrPrn:SetTitle(CodFunc)
oFrPrn:SetTitle(AdmissaoF)
oFrPrn:SetTitle(DemissaoF)
oFrPrn:SetTitle(CCFunc) //CODIGO+CODIGO1
oFrPrn:SetTitle(CtpsFunc)
oFrPrn:SetTitle(PisFunc)
oFrPrn:SetTitle(CpfFunc)
oFrPrn:LoadFromFile("C:\MFOLHA\RELATORIOS\RELCTPS.FR3") // para leitura direta de arquivo FR3
oFrPrn:PrepareReport()
oFrPrn:PreviewOptions:SetAllowEdit( .f. ) // inibe o botão de edição do relatório pelo usuário
//oFrPrn:DesignReport() // abre em modo desinr - Editor
oFrPrn:ShowReport() // Abre ol relatorio em preview
oFrPrn:ClearDataSets()
oFrPrn:DestroyFR()
RETURN
Apagando arquivo do FastReport
Enviado: 14 Out 2015 14:00
por Daiane
Obrigada Kapiaba,deu certo.
aproveitando a oportunidade,vc sabe me dizer como faz p pular uma linha no fastreport caso minha condição seja atendida?
Apagando arquivo do FastReport
Enviado: 14 Out 2015 14:33
por Kapiaba
Explique melhor. Você pega o texto de onde? Ou é um .XML?
Apagando arquivo do FastReport
Enviado: 14 Out 2015 14:35
por Daiane
o texto é escrito no proprio fastreport
Apagando arquivo do FastReport
Enviado: 14 Out 2015 14:36
por Daiane
e a questão de excluir o relatorio voltou de novo e n fiz nada kkkk
Apagando arquivo do FastReport
Enviado: 14 Out 2015 14:59
por Kapiaba
Veja se ajuda:
https://www.fast-report.com/public_down ... ual-en.pdf
Você está dizendo que o seu arquivo.FR3 esta sendo destruido? Pode ser virus ou tem um DELETE ou FERASE, exemplo: FERASE( *.* ) ou FERASE( "*.FR3) ) pesquise.
Apagando arquivo do FastReport
Enviado: 15 Out 2015 08:37
por Daiane
TEm um ferase pra apagar meu banco,mas p o relatorio não tem. vou dar uma olhada no link q vc mandou. brigadinha
Apagando arquivo do FastReport
Enviado: 15 Out 2015 09:54
por Kapiaba
Mostre a sintaxe do comando FERASE() que usas para apagar o banco. abs.
Apagando arquivo do FastReport
Enviado: 15 Out 2015 15:56
por Daiane
Nossa,como muito esforço descobrir oq era,o problema não era nem no meu fonte e nem no fast report.
era com o SVN,algum programador q trabalhou aq na empresa configurou para que quando compilasse o projeto todos os relatórios arquivados no versionador sobrepõem os que estão salvos na pasta q eu estava salvando o meu relatório.não sei se expliquei direito,mas enfim consegui resolver.
Obrigada pela ajuda.