CREATE OR REPLACE PROCEDURE foro_preguntar(seq NUMBER) AS
temaw VARCHAR2(100);
fechaw DATE;
usuariow VARCHAR2(50);
fechawfin DATE;
usuariowpreg VARCHAR2(50);
BEGIN
SELECT f.tema,f.fecha,f.usuario INTO temaw,fechaw,usuariow
FROM FORO_TEMA f
WHERE f.seq_tema = seq;
SELECT SYSDATE INTO fechawfin FROM sys.dual;
usuariowpreg := wwctx_api.get_user;
htp.print('
Menu Principal
