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

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

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

1. PHP (1041)
2. C++ (375)
3. C# (298)
4. Java (244)
5. JavaScript (228)
6. Си (139)
7. Delphi (129)
8. Куча (123)
9. SQL (102)
10. Python (50)
11. VisualBasic (47)
12. Perl (45)
13. ActionScript (44)
14. bash (37)
15. 1C (36)
16. Ruby (22)
17. Assembler (20)

1. SQL / Говнокод #3782

   +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
   27. 27
   28. 28
   29. 29
   30. 30
   31. 31
   32. 32
   33. 33
   34. 34

   /* Ask Dian for changing this enormous DECODE */
         sprintf( ranges_sort_condition,
                  "DECODE(CONTRACT_ID, '%s', 1, 0) + "
                  "DECODE(ISS_INST, '%s', 2, 0) + "
                  "DECODE(ACQ_INST, '%s', 4, 0) + "
                  "DECODE(ISS_BIN, '%s', 8, 0) + "
                  "DECODE(TERM_TYPE, %d, 16, 0) + "
                  "DECODE(IS_PRIMARY_CARD, %d, 32, 0), "
                  "  0,  1,  64,  2,  32,  3,  16,  4,   4,  5,   8,  6,  96,  7,  80,  8,"
                  " 68,  9,  72, 10,  40, 11,  24, 12,  12, 13,   2, 14,  10, 15,  48, 16,"
                  " 36, 17, 104, 18,  88, 19,  76, 20,  66, 21,  74, 22, 112, 23, 100, 24,"
                  " 56, 25,  44, 26,  34, 27,  42, 28,  20, 29,  28, 30,  18, 31,   6, 32,"
                  " 26, 33,  14, 34,  52, 35,  60, 36, 124, 37,  50, 38,  38, 39,  22, 40,"
                  "118, 41, 122, 42, 110, 43,  94, 44, 126, 45,   1, 46,  65, 47,  97, 48,"
                  " 81, 49,   5, 50,  73, 51, 105, 52,  89, 53,  77, 54,  67, 55,  75, 56,"
                  "113, 57, 121, 58, 101, 59, 109, 60,  99, 61, 107, 62,  85, 63,  93, 64,"
                  " 83, 65,  71, 66,  91, 67,  79, 68, 117, 69, 125, 70, 115, 71, 103, 72,"
                  " 87, 73, 119, 74,  59, 75,  47, 76,  95, 77,  63, 78, 127, 79, 999",
                  "-1", DEFAULT_INST_ID, DEFAULT_INST_ID, "-1", TERM_TYPE_DEF, IS_PRIMARY_DEF );
   
         ora_sql_stmt_buff.len = sprintf( (char*)ora_sql_stmt_buff.arr, 
                                          "SELECT ACQ_INST, "
                                          "       ISS_INST, "
                                          "       ISS_BIN,  "
                                          "       TERM_TYPE, "
                                          "       MSGTYPE,  "
                                          "       TASK,     "
                                          "       REVERSAL, "
                                          "       CONTRACT_ID, "
                                          "       IS_PRIMARY_CARD, "
                                          "       TMPL_ID   "
                                          "  FROM T_TRANS_AUTH_ALG "
                                          " WHERE TRANS_TYPE = :ora_trans_type "
                                          " ORDER BY DECODE(%s)", ranges_sort_condition );

   Это хоть и на Си, но формирование запроса SQL, так что попадает сюда.
   Хоть бы комментарий какой написали, демоны!

   Запостил: nil, 26 Июля 2010

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

2. SQL / Говнокод #3739

   0

   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

   -- Процедура предназначена для выделения часов из времени
   CREATE PROCEDURE _hour(
   	_date_time	DATETIME YEAR TO SECOND DEFAULT NULL
   )RETURNING INTEGER;
   
   DEFINE _str	CHAR(20);
   
   IF _date_time IS NULL THEN
   	LET _date_time = CURRENT;
   END IF;
   
   LET _str = _date_time;
   LET _str = SUBSTR(_str,12,2);
   
   RETURN _str;
   
   END PROCEDURE;

   СУБД infomix
   а ведь можно сделать так
   CAST(CURRENT AS DATETIME HOUR TO HOUR)
   или так
   EXTEND(CURRENT, HOUR TO HOUR)
   
   и таких перлов с вычислением дат тьма тьмущая

   Запостил: Grizzly, 20 Июля 2010

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

3. SQL / Говнокод #3723

   +3

   1. 1
   2. 2
   3. 3
   4. 4
   5. 5
   6. 6

   sBigDad	    varchar2(200) := '';
   vaKids		ids_va	:= ids_va();
   vaDads		ids_va	:= ids_va();
   vaBigDads	ids_va	:= ids_va();
   vaGrandKids	ids_va	:= ids_va();
   vaTempKids	ids_va	:= ids_va();

   Запостил: borka, 17 Июля 2010

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

