Как программно изменить элемент справочника 1с - Исправление ошибок и поиск оптимальных решений проблем

На чтение 6 мин Просмотров 9.4к. Опубликовано 26.04.2017

Справочники в 1С — это объекты конфигурации, предназначенные для хранения данных, имеющих одинаковую структуру и носящие списочный характер. Например, в справочниках может храниться: перечень номенклатуры, контрагентов, сотрудников, банковских счетов и т.д. В статье рассматриваются базовые принципы работы с этим объектом метаданных.

Создание элемента справочника
Поиск элементов справочника
Изменение элементов справочника
Удаление элементов справочника
Обход элементов справочника
Выбор элементов справочника запросом
Открытие форм справочника

Содержание

Создание элемента справочника
Поиск элементов справочника
Изменение элементов справочника
Удаление элементов справочника
Обход элементов справочника
Выбор элементов справочника запросом
Открытие форм справочника

Создание элемента справочника

Создание новых элементов и групп справочника производится с помощью программного объекта СправочникМенеджер.<Имя справочника>. Данный объект доступен только на сервере.
Создание нового элемента или группы справочника состоит из следующих этапов:

Создание элемента или группы;
Заполнение владельца (если справочник подчиненный);
Заполнение родителя (если справочник иерархический);
Заполнение наименования и реквизитов (если не задана автоматическая нумерация, то и кода);
Заполнение табличных частей;
Запись элемента.

Создание новой группы:
НоваяГруппа = Справочники.Контрагенты.СоздатьГруппу(); // Создание группы НоваяГруппа.Наименование = "Покупатели"; // Заполнение наименования НоваяГруппа.Записать(); // Запись группы
Создание нового элемента:
НовыйЭлемент = Справочники.Контрагенты.СоздатьЭлемент(); // Создание элемента НовыйЭлемент.Родитель = Справочники.Контрагенты.НайтиПоНаименованию("Покупатели"); // Заполнение родителя НовыйЭлемент.Наименование = "Ромашка ООО"; // Заполнение наименования НовыйЭлемент.ИНН = "123456789"; // Заполнение реквизита // Добавление новой строки табличной части НоваяСтрока = НовыйЭлемент.КонтактнаяИнформация.Добавить(); НоваяСтрока.Тип = "Адрес"; НоваяСтрока.Представление = "Москва";

НовыйЭлемент.Записать(); // Запись элемента

Поиск элементов справочника

Для поиска элементов справочников в языке программирования 1С предусмотрено несколько методов:

НайтиПоКоду(<Код>, <ПоискПоПолномуКоду>, <Родитель>, <Владелец>)
НайтиПоНаименованию(<Наименование>, <ТочноеСоответствие>, <Родитель>, <Владелец>)
НайтиПоРеквизиту(<ИмяРеквизита>, <ЗначениеРеквизита>, <Родитель>, <Владелец>)

Во всех методах если поиск успешный, то будет возвращена ссылка на найденный элемент.
НайденныйКонтрагент = Справочники.Контрагенты.НайтиПоКоду("123"); // Поиск контрагента с кодом "123" НайденныйДоговор = Справочники.ДоговорыКонтрагентов.НайтиПоКоду("1", , , НайденныйКонтрагент); // Поиск подчиненного найденному контрагенту договора с номером "1" НайденныйКонтрагент = Справочники.Контрагенты.НайтиПоНаименованию("Покупатели"); // Поиск элемента с наименованием "Покупатели" НайденныйКонтрагент1 = Справочники.Контрагенты.НайтиПоНаименованию("Ромашка ООО", , НайденныйКонтрагент); // Поиск элемента с наименованием "Ромашка ООО" в группе "Покупатели" НайденныйКонтрагент = Справочники.Контрагенты.НайтиПоРеквизиту("ИНН", "123456789"); // Поиск контрагента с ИНН "123456789"

Изменение элементов справочника

Для изменения реквизитов справочника необходимо выполнить следующие действия:

Получить объект элемента справочника (метод ПолучитьОбъект(), возвращает тип СправочникОбъект.<Имя справочника>);
Присвоить новые значения реквизитам объекта;
Записать объект элемента справочника.

Программное изменение справочника возможно только на стороне сервера.

Например, на форму обработки выведен реквизит Номенклатура типа СправочникСсылка.Номенклатура. Вот пример кода, изменяющего наименование выбранной пользователем номенклатуры:
НоменклатураОбъект = Номенклатура.ПолучитьОбъект(); НоменклатураОбъект.Наименование = "Новое наименование"; НоменклатураОбъект.Записать();

Удаление элементов справочника

Элементы справочника могут быть помечены на удаление и удалены из базы непосредственно.

Непосредственное удаление – операция необратимая, в то время как пометку на удаление можно отменить. Пометка на удаление хранится в предопределенном реквизите ПометкаУдаления. В пользовательском режиме помеченные на удаление элементы и группы справочника помечаются красным крестиком.

Пометку на удаление можно установить/снять двумя разными способами:
// Способ 1. Использование метода УстановитьПометкуУдаления() НайденныйКонтрагент = Справочники.Контрагенты.НайтиПоКоду("123"); КонтрагентОбъект = НайденныйКонтрагент.ПолучитьОбъект(); КонтрагентОбъект.УстановитьПометкуУдаления(Истина);

// Способ 2. Изменение свойства ПометкаУдаления НайденныйКонтрагент = Справочники.Контрагенты.НайтиПоКоду("123"); КонтрагентОбъект = НайденныйКонтрагент.ПолучитьОбъект(); КонтрагентОбъект.ПометкаУдаления = Истина; КонтрагентОбъект.Записать();
Пример непосредственного удаления элемента справочника:
НайденныйКонтрагент = Справочники.Контрагенты.НайтиПоКоду("123"); КонтрагентОбъект = НайденныйКонтрагент.ПолучитьОбъект(); КонтрагентОбъект.Удалить();

