* В Примере 1 открывается таблица customer и создается файл индекса
* complist, который отображает и обрабатывает записи в алфавитном
* порядке значений поля company.

* В Примере 2 опять таблица customer и создается файл индекса citycomp
* на основе подстроки, состоящей из первых пяти символов поля city и
* первых пяти символов поля company. Когда этот индекс используется,
* записи в таблице упорядочиваются сначала по по полю city, а затем по
* полю company.

* В Примере 3 создаются теги индекса. Первый тег представляет собой тег
* структурного составного индекса для поля address1. Второй тег
* создается в файле неструктурного индекса custcdx. Последний тег также
* создается в файле неструктурного индекса custcdx, но в убывающем
* порядке.

* Example 1

CLOSE DATABASES

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

USE Customer && Open customer table

INDEX ON company TO complist

CLEAR

DISPLAY STATUS

* Example 2

CLOSE DATABASES

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

USE Customer && Open customer table

INDEX ON SUBSTR(city,1,5) + SUBSTR(company,1,6) TO citycomp

CLEAR

DISPLAY STATUS

* Example 3

CLOSE DATABASES

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

USE Customer && Open customer table

INDEX ON address TAG address

INDEX ON company TAG company OF custcdx

CLEAR

DISPLAY STATUS