- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
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;
defecate-plusplus 11.11.2015 14:04 # 0
а че он хотел то?
count табов создать?
OAS_GUEST 12.11.2015 11:02 # 0
select rpad(CAB ,count(DISTINCT prsv),chr(9)) into CAB FROM sr200 WHERE NR = NUMERO;
OAS_GUEST 12.11.2015 11:21 # 0
SELECT CAB || rpad(chr(9),count(DISTINCT prsv),chr(9)) into CAB FROM sr200 WHERE NR = NUMERO;