Обход элементов справочника

Для обхода элементов справочника в языке программирования 1С предусмотрено два метода:

Выбрать(<Родитель>, <Владелец>, <Отбор>, <Порядок>)
ВыбратьИерархически(<Родитель>, <Владелец>, <Отбор>, <Порядок>)

Методы отличаются порядком следования отобранных элементов: при иерархической выборке для каждого элемента сначала выбираются элементы, для которых он является родителем, а затем уже выбираются элементы следующего уровня.

Рассмотрим примеры обхода элементов справочника:
// Обход всех элементов справочника Контрагенты Выборка = Справочники.Контрагенты.Выбрать(); // Получение выборки всех элементов справочника Пока Выборка.Следующий() Цикл //действия с очередным элементом Сообщить(Выборка.Наименование); КонецЦикла; // Обход контрагентов из группы "Покупатели" ГруппаПокупатели = Справочники.Контрагенты.НайтиПоНаименованию("Покупатели"); Выборка = Справочники.Контрагенты.Выбрать(ГруппаПокупатели); Пока Выборка.Следующий() Цикл Сообщить(Выборка.Наименование); КонецЦикла;


// Обход договоров контрагента "Ромашка ООО"
 НайденныйКонтрагент = Справочники.Контрагенты.НайтиПоНаименованию("Ромашка ООО");
 Выборка = Справочники.ДоговорыКонтрагентов.Выбрать(, НайденныйКонтрагент);
 Пока Выборка.Следующий() Цикл
 Сообщить(Выборка.Наименование);
 КонецЦикла;

// Обход контрагентов с пустым ИНН // Реквизит ИНН должен быть проиндексирован! Отбор = Новый Структура("ИНН", ""); // Структура может содержать только один элемент Выборка = Справочники.Контрагенты.Выбрать(, , Отбор); Пока Выборка.Следующий() Цикл Сообщить(Выборка.Наименование); КонецЦикла;

Выбор элементов справочника запросом

Поиск данных в базе 1С предпочтительнее выполнять при помощи запросов. Запрос позволяет описать практически любые условия для отбора, в отличие от методов Выбрать() и ВыбратьИерархически(), на которые накладываются существенные ограничения. К тому же, в большинстве случаев работа с использованием запросов быстрее, чем работа с использованием программного кода.

Простой пример поиска и вывода товаров со стоимостью больше 1000:
Запрос = Новый Запрос; Запрос.Текст = "ВЫБРАТЬ | Товары.Наименование |ИЗ | Справочник.Товары КАК Товары |ГДЕ | Товары.Стоимость > 1000"; Выборка = Запрос.Выполнить().Выбрать(); Пока Выборка.Следующий() Цикл Сообщить(Выборка.Наименование); КонецЦикла;

Открытие форм справочника

Для открытия любых форм справочников рекомендуется использовать метод
ОткрытьФорму(<ИмяФормы>, <Параметры>, <Владелец>, <Уникальность>, <Окно>, <НавигационнаяСсылка>, <ОписаниеОповещенияОЗакрытии>, <РежимОткрытияОкна>)
Для открытия формы элемента или группы справочника также возможно использовать более простой метод
ПоказатьЗначение(<ОписаниеОповещенияОЗавершении>, <Значение>)
Кроме методов ОткрытьФорму() и ПоказатьЗначение() есть и другие (ОткрытьФормуМодально, ОткрытьЗначение, ПолучитьФорму), но их использование не рекомендуется, т.к. часть этих методов использует режим модального открытия, часть противоречит свежим рекомендациям фирмы 1С.

Приведем примеры программного открытия форм справочника:
// Открыть форму списка ОткрытьФорму("Справочник.Контрагенты.ФормаСписка");


// Открыть форму элемента
 // Контрагент – реквизит формы, заполняемый пользователем интерактивно
 ПоказатьЗначение(, Контрагент);
// Еще один способ открытия формы элемента
 ПараметрыОткрытия = Новый Структура("Ключ", Контрагент);
 ОткрытьФорму("Справочник.Контрагенты.Форма.ФормаЭлемента", ПараметрыОткрытия);
// Открыть форму группы
 // ГруппаКонтрагентов– реквизит формы, заполняемый пользователем интерактивно
 ПоказатьЗначение(, ГруппаКонтрагентов);

// Еще один способ открытия формы группы ПараметрыОткрытия = Новый Структура("Ключ", ГруппаКонтрагентов); ОткрытьФорму("Справочник.Контрагенты.Форма.ФормаГруппы", ПараметрыОткрытия);

Внимание!

Следует понимать, что интерактивная работа (в том числе открытие форм) в 1С возможна только на стороне клиента. В то же время поиск и изменение данных возможны только на стороне сервера.

Источник

Программно можно создавать новые элементы, изменять существующие, удалять, искать элементы по коду, наименованию, реквизитам и т.п. Но нельзя программно добавить новый справочник в конфигурацию. Это выполняется только интерактивно в дереве метаданных.

СправочникиМенеджер

Объект СправочникиМенеджер предназначен для управления всеми справочниками конфигурации. Через цикл можно получить доступ к менеджеру каждого справочника:

//перебор всех менеджеров справочников:
Для Каждого Мен Из Справочники Цикл
	//Мен - менеджер конкретного справочника
КонецЦикла;

Также можно обратиться к менеджеру справочника через точку или через квадратные скобки:

//Получение менеджера конкретного справочника:
МенТовары = Справочники.Товары;
МенТовары = Справочники[«Товары»];

Также через СправочникиМенеджер можно проверить является ли ссылка справочником:

//какая-то ссылка, нужно узнать это ссылка на справочник или нет
ПростоСсылка = ПолучитьКакуюТоСсылку();

