41 lines
947 B
Plaintext
41 lines
947 B
Plaintext
CREATE OR REPLACE PACKAGE BODY efno_disclaimer IS
|
|
|
|
PROCEDURE display IS
|
|
|
|
CURSOR cu_disc IS
|
|
SELECT text
|
|
FROM disclaimer
|
|
WHERE language = caco_utilities.get_syus_lang;
|
|
|
|
l_disc disclaimer.text%type;
|
|
|
|
BEGIN
|
|
-- caco_debug.debug_on;
|
|
-- htp.p(caco_utilities.get_syus_lang);
|
|
htp.htmlopen;
|
|
htp.headopen;
|
|
htp.title(ctitle => g_title);
|
|
--
|
|
caco_system.content_type;
|
|
--
|
|
htp.linkrel('stylesheet'
|
|
,'caco_system.css?p_type=general');
|
|
htp.headclose;
|
|
htp.bodyopen;
|
|
htp.print(caco_system.menu);
|
|
htp.header(nsize => 1
|
|
,cheader => g_title);
|
|
OPEN cu_disc;
|
|
FETCH cu_disc INTO l_disc;
|
|
CLOSE cu_disc;
|
|
htp.p(l_disc);
|
|
htp.p('<br>');
|
|
htp.p('<p><a href='''||caco_system.dad_path||''' title="Home">Home</a></li></p>');
|
|
htp.bodyclose;
|
|
htp.htmlclose;
|
|
|
|
END display;
|
|
|
|
END efno_disclaimer;
|
|
/
|