25.08.2025

8.2 УП

8.2 УП

&НаКлиенте Процедура ПоКнопкеЧтениеИзМетаданных(Команда) // Вставить содержимое обработчика. Перем СписокСправочников; СписокСправочников = Новый СписокЗначений; СписокСправочников = СправочникиИзМетаданных(); Для...
Функция Представление() Функция представление предназначена для получения текстового представления любого значения, которое может быть получено при помощи...
Масштаб = 100000; Если ВвестиЗначение(Масштаб) Тогда ЭлементыФормы.ГеоСхема.ПоддержкаМасштаба = РежимОтображенияГеографическойСхемы.ЗадаетсяМасштабом; ЭлементыФормы.ГеоСхема.Масштаб = Масштаб; КонецЕсли;
ЗаписьXML = Новый ЗаписьXML(); ЗаписьXML.УстановитьСтроку(); Узел = ПланыОбмена.НаСклады.НайтиПоКоду("С1"); ЗапСообщения = ПланыОбмена.СоздатьЗаписьСообщения(); ЗапСообщения.НачатьЗапись(ЗаписьXML, Узел); Выборка = ПланыОбмена.ВыбратьИзменения(Узел, ЗапСообщения.НомерСообщения);...
Функция ПолучитьСубконто(Счет, Субконто, ИмяСубконто) Экспорт Если Счет = Неопределено ИЛИ Счет.Пустая() Тогда Возврат Неопределено; КонецЕсли; Если ТипЗнч(ИмяСубконто)...
РегистрыНакопления.ЗаказыМагазинов.УстановитьИспользованиеИтогов(Ложь); Запрос=Новый Запрос; Запрос.Текст = "ВЫБРАТЬ РАЗЛИЧНЫЕ | Регистр.Регистратор |ИЗ | РегистрНакопления.ЗаказыМагазинов КАК Регистр |ГДЕ | Регистр.Регистратор.Дата<&КонПериода";...
Процедура ПриОткрытии() СправочникСписок.Отбор.Ссылка.ВидСравнения = ВидСравнения.ВСписке; СправочникСписок.Отбор.Ссылка.Значение = СписокКонтрагентов; СправочникСписок.Отбор.Ссылка.Использование = Истина; КонецПроцедуры
RegExp = Новый COMОбъект("VBScript.RegExp"); RegExp.IgnoreCase = Ложь; //Игнорировать регистр RegExp.Global = Истина; //Поиск всех вхождений шаблона RegExp.MultiLine...