Если реквизит примитивного типа, то достаточно установить для свойства реквизита «Индексировать» значение «Индексировать» или «Индексировать с доп....
8.x
Срок годности позиции номенклатуры задается в справочнике «Номенклатура» на закладке «Серии номенклатуры». Отчет по товарам с указанием...
Форма = Документы.РасходныйКассовыйОрдер.ПолучитьФорму(); //возможные варианты получения формы: Параметы () //Форма = Документы.РасходныйКассовыйОрдер.ПолучитьФормуВыбора(); //Форма = Документы.РасходныйКассовыйОрдер.ПолучитьФормуНовогоДокумента(); //Форма =...
ПараметрыПредметаИсчисления = "целая, целых, целых, ж, сотая, сотой, сотых, ж, 2" ФорматнаяСтрока = "Л=ru_RU; ДП=Истина"; Сообщить(ЧислоПрописью(ВыводимоеЧисло, ФорматнаяСтрока,...
Форма = Справочники.Подразделения.ПолучитьФормуВыбора(); Результат = Форма.ОткрытьМодально(); Если Результат = Неопределено Тогда Возврат; КонецЕсли;
// Создание и запись новой задачи НовЗадача = Задачи.Задача.СоздатьЗадачу(); НовЗадача.Дата = ТекущаяДата(); // Установка прочих реквизитов задачи...
// Создает копию переданного массива, структуры или соответствия // // Параметры: // КоллекцияИсходная: тип Массив, Структура, Соответствие...
ДатаНапоминания = РабочаяДата; Подсказка = "Введите дату и время"; ЧастьДаты = ЧастиДаты.ДатаВремя; Если ВвестиДату(ДатаНапоминания, Подсказка, ЧастьДаты) Тогда...
Аналогично делается сторнирование по регистрам накопления и бухгалтерии Пример для регистра расчета ОсновныеНачисленияРаботниковОрганизации: ТаблицаСторноЗаписей = Движения.ОсновныеНачисленияРаботниковОрганизации.ПолучитьДополнение(); Для...
// Функция выполняет пропорциональное распределение суммы в соответствии с заданными коэффициентами распределения // // Параметры: // ИсхСумма...
&НаКлиенте Процедура ПоКнопкеЧтениеИзМетаданных(Команда) // Вставить содержимое обработчика. Перем СписокСправочников; СписокСправочников = Новый СписокЗначений; СписокСправочников = СправочникиИзМетаданных(); Для...
ИмяZIPФайла = ПолучитьИмяВременногоФайла(".zip"); ФайлАрхива = Новый ЗаписьZipФайла(ИмяZIPФайла, , , МетодСжатияZIP.Сжатие, УровеньСжатияZIP.Оптимальный); ФайлАрхива.Добавить(ИмяВременногоФайла, РежимСохраненияПутейZIP.СохранятьОтносительныеПути, РежимОбработкиПодкаталоговZIP.ОбрабатыватьРекурсивно); ФайлАрхива.Записать();
// Если передено число - то 1, иначе 0 Функция ЭтоЧисло(Знач ТекСтр) ТекСтр = СокрЛП(ТекСтр); ТекСтр =...
Если алгоритм должен выполняться по-разному в зависимости от места выполнения процедуры, то можно воспользоваться инструкциями препроцессора: #Если...
Выборка = Справочники.Номенклатура.Выбрать( , Владелец); Если Выборка.Следующий() = Истина Тогда // Есть подчиненные элементы. КонецЕсли; Запрос =...
// Заполним список доступных видов удержаний СпВидовРасчета = Новый СписокЗначений; Запрос = Новый Запрос( "ВЫБРАТЬ | УдержанияОрганизаций.Ссылка...
ВидУдерж=Неопределено; МассивТипов = Новый Массив; МассивТипов.Добавить(Тип("ПланВидовРасчетаСсылка.УдержанияОрганизаций")); ОписаниеВозможныхТипов = Новый ОписаниеТипов(МассивТипов); Если ВвестиЗначение(ВидУдерж,"Выберите вид удержания", ОписаниеВозможныхТипов) Тогда Сообщить(ВидУдерж);...
МойФайл = Новый ДвоичныеДанные(ПутьКФайлу); ХранилищеФайла = Новый ХранилищеЗначения(МойФайл); Новстр.ФайлDoc1=ХранилищеФайла; Новстр.ФайлDoc1Название = ПутьКФайлу;
Функция ЗаменитьПробелы(Строка, Символы) // Пишем все слова с больших букв, кому не надо закомментируйте СтрокаВозврата = СокрЛП(ТРег(Строка));...
ScriptCtrl = Новый COMОбъект("MSScriptControl.ScriptControl"); ScriptCtrl.Language = "vbscript"; ScriptCtrl.AddCode(" Function PlayS() | Set Wrap = CreateObject(""DynamicWrapper"") | Wrap.Register...