03.06.2026

8.x

Попытка ЗагрузитьВнешнююКомпоненту("scanopos.dll") Исключение Сообщить("Ошибка загрузки внешней компоненты!"); КонецПопытки; Попытка // Получить объект компоненты. Объект = Новый("AddIn.Scanner"); Исключение...
// Функция определяет пол работника по его отчеству Функция ПолучитьПол(ОтчествоРаботника) Экспорт Если Прав(ОтчествоРаботника, 2) = "ич" Тогда...
Текст = ""; Подсказка = "Введите текст напоминания"; Если ВвестиСтроку(Текст,Подсказка, 0, истина) Тогда // запомнить текст напоминания...
ДокументСписок.Отбор.Сбросить(); ДокументСписок.Отбор.статус.ВидСравнения=ВидСравнения.Содержит; ДокументСписок.Отбор.Статус.Значение="Принята"; ДокументСписок.Отбор.Статус.установить();
&НаКлиенте Процедура ПоКнопкеНовыйКонтрагент(Команда) // Вставить содержимое обработчика. Перем НовыйКонтрагент; НовыйКонтрагент = Новый Структура("Наименование, ПолноеНаименование, ИНН"); НовыйКонтрагент.Наименование =...
Запрос=новый Запрос; Запрос.Текст=" |ВЫБРАТЬ | Номенклатура.Ссылка |ИЗ | Справочник.Номенклатура КАК Номенклатура |ГДЕ | Номенклатура.ПометкаУдаления = ИСТИНА |";...
НаборЗаписей = РегистрыСведений.ВашРегистр.СоздатьНаборЗаписей(); НаборЗаписей.Записать(); Создаем переменную НаборЗаписей как набор записей регистра сведений. Поскольку мы не прочитали данные...
Процедура ВыгрузкаПроводок(Кнопка) Если Не ЗначениеЗаполнено(Документ) Тогда Сообщить("Заполните поле Документ!"); Иначе Движ = РегистрыБухгалтерии.Хозрасчетный.СоздатьНаборЗаписей(); Движ.Отбор.Регистратор.Установить(Документ); Движ.Прочитать(); ТЗ =...