Если ТабСмен.НайтиСтроки(Новый Структура("Смена", ОтсыпнойИлиВыходной)).Количество()>0 Тогда
ТабСмен.НайтиСтроки(Новый Структура("Смена", ОтсыпнойИлиВыходной)).Удалить(0);
Смена_Лес = ТабСмен.Получить(0).НомерСмены;
иначе ...
Я не хочу быть самым богатым человеком на кладбище. Засыпать с чувством, что за день я сделал какую-нибудь потрясающую вещь — вот что меня интересует. Стив Джобс