CREATE OR REPLACE PROCEDURE muestra_ultnot AS
CURSOR c1 IS SELECT seq_noticias,titular,cuerpo,foto,enlace,n_enlace,f_publicacion
FROM noticiasw
WHERE f_baja > sysdate
order by f_publicacion desc;
temp NUMBER;
cont NUMBER;
contador number:=0;
aux VARCHAR2(1);
col NUMBER(1);
fondocol varchar2(7);
raizwww varchar2(30);
BEGIN
raizwww:='webserver.emtsam.net';
col :=1;
htp.print('
Boletin de Noticias de Santa Teresa 1881
');
SELECT nvl(COUNT(*),0) INTO cont FROM noticiasw where f_baja > sysdate;
IF cont > 0 THEN
htp.print('
');
ELSE
htp.print('
');
END IF;
htp.print('
');
END;
/