FErase/FRename

Apagar e renomear arquivos no AppServer. Retornam 0 em sucesso. Usados em integracao pra organizar arquivos processados.

Assinatura: FErase(cPath) -> nRet // FRename(cVelho, cNovo) -> nRet

Retorna: Numeric

Operacoes basicas de gerenciamento de arquivo.

// Apagar
If File(cArq)
    FErase(cArq)
EndIf

// Renomear (move tambem se path muda)
FRename("\in\pedido.csv", "\processed\pedido_" + DToS(dDataBase) + ".csv")

Padrao classico: pipeline de integracao

// 1. Pega arquivos
aArqs := Directory("\import\*.csv")
For i := 1 To Len(aArqs)
    cOrig := "\import\" + aArqs[i][1]

    // 2. Processa
    If U_ProcCsv(cOrig)
        // 3. Move pra "processed"
        FRename(cOrig, "\processed\" + aArqs[i][1])
    Else
        // 4. Ou apaga apos backup
        FRename(cOrig, "\error\" + aArqs[i][1])
    EndIf
Next

Pegadinhas

Veja também