перемещение элементов из группы 1 в подгруппу 2 группы 2
Вот написал код, при переносе с одной подгруппы в другую но в одной группе все удачно, а при переносе с группы в подгруппу другой группы не хочет, сделал проверку, все в порядке тогда почему?
Если Отдел.Наименование = "Наименование" тогда
Если Род.НайтиПоНаименованию("Наименование",0,0)=1 Тогда
ТекРод = Род.ТекущийЭлемент();
КонецЕсли;
ИначеЕсли ...
КонецЕсли;
СпрСотр.Родитель = ТекРод;
СпрСотр.Записать();
КонецЕсли; ПоказатьПо теме из базы знаний
- Импорт из EXCEL и других источников (xls, xlsx, xlsb, ods, sxc, dbf, mxl, csv, clipboard, sql) в 1С
- Выгрузка данных из УТ 11.3/11.4 в БП 3.0 (перенос документов и справочной информации из "Управление торговлей" ред. 11.3/11.4 в "Бухгалтерия предприятием" ред. 3.0). Обновлен до УТ 11.3.4.х/11.4.7х и БП 3.0.7х.х
- Обмен с системой Меркурий через Web + Ветис.API для любых конфигураций (универсальная конфигурация Хамелеон Меркурий)
- Смета в "1С:Бухгалтерия 3.0" - создавать, сохранять, работать.
Ответы
Подписаться на ответы
Инфостарт бот
Сортировка:
Древо развёрнутое
Свернуть все
Недостаточно инфы... ;)
Больше кода...(!) - хорошего и разного...
(у тебя что там(?) - СоздатьОбъёкт(Справочник.Сотрудники) - все объекты - Отдел, Род, СпрСотр???)
Если это обработка, и Отдел выбираешь на форме, то зачем по Наименованию искать(?), если можно так:
Если Род.НайтиЭлемент(Отдел)=1 Тогда
Больше кода...(!) - хорошего и разного...
(у тебя что там(?) - СоздатьОбъёкт(Справочник.Сотрудники) - все объекты - Отдел, Род, СпрСотр???)
Если это обработка, и Отдел выбираешь на форме, то зачем по Наименованию искать(?), если можно так:
Если Род.НайтиЭлемент(Отдел)=1 Тогда
Для получения уведомлений об ответах подключите телеграм бот:
Инфостарт бот