//получим описание типов со всеми типами справочников конфигурации
ВсеСправочникиКонфигурации = Справочники.ТипВсеСсылки();

//проверяем
Если ВсеСправочникиКонфигурации.СодержитТип(ТипЗнч(ПростоСсылка)) Тогда
	//да, это справочник
Иначе
	//нет, что-то другое
КонецЕсли;

Программное создание элемента справочника

Для программного создания элементов есть метод СоздатьЭлемент. Для программного создания групп — метод СоздатьГруппу:

НовыйТовар = Справочники.Товары.СоздатьЭлемент();
НовыйТовар.Наименование = "Клавиатура";
//...заполнение прочих реквизитов
//запись в базу
НовыйТовар.Записать();

НоваяГруппаТоваров = Справочники.Товары.СоздатьГруппу();
НоваяГруппаТоваров.Наименование = "Комплектующие";
//...заполнение прочих реквизитов
//запись в базу
НоваяГруппаТоваров.Записать();

Программное изменение элементов справочника

Для того чтобы изменить реквизиты уже существующего элемента справочника нужно через ссылку получить объект методом ПолучитьОбъект, через объект изменить значения реквизитов и записать измененный объект в базу данных:

//функция вернула какую-то ссылку на справочник Товары
СсылкаНаТовар = СсылкаНаТовар();

//получам объект из ссылки
ТоварОбъект = СсылкаНаТовар.ПолучитьОбъект();
//меняем наименование
ТоварОбъект.Наименование = ТоварОбъект.Наименование + " (изменение)";
//записываем
ТоварОбъект.Записать();

Программное копирование элемента справочника

Методом Скопировать можно создать копию элемента справочника. Данный метод можно вызывать как у ссылки, так и у объекта:

//через ссылку
КопияИзСсылки = СсылкаНаТовар.Скопировать();
КопияИзСсылки.Записать();

//через объект
ТоварОбъект = СсылкаНаТовар.ПолучитьОбъект();
КопияИзОбъекта = ТоварОбъект.Скопировать();
КопияИзОбъекта.Записать();

Программное удаление элемента справочника

Для удаления применяются два метода: УстановитьПометкуУдаления и Удалить. Метод УстановитьПометкуУдаления только установит пометку на удаление, сам элемент не будет удален из базы данных. Метод Удалить удалит элемент из базы данных без проверки ссылочной целостности. То есть, если на этот элемент были ссылки в других местах, то теперь вместо ссылки будет надпись «Объект не найден». Не рекомендуется пользоваться методом Удалить. Важно отметить, что вызов метода УстановитьПометкуУдаления вызывает запись объекта. Дополнительно записывать объект не нужно.

ТоварОбъект = СсылкаНаТовар.ПолучитьОбъект();
ТоварОбъект.УстановитьПометкуУдаления(Истина);
//также будут помечены на удаление все подчиненные элементы

//без пометки удаления подчиненных элементов:
ТоварОбъект.УстановитьПометкуУдаления(Истина, Ложь);

//снятие пометки на удаление
ТоварОбъект.УстановитьПометкуУдаления(Ложь);

//удаление без проверки ссылочной целостности
ТоварОбъект.Удалить();
//также удалит все вложенные элементы

Программный поиск по справочнику

Для поиска используются методы НайтиПоКоду, НайтиПоНаименованию и НайтиПоРеквизиту.

НайтиПоКоду

//поиск по коду
ТоварСсылка = Справочники.Товары.НайтиПоКоду("000000008");

//по полному коду. Полный код включает в себя все коды родителей:
//код родителя/код элемента
ТоварСсылка = Справочники.Товары.НайтиПоКоду("000000003/000000008", Истина);

//поиск в пределах одной группы, Группа - ссылка на группу справочника 
ТоварСсылка = Справочники.Товары.НайтиПоКоду("000000008",, Группа); 

//поиск в пределах владельца, Владелец - ссылка на владельца
ТоварСсылка = Справочники.Товары.НайтиПоКоду("000000008",,, Владелец);

НайтиПоНаименованию

//поиск по наименованию, должна совпадать левая часть
ТоварСсылка = Справочники.Товары.НайтиПоНаименованию("Смартфон");
//будут найдены и "Смартфон" и "Смартфон самсунг", но метод вернет первый 
//попавшийся элемент

//точное совпадение, кроме хвостовых пробелов
//будет найден только Смартфон
ТоварСсылка = Справочники.Товары.НайтиПоНаименованию("Смартфон", Истина); 

//поиск в пределах одной группы, Группа - ссылка на группу справочника
ТоварСсылка = Справочники.Товары.НайтиПоНаименованию("Смартфон",, Группа); 

//поиск в пределах владельца, Владелец - ссылка на владельца
ТоварСсылка = Справочники.Товары.НайтиПоНаименованию("Смартфон",,,Владелец);

Для обоих методов если элемент не будет найден, то метод вернет пустую ссылку. Если для справочника указана нулевая длина кода или наименования, то метод вернет Неопределено.

НайтиПоРеквизиту

//поиск по реквизиту, 1-ый параметр имя реквизита, 2-ой значение
ТоварСсылка = Справочники.Товары.НайтиПоРеквизиту("Артикул", "Арт001"); 

//поиск в пределах одной группы, Группа - ссылка на группу справочника
ТоварСсылка = Справочники.Товары.НайтиПоРеквизиту("Артикул", "Арт001", Группа); 

//поиск в пределах владельца, Владелец - ссылка на владельца
ТоварСсылка = Справочники.Товары.НайтиПоРеквизиту("Артикул","Арт1",,Владелец);

Если элемент не будет найден, то метод вернет пустую ссылку. Если есть несколько элементов с таким значением реквизита, то вернется первый попавшийся элемент.

Выборка справочника

