CREATE OR REPLACE procedure menu_foro as cursor c1 is select distinct pregunta,seq_pregunta,seq_tema from foro_preguntas order by seq_pregunta desc; cont number; begin cont:=0; htp.print(' '); for reg in c1 loop if cont<=4 then htp.print(' '); cont:=cont+1; end if; end loop; htp.print('
'||chr(38)||'nbsp; Temas de los
FOROS
'||chr(38)||'nbsp; '||chr(38)||'nbsp;
'||chr(38)||'nbsp;
'|| reg.pregunta||'
'); end; /