Создает новую, пустую таблицу с той же структурой, которую имеет выбранная в данный момент таблица.
Синтаксис:
COPY STRUCTURE TO FileName [FIELDS FieldList] [[WITH] CDX | [WITH] PRODUCTION]
Параметры:
FileName
Задает имя новой, пустой таблицы, которую предстоит создать.
В Visual FoxPro поддержка пустых значений и кодовая страница для новой таблицы такие же, как и для текущей таблицы.
FIELDS FieldList
Указывает, что в новую таблицу будут копироваться только те поля, имена которых заданы в списке FieldList. Если опустить предложение FIELDS FieldList, в новую таблицу будут копироваться все поля.
[WITH] CDX | [WITH] PRODUCTION
Создает для новой таблицы файл структурного индекса, который идентичен файлу структурного индекса существующей таблицы. В новый файл структурного индекса копируются теги и выражения индекса из исходного файла структурного индекса.
Предложения CDX и PRODUCTION идентичны.
Пример:
* В следующем примере открывается таблица customer, ее структура * копируется в таблицу backup, открывается таблица backup. Затем по * команде APPEND FROM к таблице backup присоединяются записи из * таблицы customer, для файла backup открывается окно просмотра. CLOSE DATABASES OPEN DATABASE (HOME( ) + 'samples\data\testdata') USE customer && Opens Customer table COPY STRUCTURE TO backup USE backup APPEND FROM customer FOR country = 'UK' BROWSE FIELDS contact, country USE DELETE FILE backup.dbf