CREATE OR REPLACE procedure guarda_comentario (t2 number,respuesta varchar2,submit varchar2) as secuencia number; temp varchar2(1024); usu varchar2(50):= wwctx_api.get_user; seq NUMBER; avisow VARCHAR2(250):='Hay Opiniones por Validar'||to_char(sysdate,'hh:mm:ss')||''; usuarios VARCHAR2(10):='755.'; usuario VARCHAR2(10):='PORTAL'; fecha DATE:=sysdate; begin temp:=respuesta; if temp is not null then select portal.seq_comentariow.nextval into secuencia from sys.dual; insert into comentarios VALUES(secuencia,temp,usu,TO_DATE(SYSDATE,'DD/MM/YYYY'),'n'); select portal.seq_avisos.nextval into seq from sys.dual; INSERT INTO AVISOS_EMT VALUES(seq,avisow,fecha,usuarios,usuario,'N'); end if; htp.print(' '); end; /