Сначала в Бейсике

В Бейсике, как сказано выше, файл с прямой организацией открывается при выборе типа файла RANDOM. Для ввода записей существующего прямого файла используется оператор

GET #n, <номер записи>, <запись>

т.е. адресом записи прямого файла в Бейсике является просто его номер. Номер первой записи файла в Бейсике равен 0. Для того, чтобы вывести запись прямого файла, надо использовать оператор

PUT #n, <номер записи>, <запись>

Примечания:

1)В операторах INPUT, PRINT и WRITE можно записывать в списке вывода только переменные простых типов. Для того, чтобы ввести и вывести запись последовательного файла, надо перчислить все поля (реквизиты) этой записи.

2)в файле RANDOM в качестве входного или выходного списка можно использовать переменные любого типа, в том числе и структуры. Например:

PUT #1,5, Stud1

3)Номер записи в GET, PUT может отсутствовать (стоят “), тогда PUT и GET работают с очередной записью файда.

Иногда в задачах требуется начать обработку файла с некоторой записи, о которой известен её номер. Для этого в Бейсике используется оператор поиска нужной записи, имеющий вид:

SEEK #n, <номер записи>

Прямой файл, как уже говорилось, можно обрабатывать произвольно, можно последовательно. Приведем пример цикла последовательной обработки части прямого файла с 5-й записи до конца:

SEEK #1,5

WHILE NOT EOF (#1)

GET #1,,<запись>

<обработка записи>

WEND

Все о прямом файле в Бейсике.