CREATE OR REPLACE procedure votar_encuesta(seq number) as cursor c1 is select seq_encuesta,pregunta,respuesta1,respuesta2,respuesta3,respuesta4,respuesta5,respuesta6, respuesta7,respuesta8,respuesta9,respuesta10 from encuestas where seq_encuesta=seq; begin for reg in c1 loop htp.print('
'||chr(38)||'nbsp;'||chr(38)||'nbsp;Participación / ENCUESTAS VOLVER'||chr(38)||'nbsp;'||chr(38)||'nbsp;'||chr(38)||'nbsp;


'||chr(38)||'nbsp;
'||reg.pregunta||'
 '||chr(38)||'nbsp;
'); if reg.respuesta1 is not null then htp.print(' '); end if; if reg.respuesta2 is not null then htp.print(' '); end if; if reg.respuesta3 is not null then htp.print(' '); end if; if reg.respuesta4 is not null then htp.print(' '); end if; if reg.respuesta5 is not null then htp.print(' '); end if; if reg.respuesta6 is not null then htp.print(' '); end if; if reg.respuesta7 is not null then htp.print(' '); end if; if reg.respuesta8 is not null then htp.print(' '); end if; if reg.respuesta9 is not null then htp.print(' '); end if; if reg.respuesta10 is not null then htp.print(' '); end if; htp.print('

'||chr(38)||'nbsp; '||reg.respuesta1||''||chr(38)||'nbsp;
'||chr(38)||'nbsp; '||reg.respuesta2||''||chr(38)||'nbsp;
'||chr(38)||'nbsp; '||reg.respuesta3||''||chr(38)||'nbsp;
'||chr(38)||'nbsp; '||reg.respuesta4||''||chr(38)||'nbsp;
'||chr(38)||'nbsp; '||reg.respuesta5||''||chr(38)||'nbsp;
'||chr(38)||'nbsp; '||reg.respuesta6||''||chr(38)||'nbsp;
'||chr(38)||'nbsp; '||reg.respuesta7||''||chr(38)||'nbsp;
'||chr(38)||'nbsp; '||reg.respuesta8||''||chr(38)||'nbsp;
'||chr(38)||'nbsp; '||reg.respuesta9||''||chr(38)||'nbsp;
'||chr(38)||'nbsp; '||reg.respuesta10||''||chr(38)||'nbsp;
'||chr(38)||'nbsp;
'||chr(38)||'nbsp; '); end loop; end; /