Click above to get retro games delivered to your door ever month!

Syntax

PACKDICT( dict_file [, _reopen [, _selective ]] )

Purpose

Pack, re-open and re-index all DBFs in the dictionary.

Arguments

     _dictname -- dictionary file name

     _reopen -- if passed and .F., leave app closed, else re-open

     _selective -- if passed and true, pack files whose DICT
                       Deletion flag is set .T., otherwise pack all
                       files.

Setup

All DBFs in the application are listed in the dictionary. In multi-user
mode, the function must be able to gain exclusive control for a successful
pack.

Example

     PACKDICT( "MY_DICT" )

Returns

.T. if successful, else .F.

Side Effects

Removes all deleted records from all tables listed in the dictionary.

Artful Calls

DB_OPEN, POP_MSG, CHK_DICT, VERIFY, IS_OPEN, PACKFILE

Source Files

AA_PACKM.PRG, AM_PACKM.PRG