Как очистить значения всех констант?

 Для Каждого ОчереднаяКонстанта Из Константы Цикл

   ОчереднаяКонстанта.Установить(Неопределено);

КонецЦикла;