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

    Всего: 1

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

    −122

    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
    33. 33
    34. 34
    35. 35
    36. 36
    37. 37
    38. 38
    39. 39
    40. 40
    41. 41
    42. 42
    43. 43
    44. 44
    45. 45
    46. 46
    47. 47
    48. 48
    49. 49
    50. 50
    51. 51
    52. 52
    53. 53
    54. 54
    55. 55
    56. 56
    57. 57
    58. 58
    59. 59
    60. 60
    61. 61
    62. 62
    63. 63
    64. 64
    65. 65
    66. 66
    67. 67
    Функция ПреобразованиеДаты(Дата) Экспорт
Если НЕ ПустаяСтрока(Дата) Тогда	
	ГодКраткий = Прав(Дата, 2);
	Если 		ГодКраткий = "83" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1983";		
		ИначеЕсли   ГодКраткий = "84" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1984";
		ИначеЕсли   ГодКраткий = "85" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1985";	
		ИначеЕсли   ГодКраткий = "86" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1986";	
		ИначеЕсли   ГодКраткий = "87" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1987";	
		ИначеЕсли   ГодКраткий = "88" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1988";	
		ИначеЕсли   ГодКраткий = "89" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1989";	
		ИначеЕсли   ГодКраткий = "90" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1990";	
		ИначеЕсли   ГодКраткий = "91" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1991";	
		ИначеЕсли   ГодКраткий = "92" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1992";	
		ИначеЕсли   ГодКраткий = "93" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1993";	
		ИначеЕсли   ГодКраткий = "94" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1994";	
		ИначеЕсли   ГодКраткий = "95" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1995";	
		ИначеЕсли   ГодКраткий = "96" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1996";	
		ИначеЕсли   ГодКраткий = "97" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1997";	
		ИначеЕсли   ГодКраткий = "98" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1998";	
		ИначеЕсли   ГодКраткий = "99" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "1999";	
		ИначеЕсли   ГодКраткий = "00" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "2000";	
		ИначеЕсли   ГодКраткий = "01" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "2001";	
		ИначеЕсли   ГодКраткий = "02" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "2002";	
		ИначеЕсли   ГодКраткий = "03" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "2003";	
		ИначеЕсли   ГодКраткий = "04" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "2004";	
		ИначеЕсли   ГодКраткий = "05" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "2005";	
		ИначеЕсли   ГодКраткий = "06" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "2006";	
		ИначеЕсли   ГодКраткий = "07" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "2007";	
		ИначеЕсли   ГодКраткий = "08" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "2008";	
		ИначеЕсли   ГодКраткий = "09" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "2009";	
		ИначеЕсли   ГодКраткий = "10" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "2010";	
		ИначеЕсли   ГодКраткий = "11" Тогда
			ДатаНовая = "" + Лев(Дата,6) + "2011";					
		КонецЕсли;

ДатаЗначение = Дата(Сред(ДатаНовая,7,4),Сред(ДатаНовая,4,2),Сред(ДатаНовая,1,2));	
Возврат ДатаЗначение;	
КонецЕсли;
КонецФункции

    Прихожу сегодня с утра и вижу вот такой код коллеги. Надо теперь психологически восстанавливаться.

    i-ale, 22 Марта 2012

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