Значения, которые может принимать 28 байт заголовка таблицы:

0x01file has a structural .cdx
0x02file has a Memo field
0x04file is a database (.dbc)

Note that this byte can contain the sum of
any of the above values. For example, 0x03
indicates the table has a structural .cdx
and a Memo field.

Т.е. в 28 байте, кроме ссылки на структурный индексный файл есть еще ссылка на мемо-поля. А если речь идет о файле базы данных (DBC), то еще и признак того, что данная таблица - это именно база данных.

Следовательно, просто обнулять этот байт нельзя. Необходимо вычесть 1 из его значения. Примерно так:

LOCAL lnFD
lnFD=FOPEN(FielName,2)

LOCAL lnByte
=FSEEK(m.tnFD,28,0)
lnByte=ASC(FREAD(m.tnFD,1))
=FSEEK(m.lnFD,28,0)
=FWRITE(m.lnFD,CHR(m.lnByte-1))
=FCLOSE(m.lnFD)

Да, забыл добавить, что перед вычитанием, следует убедится, что есть, что вычитать. В данном случае значение lnByte должно быть нечетным, т.е.

IF MOD(m.lnByte,2)=1
* Есть признак индексного файла. Вычитаем 1
ENDIF