Для выборки всех элементов справочника используются методы Выбрать и ВыбратьИерархически. Метод Выбрать получает прямую выборку. Метод ВыбратьИерархически получает выборку с учетом иерархии, сразу после выборки группы будут идти элементы из этой группы. В обоих методах можно выполнять отбор по родителю, по владельцу, а также по индексированным полям. Последним параметром можно указать поля для сортировки выборки:

//отбор по артикулу. Поле артикул должно быть проиндексировано
//в отборе может быть только одно поле.
ОтборАрт = Новый Структура("Артикул", "");
ВыборкаСпр = Справочники.Товары.Выбрать(,, ОтборАрт, "Наименование Убыв");
Пока ВыборкаСпр.Следующий() Цикл
	Сообщить(ВыборкаСпр.Наименование);
КонецЦикла;
//выборка будет отсортирована по убыванию поля Наименование
//по умолчанию сортируется по основному представлению. Можно указать только
//Код, наименование или проиндексированный реквизит примитивного типа.

//отбор по родителю или владельцу:
ВыборкаСпр = Справочники.Товары.Выбрать(Группа);
ВыборкаСпр = Справочники.Товары.Выбрать(, Владелец);

//иерархическая выборка, сначала группы, потом элементы из этой группы
ВыборкаСпр = Справочники.Товары.ВыбратьИерархически();
//можно получить уровень элемента (для верхнего = 0)
Сообщить(ВыборкаСпр.УровеньВВыборке());

//из выборки можно получить объект
Пока ВыборкаСпр.Следующий() Цикл
	ТоварОбъект = ВыборкаСпр.ПолучитьОбъект();
КонецЦикла;

Получение ссылки по уникальному идентификатору

С помощью метода УникальныйИдентификатор можно получить уникальный идентификатор от ссылки справочника. Чтобы через уникальный идентификатор получить ссылку на справочник используется метод ПолучитьСсылку:

//получение УИД ссылки
УИДСпр = ТоварСсылка.УникальныйИдентификатор();

//получение ссылки по УИД
ТоварСсылка = Справочники.Товары.ПолучитьСсылку(УИДСпр);
ТоварОбъект = Ссылка.ПолучитьОбъект();
//если после получения объекта от ссылки он равен Неопределено, 
//значит этой ссылки не соответствует ни один объект базы данных
Если ТоварОбъект = Неопределено Тогда
	//нет такого объекта
КонецЕсли;

Также с помощью метода УстановитьСсылкуНового можно установить новому объекту определенный идентификатор. Например, из другой базы был выгружен элемент справочника. В текущей базе нужно создать новый элемент с таким же идентификатором. Для этого можно воспользоваться следующим кодом:

//переменная УИДСтрокой - это строка с идентификатором из другой базы
УИДСпр = Новый УникальныйИдентификатор(УИДСтрокой);
ТоварСсылка = Справочники.Товары.ПолучитьСсылку(УИДСпр);
ТоварОбъект = Справочники.Товары.СоздатьЭлемент();
ТоварОбъект.УстановитьСсылкуНового(ТоварСсылка);
//параметром передается именно ссылка, а не идентификатор
//...заполнение реквизитов
ТоварОбъект.Записать();
//уникальный идентификатор нового объекта будет равен уникальному 
//идентификатору из другой базы

Прочие методы

//получение макета
МакетСпр = Справочники.Товары.ПолучитьМакет("ИмяМакета");
//можно через объект
МакетСпр = ТоварОбъект.ПолучитьМакет("ИмяМакета");

//получить полное наименование или код с учетом вложенности через /
ПолноеНаименование = ТоварСсылка.ПолноеНаименование();
ПолныйКод = ТоварСсылка.ПолныйКод();

//принадлежит ли элемент определенной группе
Если ТоварСсылка.ПринадлежитЭлементу(СсылкаНаГруппу) Тогда
    Сообщить("Принадлежит");
КонецЕсли;
 
//уровень вложенности, если не в группе, то вернет 0
УровеньИерархии = ТоварСсылка.Уровень();

//определить пустая ссылка или нет
Если ТоварСсылка.Пустая() Тогда
    //пустая
КонецЕсли;

//получение пустой ссылки
ПустойТовар = Справочники.Товары.ПустаяСсылка();

Смотрите также:
Электронный учебник по программированию в 1С
Рекомендации по изучению программирования 1С с нуля
Игра «Кто хочет стать миллионером?» с вопросами на определенную тематику (язык программирования JavaScript, английские, немецкие, французские, испанские, португальские, нидерландские, итальянские слова, электробезопасность, промышленная безопасность, бокс и т.п.), написанная на 1С
Программирование в 1С 8.3 с нуля — краткий самоучитель
Комплексная подготовка программистов 1С:Предприятие 8.2
Сайты с уроками программирования и со справочниками
Youtube-каналы с уроками программирования
Сайты для обучения программированию
Лекции и уроки

Источник

nata_1

02.07.08 — 12:36

Добрый день! Подскажите пожайлуста, можна ли перезаписать програмно существующий элемент справочника и с помощью каких методов это можно сделать,например с помощью документа приходная накладная изменять количество товаров в Номенклатуре

Minilaus

1 — 02.07.08 — 12:37

Охренеть формулировка

Ursus maritimus

2 — 02.07.08 — 12:38

ёёёё

merkator

3 — 02.07.08 — 12:38

«количество товаров в Номенклатуре»?

nata_1

4 — 02.07.08 — 12:39

Ладно, тогда короче, как можно модифицыровать элементы справочника в 1С 8.1?

5 — 02.07.08 — 12:41

(0)
>>можна ли перезаписать програмно существующий элемент справочника
Да

>>с помощью каких методов это можно сделать
Смотри ЖК

>>с помощью документа приходная накладная изменять количество товаров в Номенклатуре
Да

А фото уже нельзя просить, да? :)))

nata_1

6 — 02.07.08 — 12:42

а что такое ЖК?

Minilaus

