Работаем со справочником |
Ссылка на справочник Для работы со справочником из какого-нибудь модуля требуется сначала
Добавление в справочник новых элементов (записей): НовЭл.Оклад = 5000; НовЭл.Записать();
НайденныйСотр = СпрСотр.НайтиПоНаименованию("Иванов Иван Иванович"); НайденныйСотр СпрСотр.НайтиПоРеквизиту("Оклад", 5000); //далее нужно проверить найденное значение НайденныйСотр = СпрСотр.НайтиПоНаименованию("Иванов Иван Иванович"); Если НайденныйСотр = Неопределено Тогда .....//элемент не найден КонецЕсли;
СпрСотр.Удалить(); //непосредственное удаление СпрСотр.УстановитьПометкуУдаления (Истина); //пометка на удаление СпрСотр.УстановитьПометкуУдаления (Ложь); //снять пометку на удаление //можно проверить, помечен ли элемент на удаление //есть свойство ПометкаУдаления, оно имеет тип Булево - Истина или Ложь Пометка = СпрСотр.ПометкаУдаления; //обратите внимание: это свойство Если Пометка = Истина Тогда .....//элемент помечен на удаление КонецЕсли Перебор элементов справочника в цикле: ... //действия с очередным элементом ...Сообщить("Сотрудник " + выборка.Наименование); КонецЦикла; Перебор элементов внутри группы. Группа в терминах 1С -это "родитель". Выборка = СпрСотр.Выбрать(ГруппаРаботающие); Пока выборка.Следующий() = 1 Цикл ... //действия с очередным элементом ...Сообщить("Сотрудник " + Выборка.Наименование); КонецЦикла; Перебор элементов справочника принадлежащих элементу другого справочника. ... //действия с очередным элементом ...Сообщить("льгота " + Выборка.Наименование); КонецЦикла;
Выборка = Справочники.Номенклатура.Выбрать(ПолеВводаРодитель); Наименование = Выборка.Наименование; КонецЦикла; Запрос = Новый Запрос(" |ВЫБРАТЬ Запрос.УстановитьПараметр("Родитель", ПолеВводаРодитель); Результат = Запрос.Выполнить().Выбрать(); Пока Результат.Следующий() Цикл Выборка=Справочники.Номенклатура.ВыбратьИерархически(ПолеВводаРодитель); Пока Выборка.Следующий() Цикл Наименование = Выборка.Наименование; КонецЦикла; Запрос = Новый Запрос(" |ВЫБРАТЬ Запрос.УстановитьПараметр("Родитель", ПолеВводаРодитель); Результат = Запрос.Выполнить().Выбрать(); Пока Результат.Следующий() Цикл Наименование = Результат.Наименование; КонецЦикла; По материалам сайта: http://razrabotka1c8.narod.ru |