zapis_v_registr_svedenij_nezavisimyj

Очистка записей по определенному значению

НаборЗаписей = РегистрыСведений.пр_АссортиментТоваров.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Партнер.Установить(Партнер);
НаборЗаписей.Записать();

Запись Через менеджер записи

МенеджерЗаписи 					= РегистрыСведений.ПрикрепленныеФайлы.СоздатьМенеджерЗаписи();	
	МенеджерЗаписи.ВладелецФайла	= Запись.ВладелецФайла;
	МенеджерЗаписи.ИмяФайла 		= Запись.ИмяФайла;
	МенеджерЗаписи.Файл 			= Хранилище_Файл;
МенеджерЗаписи.Записать();

В результате выполнения этого кода новая запись будет добавлена в регистр, или, если регистр уже содержит запись с выбранными значениями измерений «Объект» и «Свойство», - существующая запись будет заменена новой.


Добавление новых записей к уже имеющимся записям

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

Добавление новых записей к уже имеющимся записям через набор записей

НаборЗаписей = РегистрыСведений.ЗначенияСвойствОбъектов.СоздатьНаборЗаписей();

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

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

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

Добавление новых записей с затиранием (удалнием) уже имеющихся записей через набор записей

НаборЗаписей = РегистрыСведений.пр_АссортиментТоваров.СоздатьНаборЗаписей();
НаборЗаписей.Отбор.Партнер.Установить(Партнер);

СтрокаНаборЗаписей = НаборЗаписей.Добавить();
СтрокаНаборЗаписей.Партнер = Партнер;
СтрокаНаборЗаписей.Номенклатура = Номенклатура;
СтрокаНаборЗаписей.Характеристика = Характеристика;
СтрокаНаборЗаписей.НомерПоПорядку = 1;
НаборЗаписей.Записать();

Создание новой записи или изменение одного из реквизитов если запись уже есть

	НаборЗаписей = РегистрыСведений.дм_СтатусыРеализацийЭД.СоздатьНаборЗаписей();  
	НаборЗаписей.Отбор.Документ.Установить(докРеализация);   
	НаборЗаписей.Прочитать();
	Если НаборЗаписей.Количество() = 0  тогда
		НоваяЗапись 			= НаборЗаписей.Добавить();
		НоваяЗапись.Документ 	= докРеализация;
		НоваяЗапись.ВхНД 		= Истина;
		НаборЗаписей.Записать();
	Иначе 	
		Для Каждого Запись Из НаборЗаписей Цикл 
			Запись.ВхНД = Истина;
		КонецЦикла;
		НаборЗаписей.Записать(Истина);
	КонецЕсли;
  • /sites/data/pages/zapis_v_registr_svedenij_nezavisimyj.txt
  • Последнее изменение: 2024/04/24 14:34
  • tro