4. SQL / Говнокод #3691

   +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

   Гавнокод --
   
   SELECT * FROM  Table1
   WHERE [Id] not in 
   		(
   		SELECT min([Id]) FROM Table1
   		WHERE [Code] in 
   				(
   				SELECT [Code] FROM Table1
   				GROUP BY [Code]									HAVING count([Code]) > 1
   				)
   					GROUP BY [Code]
   		)
   	and [Id] in 
   		(
   				SELECT [Id] FROM Table1
   				WHERE [Code] in (
   						SELECT [Code] FROM Table1
   						GROUP BY [Code]
   						HAVING count([Code]) > 1
   						)
   		)
   
   
   Нормальний варіант --
   
   SELECT * FROM Table1 AS a
   WHERE [Id] not in 
   		(
   			SELECT min([Id]) FROM a_ListParam
   			WHERE a_ListParam.[Code] = a.[Code]
   		)

   Запостил: O_O, 12 Июля 2010

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

5. SQL / Говнокод #3615

   +9

   1. 1

   IF ((SELECT 1 FROM DELETED AS D INNER JOIN INSERTED AS I ON (I.[id_Status]=D.[id_Status])) IS NULL )

   такий от тригер стоїть на апдейт однієї таблички ...
   ось так -- IF Insertes.id_Status != Deleted.Id_Status було б значно краще і лаконічніше.

   Запостил: O_O, 01 Июля 2010

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

6. SQL / Говнокод #3611

   +16

   1. 1

   SELECT REPLACE(RTRIM(REPLACE(REPLACE(RTRIM(REPLACE(LTRIM('  850.0000'),'0',' ')),' ','0'),'.',' ')),' ','.')

   Совет, как убрать лишние нули после точки

   Запостил: Back, 01 Июля 2010

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

7. SQL / Говнокод #3604

   −5

   1. 1

   SELECT created_at, updated_at FROM user_childs WHERE `id`=.......

   убейте меня за таймштамп user_childs.crated_at

   Запостил: piroman171, 30 Июня 2010

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

