Процедура НапечатанПриИзменении(Элемент)

	Если Напечатан Тогда

		КогдаНапечатан = ТекущаяДата();

	Иначе

		КогдаНапечатан = Дата(1,1,1);

	КонецЕсли;

	Если Модифицированность() Тогда

		УстановитьПривилегированныйРежим(Истина);

		ЭтотОбъект.Записать();

		ЭтаФорма.Модифицированность=Ложь; //сбросили модифицированность 

		УстановитьПривилегированныйРежим(Ложь);

	КонецЕсли;	

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