- 1
- 2
- 3
select ...
NVL(DSAND || ', ', '')
from ...
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
Всего: 5
−47
select ...
NVL(DSAND || ', ', '')
from ...
сидел и дооолго смотрел, а вдруг сбудется?
−50
SELECT ...
FROM...
WHERE DATA_EM1 > TO_DATE(TO_CHAR(P_DATA_EM1, 'yyyymmdd') || '000000', 'yyyymmddhh24miss')
-TRUNC(P_DATA_EM1).... не?
-А шо так можна?
−45
BEGIN
SELECT count(DISTINCT CLCNC)
INTO P_CLI
FROM P040
WHERE NRTM = P_NRTM0 AND ESCN= P_ESCN;
EXCEPTION
WHEN NO_DATA_FOUND
THEN
P_CLI := 0;
WHEN TOO_MANY_ROWS
THEN
P_CLI := 0;
END;
— Держите.
— Зачем?
— Ну, как говорится, на всякий пожарный случай.
— С войны не держал боевого оружия.
— Ну, это не боевое, а скорее психологическое. При случае можно пугнуть, подать сигнал. Заряжен холостыми.
— Дайте один боевой!
— Зачем?
— На всякий пожарный.
−43
SELECT ROWNUM INTO cnt FROM t00 WHERE ROWNUM IN (SELECT ROWNUM FROM p00 WHERE ROWNUM = 1);
нездоровая любовь к ROWNUM
−51
PROCEDURE ...
...
IS
....
CURSOR c3 (numero NUMBER) IS
SELECT count(DISTINCT prsv) cont
FROM sr200 WHERE NR = NUMERO;
rec3 c3%ROWTYPE;
...
BEGIN
.....
OPEN c3(PROC);
LOOP FETCH c3 INTO rec3;
EXIT WHEN c3%NOTFOUND;
END LOOP;
CLOSE c3;
CONT := nvl(rec3.cont, 0);
FOR I IN 1 .. CONT
LOOP CAB := CAB || chr(9);
IF i = CONT
THEN
EXIT;
END IF;
END LOOP;
....
END;
нунахера?? )