7 — 02.07.08 — 12:43

Получить ссылку запросом или найти из справочника по: коду, наименованию или реквизиту. Например вот так:

Элемент = Справочники.Номенклатура.НайтиПоНаименованию(«Товар»).ПолучитьОбъект();
Элемент.Наименование = «Новое наименование»;
Элемент.Записать();

8 — 02.07.08 — 12:43

(6) Желтые книжки, документация в общем :))

nata_1

9 — 02.07.08 — 12:44

Уже читала, не работает

IronDemon

10 — 02.07.08 — 12:44

ЖКК — желто-красные книжки

nata_1

11 — 02.07.08 — 12:46

Уже делала с помощью метода ПолучитьОбъект() и Записать(), не записывает

12 — 02.07.08 — 12:46

(9) Тогда может стоит поменять профессию?
Может ну его нафиг это неблагодарное сложное программирование?

Вадяс

13 — 02.07.08 — 12:47

Надо сначала понять, чего тебе надобно, а то непнятно

nata_1

14 — 02.07.08 — 12:48

«Тогда может стоит поменять профессию?

Может ну его нафиг это неблагодарное сложное программирование?»

Ну спасибо, я обратилась за помощью а не советами!

Minilaus

15 — 02.07.08 — 12:49

Скинь как ты это делала?

Маркетолог

16 — 02.07.08 — 12:49

(11) Быть может найтиПоНаименованию не то находит ?

Можно провереть в дебарере

almar

17 — 02.07.08 — 12:51

Коллеги, а фотку требовать можно или уже нет?

Defender aka LINN

18 — 02.07.08 — 12:49

(9) Девушка, зачем вам это надо? Найдите мужа побогаче да выходите замуж. Все равно способностей у вас — максимум на оператора ПК.

nata_1

19 — 02.07.08 — 12:56

Для Каждого Стр из ЭтотОбъект.ТабличнаяЧасть1 цикл

Спр=Справочники.НашТекущийСклад.НайтиПоНаименованию(Стр.NM,1);

Если Не Спр.Пустая() тогда

Объект=Спр.ПолучитьОбъект();

Объект.Количество=5;

Объект.Записать;

КонецЕсли;

IronDemon

20 — 02.07.08 — 12:59

А количество ЧЕГО ты хочешь изменить?

nata_1

21 — 02.07.08 — 13:00

Количество товара

Defender aka LINN

22 — 02.07.08 — 13:00

(14) Кого волнует, зачем ты обратилась? По (0) сразу видно — ты и рядом с программированием не валялась.

IronDemon

23 — 02.07.08 — 13:01

(21) В документе или в справочнике?

nata_1

24 — 02.07.08 — 13:02

В справочнике

Stepa86

25 — 02.07.08 — 13:03

(19) гламурненько, ёпте…

Stepa86

26 — 02.07.08 — 13:05

(19) Интересно, ошибка вознивает на 5-ой или 6-ой строчке???

IronDemon

27 — 02.07.08 — 13:10

(24) Ты подумай. Какое «количество» ты хочешь с справочнике изменить.
И еще раз подумай. Затем сформируй правильно свою задачу.

tsr

28 — 02.07.08 — 13:14

Если ЗначениеЗаполнено(Спр) тогда
Объект=Спр.ПолучитьОбъект();
//На всякий случай
Попытка
Объект.Количество=5;
Объект.Записать();
Исключение
Сообщить(ОписаниеОшибки());
КонецПопытки;
КонецЕсли;

nata_1

29 — 02.07.08 — 13:35

У меня не возникает ошибок я писала исключение просто ничего не записывается в справочник

MRAK

30 — 02.07.08 — 13:39

(29) Сообщить(ОписаниеОшибки());

Stepa86

31 — 02.07.08 — 13:40

Значит он не находит справочник =)

Источник

