zapis_v_registr_svedenij_nezavisimyj [wiki.hostingcloud.com.ua]

Эта страница только для чтения. Вы можете посмотреть её исходный текст, но не можете его изменить. Сообщите администратору, если считаете, что это неправильно.
**Очистка записей по определенному значению**
<code>
НаборЗаписей = РегистрыСведений.пр_АссортиментТоваров.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Партнер.Установить(Партнер);
НаборЗаписей.Записать();
</code>

**Запись Через менеджер записи**
<code>
МенеджерЗаписи 					= РегистрыСведений.ПрикрепленныеФайлы.СоздатьМенеджерЗаписи();	
	МенеджерЗаписи.ВладелецФайла	= Запись.ВладелецФайла;
	МенеджерЗаписи.ИмяФайла 		= Запись.ИмяФайла;
	МенеджерЗаписи.Файл 			= Хранилище_Файл;
МенеджерЗаписи.Записать();
</code>
В результате выполнения этого кода новая запись будет добавлена в регистр, или, если регистр уже содержит запись с выбранными значениями измерений "Объект" и "Свойство", - существующая запись будет заменена новой.

----
**Добавление новых записей к уже имеющимся записям**
<code>
регмен 	= РегистрыСведений.ИсторияИзмененияНалогообложенияНоменклатуры.СоздатьМенеджерЗаписи();
регмен.Период		= ТекущаяДата();
регмен.Номенклатура = ЭтотОбъект.Ссылка;
регмен.СтавкаНДС  	= ЭтотОбъект.СтавкаНДС;
регмен.Ответственный= ПараметрыСеанса.ТекущийПользователь;	
регмен.Записать(Ложь);
</code>
----
**Добавление новых записей к уже имеющимся записям через набор записей**
<code>
НаборЗаписей = РегистрыСведений.ЗначенияСвойствОбъектов.СоздатьНаборЗаписей();

НаборЗаписей.Отбор.Объект.Установить(ПолеВводаНоменклатура); 

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

НаборЗаписей.Записать(); 
</code>

**Добавление новых записей с затиранием (удалнием) уже имеющихся записей через набор записей**
<code>
НаборЗаписей = РегистрыСведений.пр_АссортиментТоваров.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Партнер.Установить(Партнер);

СтрокаНаборЗаписей = НаборЗаписей.Добавить();
СтрокаНаборЗаписей.Партнер = Партнер;
СтрокаНаборЗаписей.Номенклатура = Номенклатура;
СтрокаНаборЗаписей.Характеристика = Характеристика;
СтрокаНаборЗаписей.НомерПоПорядку = 1;
НаборЗаписей.Записать();
</code>
====== Создание новой записи или изменение одного из реквизитов если запись уже есть ======
<code>
	НаборЗаписей = РегистрыСведений.дм_СтатусыРеализацийЭД.СоздатьНаборЗаписей();  
	НаборЗаписей.Отбор.Документ.Установить(докРеализация);   
	НаборЗаписей.Прочитать();
	Если НаборЗаписей.Количество() = 0  тогда
		НоваяЗапись 			= НаборЗаписей.Добавить();
		НоваяЗапись.Документ 	= докРеализация;
		НоваяЗапись.ВхНД 		= Истина;
		НаборЗаписей.Записать();
	Иначе 	
		Для Каждого Запись Из НаборЗаписей Цикл 
			Запись.ВхНД = Истина;
		КонецЦикла;
		НаборЗаписей.Записать(Истина);
	КонецЕсли;
</code>