8. SQL / Говнокод #3546

   +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
   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
   68. 68
   69. 69
   70. 70
   71. 71
   72. 72
   73. 73
   74. 74
   75. 75
   76. 76
   77. 77

   procedure xxx_procedure
   is
   --   lngIDVidPP Number;
      sSQL       varchar2(4000);
   begin
   sSQL := '';
   sSQL := sSQL || ' Declare ';
   sSQL := sSQL || '    lngIDVidPP Number; ';
   sSQL := sSQL || '    lngColRec  Number; ';
   sSQL := sSQL || '    strTypeProc Varchar2(255); ';
   sSQL := sSQL || ' BEGIN ';
   sSQL := sSQL || ' for rec in (select f.param2 , A.idpp, pp.crastr, pp.cvector, a.param1, a.et, a.tet ';
   sSQL := sSQL || '  from table1 e, T_IDPP@' || 'app' || '_' ||'xxx' || ' a, table2 f, ';
   sSQL := sSQL || '   t_pp_card@' || 'app' || '_' || 'xxx' || ' pp,  refitem r';
   sSQL := sSQL || '  where ';
   sSQL := sSQL || '   e.param1 = a.param1 ';
   sSQL := sSQL || '   and e.id_building = F.ID_BUILDING ';
   sSQL := sSQL || '   and F.FLOOR_NUMBER = a.et ';
   sSQL := sSQL || '   and R.REFERENCEID = 2019 and R.ITEMID = F.ID_FLOOR_TYPE';
   sSQL := sSQL || '   and R.CODE = a.tet';
   sSQL := sSQL || '   and a.idpp = pp.cidpp)';
   sSQL := sSQL || '  loop ';
   sSQL := sSQL || '     lngColRec := 0; ';
   sSQL := sSQL || '     lngIDVidPP := 0; ';
   sSQL := sSQL || '     SELECT COUNT(*) INTO lngColRec FROM T_PROCESS_PP@' || 'app' || '_' || 'xxx || ' Z ';
   sSQL := sSQL || '                     WHERE Z.PPP_UNOM = rec.param1 AND Z.PPP_ET = rec.et AND Z.PPP_TET = rec.tet; ';
   sSQL := sSQL || '     if lngColRec = 0 then ';
   sSQL := sSQL || '        if BITAND(rec.crastr, 8) <> 0 and BITAND(rec.cvector, 8) <> 0 then ';
   sSQL := sSQL || '           lngIDVidPP := 50868; ';
   sSQL := sSQL || '        else ';
   sSQL := sSQL || '           if BITAND(rec.crastr, 8) <> 0 then ';
   sSQL := sSQL || '              lngIDVidPP := 50866; ';
   sSQL := sSQL || '           else ';
   sSQL := sSQL || '              lngIDVidPP := 50867; ';
   sSQL := sSQL || '           end if; ';
   sSQL := sSQL || '        end if; ';
   sSQL := sSQL || '        update table2 f ';
   sSQL := sSQL || '            set f.xx      = rec.idpp, ';
   sSQL := sSQL || '                f.xxx   = lngIDVidPP, ';
   sSQL := sSQL || '                f.xxxx = 54554 ';
   sSQL := sSQL || '          where f.xxxxx = rec.id_floor; ';
   sSQL := sSQL || '     else  '; --if lngColRec > 0 then
   sSQL := sSQL || '          strTypeProc := Null; ';
   sSQL := sSQL || '          SELECT Y.PH_ACTION_KEY INTO strTypeProc ';
   sSQL := sSQL || '            FROM T_PROCESS_HEAD@' || 'app' || '_' || 'SGP' || ' Y ';
   sSQL := sSQL || '            WHERE ';
   sSQL := sSQL || '                 Y.PHID IN (SELECT X.PPP_PHID ';
   ...... 10 строк вырезано из-за ограничения 4000символов
   sSQL := sSQL || '               if BITAND(rec.crastr, 8) <> 0 and BITAND(rec.cvector, 8) <> 0 then ';
   sSQL := sSQL || '                  lngIDVidPP := 50868; ';
   sSQL := sSQL || '               else ';
   sSQL := sSQL || '                  if BITAND(rec.crastr, 8) <> 0 then ';
   sSQL := sSQL || '                     lngIDVidPP := 50866; ';
   sSQL := sSQL || '                  else ';
   sSQL := sSQL || '                     lngIDVidPP := 50867; ';
   sSQL := sSQL || '                  end if; ';
   sSQL := sSQL || '               end if; ';
   sSQL := sSQL || '                  update table3 f ';
   sSQL := sSQL || '                     set f.ID_PLANE_G = rec.idpp, ';
   sSQL := sSQL || '                     f.id_plane_scan = lngIDVidPP, ';
   sSQL := sSQL || '                     f.id_status_plane = 54552 ';
   sSQL := sSQL || '               where f.param1 = rec.param1; ';
   sSQL := sSQL || '           ELSE ';
   sSQL := sSQL || '                  update table3 f ';
   sSQL := sSQL || '                 set f.id_status_plane = 54552 ';
   sSQL := sSQL || '               where f.param1 = rec.param1; ';
   sSQL := sSQL || '           END IF; ';
   sSQL := sSQL || '     end if; ';  --if lngColRec > 0 then
   sSQL := sSQL || '   end loop;';
   sSQL := sSQL || '  null;';
   sSQL := sSQL || '  end;';
   
   EXECUTE IMMEDIATE sSQL;
           dbms_output.put_line ('Процедура xxx_procedure успешно создана');
   EXCEPTION
     WHEN OTHERS THEN dbms_output.put_line('Ошибка создания xxx_procedure. ' || SQLERRM);
   end;

   В связи с NDA названия изменены.

   Запостил: kamapcuc, 23 Июня 2010

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

9. SQL / Говнокод #3541

   0

   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

   SELECT wine_name,wine_year,cost FROM Wines 
   INNER JOIN storage ON wines.wine_ID=storage.wine_ID
   INNER JOIN pricelist ON storage.wine_ID=pricelist.wine_ID
   WHERE fabric_ID=(SELECT fabric_ID FROM fabrics WHERE Name="Toscana Italy")
   AND count>0 ORDER BY wine_year ASC LIMIT 1,1000;
   
   SELECT wine_name,cost,count FROM wines
   INNER JOIN storage ON wines.wine_ID=storage.wine_ID
   INNER JOIN vendorprices ON storage.wine_ID=vendorprices.wine_ID
   WHERE count > 0 ORDER BY wine_name DESC LIMIT 1,1000;
   
   SELECT wine_name,cost,count FROM wines
   INNER JOIN storage ON wines.wine_ID=storage.wine_ID
   INNER JOIN vendorprices ON storage.wine_ID=vendorprices.wine_ID
   WHERE count = 0 ORDER BY wine_name DESC LIMIT 1,1000;

   Извращаюсь как могу лишь бы запросы напоминали двух-критериальные. Впрочем таковыми они от этого не становятся. Думаю еще добавить по три-четыре подзапроса и побольше джойнов, жаль условных конструкций не знаю(собственно сутки-двое изучаю SQL)
   Институт сказал "Надо", студент ответил... ну впрочем неважно что ответил, но сделал...

   Запостил: Ivan0x32, 23 Июня 2010

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

10. SQL / Говнокод #3513

    +5

    1. 1
    2. 2

    SELECT CONCAT( IF(10>DAY(date),"0",""),DAY(date),".",IF(10>MONTH(date),"0",""),MONTH(date)) as date
    FROM table_name

    Выборка дат из mysql в нормальном виде))

    Запостил: Aligan, 19 Июня 2010

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

• ← влево
• вправо →

• 11
• 10
• 9
• 8
• 7
• …
• 1