&НаСервере
Процедура СозданиеИИзменениеЭлементовИГруппСправочникаНаСервере()
 
    /// Как создать новый элемент справочника в 1с 8.3, 8.2
 
    // создадим новый элемент справочника Города
    // с именем Владивосток
    Владивосток = Справочники.Города.СоздатьЭлемент();
    Владивосток.Наименование = "Владивосток";
    Владивосток.Записать();
 
    /// Как создать новую группу справочника в 1с 8.3, 8.2
 
    // создадим новую группу справочника Города
    ГородаУМоря = Справочники.Города.СоздатьГруппу();
    ГородаУМоря.Наименование = "Города у моря";
    ГородаУМоря.Записать();
 
    /// Как перенести элемент справочника в другую группу в 1с 8.3, 8.2
 
    // перенесём созданный Владивосток в группу "Города у моря"
    Владивосток.Родитель = ГородаУМоря.Ссылка;
    Владивосток.Записать();
 
    /// Как внести изменения в элемент справочника по ссылке 
    /// в 1с 8.3, 8.2
 
    // найдём город Калькутта
    КалькуттаСсылка = Справочники.Города.НайтиПоНаименованию("Калькутта");
    Если Не КалькуттаСсылка.Пустая() Тогда
        // изменим и запишем численность жителей в городе
        Калькутта = КалькуттаСсылка.ПолучитьОбъект();
        Калькутта.Численность = 1000000;
        Калькутта.Записать();
    КонецЕсли;
 
    /// Как получить и проверить пустую ссылку типа справочник в 1с 8.3, 8.2
 
    ПустаяСсылка = Справочники.Города.ПустаяСсылка();
    Если ПустаяСсылка.Пустая() Тогда
        Сообщить("Ссылка действительно пустая.");
    КонецЕсли;
 
    /// Как узнать принадлежность элемента справочника группе
    /// с учетом уровней иерархии в 1с 8.3, 8.2
 
    ПермьСсылка = Справочники.Города.НайтиПоНаименованию("Пермь");
    РоссияСсылка = Справочники.Города.НайтиПоНаименованию("Россия");
 
    // проверим принадлежит ли город Пермь группе Россия
 
    Если ПермьСсылка.ПринадлежитЭлементу(РоссияСсылка) Тогда
        Сообщить("Элемент Пермь находится в группе Россия.");
    КонецЕсли;
 
    /// Как скопировать существующий элемент справочника в 1с 8.3, 8.2
 
    // скопируем элемент Пермь
 
    КопияПерми = ПермьСсылка.Скопировать();
    КопияПерми.Наименование = КопияПерми.Наименование + " КОПИЯ";
    КопияПерми.УстановитьНовыйКод();
    КопияПерми.Записать();
 
    /// Как выяснить уровень вложенности элемента справочника 
    /// в 1с 8.3, 8.2
 
    Сообщить(КопияПерми.Уровень()); // 1
 
    /// Как заблокировать элемент справочника перед изменениями 
    /// в 1с 8.3, 8.2
 
    // выполним блокировку элемента справочника
    // от изменения другими режимами или пользователями
 
    Пермь = ПермьСсылка.ПолучитьОбъект();
    Если Не Пермь.Заблокирован() Тогда
        Пермь.Заблокировать();
        // тут идёт какой-то долгий алгоритм
        // в результате которого мы меняем
        // заблокированный элемент
        Пермь.Численность = 5000;
        Пермь.Записать();
        // и только потом освобождаем его
        // для других режимов и пользователей
        Пермь.Разблокировать();
    КонецЕсли;
 
    /// Как заполнить новый элемент справочника на основании 
    /// в 1с 8.3, 8.2
 
    // в модуле справочника Города я определил процедуру
    // ОбработкаЗаполнения, которая обрабатывает ситуации
    // когда мы заполняем один элемент на основании
    // данных другого (см. в базе для скачивания)
 
    Хабаровск = Справочники.Города.СоздатьЭлемент();
    Хабаровск.Заполнить(
        Справочники.Города.НайтиПоНаименованию("Рио-де-Жанейро")
    );
    Хабаровск.Наименование = "Хабаровск";
    Хабаровск.Записать();
 
    /// Как пометить на удаление элемент справочника в 1с 8.3, 8.2
 
    // пометим на удаление только что созданный Хабаровск
    Хабаровск.УстановитьПометкуУдаления(
        Истина, // пометка удаления
        Ложь // включая подчиненные (если речь о группе справочника)
    );
    // метод Записать вызывать не нужно
 
КонецПроцедуры
 
&НаСервереБезКонтекста
Функция ПолучитьКлиентаПоИмени(Имя)
    Возврат Справочники.Клиенты.НайтиПоНаименованию(Имя);
КонецФункции
 
/// Как открыть форму существующего элемента справочника 
/// по ссылке в 1с 8.3, 8.2
 
&НаКлиенте
Процедура КакОткрытьФормуСуществующегоЭлементаСправочника(Команда)
 
    СсылкаНаЭлемент = ПолучитьКлиентаПоИмени("Андрей");
 
    ПараметрыФормы = Новый Структура("Ключ", СсылкаНаЭлемент);
 
    ОткрытьФорму(
        "Справочник.Клиенты.ФормаОбъекта", // имя формы
        ПараметрыФормы // параметры для формы
    );
 
КонецПроцедуры
 
/// Как открыть форму существующей группы справочника 
/// по ссылке в 1с 8.3, 8.2
 
&НаКлиенте
Процедура КакОткрытьФормуСуществующейГруппыСправочника(Команда)
 
    СсылкаНаГруппу = ПолучитьКлиентаПоИмени("Vip");
 
    ПараметрыФормы = Новый Структура("Ключ", СсылкаНаГруппу);
 
    ОткрытьФорму(
        "Справочник.Клиенты.ФормаГруппы", // имя формы
        ПараметрыФормы // параметры для формы
    );
 
КонецПроцедуры
 
/// Как открыть форму выбора элемента справочника и
/// отследить её закрытие в 1с 8.3, 8.2
 
&НаКлиенте
Процедура КакОткрытьФормуВыбораЭлементаСправочника(Команда)
 
    ОповещениеОЗакрытии = Новый ОписаниеОповещения("ПослеВыбораЭлемента",
        ЭтотОбъект);
 
    ОткрытьФорму(
        "Справочник.Клиенты.ФормаВыбора",,,,,,ОповещениеОЗакрытии        
    );
 
КонецПроцедуры
 
&НаКлиенте
Процедура ПослеВыбораЭлемента(Результат, Параметры) Экспорт
 
    Если Результат <> Неопределено Тогда
        Сообщить("Был выбран элемент " + Результат);
    КонецЕсли;	
 
КонецПроцедуры
 
/// Как открыть форму выбора группы справочника и
/// отследить её закрытие в 1с 8.3, 8.2
 
&НаКлиенте
Процедура КакОткрытьФормуВыбораГруппыСправочника(Команда)
 
    ОповещениеОЗакрытии = Новый ОписаниеОповещения("ПослеВыбораГруппы",
        ЭтотОбъект);
 
    ОткрытьФорму(
        "Справочник.Клиенты.ФормаВыбораГруппы",,,,,,ОповещениеОЗакрытии        
    );
 
КонецПроцедуры
 
&НаКлиенте
Процедура ПослеВыбораГруппы(Результат, Параметры) Экспорт
 
    Если Результат <> Неопределено Тогда
        Сообщить("Была выбрана группа " + Результат);
    КонецЕсли;	
 
КонецПроцедуры
 
/// Как открыть форму списка справочника и
/// установить отбор по реквизиту в 1с 8.3, 8.2
 
