CREATE OR REPLACE PROCEDURE expande_avisos_emt (seq NUMBER) AS avisow VARCHAR2(2048); usuariow VARCHAR2(100); usuario VARCHAR2(100); fechaw DATE; BEGIN usuario:=portal.wwctx_api.get_user; SELECT DISTINCT usuario,aviso,fecha INTO usuariow,avisow,fechaw FROM AVISOS_EMT WHERE seq_avisos=seq; update AVISOS_EMT set leido = 'S' where seq_avisos = seq; htp.print('
|
|
|
|
|
|
|
|
|
|