1. Список говнокодов пользователя maalssy

    Всего: 2

  2. 1C / Говнокод #26813

    +3

    1. 1
    2. 2
    3. 3
    4. 4
    ГрИнвС = ?(ГрИнвЧ=1, "Первая", ?(ГрИнвЧ=2, "Вторая", ?(ГрИнвЧ=3, "Третья", 
         ?(ГрИнвЧ=4, "Четвертая", ?(ГрИнвЧ=5, "Пятая", ?(ГрИнвЧ=6, "Шестая",
	 ?(ГрИнвЧ=7, "Седьмая", ?(ГрИнвЧ=8, "Восьмая", ?(ГрИнвЧ=9, "Девятая", 
	   Строка(ГрИнвЧ))))))))));

    Определение группы инвалидности из числового значения. Возможно, код писал обладатель неизвестной медицине 9-й группы инвалидности.

    maalssy, 23 Июля 2020

    Комментарии (43)

  3. 1C / Говнокод #23382

    +3

    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
    19. 19
    20. 20
    21. 21
    22. 22
    23. 23
    24. 24
    25. 25
    26. 26
    27. 27
    28. 28
    29. 29
    30. 30
    31. 31
    32. 32
    &НаКлиенте
Процедура ИзменитьПометкуУдаления(Команда)
	...
	Если ПУ(ссылкаНаОтчет) = Истина 
	Тогда
		текстВопроса = "Снять с """ + ссылкаНаОтчет + """ пометку на удаление?";
	Иначе 
		текстВопроса = "Пометить """ + ссылкаНаОтчет + """ на удаление?";
	КонецЕсли;
	Если Вопрос(текстВопроса, РежимДиалогаВопрос.ДаНет, 0) = КодВозвратаДиалога.Да
	Тогда
		СПУ( ссылкаНаОтчет, Не(ПУ(ссылкаНаОтчет)));                                      	
	КонецЕсли; 
	ОбновитьСписок();
КонецПроцедуры

&НаСервере
Функция ПУ(ссылка)
	Возврат ссылка.ПометкаУдаления;
КонецФункции

&НаСервере
Процедура СПУ(ссылка, значение)
	о = Документы.РегламентированныйОтчет.Выбрать();
	Пока о.Следующий() Цикл 	
		если о.Ссылка = ссылка тогда
			оо = о.ПолучитьОбъект();
			оо.ПометкаУдаления = значение;
			оо.Записать();
		КонецЕсли;	
	КонецЦикла;
КонецПроцедуры

    Установка пометки на удаление во внешней обработке от одного интегратора. Дважды происходит получение признака пометки удаления из ссылки. Код процедуры СПУ даже комментировать трудно.

    maalssy, 05 Октября 2017

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