ReSQL.ru
     
powered by simpleCommunicator - 2.0.59     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / 1С [игнор отключен] [закрыт для гостей] / Как скопировать элементы номенклатуры и задать им Ед.изм.?
3 сообщений из 3, страница 1 из 1
Как скопировать элементы номенклатуры и задать им Ед.изм.?
    #38968765
LittleLoya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
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:44
| Ответить | Цитировать | Написать  
Как скопировать элементы номенклатуры и задать им Ед.изм.?
    #38968767
javapecker
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
javapecker
Участник
LittleLoya,авторНовыйОбъект.ЕдиницаХраненияОстатков = ЕдИзмХО; Потому что ссылка != объект
...
Рейтинг: 0 / 0
26.05.2015, 14:48
| Ответить | Цитировать | Написать  
Как скопировать элементы номенклатуры и задать им Ед.изм.?
    #38968815
LittleLoya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
LittleLoya
Гость
Точно!

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


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

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


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