git-svn-id: http://locode01.ad.dom/svn/WEBMIP/trunk@50874 248e525c-4dfb-0310-94bc-949c084e9493
This commit is contained in:
74
Data/BulkLoad/EFT/Nominations/plsql/amut_adhoc.bdy
Normal file
74
Data/BulkLoad/EFT/Nominations/plsql/amut_adhoc.bdy
Normal file
@@ -0,0 +1,74 @@
|
||||
CREATE OR REPLACE PACKAGE BODY EFT_NOM.amut_adhoc IS
|
||||
/**
|
||||
#############################################################################
|
||||
# #
|
||||
# Package: geco_reporting #
|
||||
# #
|
||||
# Application System: General #
|
||||
# #
|
||||
# Creation Date: 29/08/2003 #
|
||||
# #
|
||||
# Author: Oracle Team, Advantica Ltd #
|
||||
# #
|
||||
# Purpose: A flexible reporting infrastructure providing output #
|
||||
# in HTML #
|
||||
# #
|
||||
# Dependancies: Reporting Schema as defined in Designer #
|
||||
# #
|
||||
# Header Information: $Header: /Isle Of Grain/database/PLSQL/geco_reporting.pck 1 7/01/05 12:54 Gilberta $ #
|
||||
# #
|
||||
# Revision: $Revision: 1 $ #
|
||||
# #
|
||||
# ? Advantica Ltd, 2003 #
|
||||
#############################################################################
|
||||
*/
|
||||
--
|
||||
PROCEDURE reporting IS
|
||||
--
|
||||
l_url VARCHAR2(1000);
|
||||
--
|
||||
BEGIN
|
||||
--
|
||||
IF caco_security.security_check(g_package_name || '.reporting') THEN
|
||||
--
|
||||
wsgl.openpagehead('Reporting');
|
||||
wsgl.metatag;
|
||||
htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1"><LINK REL=stylesheet HREF="caco_system.css?p_type=content" >');
|
||||
wsgl.closepagehead;
|
||||
wsgl.openpagebody(FALSE);
|
||||
htp.p(caco_system.menu);
|
||||
--
|
||||
l_url := cout_system_configuration.get_configuration_item('G_ADHOC_URL');
|
||||
--
|
||||
IF LOWER(l_url) LIKE '%login.jsp' THEN
|
||||
--
|
||||
FOR i IN ( SELECT LOWER(SUBSTR(sypr.name,8,2)) AS rt
|
||||
FROM system_profiles sypr
|
||||
,user_profiles uspr
|
||||
WHERE uspr.sypr_id = sypr.sypr_id
|
||||
AND uspr.syus_id = caco_utilities.get_syus_id
|
||||
AND LOWER(sypr.name) LIKE 'report-%'
|
||||
ORDER BY SUBSTR(sypr.name,8,2) DESC ) LOOP
|
||||
--
|
||||
l_url := l_url || '?id=forecaster'||i.rt||'&passwd=qwe123'||i.rt||'&submit=Sign In';
|
||||
EXIT;
|
||||
--
|
||||
END LOOP;
|
||||
--
|
||||
END IF;
|
||||
--
|
||||
htp.p('<IFRAME id="myiframe" SRC="'||l_url||'" TITLE="Reporting" WIDTH=100% HEIGHT=100% FRAMEBORDER=0></IFRAME>');
|
||||
--
|
||||
END IF;
|
||||
--
|
||||
END reporting;
|
||||
--
|
||||
BEGIN
|
||||
--
|
||||
-- Package Initialization
|
||||
--
|
||||
NULL;
|
||||
--
|
||||
END amut_adhoc;
|
||||
/
|
||||
|
||||
Reference in New Issue
Block a user