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

    −859

    1. 1
    49512

    select * from dual

    guest, 13 Июля 2009

    Комментарии (0)
  2. SQL / Говнокод #1241

    −861.8

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    9. 9
    select
    	....
    	if(n.Pinned=1,concat(n.Name,' <img src=/images/icons/897634.gif>'),n.Name) as Name
    from
    	news n
    	left outer join ....
    	.....
    where
    	....

    Как вам html-верстка в sql запросах?

    guest, 23 Июня 2009

    Комментарии (4)
  3. SQL / Говнокод #1179

    −128.7

    1. 1
    2. 2
    if(mysql_query('DROP TABLE table_name'))
      echo "таблица существовала ;(";

    Проверка таблицы на существование.
    Взято самизнаетеоткуда

    ЗЫ SQL+PHP

    guest, 11 Июня 2009

    Комментарии (7)
  4. SQL / Говнокод #1149

    −857.4

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    select *
    from INV_CARD
    where to_char (dt_reg, 'MM') < TO_CHAR(SYSDATE, 'MM')
    	AND (DT_OUT IS NULL OR to_char (dt_OUT, 'MM') = TO_CHAR(SYSDATE, 'MM'))
    	AND ID_FA_TYPE NOT IN (SELECT ID_FA_TYPE FROM FA_TYPE WHERE CODE = '17')
    	AND ID_FA_STATUS IN (SELECT ID_FA_STATUS FROM FA.V_FA_STATUS WHERE IS_ACCOUNTING = 1)
    	AND STATUS = 1
    	AND GLN.ACC_OPER.GET_ACC1_ACC2(ID_AMORT_ACC) LIKE '01%'

    (PL/SQL)
    очень понравилось сравнение дат, ну и использование констант тоже зачет

    guest, 04 Июня 2009

    Комментарии (4)
  5. SQL / Говнокод #1133

    −852.5

    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
    --
    --Ada SPEC file
    --Universe
    --
    -- Description: 
    --
    --
    -- 
    --
    -- 
    --
    -- 
    package Universe is
    
    type UniversalObject is tagged record
    	id:integer;
    end record;
    
    type Position is record
    	x:integer;
    	y:integer;
    	
    	end record;
    
    
    
    type VisibleObject is new UniversalObject with record
    	mass: integer;
    	Name:String (0..60);
    	Speed: float; --скорость:)
    	OrbitalPosition: Position;
    	
    end record;
    
    
    
    type Ship Is new VisibleObject with record
    	Size:integer;
    end record;
    
    type Asteroid is new VisibleObject WITH NULL RECORD;
    
    
    procedure USELECT (Object: in UniversalObject'Class); --Новая инструкция выбора:)
    
    
    end Universe;

    Тут не смешно, но мне кажется, стоит оптимизировать.

    И еще: Добавьте языков в список. Не все ковнокодеры - вебмастера.

    guest, 03 Июня 2009

    Комментарии (0)
  6. SQL / Говнокод #1132

    −866.4

    1. 1
    "select crash.Фамилия from crash where Нарушение=(select select bill.Нарушение from bill where Штраф=(select max(Штраф) from bill));";

    guest, 03 Июня 2009

    Комментарии (1)
  7. SQL / Говнокод #1065

    −866.7

    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
    FUNCTION gender_modification (string VARCHAR2, gender VARCHAR2) RETURN VARCHAR2
     IS
       str    VARCHAR2(500) := string;
     BEGIN
        IF gender = 'ж' THEN
    	str := REPLACE(str,'одиннадцать','о$$ди$$ннадцать');
        str := REPLACE(str,'один','одна');
        str := REPLACE(str,'два','две');
    	str := REPLACE(str,'о$$ди$$ннадцать','одиннадцать');
       END IF;
       IF gender = 'с' THEN
    	str := REPLACE(str,'одиннадцать','о$$ди$$ннадцать');
         str := REPLACE(str,'один','одно');
    	str := REPLACE(str,'о$$ди$$ннадцать','одиннадцать');
       END IF;
       RETURN str;
     END;

    Преобразование "суммы прописью" в заданный род (женский или средний).

    guest, 18 Мая 2009

    Комментарии (1)
  8. SQL / Говнокод #1027

    −855

    1. 1
    2. 2
    if (nvl(pSubject_ID, 0) = 0) then
       ...

    Вот так матёрые банковские программеры пишут "is null" на PL/SQL

    guest, 12 Мая 2009

    Комментарии (15)
  9. SQL / Говнокод #1018

    −46.4

    1. 1
    2. 2
    3. 3
    4. 4
    WHILE LEFT(@newstr,1)=' ' 
    BEGIN
        SET @newstr=SUBSTRING(@newstr,2,LEN(@newstr))
    END

    Альтернативная реализация LTRIM

    guest, 08 Мая 2009

    Комментарии (1)
  10. SQL / Говнокод #979

    −94

    1. 1
    delete id, name, surname, family from persons;

    ага, а типа остальные поля не трогать...

    guest, 30 Апреля 2009

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