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

    −119

    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
    14. 14
    15. 15
    16. 16
    17. 17
    18. 18
    Процедура ДействияФормыДействие5(Кнопка)
	
	ТекущиеДанные = ЭлементыФормы.СправочникСписок.ТекущиеДанные;
	Если ТекущиеДанные = Неопределено Тогда 
		Возврат;
	КонецЕсли;
	
	ТекПометкаУдаления = ТекущиеДанные.Ссылка.ПометкаУдаления;
	
	КонтрагентОбъект = ТекущиеДанные.Ссылка.ПолучитьОбъект();
	КонтрагентОбъект.ПометкаУдаления = Не ТекПометкаУдаления;
	Попытка
		КонтрагентОбъект.записать();
	Исключение 
		Сообщить("Не удалось " + ?(ТекПометкаУдаления, "снять", "установить") + " пометку удаления.");
	КонецПопытки;	
	
КонецПроцедуры

    На форме списка справочника "Контрагенты" добавлена кнопка со значком "непосредственное удаление". А это её обработчик.
    НАХРЕНА???

    Запостил: doom2good, 20 Февраля 2015

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

    • ava kegdan 20.02.2015 11:08 # +1

      ДействияФормыДействие5

      Развели Дельфинарий
      Ответить

      • ava Herasima 20.02.2015 11:36 # +1

        Аналогично, проголосвал в плюс, как только прочитал ДействияФормыДействие
        Ответить

        • ava doom2good 20.02.2015 13:58 # +2

          Долго и упорно выбирая название программист позаботился не только о своих коллегах, но и пользователей не забыл! При наведении на значок кнопки на форме - всплывает подсказка "Действие5" и сразу становится понятно, что текущему элементу будет установлена пометка на удаление!
          Ответить

    • ava guest 23.10.2015 09:01 # 0

      И что тут не понятного? Кнопка устанавливает пометку удаления и снимает ее в одно нажатие... В отличии от штатной кнопки делает это без вопросов типа "Пометить элемент на удаление?"
      Если бы автор знал что есть штатное "непосредственное удаление" он бы назвал бы кнопку как-нибудь по другому, что-то типа "удаление без вопросов", "удалить втихаря", "почекрыжить молча"
      Ответить

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