Pular para o conteúdo
Início » Advpl OpenFile

Advpl OpenFile

    Tipo: Processamento
    É a função que exibe o diagnóstico de arquivos, verificando a existência dos arquivos de dados e os índices do sistema,
    criando caso não existam, etc. Abre os arquivos de acordo com o módulo onde é executada ou de acordo com a
    parametrização.
    Sintaxe
    OpenFile(cEmp)
    Parâmetros
    cEmp – Código da empresa que deve ser aberta.
    Exemplo
    // Exemplo de uso da funcao openfile:
    cEmp := SM0->M0_CODIGO
    // Elimina os indices de todos os arquivos abertos no
    // SX2 para reindexacao
    dbSelectArea(“SX2”)
    dbGoTop()
    While !EOF()
    If Select(SX2->X2_CHAVE) > 0
    dbSelectArea(SX2->X2_CHAVE)
    dbCloseArea()
    cEsp := AllTrim(SX2->X2_PATH)
    cEsp := cEsp + AllTrim(SX2->X2_ARQUIVO) + "*" + RetIndExt()
    fErase(cEsp)
    Endif
    dbSelectArea(“SX2”)
    dbSkip()
    EndDo
    dbCloseAll() // Fecha todos os arquivos
    OpenFile(cEmp) // Abre os arquivos (reindexa)
    Return
    * Parâmetro cEmp apenas no Windows.