02.03.2026

8.x

// 1. Удаление строк согласно условию НулевыеСтроки = ТаблицаПослеПодмен.НайтиСтроки(Новый Структура("Сумма",0)); Для каждого СтрокаТаблицы Из НулевыеСтроки Цикл ТаблицаПослеПодмен.Удалить(СтрокаТаблицы)...
Функция ВыделитьСлово(ИсходнаяСтрока) Экспорт Буфер = СокрЛ(ИсходнаяСтрока); ПозицияПослПробела = Найти(Буфер, " "); Если ПозицияПослПробела = 0 Тогда ИсходнаяСтрока...
Функция возвращает вариант базы данных "Файловая" или "Серверная": Функция КакаяБаза() СтрокаСоединенияСБД = СтрокаСоединенияИнформационнойБазы(); // в зависимости от...
ЭлементОбъект = СсылкаКонтрагент.ПолучитьОбъект(); НоваяСтрока = ЭлементОбъект.ВидыДеятельности.Добавить(); // Заполнить реквизиты. НоваяСтрока.ВидДеятельности = ПолеВводаВидДеятельности; ЭлементОбъект.Записать();
ИмяФайла = "Отчет.xls"; ДиалогОткрытияФайла = Новый ДиалогВыбораФайла(РежимДиалогаВыбораФайла.Сохранение); ДиалогОткрытияФайла.ПолноеИмяФайла = ИмяФайла; ДиалогОткрытияФайла.Каталог = КаталогВременныхФайлов(); ДиалогОткрытияФайла.Фильтр = "Файлы Microsoft...
Запрос = Новый Запрос( "ВЫБРАТЬ | ТоварыНаСкладахОстаткиИОбороты.Склад КАК Склад, | ТоварыНаСкладахОстаткиИОбороты.Склад.Представление, | ТоварыНаСкладахОстаткиИОбороты.Номенклатура КАК Номенклатура, | ТоварыНаСкладахОстаткиИОбороты.Номенклатура.Представление,...
Функция ДатаПропись(Дат) Экспорт Перем Результат; Результат=""; Если ТипЗнч(Дат)=Тип("Дата") Тогда Результат=Формат(Дат,"ДФ=""дд ММММ гггг 'г.'"""); КонецЕсли; Возврат Результат КонецФункции...
Процедура СохранитьВХранилищеНажатие(Элемент) ТабДок=Новый ТабличныйДокумент; ТабДок.Вывести(ЭлементыФормы.ПолеТабличногоДокумента1); Хранилище=Новый ХранилищеЗначения(ТабДок); Записать(); КонецПроцедуры Процедура ВосстановитьИзХранилищаНажатие(Элемент) ТабДок=Хранилище.Получить(); Если ТабДок<>Неопределено Тогда ЭлементыФормы.ПолеТабличногоДокумента1.Вывести(ТабДок); КонецЕсли;...