git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@50874 248e525c-4dfb-0310-94bc-949c084e9493

Data/BulkLoad/EFT/Nominations/plsql/efno_disclaimer.bdy

@@ -0,0 +1,40 @@
+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;
+/