Говнокод: по колено в коде.

• Все
• Лучший
• Сток
• Глупый поиск
• Наговнокодить!
• Oтзывы

Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!

1. PHP (5703)
2. C++ (2740)
3. Куча (2339)
4. JavaScript (2030)
5. C# (1930)
6. Java (1503)
7. Си (1103)
8. Pascal (649)
9. Python (585)
10. 1C (536)
11. SQL (434)
12. ActionScript (294)
13. Objective C (204)
14. bash (200)
15. Perl (196)
16. Assembler (148)
17. Ruby (144)
18. VisualBasic (140)
19. Lua (51)
20. Go (32)
21. Swift (29)
22. Haskell (28)
23. Kotlin (15)

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

   Всего: 2

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

   −133.2

   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

   ТаблицаДоговоров = ДоговораМенеджера.Выгрузить();
   ТаблицаДоговоров.Свернуть("Договор");
   
   		
   ЗапросПоДоговорам = новый Запрос;
   ЗапросПоДоговорам.УстановитьПараметр("НаДату", Дата);
   ЗапросПоДоговорам.УстановитьПараметр("СписокДоговоров", ТаблицаДоговоров.ВыгрузитьКолонку("Договор"));
   
   ЗапросПоДоговорам.Текст = 
   "ВЫБРАТЬ
   |	ОтветственныеПоДоговорамСрезПоследних.Договор,
   |	ОтветственныеПоДоговорамСрезПоследних.Приложение,
   |	ОтветственныеПоДоговорамСрезПоследних.ВидОтветственного,
   |	ОтветственныеПоДоговорамСрезПоследних.Ответственный,
   |	СтатусыДоговоровСрезПоследних.Статус,
   |	ПриложенияДоговоровСрезПоследних.КонецПриложения
   |ИЗ
   |	РегистрСведений.ОтветственныеПоДоговорам.СрезПоследних(&НаДату, Договор В (&СписокДоговоров)) КАК ОтветственныеПоДоговорамСрезПоследних
   |		ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.СтатусыДоговоров.СрезПоследних(&НаДату, Договор В (&СписокДоговоров)) КАК СтатусыДоговоровСрезПоследних
   |		ПО ОтветственныеПоДоговорамСрезПоследних.Договор = СтатусыДоговоровСрезПоследних.Договор
   |			И ОтветственныеПоДоговорамСрезПоследних.Приложение = СтатусыДоговоровСрезПоследних.Приложение
   |		ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.ПриложенияДоговоров.СрезПоследних КАК ПриложенияДоговоровСрезПоследних
   |		ПО ОтветственныеПоДоговорамСрезПоследних.Договор = ПриложенияДоговоровСрезПоследних.Договор
   |			И ОтветственныеПоДоговорамСрезПоследних.Приложение = ПриложенияДоговоровСрезПоследних.Приложение";
   ТаблицаДоговоровИСтатусов = ЗапросПоДоговорам.Выполнить().Выгрузить();

   так вот пишет наш ведущий программист. Зачем сворачивать???

   Sameccc, 16 Марта 2010

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

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

   −131.6

   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

   ТаблицаДоговоров = ДоговораМенеджера.Выгрузить();
   ТаблицаДоговоров.Свернуть("Договор");
   
   		
   ЗапросПоДоговорам = новый Запрос;
   ЗапросПоДоговорам.УстановитьПараметр("НаДату", Дата);
   ЗапросПоДоговорам.УстановитьПараметр("СписокДоговоров", ТаблицаДоговоров.ВыгрузитьКолонку("Договор"));
   
   ЗапросПоДоговорам.Текст = "ВЫБРАТЬ
   								  |	ОтветственныеПоДоговорамСрезПоследних.Договор,
   								  |	ОтветственныеПоДоговорамСрезПоследних.Приложение,
   								  |	ОтветственныеПоДоговорамСрезПоследних.ВидОтветственного,
   								  |	ОтветственныеПоДоговорамСрезПоследних.Ответственный,
   								  |	СтатусыДоговоровСрезПоследних.Статус,
   								  |	ПриложенияДоговоровСрезПоследних.КонецПриложения
   								  |ИЗ
   								  |	РегистрСведений.ОтветственныеПоДоговорам.СрезПоследних(&НаДату, Договор В (&СписокДоговоров)) КАК ОтветственныеПоДоговорамСрезПоследних
   								  |		ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.СтатусыДоговоров.СрезПоследних(&НаДату, Договор В (&СписокДоговоров)) КАК СтатусыДоговоровСрезПоследних
   								  |		ПО ОтветственныеПоДоговорамСрезПоследних.Договор = СтатусыДоговоровСрезПоследних.Договор
   								  |			И ОтветственныеПоДоговорамСрезПоследних.Приложение = СтатусыДоговоровСрезПоследних.Приложение
   								  |		ВНУТРЕННЕЕ СОЕДИНЕНИЕ РегистрСведений.ПриложенияДоговоров.СрезПоследних КАК ПриложенияДоговоровСрезПоследних
   								  |		ПО ОтветственныеПоДоговорамСрезПоследних.Договор = ПриложенияДоговоровСрезПоследних.Договор
   								  |			И ОтветственныеПоДоговорамСрезПоследних.Приложение = ПриложенияДоговоровСрезПоследних.Приложение";
   								  
   		
   		ТаблицаДоговоровИСтатусов = ЗапросПоДоговорам.Выполнить().Выгрузить();

   так вот пишет наш ведущий программист. Зачем сворачивать???

   Sameccc, 16 Марта 2010

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