&НаКлиенте
Процедура КакОткрытьФормаСпискаСправочникаСОтбором(Команда)
 
    // откроем список клиентов, оставив
    // только мужчин
 
    ПараметрыОтбора = Новый Структура;
    ПараметрыОтбора.Вставить("Пол", ПолучитьПеречислениеМужской());
 
    ПараметрыФормы = Новый Структура;
    ПараметрыФормы.Вставить("Отбор", ПараметрыОтбора);
 
    ОткрытьФорму(
        "Справочник.Клиенты.ФормаСписка",
        ПараметрыФормы
    );
 
КонецПроцедуры
 
&НаСервереБезКонтекста
Функция ПолучитьПеречислениеМужской()
    Возврат Перечисления.Пол.Мужской;
КонецФункции
 
/// Как открыть форму списка справочника с нужным отображением
/// в 1с 8.3, 8.2
 
&НаКлиенте
Процедура КакОткрытьФормуСпискаСправочникаСНужнымОтображением(Команда)
 
    // откроем список клиентов с отображением "Список"
 
    ФормаСписка = ПолучитьФорму("Справочник.Клиенты.ФормаСписка");    
    ФормаСписка.Открыть();
    ФормаСписка.Элементы.Список.Отображение = ОтображениеТаблицы.Список;
 
КонецПроцедуры
 
/// Как открыть форму только что созданного, но ещё
/// не записанного элемента справочника в 1с 8.3, 8.2
 
&НаКлиенте
Процедура КакОткрытьФормуНовогоНеЗаписанногоСправочника(Команда)
 
    // получаем форму нового справочника
    ФормаНовогоСправочника = ПолучитьФорму(
        "Справочник.Еда.ФормаОбъекта",,, Истина); 
 
    // делаем копию её данных (так как напрямую их менять
    // нельзя)
    КопияДанныхФормы = ФормаНовогоСправочника.Объект;
 
    // заполняем эти данные на сервере
    ЗаполнитьДанныеФормыНаСервере(КопияДанныхФормы);
 
    // копируем заполненные данные в исходную форму
    КопироватьДанныеФормы(КопияДанныхФормы,
        ФормаНовогоСправочника.Объект);
 
    // показываем форму нового заполненного
    // элемента справочника пользователю
    ФормаНовогоСправочника.Открыть();
 
КонецПроцедуры
 
&НаСервере
Процедура ЗаполнитьДанныеФормыНаСервере(ДанныеФормы)
 
    // преобразуем данные формы в документ
    Еда = ДанныеФормыВЗначение(ДанныеФормы,
        Тип("СправочникОбъект.Еда")); 
 
    Еда.Наименование = "Груша";
    Еда.Калорийность = 500;
 
    // преобразуем документа обратно в данные формы
    ЗначениеВДанныеФормы(Еда, ДанныеФормы);
 
КонецПроцедуры
 
/// Скачать и выполнить эти примеры на компьютере

Источник

Создание элемента справочника
Поиск элементов справочника
Удаление элементов справочника
Обход элементов справочника
Выбор элементов справочника запросом
Открытие форм справочника

Создание элемента справочника

Создание новых элементов и групп справочника производится с помощью программного объекта СправочникМенеджер.ИмяСправочника. Данный объект доступен только на сервере. Создание нового элемента или группы справочника состоит из следующих этапов:

Создание элемента или группы;
Заполнение владельца (если справочник подчиненный);
Заполнение родителя (если справочник иерархический);
Заполнение наименования и реквизитов (если не задана автоматическая нумерация, то и кода);
Заполнение табличных частей;
Запись элемента.

Создание новой группы:

НоваяГруппа = Справочники.Контрагенты.СоздатьГруппу(); // Создание группы
НоваяГруппа.Наименование = "Покупатели"; // Заполнение наименования
НоваяГруппа.Записать(); // Запись группы

Создание нового элемента:

НовыйЭлемент = Справочники.Контрагенты.СоздатьЭлемент(); // Создание элемента
НовыйЭлемент.Родитель = Справочники.Контрагенты.НайтиПоНаименованию("Покупатели"); // Заполнение родителя
НовыйЭлемент.Наименование = "Ромашка ООО"; // Заполнение наименования
НовыйЭлемент.ИНН = "123456789"; // Заполнение реквизита

// Добавление новой строки табличной части
НоваяСтрока = НовыйЭлемент.КонтактнаяИнформация.Добавить();
НоваяСтрока.Тип = "Адрес";
НоваяСтрока.Представление = "Москва";

НовыйЭлемент.Записать(); // Запись элемента

Поиск элементов справочника

Для поиска элементов справочников в языке программирования 1С предусмотрено несколько методов:

НайтиПоКоду(Код, ПоискПоПолномуКоду, Родитель, Владелец)
НайтиПоНаименованию(Наименование, ТочноеСоответствие, Родитель, Владелец)
НайтиПоРеквизиту(ИмяРеквизита, ЗначениеРеквизита, Родитель, Владелец)

Во всех методах если поиск успешный, то будет возвращена ссылка на найденный элемент.

// Поиск контрагента с кодом «123»
НайденныйКонтрагент = Справочники.Контрагенты.НайтиПоКоду("123");
// Поиск подчиненного найденному контрагенту договора с номером «1»
НайденныйДоговор = Справочники.ДоговорыКонтрагентов.НайтиПоКоду("1", , , НайденныйКонтрагент);
// Поиск элемента с наименованием «Покупатели»
НайденныйКонтрагент = Справочники.Контрагенты.НайтиПоНаименованию("Покупатели");
// Поиск элемента с наименованием «Ромашка ООО» в группе «Покупатели»
НайденныйКонтрагент1 = Справочники.Контрагенты.НайтиПоНаименованию("Ромашка ООО", , НайденныйКонтрагент);
// Поиск контрагента с ИНН «123456789»
НайденныйКонтрагент = Справочники.Контрагенты.НайтиПоРеквизиту("ИНН", "123456789");

Удаление элементов справочника

Элементы справочника могут быть помечены на удаление и удалены из базы непосредственно.

