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;
/