// --- ОБЩАЯ СЕРВЕРНАЯ ФУНКЦИЯ ДЛЯ СОХРАНЕНИЯ ---
&НаСервереБезКонтекста
Функция СохранитьДанныеНаСервере(Ставка, Заказ, Учет)
Если Заказ >= 0 Тогда
Константы.СтавкаНДС.Установить(Ставка);
Константы.МинимальныйЗаказ.Установить(Заказ);
Константы.ВалютаУчета.Установить(Учет);
Возврат Истина; // Всё сохранилось успешно
Иначе
Сообщить("Минимальный заказ не может быть меньше нуля!");
Возврат Ложь; // Ошибка, сохранять нельзя
КонецЕсли;
КонецФункции
// --- КОД ДЛЯ КНОПКИ "ВНЕСТИ" ---
&НаКлиенте
Процедура Внести(Команда)
// Вызываем общую функцию сохранения
Если СохранитьДанныеНаСервере(РеквизитСтавкаНДС, РеквизитМинимальныйЗаказ, РеквизитВалютаУчета) Тогда
Сообщить("Данные записаны"); // Сообщаем об успехе
КонецЕсли;
КонецПроцедуры
// --- КОД ДЛЯ КНОПКИ "ЗАПИСАТЬ И ЗАКРЫТЬ" ---
&НаКлиенте
Процедура ЗаписатьИЗакрыть(Команда)
// Вызываем ту же самую общую функцию сохранения
Если СохранитьДанныеНаСервере(РеквизитСтавкаНДС, РеквизитМинимальныйЗаказ, РеквизитВалютаУчета) Тогда
Закрыть(); // Если сохранилось — закрываем форму
КонецЕсли;
КонецПроцедуры
// --- КОД ДЛЯ ЗАГРУЗКИ ДАННЫХ ПРИ ОТКРЫТИИ ФОРМЫ (если нужно) ---
&НаСервере
Процедура ПриСозданииНаСервере(Отказ, СтандартнаяОбработка)
РеквизитСтавкаНДС = Константы.СтавкаНДС.Получить();
РеквизитМинимальныйЗаказ = Константы.МинимальныйЗаказ.Получить();
РеквизитВалютаУчета = Константы.ВалютаУчета.Получить();
КонецПроцедуры