Заполнить регистр сведений 8.3 Управляемые Формы

Форум Программирование Общие вопросы программирования (Dev)

1C:Бухгалтерия Платформа 1С v8.3 8.3.14

1. ru_spaiky 10.12.20 08:11 Сейчас в теме

Доброго дня, Подскажите пожалуйста есть документ заявка, имеем реквизит СтатусЗаявки (Перечесления; Новая, в работе, закончен)
как сделать так чтобы в регистре сведений отображать изменения этого статуса, так скажем чтобы записывал именно новой записью. а не замещал что есть.
К примеру:
Документ:№1, Статус :Новая, Дата:27.10.2020 10:51:10
Документ:№1, Статус :В работе, Дата:27.10.2020 11: 20:12
как мне вот добиться такого не могу понять. Буду благодарен совету.

По теме из базы знаний

Ответы

Подписаться на ответы Инфостарт бот

Свернуть все

2. dhurricane 10.12.20 08:30 Сейчас в теме

(1) Могу расшифровать один из предложенных Вам вариантов другими участниками форума. Создайте независимый периодический регистр сведений для хранения статусов. В модуле объекта документа при записи проверьте, что статус изменился, и если так, добавьте запись в регистр.

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

КонецПроцедуры

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

КонецПроцедуры

Показать

3. ru_spaiky 10.12.20 08:39 Сейчас в теме

(2) Спасибо буду сейчас пробовать этот вариант))

4. ru_spaiky 10.12.20 11:02 Сейчас в теме

(2)

ОбщегоНазначения.ЗначениеРеквизитаОбъекта

Это куда идет? не могу понять?

5. dhurricane 10.12.20 11:06 Сейчас в теме

(4) Это функция из БСП - возвращает значение реквизита по имени для переданной ссылки. Если у Вас такой нет, можете написать свою. Ну или в крайнем случае, исключительно для тестирования приведенного кода, можете заменить вызов функции на обращение к полям ссылки:

ЭтотОбъект.Статус <> Ссылка.Статус

7. ru_spaiky 10.12.20 11:10 Сейчас в теме

(5) Спасибо.

6. FatPanzer 10.12.20 11:09 Сейчас в теме

(1) Это называется периодический регистр сведений.

Оставьте свое сообщение

E-mail: