Процедура ПриЗаписиТаблицы(КонтТаб, ИмяФайла, ФорматФайла, СтандартнаяОбработка)
Если ФорматФайла = 1 Тогда // xls
// Если КонтТаб.ВысотаТаблицы() > 100 Тогда
СтандартнаяОбработка = 0;
ТабличныйДокумент = СоздатьОбъект("ТабличныйДокумент");
ТабличныйДокумент.ЗагрузитьИзТаблицы(КонтТаб);
ТабличныйДокумент.Записать(ИмяФайла,"xls");
// КонецЕсли;
КонецЕсли;
КонецПроцедуры
//*****************************************************************************
Функция глУстановитьЗначениеРеквизитуФормы(Конт, Реквизит, Значение, ВыполнятьФормулу=0) Экспорт
АтрибутФормы = СоздатьОбъект("АтрибутФормы");
Попытка
АтрибутФормы.УстановитьАтрибут(Конт.Форма, Реквизит);
АтрибутФормы.Значение = Значение;
Попытка
Если ВыполнятьФормулу = 1 Тогда
Если ПустоеЗначение(АтрибутФормы.Формула) = 0 Тогда
Модуль = СоздатьОбъект("ВыполняемыйМодуль");
Модуль.УстановитьМодуль(
"Процедура ___ВыполнитьФормулуРеквизита___()
| " + АтрибутФормы.Формула + "
|КонецПроцедуры");
Модуль.НазначитьКонтекст(Конт);
Модуль.КомпилироватьМодуль();
Модуль.ВыполнитьМодуль();
Модуль.___ВыполнитьФормулуРеквизита___();
КонецЕсли;
КонецЕсли;
Исключение
глВывестиМногострочноеСообщение("глУстановитьЗначениеРеквизитуФормы: Ошибка выполнения формулы реквизита " + Реквизит + "
|Формула: " + АтрибутФормы.Формула + "
|Ошибка: " + ОписаниеОшибки());
КонецПопытки;
Исключение
Сообщить("глУстановитьЗначениеРеквизитуФормы: Не найден реквизит на форме: " + Реквизит);
Возврат 0;
КонецПопытки;
Возврат 1;
КонецФункции //глУстановитьЗначениеАтрибутуФормы
//*****************************************************************************
Функция глПолучитьЗначениеРеквизитаФормы(Конт, Реквизит, СообщатьОбОшибке=1) Экспорт
АтрибутФормы = СоздатьОбъект("АтрибутФормы");
Попытка
АтрибутФормы.УстановитьАтрибут(Конт.Форма, Реквизит);
Возврат АтрибутФормы.Значение;
Исключение
Если СообщатьОбОшибке = 1 Тогда
Сообщить("глПолучитьЗначениеРеквизитаФормы: Не найден реквизит на форме: " + Реквизит);
КонецЕсли;
Возврат ПолучитьПустоеЗначение();
КонецПопытки;
КонецФункции //глПолучитьЗначениеРеквизитаФормы
Цитата: Злоп от Вчера в 14:29И как установить в этом случае значение в поле ввода по его имени..?
Цитата: Злоп от 11 июня 2026, 22:29это не подойдетне подойдёт потому что:
Цитата: Харлампий Дымба от 11 июня 2026, 21:03v7moxel пока нет возможности поставить, там WinServer2003Из описания v7moxel: "...Для работы требуется .Net Framework v4.6.2..." - а эта версия не встает на WinServer2003, так что v7moxel там не запустить.