ИсторияИзминениеЦен

Здравствуйте друзья. Нужно помощь по 1С
Значит Есть справочник - СегментыЦен ( Никаких реквизитов нету кроме системного Наименование)
Есть документ ПрайсЛист ( Внутри ТабличнаяЧасть )
Реквизиты ТабЧасти
Номенклатура - Тип СправочникСсылка.Номенклатура
ЕдИзмирение - Тип СправочникСсылка.ЕдИзмирение
Цена - Тип Число 6, Точность 3

Что я собираюсь делать в табчасти создал кнопку. Хочу при нажатие на эту кнопку Открывалось СписокВыбора На справочник СегментыЦен Оттуда я выбераю те сегменты цен которые хочу. напирмер могу всех выбрать могу одного не имеет значение. Нажимаю ок. В табличной части создаются новые колонки под названиеями этих СегментыЦен. Написал код
Код на Модуле обьекта
&НаСервере
Процедура ВыбратьСегментыНаСервере(Результат)
// Логика для выбора сегментов
Сегменты = Справочники.СегментыЦен.Выбрать(); // Пример выборки

Если Сегменты.Количество() > 0 Тогда
Результат = Сегменты; // Возвращаем выбранные сегменты
Иначе
Результат = Неопределено; // Если сегменты не выбраны
КонецЕсли;
КонецПроцедуры




&НаСервере
Процедура ОбработатьСегментыНаСервере(ВыбранныеСегменты)
// Проверка, если сегменты выбраны
Если Не ВыбранныеСегменты.Пустая() Тогда
// Обработка выбранных сегментов
Для Каждого Сегмент Из ВыбранныеСегменты Цикл
// Добавить сегмент в табличную часть документа
НоваяСтрока = ЭтотОбъект.ТабличнаяЧасть.Добавить();
НоваяСтрока.Сегмент = Сегмент; // Добавление сегмента в строку
КонецЦикла;
Сообщить("Сегменты успешно добавлены в табличную часть");
Иначе
Сообщить("Не выбраны сегменты для добавления");
КонецЕсли;
КонецПроцедуры
Потом код на Форме документа
НаКлиенте
Процедура КнопкаВыбораСегментов(Кнопка)
// Создаем переменную для получения результатов
Результат = Неопределено;

// Получаем объект документа
ДокументОбъект = ЭтотОбъект; // Или получаем через форму, если требуется

// Вызов серверной процедуры для получения выбранных сегментов
ДокументОбъект.ВыбратьСегментыНаСервере(Результат);

Если Результат <> Неопределено Тогда
Сообщить("Сегменты успешно выбраны: " + Строка(Результат));

// Передаем выбранные сегменты на сервер для дальнейшей обработки
ЭтотОбъект.ОбработатьСегментыНаСервере(Результат);
Иначе
Сообщить("Сегменты не выбраны.");
КонецЕсли;
КонецПроцедуры
Ошибки нету. Но в предпринятие когда захочу программа ругается что выбрать сегмент насервере не обнаружен. Прошу помочь а может код вообще не правильно написал