Процедура УдалЗап ()
ДБФ.Первая ();
Пока 1 = 1 Цикл
ДБФ.Удалить ();
ДБФ.Записать ();
Если ДБФ.Следующая () = 0 Тогда
Возврат;
КонецЕсли;
КонецЦикла;
КонецПроцедуры