Читаю заголовок дбф файлика, смотрю на длину поля 10 (эт я знаю точно), но $a(...) возвращает -1.

Подозреваю что собака зарыта в параметре file.Open(...). Признавайтесь, кто наступал на эти грабли :)...

На всякий случай кусочек кода:
s f=##class(%File).%New("d:\Vdd.DBF")
d f.Open("RS")
d f.Read(4) // Первые четыре байта не использую
s fRowCount=f.Read(4) // кол-во строк
s fHeaderLength=f.Read(2) // Длина заголовка
//w !,$a($e(fHeaderLength,1,1))_" "_$a($e(fHeaderLength,2,2))
//w !,($a($e(fHeaderLength,1,1))+($a($e(fHeaderLength,2,2))*256)-1)/32
s fRowLength=f.Read(2) // Длина строки
d f.Read(20) // Пропускаю 20 байт

// Читаю описание заголовков по 32 байта
f i=1:1:($a($e(fHeaderLength,1,1))+($a($e(fHeaderLength,2,2))*256)-1)/32-1 {
s hName=$tr(f.Read(11),$c(0)) // Имя
s hType=f.Read(1) // Тип
d f.Read(4) // Пропускаю
s hLength=$a(f.Read(1)) // Длина поля в байтах
s hDec=$a(f.Read(1)) // Десятичных знаков
s ^a(i,"h","name")=hName
s ^a(i,"h","type")=hType
s ^a(i,"h","length")=hLength
s ^a(i,"h","dec")=hDec

d f.Read(14) // Остальные байты заголовка
}

d f.Close()
k
q

Непроконало.
Работает вариант с d f.Open("RF:1"), но приходится читать последовательность из 10 байт в цикле, что не есть выход...

В данном случае хочу прочесть дбф-файл, записать его описания столбцов и, далее, прочесть/сохранить данные в глобалах. Дело в том что я ранее наступал на эти грабли, и Shu подсказал решение, которое я привел выше. Можно, конечно, использовать Open|Use
Close, но хоццо пользовать %File разс оно есть:).