programmno_izmenit_dobavit_ceny [wiki.hostingcloud.com.ua]

Эта страница только для чтения. Вы можете посмотреть её исходный текст, но не можете его изменить. Сообщите администратору, если считаете, что это неправильно.

<code>			
МенеджерЗаписи = РегистрыСведений.ЦеныНоменклатуры.СоздатьМенеджерЗаписи();
МенеджерЗаписи.ВидЦен			=	стрВидЦены.Ссылка;
МенеджерЗаписи.Номенклатура		=	стрХар.Владелец;
МенеджерЗаписи.Характеристика	=	стрХар.Ссылка;
			
МенеджерЗаписи.Цена				=	ПолучитьЦенуНоменклатуры2(МенеджерЗаписи.Номенклатура,стрВидЦены);
МенеджерЗаписи.ЕдиницаИзмерения = 	Справочники.КлассификаторЕдиницИзмерения.шт;
МенеджерЗаписи.Актуальность		=   Истина;
МенеджерЗаписи.Период			=	ТекущаяДата();
			
МенеджерЗаписи.Записать();
</code>