В начало

Процедура Восст3ап

 

Процедура Восст3ап ()

   ТекРежим = ДБФ.ПоказыватьУдаленные (1);

   ДБФ.Первая (};

   Пока 1 = 1 Цикл

      Если ДБФ.ЗаписьУдалена () = 1 Тогда

         ДБФ.Восстановить ();

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

      КонецЕсли;

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

         ДБФ.ПоказыватьУдаленные (ТекРежим);

         Возврат;

      КонецЕсли;

   КонецЦикла;

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