* В следующем примере выполняется отображение на экране структуры
* таблицы orders, расширенное копирование ее структуры в таблицу temp,
* просмотр таблицы temp, создание файла backup для таблицы temp и
* отображение структуры backup.

CLOSE DATABASES

OPEN DATABASE (HOME( ) + 'samples\data\testdata')

USE orders && Opens Orders table

CLEAR

DISPLAY STRUCTURE

WAIT WINDOW 'Structure of the orders table' NOWAIT

COPY STRUCTURE EXTENDED TO temp

USE temp

WAIT WINDOW 'The temp table - 1 row per field in orders' NOWAIT

BROWSE

CREATE backup FROM temp

USE backup

DISPLAY STRUCTURE

WAIT WINDOW 'Backup.dbf has the same structure as orders' NOWAIT

USE

DELETE FILE temp.dbf

DELETE FILE backup.dbf