А ещё, уточните, как из представленного кода видно, что next-ом читается 4 записи именно последовательно (намёк на 2-й if)?Алексей- Софт-Центр писал(а): ↑04 Сентябрь 2019, 11:56Read_B_File - процедура, устанавливающая SET-ом В-файл (около 100 000 записей) и Next-ом читающая всегда 4 (Это я знаю) записи.
Типа:
Set(...)
loop
next(b)
if error() then break.
if условие then break.
....
end
. . .
Для меня это откровение, что GET-ы , читающие 4-е последовательные записи работают быстрее, чем последовательное чтение NEXT-ом!
Я так думаю, что считать последовательно 4 записи выглядит примерно так:
Код: Выделить всё
Loop 4 Times
next(b)
end