В начало

Процедура ОчистЗап

 

// Обнуляет значения всех полей всех существующих записей

 

Процедура ОчистЗап ()

ДБФервая ();

   Пока 1 = 1 Цикл

      ДБФчистить ();

      ДБФаписать ();

      Если ДБФледующая () = 0 Тогда

         Возврат;

      КонецЕсли;

   КонецЦикла;

КонецПроцедуры