Уведомления
Очистить все

1С Как перенести все элементы справочника "Контрагенты" из одной группы в другую?

1 Записи
1 Пользователи
0 Likes
345 Просмотры
158-150 Okolokompa Форум
(@mitozzz)
Trusted Member
Присоединился: 4 года назад
Записи: 32
Создатель темы  
Запрос = Новый Запрос; 
Запрос.Текст = "
|ВЫБРАТЬ 
| Контрагенты.Ссылка 
|ИЗ 
| Справочник.Контрагенты КАК Контрагенты 
|ГДЕ 
| Контрагенты.Родитель = &СтарыйРодитель"; 

Запрос.УстановитьПараметр("СтарыйРодитель", СтарыйРодитель); 
Результат = Запрос.Выполнить();

Выборка = Результат.Выбрать(); 
Пока Выборка.Следующий() Цикл 
Контрагент = Выборка.Ссылка.ПолучитьОбъект(); 
Контрагент.Родитель = НовыйРодитель; 
Контрагент.Записать(); 
КонецЦикла;

   
Цитата
Поделиться: