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
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