|
Перенос элемента справочника |
☑ |
0
FuriKuri
08.04.13
✎
11:43
|
Нужно создать обработку которая в справочнике Номенклатура ищет все элементы с определенным видом номенклатуры и проверяет на наличии их в определенных документах. Те которых нету в документах перенести в другую папку. Есть 2 реквизита "ВидНоменклатуры" и "НазваниеПапки".
делаю так:
Запрос.Текст = "ВЫБРАТЬ
| Номенклатура.Ссылка
|ИЗ
| Справочник.Номенклатура КАК Номенклатура
|ГДЕ
| Номенклатура.ВидНоменклатуры = &ВидНоменклатуры";
Запрос.УстановитьПараметр("ВидНоменклатуры",ВидНоменклатуры);
РезультатЗапроса = Запрос.Выполнить();
Выборка = РезультатЗапроса.выгрузить();
Для каждого Товар из выборка цикл
счет=0;
спрс=Товар.ссылка;
массивСсылок=новый Массив();
массивСсылок.Добавить(спрс);
ТабСсылок = НайтиПоСсылкам(массивСсылок);
Для Каждого Ссылка из ТабСсылок Цикл
Если Документы.ТипВсеСсылки().СодержитТип(ТипЗнч(Ссылка.Данные))=Истина тогда
Если ТипЗнч(Ссылка.Данные) = Тип("ДокументСсылка.ПоступлениеТоваровУслуг") или
ТипЗнч(Ссылка.Данные) = Тип("ДокументСсылка.ЗаказПокупателя") или
ТипЗнч(Ссылка.Данные) = Тип("ДокументСсылка.ОприходованиеТоваров") тогда
Счет=счет+1;
КонецЕсли;
КонецЕсли;
КонецЦикла;
Если Счет=0 тогда
Элемент=Товар.ссылка.ПолучитьОбъект();
Элемент.Родитель=НазваниеПапки;
Элемент.Записать();
КонецЕсли;
КонецЦикла;
Но в конце при указании нового родителя записывается просто пустое значение. В чем у меня косяк?
|
|
1
MSII
08.04.13
✎
11:45
|
НазваниеПапки не строка ведь, правда?
|
|
2
Шапокляк
08.04.13
✎
11:46
|
А Название папки это что? Строка?
|
|
3
FuriKuri
08.04.13
✎
11:47
|
(2) эм.... да. Но как мне тогда создать новую папку, если нужно убдет?
|
|
4
FuriKuri
08.04.13
✎
11:51
|
(3) Походу просто запилить отдельную кнопку для создания папки.. Ясно спасибо. Извиняюсь за глупый вопрос))
|
|
5
Шапокляк
08.04.13
✎
11:54
|
(4) Что за конфа? "Автоматизированный бардак" что ли?
|
|