1. 1C / Говнокод #4867

    −127

    1. 01
    2. 02
    3. 03
    4. 04
    5. 05
    6. 06
    7. 07
    8. 08
    9. 09
    10. 10
    11. 11
    12. 12
    13. 13
    &НаКлиенте
Процедура ПриЗакрытии()
	ПроверитьНаОткрытие()
КонецПроцедуры

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

    Запостил: cdpoma, 08 Декабря 2010

    Комментарии (3) RSS

    • ava govnopuker 15.02.2011 11:11 # 0

      что здесь не так?
      единственное смущает НЕ Объект.Просмотрено = Истина
      Ответить

      • ava guest 19.07.2011 01:41 # 0

        Все зависит от типа "Объект.Просмотрено" а если там составной тип?
        Ответить

    • ava guest 06.04.2011 02:04 # 0

      По ходу чел не работал с 8.2, особенно на ранних платформах :(
      Вот там были извраты...
      Ответить

    Добавить комментарий