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

    Всего: 12

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

    −157

    1. 1
    2. 2
    3. 3
    4. 4
    SELECT ...
FROM ...
WHERE (CASE WHEN big_part = 1 AND blk_flag = 2 THEN -1 ELSE 0 END) <> -1 
;

    slbsomeone, 15 Февраля 2014

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

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

    −167

    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
    PROCEDURE login_attr(a_id IN CHAR, a_pw IN VARCHAR2, v_ret IN OUT VARCHAR2)
IS
   v_count INTEGER;
BEGIN
   v_count := 0;

   SELECT NVL (COUNT (attrib_desc), 0)
     INTO v_count
     FROM tab_attr a,
          tab_users b
    WHERE a.msc_cd = b.user_dept
      AND a.attr_cd = 'CD'
      AND lattr_cd = 'ABCD'
      AND UPPER (user_no) = UPPER (a_id)
      AND UPPER (user_pw) = UPPER (a_pw);

   IF v_count > 0 THEN
      SELECT attrib_desc || '@' || user_lang || '@' || user_autoimg ||
             '@' || user_imgtime || '@' || user_loc || '@' ||
             user_dept
        INTO v_ret
        FROM tab_attr a,
             tab_users b
       WHERE a.msc_cd = b.user_dept
         AND a.attr_cd = 'CD'
         AND lattr_cd = 'ABCD'
         AND UPPER (user_no) = UPPER (a_id)
         AND UPPER (user_pw) = UPPER (a_pw);
   ELSE
      v_ret := ' ';
   END IF;

END;

    Нам нужно больше селектов.

    P.S. почему в предпросмотре язык Java, хотя выбран SQL?

    slbsomeone, 05 Февраля 2014

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

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

    −172

    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
    CREATE OR REPLACE TRIGGER trig1
BEFORE INSERT
ON tab1 
REFERENCING NEW AS new OLD AS old
FOR EACH ROW
DECLARE
  tmpVar tab1.budat%TYPE;
  v_cd   tab2.cd%TYPE;
BEGIN
  tmpVar := to_char(sysdate-1, 'YYYYMMDD');
  SELECT f_get_code INTO v_cd FROM dual;

  IF v_cd = 'C1' THEN
    :new.budat := tmpVar;
  END IF;
END trig1;

    Ну почему?
    Ну почему не просто

    IF f_get_code = 'C1' THEN
    :new.budat := to_char(sysdate-1, 'YYYYMMDD');
    END IF;

    slbsomeone, 28 Мая 2013

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

  5. Куча / Говнокод #13044

    +130

    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
    Class barcode
	...
	Dim CharData

	Dim CharNumber

	Public Function GetHTMLBar(BarData  ,  BarHeight  )
		...
		For lop = 1 To Len(x)
			For s = 0 To UBound(CharData)
					...
					tsum = tsum + (CLng(CharNumber(s)) * lop)
					...
				End If
			Next 
		Next 
	End Function

	Private Sub Class_Initialize()
		CharNumber = Split("0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,41,42,43,44,45,46,47,48,49,50,51,52,53,54,55,56,57,58,59,60,61,62,63,64,65,66,67,68,69,70,71,72,73,74,75,76,77,78,79,80,81,82,83,84,85,86,87,88,89,90,91,92,93,94,95,96,97,98,99,100,101,102,103,104,105,106", ",")
		...
	End Sub
End class

    VBScript.
    Массив, содержащий собственные индексы?

    slbsomeone, 24 Мая 2013

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

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

    −167

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    6. 6
    7. 7
    8. 8
    CASE
   WHEN TO_CHAR (SYSDATE, 'hh24mi') >= '0000'
          AND TO_CHAR (SYSDATE, 'hh24mi') <= '0559'
   THEN
       TO_CHAR (SYSDATE - 1, 'yyyymmdd')
   ELSE
       TO_CHAR (SYSDATE, 'yyyymmdd')
END

    Oracle.
    Наверное хотели sysdate - 6/24

    slbsomeone, 29 Апреля 2013

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

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

    −171

    1. 1
    pSQL.append("\n  ,to_char (TO_DATE(oub_tm, 'HH24:MI:SS'),'HH24:MI:SS') AS oub_tm ");

    Строка в JSP файле.
    SQL для базы Оракл.
    столбец oub_tm в таблице имеет тип VARCHAR2(6)

    slbsomeone, 21 Марта 2013

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

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

    −141

    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
    CREATE MATERIALIZED VIEW LEASE_NODES_SUMMARY_SDS
...
AS
SELECT
...
FROM lease_nodes_sds;
DECLARE
  v_count NUMBER:=0;
BEGIN
  LOOP
  SELECT COUNT(1) INTO v_count FROM lease_nodes_summary_sds;
  EXIT WHEN v_count>0;
  END LOOP;
END;

    Торопиться некуда. Будем ждать пока появятся строки в lease_nodes_sds...

    slbsomeone, 28 Октября 2011

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

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

    −119

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    ...
      IF  i.TYPE IS NOT NULL  AND i.TYPE IS NOT NULL  THEN
       INSERT INTO R_ACTIVITY_PARAMETER( ACTIVE_FLAG,PROPERTY,PARAMETER_DOMAIN,SOURCE,DESCRIPTION,CODE)
         VALUES('1',i.TYPE,i.R_ACTIVITY_1_INS_180,i.SOURCE_TYPE,i.DESCRIPTION,i.TYPE);
...

    Oracle 10.2
    Может быть это какой-то "нездоровый" кодогенератор...

    slbsomeone, 14 Октября 2011

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

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

    −110

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    UPDATE ... 
SET ...
WHERE ...
     AND NVL(fndr_constraint,'ABC')=NVL('','ABC')
...

    Oracle 10.2 продакшн код.
    Это прям какое-то нездоровое влечение к NVL...

    slbsomeone, 14 Октября 2011

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

  11. SQL / Говнокод #8161

    −110

    1. 1
    2. 2
    3. 3
    4. 4
    5. 5
    ...
      IF  i.R_LITHOLOG_1_UPD_173 IS NOT NULL  AND i.R_LITHOLOG_1_INS_69 IS NOT NULL  THEN
       INSERT INTO R_LITHOLOGY( SOURCE,DESCRIPTION,CODE,NAME,ACTIVE_FLAG)
         VALUES(i.SOURCE,i.DESCRIPTION,i.R_LITHOLOG_1_UPD_173,i.CODE,NVL(i.R_LITHOLOG_1_INS_69,'1'));
...

    Вдруг i.R_LITHOLOG_1_INS_69 IS NULL ?
    Но почему тогда к i.R_LITHOLOG_1_UPD_173 такое доверие?

    slbsomeone, 11 Октября 2011

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