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

This commit is contained in:
andrew.gilmore
2012-03-19 11:57:19 +00:00
parent 2a0f4900c3
commit 0e9ca75d77
1587 changed files with 500863 additions and 0 deletions

View File

@@ -0,0 +1,41 @@
CREATE OR REPLACE PACKAGE BODY efno_contact IS
PROCEDURE startup IS
--
g_page_header VARCHAR2(100) := caco_utilities.get_module_text(2002);
--
BEGIN
--
IF NOT caco_security.security_check(p_package_name => 'efno_contact.startup') THEN
RETURN;
END IF;
--
htp.p('<html xmlns="http://www.w3.org/1999/xhtml" lang="en-gb">');
wsgl.openpagehead(g_page_header);
htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-2">');
htp.p('<LINK REL=stylesheet HREF="caco_system.css?p_type=general" >');
--
htp.p('<title>'||g_page_header||'</title>');
wsgl.closepagehead;
wsgl.openpagebody(FALSE);
--
htp.p(caco_system.menu);
--
wsgl.defaultpagecaption(g_page_header
,1);
--
FOR i IN ( SELECT description FROM contact_details WHERE rownum < 2 ) LOOP
--
htp.p(i.description);
--
END LOOP;
--
wsgl.closepagebody;
--
END startup;
BEGIN
-- Initialization
NULL;
END efno_contact;
/