Непосредственное удаление – операция необратимая, в то время как пометку на удаление можно отменить. Пометка на удаление хранится в предопределенном реквизите ПометкаУдаления. В пользовательском режиме помеченные на удаление элементы и группы справочника помечаются красным крестиком.

Пометку на удаление можно установить/снять двумя разными способами:

// Способ 1. Использование метода УстановитьПометкуУдаления()
НайденныйКонтрагент = Справочники.Контрагенты.НайтиПоКоду("123");
КонтрагентОбъект = НайденныйКонтрагент.ПолучитьОбъект();
КонтрагентОбъект.УстановитьПометкуУдаления(Истина);

// Способ 2. Изменение свойства ПометкаУдаления
НайденныйКонтрагент = Справочники.Контрагенты.НайтиПоКоду("123");
КонтрагентОбъект = НайденныйКонтрагент.ПолучитьОбъект();
КонтрагентОбъект.ПометкаУдаления = Истина;
КонтрагентОбъект.Записать();

Пример непосредственного удаления элемента справочника:

НайденныйКонтрагент = Справочники.Контрагенты.НайтиПоКоду("123");
КонтрагентОбъект = НайденныйКонтрагент.ПолучитьОбъект();
КонтрагентОбъект.Удалить();

Обход элементов справочника

Для обхода элементов справочника в языке программирования 1С предусмотрено два метода:

Выбрать(Родитель, Владелец, Отбор, Порядок)
ВыбратьИерархически(Родитель, Владелец, Отбор, Порядок)

Рассмотрим примеры обхода элементов справочника:

// Обход всех элементов справочника Контрагенты
Выборка = Справочники.Контрагенты.Выбрать(); // Получение выборки всех элементов справочника
Пока Выборка.Следующий() Цикл
    //действия с очередным элементом
    Сообщить(Выборка.Наименование);
КонецЦикла;

// Обход контрагентов из группы «Покупатели»
ГруппаПокупатели = Справочники.Контрагенты.НайтиПоНаименованию("Покупатели");
Выборка = Справочники.Контрагенты.Выбрать(ГруппаПокупатели);
Пока Выборка.Следующий() Цикл
    Сообщить(Выборка.Наименование);
КонецЦикла;

// Обход договоров контрагента «Ромашка ООО»
НайденныйКонтрагент = Справочники.Контрагенты.НайтиПоНаименованию("Ромашка ООО");
Выборка = Справочники.ДоговорыКонтрагентов.Выбрать(, НайденныйКонтрагент);
Пока Выборка.Следующий() Цикл
    Сообщить(Выборка.Наименование);
КонецЦикла;

// Обход контрагентов с пустым ИНН
// Реквизит ИНН должен быть проиндексирован!
Отбор = Новый Структура("ИНН", ""); // Структура может содержать только один элемент
Выборка = Справочники.Контрагенты.Выбрать(, , Отбор);
Пока Выборка.Следующий() Цикл
    Сообщить(Выборка.Наименование);
КонецЦикла;

Выбор элементов справочника запросом

Поиск данных в базе 1С предпочтительнее выполнять при помощи запросов. Запрос позволяет описать практически любые условия для отбора, в отличие от методов Выбрать() и ВыбратьИерархически(), на которые накладываются существенные ограничения. К тому же, в большинстве случаев работа с использованием запросов быстрее, чем работа с использованием программного кода.

Простой пример поиска и вывода товаров со стоимостью больше 1000:

Запрос = Новый Запрос();
Запрос.Текст = 
    "ВЫБРАТЬ
    | Товары.Наименование
    |ИЗ
    | Справочник.Товары КАК Товары
    |ГДЕ
    | Товары.Стоимость > 1000";
Выборка = Запрос.Выполнить().Выбрать();
Пока Выборка.Следующий() Цикл
    Сообщить(Выборка.Наименование);
КонецЦикла;

Открытие форм справочника

Для открытия любых форм справочников рекомендуется использовать метод

ОткрытьФорму(
    ИмяФормы,
    Параметры,
    Владелец,
    Уникальность,
    Окно,
    НавигационнаяСсылка,
    ОписаниеОповещенияОЗакрытии,
    РежимОткрытияОкна
)

Для открытия формы элемента или группы справочника также возможно использовать более простой метод

ПоказатьЗначение(ОписаниеОповещенияОЗавершении, Значение)

Кроме методов ОткрытьФорму() и ПоказатьЗначение() есть и другие (ОткрытьФормуМодально, ОткрытьЗначение, ПолучитьФорму), но их использование не рекомендуется, т.к. часть этих методов использует режим модального открытия, часть противоречит свежим рекомендациям фирмы 1С.

Приведем примеры программного открытия форм справочника:

// Открыть форму списка
ОткрытьФорму("Справочник.Контрагенты.ФормаСписка");

// Открыть форму элемента
// Контрагент – реквизит формы, заполняемый пользователем интерактивно
ПоказатьЗначение(, Контрагент);

// Еще один способ открытия формы элемента
ПараметрыОткрытия = Новый Структура("Ключ", Контрагент);
ОткрытьФорму("Справочник.Контрагенты.Форма.ФормаЭлемента", ПараметрыОткрытия);

// Открыть форму группы
// ГруппаКонтрагентов – реквизит формы, заполняемый пользователем интерактивно
ПоказатьЗначение(, ГруппаКонтрагентов);

// Еще один способ открытия формы группы
ПараметрыОткрытия = Новый Структура("Ключ", ГруппаКонтрагентов);
ОткрытьФорму("Справочник.Контрагенты.Форма.ФормаГруппы", ПараметрыОткрытия);

Внимание! Следует понимать, что интерактивная работа (в том числе открытие форм) в 1С возможна только на стороне клиента. В то же время поиск и изменение данных возможны только на стороне сервера.

Источник