&НаКлиенте Процедура ОбработатьВыполнить() Объект.Обработан=Истина; БылоСтрок= Объект.Данные.Количество(); Для Счетчик =1 по Объект.Данные.Количество() Цикл НомерСтроки= БылоСтрок-Счетчик; лСтр = Объект.Данные[НомерСтроки];...
Справочники
Справочники
В языке запросов не предусмотрено специальных средств для получения всех родителей элемента. Для выполнения задачи можно воспользоваться...
Форма = Справочники.Номенклатура.ПолучитьФормуСписка(); //Можно открыть так Форма.Открыть(); //Открывает форму и делает ее окно активным. // или так...
ЭлементСправочника = Справочники.Контрагенты.НайтиПоКоду("0036"); Для Каждого ТекущаяСтрока Из ЭлементСправочника.Товары Цикл Сообщить(ТекущаяСтрока.ВидДеятельности); КонецЦикла;
Для вывода иерархического справочника в отчет с сохранением иерархии необходимо пользоваться запросом аналогичным следующему: ВЫБРАТЬ Номенклатура.Код, Номенклатура.Наименование...
Форма = Справочники.Подразделения.ПолучитьФормуВыбора(); Результат = Форма.ОткрытьМодально(); Если Результат = Неопределено Тогда Возврат; КонецЕсли;
КодГруппы = "123100"; ПоискПоПолномуКоду = Ложь; // значение по умолчанию Группа = Справочники.Номенклатура.НайтиПоКоду(КодГруппы, ПоискПоПолномуКоду); Если Группа.Пустая() Тогда...
Если Не Контрагент.Пустая() Тогда ФормаПодчиненныхДоговоров = Справочники.ДоговорыКонтрагентов.ПолучитьФормуСписка(); ФормаПодчиненныхДоговоров.ПараметрОтборПоВладельцу = Контрагент; ФормаПодчиненныхДоговоров.Открыть(); КонецЕсли;
Справ=СоздатьОбъект("Справочник.Задания"); Справ2=СоздатьОбъект("Справочник.Задания"); Справ.ИспользоватьВладельца(Цель); Справ2.ИспользоватьВладельца(Источник); Справ.ИспользоватьДату(НаДату); Справ2.ИспользоватьДату(НаДату); Справ2.ВыбратьЭлементы(); Пока Справ2.ПолучитьЭлемент()>0 Цикл Справ.Новый(); Справ.Записать(); МетаСправочник=Метаданные.Справочник(Справ.Вид()); Для Счетчик=1 По МетаСправочник.Реквизит()...
//проуедура всем контрагентам мозжает подчиненный докогвор "Дополнительный" Спр=СоздатьОбъект("Справочник.Контрагенты"); Попытка дог=СоздатьОбъект("Справочник.Договоры"); исключение Предупреждение("В конфигурации нет справочника ДОГОВОРЫ"); возврат;...
Процедура ПриОткрытии() СправочникСписок.Отбор.Ссылка.ВидСравнения = ВидСравнения.ВСписке; СправочникСписок.Отбор.Ссылка.Значение = СписокКонтрагентов; СправочникСписок.Отбор.Ссылка.Использование = Истина; КонецПроцедуры
// Модифицированность() - Определяет, был ли изменен объект после считывания из базы данных. // НО Метод не...
Выборка = Справочники.Номенклатура.Выбрать( , Владелец); Если Выборка.Следующий() = Истина Тогда // Есть подчиненные элементы. КонецЕсли; Запрос =...
// Это событие для ячейки Контрагент Табличной части Процедура КонтрагентНачалоВыбора(Элемент, СтандартнаяОбработка) Если Элемент.Значение.Пустая() Тогда СтандартнаяОбработка = Ложь;...
&НаКлиенте Процедура ПоКнопкеНовыйКонтрагент(Команда) // Вставить содержимое обработчика. Перем НовыйКонтрагент; НовыйКонтрагент = Новый Структура("Наименование, ПолноеНаименование, ИНН"); НовыйКонтрагент.Наименование =...
Выборка = Справочники.ЕдиницыИзмерения.Выбрать( , Владелец); КоличествоЭлементов = 0; Пока Выборка.Следующий() Цикл КоличествоЭлементов = КоличествоЭлементов + 1; КонецЦикла;...
На форме отчета находится поле списка, связанное с реквизитом списком значений. Нужно: 1) чтоб при нажатии на...
НоваяГруппа = Справочники.Номенклатура.СоздатьГруппу(); // Получить ссылку на группу, в которой должна находиться создаваемая группа. Родитель = Справочники.Номенклатура.НайтиПоНаименованию("Материалы",...
//Выведем весь справочник Номенклатура Запрос=новый Запрос; Запрос.Текст=" |ВЫБРАТЬ | Номенклатура.* |ИЗ | Справочник.Номенклатура КАК Номенклатура |"; РезультатЗ...
Массив = Справочники.ТипВсеСсылки().Типы(); Для Каждого ОчереднойТип из Массив Цикл Сообщить(ОчереднойТип); КонецЦикла;