Гость
Форумы / [игнор отключен] [закрыт для гостей] / Как скопировать элементы номенклатуры и задать им Ед.изм.? / 3 сообщений из 3, страница 1 из 1
26.05.2015, 14:44
    #38968765
LittleLoya
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как скопировать элементы номенклатуры и задать им Ед.изм.?
Всем доброго времени суток!

Подскажите, пожалуйста, как программно скопировать элементы справочника Номенклатура и задать им единицы измерения?

Суть задачи: создать новые карточки с дублированием старых артикулов и всего что к ним относится, кроме единиц измерения, старые поместить в отдельную папку.

Делаю так:
Код: sql
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
		СтарыйОбъект = ВыборкаДетальныеЗаписи.Ссылка.ПолучитьОбъект();;
		
		НачатьТранзакцию();
		
			НовыйОбъект = СтарыйОбъект.Скопировать();
			НовыйОбъект.Артикул = СтарыйОбъект.Артикул;
							
			СтарыйОбъект.Артикул = "(стар.)" + СтарыйОбъект.Артикул;
			СтарыйОбъект.Родитель = ПеремещатьСтарыеВ;
			
			Попытка
				СтарыйОбъект.Записать();
				НовыйОбъект.Записать();
			Исключение	
				ОтменитьТранзакцию();
			КонецПопытки;
			
			ЕдИзмОтчеты = Справочники.ЕдиницыИзмерения.СоздатьЭлемент();
			ЕдИзмОтчеты.Владелец = НовыйОбъект.Ссылка;
			ЕдИзмОтчеты.ЕдиницаПоКлассификатору = ЕдиницаДляОтчетов;
			ЕдИзмОтчеты.Наименование = ЕдиницаДляОтчетов.Наименование;
			ЕдИзмОтчеты.Коэффициент = Коэффициент;
			ЕдИзмОтчеты.Записать();			
			
			ЕдИзмХО = Справочники.ЕдиницыИзмерения.СоздатьЭлемент();
			ЕдИзмХО.Владелец = НовыйОбъект.Ссылка;
			ЕдИзмХО.ЕдиницаПоКлассификатору = ЕдиницаХраненияОстатков;
			ЕдИзмХО.Наименование = ЕдиницаХраненияОстатков.Наименование;
			ЕдИзмХО.Коэффициент = 1;
			ЕдИзмХО.Записать();
					
			НовыйОбъект.БазоваяЕдиницаИзмерения = БазоваяЕдиница;
			НовыйОбъект.ЕдиницаХраненияОстатков = ЕдИзмХО;
			НовыйОбъект.ЕдиницаДляОтчетов = ЕдИзмОтчеты;
		
			НовыйОбъект.Записать();
			
		ЗафиксироватьТранзакцию();
			
			Сообщить("Создан: " + НовыйОбъект.Код + " арт." + НовыйОбъект.Артикул + " в папке " + НовыйОбъект.Родитель);
			Сообщить("Перемещён: " + СтарыйОбъект.Код + " арт. " + СтарыйОбъект.Артикул + " из " + ИзГруппы + " в " + ПеремещатьСтарыеВ);		


Вроде всё работает, единицы измерения создаются, но у новых объектов номенклатуры не заполнены поля "Ед. хранения остатков" и "Ед. для отчетов".

Что не так делаю?
...
Рейтинг: 0 / 0
26.05.2015, 14:48
    #38968767
javapecker
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как скопировать элементы номенклатуры и задать им Ед.изм.?
LittleLoya,авторНовыйОбъект.ЕдиницаХраненияОстатков = ЕдИзмХО; Потому что ссылка != объект
...
Рейтинг: 0 / 0
26.05.2015, 15:11
    #38968815
LittleLoya
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как скопировать элементы номенклатуры и задать им Ед.изм.?
Точно!

Сделала:
Код: sql
1.
2.
3.
			НовыйОбъект.БазоваяЕдиницаИзмерения = БазоваяЕдиница.Ссылка;
			НовыйОбъект.ЕдиницаХраненияОстатков = ЕдИзмХО.Ссылка;
			НовыйОбъект.ЕдиницаДляОтчетов = ЕдИзмОтчеты.Ссылка;


И всё заработало!

javapecker, спасибо большое!!!
...
Рейтинг: 0 / 0
Форумы / [игнор отключен] [закрыт для гостей] / Как скопировать элементы номенклатуры и задать им Ед.изм.? / 3 сообщений из 3, страница 1 из 1
Целевая тема:
Создать новую тему:
Автор:
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]