Valjda će kod da bude jasniji oko toga šta mi je cilj
Code:
procedure get_all_data(p_p1 in varchar2, p_rc OUT SYS_REFCURSOR) is
l_dat1 number := 2;
l_dat2 varchar2(10);
l_dat3 varchar2(40);
begin
for l_indx in 1..5 loop
l_dat1 := l_dat1 + l_indx;
if ( mod(l_dat1,2)=0) then
l_dat2 := ' PARAN ';
else
l_dat2 := 'NEPARAN';
end if;
l_dat3 := 'Broj ' || l_dat1 || ' je ' || trim(l_dat2);
-- Ovde treba proslediti dat 1 2 i 3 u kursor
end loop;
end;
procedure get_all_data(p_p1 in varchar2, p_rc OUT SYS_REFCURSOR) is
l_dat1 number := 2;
l_dat2 varchar2(10);
l_dat3 varchar2(40);
begin
for l_indx in 1..5 loop
l_dat1 := l_dat1 + l_indx;
if ( mod(l_dat1,2)=0) then
l_dat2 := ' PARAN ';
else
l_dat2 := 'NEPARAN';
end if;
l_dat3 := 'Broj ' || l_dat1 || ' je ' || trim(l_dat2);
-- Ovde treba proslediti dat 1 2 i 3 u kursor
end loop;
end;
Tj. da na kraju u kursoru dobijem sledeće
Code:
3 | NEPARAN | Broj 3 je NEPARAN
5 | NEPARAN | Broj 5 je NEPARAN
8 | PARAN | Broj 8 je PARAN
12 | PARAN | Broj 12 je PARAN
17 | NEPARAN | Broj 17 je NEPARAN
3 | NEPARAN | Broj 3 je NEPARAN
5 | NEPARAN | Broj 5 je NEPARAN
8 | PARAN | Broj 8 je PARAN
12 | PARAN | Broj 12 je PARAN
17 | NEPARAN | Broj 17 je NEPARAN
Kreirao sam sledeće tipove u slučaju da mogu da pomognu
Code:
CREATE OR REPLACE type num_obj as object (
t_number number ,
t_type varchar2(10) ,
t_desc varchar2(40)
);
CREATE OR REPLACE type num_table as table of num_obj;
CREATE OR REPLACE type num_obj as object (
t_number number ,
t_type varchar2(10) ,
t_desc varchar2(40)
);
CREATE OR REPLACE type num_table as table of num_obj;
Kako ovo da rešim, jel izvodljivo?