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

Data/BulkLoad/EFT/Nominations/plsql/amadw010$.bdy

@@ -0,0 +1,233 @@
+create or replace package body amadw010$ is
+   private_ModuleRef WSGOC.MODULE_REF;
+
+
+   procedure CreateStartupJavaScript;
+--------------------------------------------------------------------------------
+-- Name:        amadw010$.Startup
+--
+-- Description: This procedure is the entry point for the 'amadw010$'
+--              module.
+--
+-- Parameters:  None
+--
+--------------------------------------------------------------------------------
+   procedure Startup
+   is
+   begin
+      if not caco_security.security_check('amadw010$') then
+         return;
+      end if;
+
+      WSGL.RegisterURL('amadw010$.startup');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+      WSGL.StoreURLLink(0, WSGL.MsgGetText(21,WSGLM.CAP021_TOP_LEVEL));
+      amadw010$syco.startup(
+         Z_DIRECT_CALL => TRUE
+      );
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw010$.Startup');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amadw010$.firstpage
+--
+-- Description: This procedure creates the first page for the 'amadw010$'
+--              module.
+--
+-- Parameters:  Z_DIRECT_CALL
+
+--
+--------------------------------------------------------------------------------
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+) is
+   begin
+      if not caco_security.security_check('amadw010$') then
+         return;
+      end if;
+
+      WSGL.OpenPageHead('');
+      WSGL.METATag;
+      WSGL.ClosePageHead;
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      CreateStartupJavaScript;
+
+      WSGL.DefaultPageCaption('', 1);
+      htp.formOpen(curl => 'ActionItem', cattributes => 'NAME="SP$AIForm"');
+      WSGL.NavLinks(WSGL.MENU_LONG, WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT), 0, 'amadw010$.showabout', '_top', p_output_line=>FALSE);
+      WSGL.NavLinks;
+      htp.formClose;
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw010$.FirstPage');
+   end;
+
+
+--------------------------------------------------------------------------------
+-- Name:        amadw010$.showabout
+--
+-- Description: This procedure is used to display an 'About' page for the
+--		'amadw010$' module.
+--
+--------------------------------------------------------------------------------
+   procedure showabout is
+      l_usr  varchar2(255) := null;
+   begin
+      if not caco_security.security_check('amadw010$') then
+         return;
+      end if;
+      l_usr := caco_security.get_user;
+
+      WSGL.RegisterURL('amadw010$.showabout');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+
+      WSGL.OpenPageHead(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+      WSGL.METATag;
+      TemplateHeader(TRUE,2);
+      WSGL.ClosePageHead;
+
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      htp.p(caco_system.menu);
+
+      WSGL.DefaultPageCaption(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+
+      htp.para;
+      htp.p('
+$Revision: 1.1 $');
+      htp.para;
+
+      htp.para;
+
+      htp.p(WSGL.MsgGetText(108,WSGLM.DSP108_GENERATED_BY, 'PL/SQL Web Generator', '10.1.2.6.18'));
+      htp.para;
+
+      WSGL.Info(FALSE, 'Access Manager Framework', 'AMADW010', l_usr);
+
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw010$.ShowAbout');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amadw010$.TemplateHeader
+--
+-- Description:
+--
+--------------------------------------------------------------------------------
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number) is
+   begin
+      if not caco_security.security_check('amadw010$') then
+         return;
+      end if;
+
+      if Z_TEMPLATE_ID = 1 then
+         -- Template defined in \\loordv01\framework\css2\css_content.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=content" >
+');
+      elsif Z_TEMPLATE_ID = 2 then
+         -- Template defined in \\loordv01\framework\css2\css_about.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=about" >
+');
+      elsif Z_TEMPLATE_ID = 3 then
+         -- Template defined in \\soas001\framework\css\css_query.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=query" >
+');
+      elsif Z_TEMPLATE_ID = 4 then
+         -- Template defined in \\soas001\framework\css\css_view.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=view" >
+');
+      elsif Z_TEMPLATE_ID = 5 then
+         -- Template defined in \\soas001\framework\css\css_insert.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=insert" >
+');
+      elsif Z_TEMPLATE_ID = 6 then
+         -- Template defined in \\soas001\framework\css\css_recordlist.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=recordlist" >
+');
+      elsif Z_TEMPLATE_ID = 7 then
+         -- Template defined in \\soas001\framework\css\css_lov.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=lov" >
+');
+      elsif Z_TEMPLATE_ID = 8 then
+         -- Template defined in \\soas001\framework\css\css_text.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=text" >
+');
+      end if;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw010$.TemplateHeader');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amadw010$.GetRef
+--
+-- Description: Returns a handle to the display data for the
+--	             'amadw010$' module.
+--              If the display object does not exist then it creates it first.
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+
+   function GetRef return WSGOC.MODULE_REF
+   is
+   begin
+      if ( WSGOC.Is_Null(private_ModuleRef)) then
+         private_ModuleRef := WSGOC.Module
+            ( pShortName           => 'amadw010$'
+            , pFirstTitle          => ''
+            );
+      end if;
+      return private_ModuleRef;
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw010$.GetRef');
+         raise;
+   end;
+
+
+
+--------------------------------------------------------------------------------
+-- Name:        amadw010$.CreateStartupJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateStartupJavaScript is
+   begin
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Startup";');
+      htp.p(WSGJSL.CloseScript);
+   end;
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amadw010$.spc

@@ -0,0 +1,15 @@
+create or replace package amadw010$ is
+
+   procedure Startup
+;
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+);
+   procedure ShowAbout;
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number);
+   function GetRef return WSGOC.MODULE_REF;
+
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amadw010$js$syco.bdy

@@ -0,0 +1,106 @@
+create or replace package body amadw010$js$syco is
+
+
+--------------------------------------------------------------------------------
+-- Name:        amadw010$js$syco.CreateViewJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  LOV_FRAME in varchar2) is
+   begin
+      if not caco_security.security_check('amadw010$syco') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var index = 0;');
+      htp.p( 'var DataChangeErrors = false;' );
+      htp.p( 'var DataChange = false;' );
+
+
+      htp.p( 'var P_3 = new Array();' );
+
+      htp.p(WSGJSL.RtnCheckModified);
+      htp.p(WSGJSL.RtnRevertForm);
+
+
+   htp.p('
+function ResetRadios( form, num_rows )
+{
+   return;
+};
+');
+
+      htp.p(WSGJSL.OpenEvent('VALUE','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('SYCO','Validate'));htp.p('var index = 0;');
+htp.p('
+for (index = 0; index < ctl.form.P_VALUE.length; index++)
+{');
+htp.p('   if (!(ctl.form.z_modified[index].value == "Y")) { continue;};');
+
+htp.p('
+}');
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('SYCO','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFU','OnClick'));
+      htp.p('   if (!SYCO_Validate(ctl)) { return false; }');
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFD','OnClick'));
+      htp.p(WSGJSL.VerifyDelete(WSGL.MsgGetText(118, WSGLM.DSP118_CONFIRM_DELETE)));
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFR','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'#Maintain System Configuration#1111#',
+                             VF_BODY_ATTRIBUTES, 'amadw010$js$syco.CreateViewJavaScript');
+   end;
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amadw010$js$syco.spc

@@ -0,0 +1,12 @@
+create or replace package amadw010$js$syco is
+
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  LOV_FRAME in varchar2);
+
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amadw010$syco.spc

@@ -0,0 +1,61 @@
+create or replace package amadw010$syco is
+
+
+   CURR_VAL   CG$SYSTEM_CONFIGURATION.CG$ROW_TYPE;
+
+
+   procedure Startup(
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null,
+             Z_FORM in varchar2 default null);
+   procedure QueryView(
+             K_SYCO_ID in varchar2 default null,
+             Z_EXECUTE_QUERY in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_START in varchar2 default '1',
+             Z_ACTION in varchar2 default null,
+             Z_CHK in varchar2 default null);
+   function QueryHits return number;
+
+   procedure ActionView(
+             P_SYCO_ID in owa_text.vc_arr,
+             P_VALUE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_PARAMETER in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_DESCRIPTION in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_VALUE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_SYCO_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_PARAMETER in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             z_modified in owa_text.vc_arr,
+             Z_ACTION in varchar2 default null,
+             Z_START  in varchar2 default '1',
+             Z_CHK in varchar2 default null );
+   procedure QueryViewByKey(
+             P_SYCO_ID in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure LoadCache
+             ( Z_CURR_DEPTH       in number
+             , Z_MAX_DEPTH        in number
+             , Z_OWN_ROW_VALUES   in boolean             default false
+             , Z_CONTEXT_FOR      in WSGOC.COMPONENT_REF default null
+             , Z_BRANCH           in WSGOC.BRANCH_REF    default null
+             );
+   function RestoreState
+             ( Z_CURR_DEPTH          in number
+             , Z_MAX_DEPTH           in number
+             , Z_RESTORE_OWN_ROW     in boolean default true
+             )  return boolean;
+   procedure SaveState;
+   function  GetRef return WSGOC.COMPONENT_REF;
+
+PROCEDURE Audit_syco;
+
+
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amadw015$.bdy

@@ -0,0 +1,230 @@
+create or replace package body amadw015$ is
+   private_ModuleRef WSGOC.MODULE_REF;
+
+
+   procedure CreateStartupJavaScript;
+--------------------------------------------------------------------------------
+-- Name:        amadw015$.Startup
+--
+-- Description: This procedure is the entry point for the 'amadw015$'
+--              module.
+--
+-- Parameters:  None
+--
+--------------------------------------------------------------------------------
+   procedure Startup
+   is
+   begin
+      if not caco_security.security_check('amadw015$') then
+         return;
+      end if;
+
+      WSGL.RegisterURL('amadw015$.startup');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+      WSGL.StoreURLLink(0, WSGL.MsgGetText(21,WSGLM.CAP021_TOP_LEVEL));
+      amadw015$syco.startup(
+         Z_DIRECT_CALL => TRUE
+      );
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw015$.Startup');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amadw015$.firstpage
+--
+-- Description: This procedure creates the first page for the 'amadw015$'
+--              module.
+--
+-- Parameters:  Z_DIRECT_CALL
+
+--
+--------------------------------------------------------------------------------
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+) is
+   begin
+      if not caco_security.security_check('amadw015$') then
+         return;
+      end if;
+
+      WSGL.OpenPageHead('');
+      WSGL.METATag;
+      WSGL.ClosePageHead;
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      CreateStartupJavaScript;
+
+      WSGL.DefaultPageCaption('', 1);
+      htp.formOpen(curl => 'ActionItem', cattributes => 'NAME="SP$AIForm"');
+      WSGL.NavLinks(WSGL.MENU_LONG, WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT), 0, 'amadw015$.showabout', '_top', p_output_line=>FALSE);
+      WSGL.NavLinks;
+      htp.formClose;
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw015$.FirstPage');
+   end;
+
+
+--------------------------------------------------------------------------------
+-- Name:        amadw015$.showabout
+--
+-- Description: This procedure is used to display an 'About' page for the
+--		'amadw015$' module.
+--
+--------------------------------------------------------------------------------
+   procedure showabout is
+      l_usr  varchar2(255) := null;
+   begin
+      if not caco_security.security_check('amadw015$') then
+         return;
+      end if;
+      l_usr := caco_security.get_user;
+
+      WSGL.RegisterURL('amadw015$.showabout');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+
+      WSGL.OpenPageHead(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+      WSGL.METATag;
+      TemplateHeader(TRUE,2);
+      WSGL.ClosePageHead;
+
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      htp.p(caco_system.menu);
+
+      WSGL.DefaultPageCaption(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+
+      htp.para;
+      htp.p('
+$Revision: 1.2 $');
+      htp.para;
+
+      htp.para;
+
+      htp.p(WSGL.MsgGetText(108,WSGLM.DSP108_GENERATED_BY, 'PL/SQL Web Generator', '10.1.2.6.18'));
+      htp.para;
+
+      WSGL.Info(FALSE, 'Access Manager Framework', 'AMADW015', l_usr);
+
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw015$.ShowAbout');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amadw015$.TemplateHeader
+--
+-- Description:
+--
+--------------------------------------------------------------------------------
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number) is
+   begin
+      if not caco_security.security_check('amadw015$') then
+         return;
+      end if;
+
+      if Z_TEMPLATE_ID = 1 then
+         -- Template defined in \\loordv01\framework\css2\css_content.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=content" >
+');
+      elsif Z_TEMPLATE_ID = 2 then
+         -- Template defined in \\loordv01\framework\css2\css_about.htm
+         htp.p('<title></title> <link rel="stylesheet" href="wwv_flow_file_mgr.get_file?p_security_group_id=11019802792885519&p_fname=common.css" type="text/css" /> <script src="/i/javascript/apex_ns_3_1.js" type="text/javascript"></script> <script src="/i/javascript/apex_3_1.js" type="text/javascript"></script> <script src="/i/javascript/apex_get_3_1.js" type="text/javascript"></script> <script src="/i/javascript/apex_builder.js" type="text/javascript"></script> <script type="text/javascript"> <!-- /*Global JS Variables*/ var htmldb_Img_Dir = "/i/"; //--> </script> <link rel="stylesheet" href="/i/css/apex_3_1.css" type="text/css" /> <!--[if IE]><link rel="stylesheet" href="/i/css/apex_ie_3_1.css" type="text/css" /><![endif]--> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252" />');
+      elsif Z_TEMPLATE_ID = 3 then
+         -- Template defined in \\loordv01\framework\css\css_query.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=query" >
+');
+      elsif Z_TEMPLATE_ID = 4 then
+         -- Template defined in \\loordv01\framework\css\css_view.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=view" >
+');
+      elsif Z_TEMPLATE_ID = 5 then
+         -- Template defined in \\loordv01\framework\css\css_insert.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=insert" >
+');
+      elsif Z_TEMPLATE_ID = 6 then
+         -- Template defined in \\loordv01\framework\css\css_recordlist.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=recordlist" >
+');
+      elsif Z_TEMPLATE_ID = 7 then
+         -- Template defined in \\loordv01\framework\css\css_lov.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=lov" >
+');
+      elsif Z_TEMPLATE_ID = 8 then
+         -- Template defined in \\loordv01\framework\css\css_text.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=text" >
+');
+      end if;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw015$.TemplateHeader');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amadw015$.GetRef
+--
+-- Description: Returns a handle to the display data for the
+--	             'amadw015$' module.
+--              If the display object does not exist then it creates it first.
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+
+   function GetRef return WSGOC.MODULE_REF
+   is
+   begin
+      if ( WSGOC.Is_Null(private_ModuleRef)) then
+         private_ModuleRef := WSGOC.Module
+            ( pShortName           => 'amadw015$'
+            , pFirstTitle          => ''
+            );
+      end if;
+      return private_ModuleRef;
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw015$.GetRef');
+         raise;
+   end;
+
+
+
+--------------------------------------------------------------------------------
+-- Name:        amadw015$.CreateStartupJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateStartupJavaScript is
+   begin
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Startup";');
+      htp.p(WSGJSL.CloseScript);
+   end;
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amadw015$.spc

@@ -0,0 +1,14 @@
+create or replace package amadw015$ is
+
+   procedure Startup
+;
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+);
+   procedure ShowAbout;
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number);
+   function GetRef return WSGOC.MODULE_REF;
+
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amadw015$js$syco.bdy

@@ -0,0 +1,88 @@
+create or replace package body amadw015$js$syco is
+
+
+--------------------------------------------------------------------------------
+-- Name:        amadw015$js$syco.CreateViewJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  LOV_FRAME in varchar2) is
+   begin
+      if not caco_security.security_check('amadw015$syco') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var index = 0;');
+      htp.p( 'var DataChangeErrors = false;' );
+      htp.p( 'var DataChange = false;' );
+
+
+      htp.p( 'var P_3 = new Array();' );
+
+      htp.p(WSGJSL.RtnCheckModified);
+      htp.p(WSGJSL.RtnRevertForm);
+
+
+   htp.p('
+function ResetRadios( form, num_rows )
+{
+   return;
+};
+');
+
+      htp.p(WSGJSL.OpenEvent('SYCO','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFU','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFD','OnClick'));
+      htp.p(WSGJSL.VerifyDelete(WSGL.MsgGetText(118, WSGLM.DSP118_CONFIRM_DELETE)));
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFR','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'#Maintain System Configuration#1111#',
+                             VF_BODY_ATTRIBUTES, 'amadw015$js$syco.CreateViewJavaScript');
+   end;
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amadw015$js$syco.spc

@@ -0,0 +1,11 @@
+create or replace package amadw015$js$syco is
+
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  LOV_FRAME in varchar2);
+
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amadw015$syco.spc

@@ -0,0 +1,60 @@
+create or replace package amadw015$syco is
+
+
+   CURR_VAL   SYSTEM_CONFIGURATION%rowtype;
+
+
+   procedure Startup(
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null,
+             Z_FORM in varchar2 default null);
+   procedure QueryView(
+             K_SYCO_ID in varchar2 default null,
+             Z_EXECUTE_QUERY in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_START in varchar2 default '1',
+             Z_ACTION in varchar2 default null,
+             Z_CHK in varchar2 default null);
+   function QueryHits return number;
+
+   procedure ActionView(
+             P_SYCO_ID in owa_text.vc_arr,
+             O_PARAMETER in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_DESCRIPTION in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_VALUE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_SYCO_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_PARAMETER in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_VALUE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             z_modified in owa_text.vc_arr,
+             Z_ACTION in varchar2 default null,
+             Z_START  in varchar2 default '1',
+             Z_CHK in varchar2 default null );
+   procedure QueryViewByKey(
+             P_SYCO_ID in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure LoadCache
+             ( Z_CURR_DEPTH       in number
+             , Z_MAX_DEPTH        in number
+             , Z_OWN_ROW_VALUES   in boolean             default false
+             , Z_CONTEXT_FOR      in WSGOC.COMPONENT_REF default null
+             , Z_BRANCH           in WSGOC.BRANCH_REF    default null
+             );
+   function RestoreState
+             ( Z_CURR_DEPTH          in number
+             , Z_MAX_DEPTH           in number
+             , Z_RESTORE_OWN_ROW     in boolean default true
+             )  return boolean;
+   procedure SaveState;
+   function  GetRef return WSGOC.COMPONENT_REF;
+
+PROCEDURE Audit_syco;
+
+
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amadw020$.bdy

@@ -0,0 +1,233 @@
+create or replace package body eft_nom.amadw020$ is
+   private_ModuleRef WSGOC.MODULE_REF;
+
+
+   procedure CreateStartupJavaScript;
+--------------------------------------------------------------------------------
+-- Name:        amadw020$.Startup
+--
+-- Description: This procedure is the entry point for the 'amadw020$'
+--              module.
+--
+-- Parameters:  None
+--
+--------------------------------------------------------------------------------
+   procedure Startup
+   is
+   begin
+      if not caco_security.security_check('amadw020$') then
+         return;
+      end if;
+
+      WSGL.RegisterURL('amadw020$.startup');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+      WSGL.StoreURLLink(0, WSGL.MsgGetText(21,WSGLM.CAP021_TOP_LEVEL));
+      amadw020$usjo.startup(
+         Z_DIRECT_CALL => TRUE
+      );
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw020$.Startup');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amadw020$.firstpage
+--
+-- Description: This procedure creates the first page for the 'amadw020$'
+--              module.
+--
+-- Parameters:  Z_DIRECT_CALL
+
+--
+--------------------------------------------------------------------------------
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+) is
+   begin
+      if not caco_security.security_check('amadw020$') then
+         return;
+      end if;
+
+      WSGL.OpenPageHead('');
+      WSGL.METATag;
+      WSGL.ClosePageHead;
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      CreateStartupJavaScript;
+
+      WSGL.DefaultPageCaption('', 1);
+      htp.formOpen(curl => 'ActionItem', cattributes => 'NAME="SP$AIForm"');
+      WSGL.NavLinks(WSGL.MENU_LONG, WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT), 0, 'amadw020$.showabout', '_top', p_output_line=>FALSE);
+      WSGL.NavLinks;
+      htp.formClose;
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw020$.FirstPage');
+   end;
+
+
+--------------------------------------------------------------------------------
+-- Name:        amadw020$.showabout
+--
+-- Description: This procedure is used to display an 'About' page for the
+--		'amadw020$' module.
+--
+--------------------------------------------------------------------------------
+   procedure showabout is
+      l_usr  varchar2(255) := null;
+   begin
+      if not caco_security.security_check('amadw020$') then
+         return;
+      end if;
+      l_usr := caco_security.get_user;
+
+      WSGL.RegisterURL('amadw020$.showabout');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+
+      WSGL.OpenPageHead(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+      WSGL.METATag;
+      TemplateHeader(TRUE,2);
+      WSGL.ClosePageHead;
+
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      htp.p(caco_system.menu);
+
+      WSGL.DefaultPageCaption(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+
+      htp.para;
+      htp.p('
+$Revision: $');
+      htp.para;
+
+      htp.para;
+
+      htp.p(WSGL.MsgGetText(108,WSGLM.DSP108_GENERATED_BY, 'PL/SQL Web Generator', '10.1.2.6.18'));
+      htp.para;
+
+      WSGL.Info(FALSE, 'Access Manager Framework', 'AMADW020', l_usr);
+
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw020$.ShowAbout');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amadw020$.TemplateHeader
+--
+-- Description:
+--
+--------------------------------------------------------------------------------
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number) is
+   begin
+      if not caco_security.security_check('amadw020$') then
+         return;
+      end if;
+
+      if Z_TEMPLATE_ID = 1 then
+         -- Template defined in \\soas001\framework\css\css_content.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=content" >
+');
+      elsif Z_TEMPLATE_ID = 2 then
+         -- Template defined in \\soas001\framework\css\css_about.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=about" >
+');
+      elsif Z_TEMPLATE_ID = 3 then
+         -- Template defined in \\soas001\framework\css\css_query.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=query" >
+');
+      elsif Z_TEMPLATE_ID = 4 then
+         -- Template defined in \\soas001\framework\css\css_view.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=view" >
+');
+      elsif Z_TEMPLATE_ID = 5 then
+         -- Template defined in \\soas001\framework\css\css_insert.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=insert" >
+');
+      elsif Z_TEMPLATE_ID = 6 then
+         -- Template defined in \\soas001\framework\css\css_recordlist.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=recordlist" >
+');
+      elsif Z_TEMPLATE_ID = 7 then
+         -- Template defined in \\soas001\framework\css\css_lov.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=lov" >
+');
+      elsif Z_TEMPLATE_ID = 8 then
+         -- Template defined in \\soas001\framework\css\css_text.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=text" >
+');
+      end if;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw020$.TemplateHeader');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amadw020$.GetRef
+--
+-- Description: Returns a handle to the display data for the
+--	             'amadw020$' module.
+--              If the display object does not exist then it creates it first.
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+
+   function GetRef return WSGOC.MODULE_REF
+   is
+   begin
+      if ( WSGOC.Is_Null(private_ModuleRef)) then
+         private_ModuleRef := WSGOC.Module
+            ( pShortName           => 'amadw020$'
+            , pFirstTitle          => ''
+            );
+      end if;
+      return private_ModuleRef;
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw020$.GetRef');
+         raise;
+   end;
+
+
+
+--------------------------------------------------------------------------------
+-- Name:        amadw020$.CreateStartupJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateStartupJavaScript is
+   begin
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Startup";');
+      htp.p(WSGJSL.CloseScript);
+   end;
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amadw020$.spc

@@ -0,0 +1,15 @@
+create or replace package eft_nom.amadw020$ is
+
+   procedure Startup
+;
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+);
+   procedure ShowAbout;
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number);
+   function GetRef return WSGOC.MODULE_REF;
+
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amadw020$js$usjo.bdy

@@ -0,0 +1,99 @@
+create or replace package body eft_nom.amadw020$js$usjo is
+
+
+--------------------------------------------------------------------------------
+-- Name:        amadw020$js$usjo.CreateViewJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  LOV_FRAME in varchar2) is
+   begin
+      if not caco_security.security_check('amadw020$usjo') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var index = 0;');
+      htp.p( 'var DataChangeErrors = false;' );
+      htp.p( 'var DataChange = false;' );
+
+
+      htp.p( 'var P_0 = new Array();' );
+
+      htp.p(WSGJSL.RtnCheckModified);
+      htp.p(WSGJSL.RtnRevertForm);
+
+      WSGJSL.Output_Invoke_CAL_JS ('amadw020$usjo', 'scrollbars=no,resizable=no,width=320,height=350');
+
+
+   amadw020$usjo.InitialiseDomain('UI_RUN_NOW');
+
+   htp.p('
+function ResetRadios( form, num_rows )
+{
+   return;
+};
+');
+
+      htp.p(WSGJSL.OpenEvent('UI_RUN_NOW','OnClick'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('USJO','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFU','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFD','OnClick'));
+      htp.p(WSGJSL.VerifyDelete(WSGL.MsgGetText(118, WSGLM.DSP118_CONFIRM_DELETE)));
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFR','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'User Jobs',
+                             VF_BODY_ATTRIBUTES, 'amadw020$js$usjo.CreateViewJavaScript');
+   end;
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amadw020$js$usjo.spc

@@ -0,0 +1,12 @@
+create or replace package eft_nom.amadw020$js$usjo is
+
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  LOV_FRAME in varchar2);
+
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amadw020$usjo.spc

@@ -0,0 +1,100 @@
+create or replace package eft_nom.amadw020$usjo is
+
+   type NBT_REC is record
+      ( UI_WHAT             varchar2(32760)
+      , UI_TOTAL_TIME       number
+      , UI_LAST_DATE        date
+      , UI_THIS_DATE        date
+      , UI_NEXT_DATE        date
+      , UI_BROKEN           varchar2(32760)
+      , UI_RUN_NOW          varchar2(32760)
+      );
+
+   NBT_VAL    NBT_REC;
+   CURR_VAL   CG$GTT_TEMP_DATA.CG$ROW_TYPE;
+
+
+   procedure Startup(
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null,
+             Z_FORM in varchar2 default null);
+   procedure QueryView(
+             K_GTTD_ID in varchar2 default null,
+             Z_EXECUTE_QUERY in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_START in varchar2 default '1',
+             Z_ACTION in varchar2 default null,
+             Z_CHK in varchar2 default null);
+   function QueryHits return number;
+
+   procedure ActionView(
+             P_GTTD_ID in owa_text.vc_arr,
+             P_UI_RUN_NOW in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_GTTD_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_DUMMY_COLUMN in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_UI_WHAT in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_UI_LAST_DATE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_UI_THIS_DATE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_UI_NEXT_DATE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_UI_BROKEN in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             z_modified in owa_text.vc_arr,
+             z_delete   in owa_text.vc_arr,
+             Z_ACTION in varchar2 default null,
+             Z_START  in varchar2 default '1',
+             Z_CHK in varchar2 default null );
+   procedure ActionDelete(
+             P_GTTD_ID in varchar2 default null,
+             O_DUMMY_COLUMN in varchar2 default null,
+             Z_ACTION in varchar2 default null,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null,
+             z_success in out boolean);
+   procedure QueryViewByKey(
+             P_GTTD_ID in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure LoadCache
+             ( Z_CURR_DEPTH       in number
+             , Z_MAX_DEPTH        in number
+             , Z_OWN_ROW_VALUES   in boolean             default false
+             , Z_CONTEXT_FOR      in WSGOC.COMPONENT_REF default null
+             , Z_BRANCH           in WSGOC.BRANCH_REF    default null
+             );
+   function RestoreState
+             ( Z_CURR_DEPTH          in number
+             , Z_MAX_DEPTH           in number
+             , Z_RESTORE_OWN_ROW     in boolean default true
+             )  return boolean;
+   procedure SaveState;
+   function  GetRef return WSGOC.COMPONENT_REF;
+
+
+   procedure InitialiseDomain(P_ALIAS in varchar2);
+
+   procedure calendar
+     (
+      Z_FIELD_NAME   in varchar2,
+      Z_CALLER_URL   in varchar2,
+      Z_FIELD_VALUE  in varchar2 default null,
+      Z_FIELD_FORMAT in varchar2 default null,
+      Z_FIELD_PROMPT in varchar2 default null
+     );
+
+   procedure format_cal_date
+     (
+      Z_FIELD_NAME   in Varchar2,
+      Z_FIELD_FORMAT in varchar2,
+      day            in varchar2,
+      month          in varchar2,
+      year           in varchar2
+     );
+
+   D_UI_RUN_NOW          WSGL.typDVRecord;
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amadw025$.bdy

@@ -0,0 +1,226 @@
+create or replace package body amadw025$ is
+   private_ModuleRef WSGOC.MODULE_REF;
+
+
+   procedure CreateStartupJavaScript;
+--------------------------------------------------------------------------------
+-- Name:        amadw025$.Startup
+--
+-- Description: This procedure is the entry point for the 'amadw025$'
+--              module.
+--
+-- Parameters:  None
+--
+--------------------------------------------------------------------------------
+   procedure Startup
+   is
+   begin
+      if not caco_security.security_check('amadw025$') then
+         return;
+      end if;
+
+      WSGL.RegisterURL('amadw025$.startup');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+      WSGL.StoreURLLink(0, WSGL.MsgGetText(21,WSGLM.CAP021_TOP_LEVEL));
+      amadw025$appa.startup(
+         Z_DIRECT_CALL => TRUE
+      );
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw025$.Startup');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amadw025$.firstpage
+--
+-- Description: This procedure creates the first page for the 'amadw025$'
+--              module.
+--
+-- Parameters:  Z_DIRECT_CALL
+
+--
+--------------------------------------------------------------------------------
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+) is
+   begin
+      if not caco_security.security_check('amadw025$') then
+         return;
+      end if;
+
+      WSGL.OpenPageHead('');
+      WSGL.METATag;
+      WSGL.ClosePageHead;
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      CreateStartupJavaScript;
+
+      WSGL.DefaultPageCaption('', 1);
+      htp.formOpen(curl => 'ActionItem', cattributes => 'NAME="SP$AIForm"');
+      WSGL.NavLinks(WSGL.MENU_LONG, WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT), 0, 'amadw025$.showabout', '_top', p_output_line=>FALSE);
+      WSGL.NavLinks;
+      htp.formClose;
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw025$.FirstPage');
+   end;
+
+
+--------------------------------------------------------------------------------
+-- Name:        amadw025$.showabout
+--
+-- Description: This procedure is used to display an 'About' page for the
+--		'amadw025$' module.
+--
+--------------------------------------------------------------------------------
+   procedure showabout is
+      l_usr  varchar2(255) := null;
+   begin
+      if not caco_security.security_check('amadw025$') then
+         return;
+      end if;
+      l_usr := caco_security.get_user;
+
+      WSGL.RegisterURL('amadw025$.showabout');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+
+      WSGL.OpenPageHead(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+      WSGL.METATag;
+      TemplateHeader(TRUE,2);
+      WSGL.ClosePageHead;
+
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      htp.p(caco_system.menu);
+
+      WSGL.DefaultPageCaption(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+
+
+      htp.para;
+
+      htp.p(WSGL.MsgGetText(108,WSGLM.DSP108_GENERATED_BY, 'PL/SQL Web Generator', '10.1.2.6.18'));
+      htp.para;
+
+      WSGL.Info(FALSE, 'Access Manager Framework', 'AMADW025', l_usr);
+
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw025$.ShowAbout');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amadw025$.TemplateHeader
+--
+-- Description:
+--
+--------------------------------------------------------------------------------
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number) is
+   begin
+      if not caco_security.security_check('amadw025$') then
+         return;
+      end if;
+
+      if Z_TEMPLATE_ID = 1 then
+         -- Template defined in \\loordv01\framework\css2\css_content.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=content" >
+');
+      elsif Z_TEMPLATE_ID = 2 then
+         -- Template defined in \\loordv01\framework\css2\css_about.htm
+         htp.p('<title></title> <link rel="stylesheet" href="wwv_flow_file_mgr.get_file?p_security_group_id=11019802792885519&p_fname=common.css" type="text/css" /> <script src="/i/javascript/apex_ns_3_1.js" type="text/javascript"></script> <script src="/i/javascript/apex_3_1.js" type="text/javascript"></script> <script src="/i/javascript/apex_get_3_1.js" type="text/javascript"></script> <script src="/i/javascript/apex_builder.js" type="text/javascript"></script> <script type="text/javascript"> <!-- /*Global JS Variables*/ var htmldb_Img_Dir = "/i/"; //--> </script> <link rel="stylesheet" href="/i/css/apex_3_1.css" type="text/css" /> <!--[if IE]><link rel="stylesheet" href="/i/css/apex_ie_3_1.css" type="text/css" /><![endif]--> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252" />');
+      elsif Z_TEMPLATE_ID = 3 then
+         -- Template defined in \\loordv01\framework\css2\css_query.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=query" >
+');
+      elsif Z_TEMPLATE_ID = 4 then
+         -- Template defined in \\loordv01\framework\css2\css_view.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=view" >
+');
+      elsif Z_TEMPLATE_ID = 5 then
+         -- Template defined in \\loordv01\framework\css2\css_insert.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=insert" >
+');
+      elsif Z_TEMPLATE_ID = 6 then
+         -- Template defined in \\loordv01\framework\css2\css_recordlist.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=recordlist" >
+');
+      elsif Z_TEMPLATE_ID = 7 then
+         -- Template defined in \\loordv01\framework\css2\css_lov.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=lov" >
+');
+      elsif Z_TEMPLATE_ID = 8 then
+         -- Template defined in \\loordv01\framework\css2\css_text.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=text" >
+');
+      end if;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw025$.TemplateHeader');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amadw025$.GetRef
+--
+-- Description: Returns a handle to the display data for the
+--	             'amadw025$' module.
+--              If the display object does not exist then it creates it first.
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+
+   function GetRef return WSGOC.MODULE_REF
+   is
+   begin
+      if ( WSGOC.Is_Null(private_ModuleRef)) then
+         private_ModuleRef := WSGOC.Module
+            ( pShortName           => 'amadw025$'
+            , pFirstTitle          => ''
+            );
+      end if;
+      return private_ModuleRef;
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amadw025$.GetRef');
+         raise;
+   end;
+
+
+
+--------------------------------------------------------------------------------
+-- Name:        amadw025$.CreateStartupJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateStartupJavaScript is
+   begin
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Startup";');
+      htp.p(WSGJSL.CloseScript);
+   end;
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amadw025$.spc

@@ -0,0 +1,14 @@
+create or replace package amadw025$ is
+
+   procedure Startup
+;
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+);
+   procedure ShowAbout;
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number);
+   function GetRef return WSGOC.MODULE_REF;
+
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amadw025$appa.spc

@@ -0,0 +1,60 @@
+create or replace package amadw025$appa is
+
+
+   CURR_VAL   CG$APPLICATION_PARAMETERS.CG$ROW_TYPE;
+
+
+   procedure Startup(
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null,
+             Z_FORM in varchar2 default null);
+   procedure QueryView(
+             K_APPA_ID in varchar2 default null,
+             Z_EXECUTE_QUERY in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_START in varchar2 default '1',
+             Z_ACTION in varchar2 default null,
+             Z_CHK in varchar2 default null);
+   function QueryHits return number;
+
+   procedure ActionView(
+             P_APPA_ID in owa_text.vc_arr,
+             P_VALUE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_PARAMETER in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_DESCRIPTION in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_VALUE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_APPA_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_PARAMETER in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             z_modified in owa_text.vc_arr,
+             Z_ACTION in varchar2 default null,
+             Z_START  in varchar2 default '1',
+             Z_CHK in varchar2 default null );
+   procedure QueryViewByKey(
+             P_APPA_ID in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure LoadCache
+             ( Z_CURR_DEPTH       in number
+             , Z_MAX_DEPTH        in number
+             , Z_OWN_ROW_VALUES   in boolean             default false
+             , Z_CONTEXT_FOR      in WSGOC.COMPONENT_REF default null
+             , Z_BRANCH           in WSGOC.BRANCH_REF    default null
+             );
+   function RestoreState
+             ( Z_CURR_DEPTH          in number
+             , Z_MAX_DEPTH           in number
+             , Z_RESTORE_OWN_ROW     in boolean default true
+             )  return boolean;
+   procedure SaveState;
+   function  GetRef return WSGOC.COMPONENT_REF;
+
+PROCEDURE Audit_appa;
+
+
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amadw025$js$appa.bdy

@@ -0,0 +1,105 @@
+create or replace package body amadw025$js$appa is
+
+
+--------------------------------------------------------------------------------
+-- Name:        amadw025$js$appa.CreateViewJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  LOV_FRAME in varchar2) is
+   begin
+      if not caco_security.security_check('amadw025$appa') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var index = 0;');
+      htp.p( 'var DataChangeErrors = false;' );
+      htp.p( 'var DataChange = false;' );
+
+
+      htp.p( 'var P_3 = new Array();' );
+
+      htp.p(WSGJSL.RtnCheckModified);
+      htp.p(WSGJSL.RtnRevertForm);
+
+
+   htp.p('
+function ResetRadios( form, num_rows )
+{
+   return;
+};
+');
+
+      htp.p(WSGJSL.OpenEvent('VALUE','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('APPA','Validate'));htp.p('var index = 0;');
+htp.p('
+for (index = 0; index < ctl.form.P_VALUE.length; index++)
+{');
+htp.p('   if (!(ctl.form.z_modified[index].value == "Y")) { continue;};');
+
+htp.p('
+}');
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('APPA','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFU','OnClick'));
+      htp.p('   if (!APPA_Validate(ctl)) { return false; }');
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFD','OnClick'));
+      htp.p(WSGJSL.VerifyDelete(WSGL.MsgGetText(118, WSGLM.DSP118_CONFIRM_DELETE)));
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFR','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'#Maintain Application Parameters#3968#',
+                             VF_BODY_ATTRIBUTES, 'amadw025$js$appa.CreateViewJavaScript');
+   end;
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amadw025$js$appa.spc

@@ -0,0 +1,11 @@
+create or replace package amadw025$js$appa is
+
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  LOV_FRAME in varchar2);
+
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfr_excel.spc

@@ -0,0 +1,73 @@
+CREATE OR REPLACE PACKAGE 
+/*
+ 2007 Advantica Ltd
+*/
+ amfr_excel IS
+  /**
+  --
+  -- EXCEL Routines
+  --
+  -- #version $Revision:  $
+  -- #author  $Author:    $
+  --
+  */
+  g_package_name CONSTANT VARCHAR2(30)  := 'amfr_excel';
+  g_header       CONSTANT VARCHAR2(160) := '$Header:   $';
+  g_revision     CONSTANT VARCHAR2(160) := '$Revision: $';
+  g_date_format  CONSTANT VARCHAR2(20) := nvl(cout_system_configuration.get_configuration_item('g_date_format')
+                                             ,'DD/MM/YYYY');  
+  --
+  g_spte_single spreadsheet_templates.NAME%TYPE := 'Single Day';
+  g_spte_smulti spreadsheet_templates.NAME%TYPE := 'Single-Multi Day';
+  /*
+  VSS Information not documented by PL/SQL Developer
+  $Header:   $
+  $Date:     $  Date and time of last checkin
+  $Modtime:  $  Date and time of last modification
+  $History:  $
+  */
+  --
+  -- Constants
+  --
+  gc_nomination CONSTANT VARCHAR2(20) := 'NOMINATION';
+  --
+  -- Procedureal Declaration
+  --
+  --
+  -- Convert x axis spreadsheet labels to numberic array indexes
+  --
+  FUNCTION convert_x ( p_x_axis IN VARCHAR2 )RETURN NUMBER;
+  --
+  -- Convert y axis spreadsheet labels to numberic array indexes
+  --
+  FUNCTION convert_y ( p_y_axis IN NUMBER ) RETURN NUMBER;
+  --
+  --
+  --
+  PROCEDURE get_template ( p_id   IN NUMBER
+                         , p_type IN VARCHAR2
+                         , p_nomi_conf_id IN NUMBER DEFAULT NULL
+                         , p_mode         IN VARCHAR2 DEFAULT 'DOWNLOAD'
+                         );
+  --
+  --
+  --
+  FUNCTION return_conf ( p_conf_id IN confirmations.conf_id%TYPE ) RETURN BLOB;
+  --
+  FUNCTION j_readworkbook(p_docu_id IN VARCHAR2) RETURN VARCHAR2;
+  --
+  FUNCTION j_writeworkbook(p_spreadsheet_id IN VARCHAR2
+                          ,p_sheet_name     IN VARCHAR2) RETURN NUMBER;
+  --
+  PROCEDURE download ( p_conf_id IN confirmations.conf_id%TYPE );
+  PROCEDURE download ( p_nomi_id IN nominations.nomi_id%TYPE );
+  PROCEDURE download ( p_docu_id IN documents.docu_id%TYPE );
+  --
+  /**
+  -- Details about this module
+  -- %return A textual descrtiption of the version number and VSS header for this package
+  */
+  FUNCTION about RETURN VARCHAR2;
+  --
+END  amfr_excel;
+/

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

@@ -0,0 +1,178 @@
+CREATE OR REPLACE PACKAGE BODY amfr_journal IS
+  --
+  g_ause_id audit_sessions.ause_id%TYPE;
+  --
+  -- Private
+  --
+  FUNCTION get_session RETURN sessions.client_id%TYPE IS
+    --
+    l_return sessions.client_id%TYPE;
+    --
+  BEGIN
+    --
+    BEGIN
+      --
+      IF caco_security.g_client_id IS NOT NULL THEN
+        --
+        l_return := caco_security.g_client_id;
+        --
+      ELSE
+        --
+        l_return := wsgl.getclientid;
+        --
+      END IF;
+      --
+    EXCEPTION
+      WHEN OTHERS THEN
+        l_return := NULL;
+    END;
+    --
+    RETURN l_return;
+    --
+  END get_session;
+  --
+  PROCEDURE log_session ( p_session_id IN     sessions.client_id%TYPE
+                        , p_ause_id       OUT audit_sessions.ause_id%TYPE
+                        ) IS
+    --
+    PRAGMA AUTONOMOUS_TRANSACTION;
+    --
+    l_ip_address sessions.ip_address%TYPE;
+    l_syus_id    system_users.syus_id%TYPE;
+    l_syus_name  audit_sessions.username%TYPE;
+    --
+  BEGIN
+    --
+    IF p_session_id IS NOT NULL THEN
+      --
+      BEGIN
+        --
+        SELECT ip_address
+              ,syus_id
+        INTO   l_ip_address
+              ,l_syus_id
+        FROM   sessions
+        WHERE  sessions.client_id = p_session_id;
+        --
+        l_syus_name := caco_utilities.get_syus_name(l_syus_id);
+        --
+      EXCEPTION
+        WHEN NO_DATA_FOUND THEN
+          l_ip_address := 'n/a';
+          l_syus_name  := 'UNKNOWN';
+      END;
+      --
+    ELSE
+      --
+      l_ip_address := 'n/a';
+      l_syus_name  := 'SYSTEM';
+      --
+    END IF;
+    --
+    INSERT INTO audit_sessions ( username
+                               , session_id
+                               , ip_address
+                               )
+    VALUES                     ( l_syus_name
+                               , NVL(p_session_id, 'SYSTEM')
+                               , l_ip_address
+                               )
+    RETURNING ause_id INTO p_ause_id;
+    --
+    COMMIT;
+    --
+  END log_session;
+  --
+  PROCEDURE init IS
+    --
+    l_session_id sessions.client_id%TYPE;
+    --
+  BEGIN
+    --
+    -- Check to see if we have already have an audit session, which we shouldn't have if we're initialising the package
+    --
+    IF g_ause_id IS NULL THEN
+      --
+      -- Check that there is a valid session ID, if not, we're a system process
+      --
+      l_session_id := get_session;
+      --
+      IF l_session_id IS NOT NULL THEN
+        --
+        -- Check for the existance of a session for this ID
+        --
+        FOR i IN ( SELECT ause.ause_id
+                   FROM   audit_sessions ause
+                   WHERE  ause.session_id = l_session_id
+--                   AND    ause.username   = caco_utilities.get_syus_name
+                   AND    ause.created_on BETWEEN SYSDATE -1 AND SYSDATE
+                   ORDER  BY ause.created_on desc) LOOP
+          --
+          g_ause_id := i.ause_id;
+          --
+          EXIT;
+          --
+        END LOOP;
+        --
+      END IF;
+      --
+      IF g_ause_id IS NULL THEN
+        --
+        log_session( l_session_id
+                   , g_ause_id );
+        --
+      END IF;
+      --
+    END IF;
+    --
+  END init;
+  --
+  -- Public
+  --
+  PROCEDURE log_transaction ( p_operation_type   audit_transactions.operation_type%TYPE
+                            , p_operation_target audit_transactions.operation_target%TYPE
+                            , p_old_values       name_value_tab
+                            , p_new_values       name_value_tab) IS
+    --
+    -- Was going to be an autonomous transaction but only want to record successful transactions.
+    --
+  BEGIN
+    --
+    caco_debug.putline('AMFR_JOURNAL Session: '||g_ause_id|| ' Transaction on: '||p_operation_target);
+    --
+    INSERT INTO audit_transactions ( autr_id
+                                   , ause_ause_id
+                                   , operation_type
+                                   , operation_target
+                                   , old_values
+                                   , new_values
+                                   , created_on
+                                   , created_by
+                                   )
+    VALUES                         ( autr_seq.NEXTVAL
+                                   , g_ause_id
+                                   , p_operation_type
+                                   , SUBSTR(p_operation_target,1 ,30)
+                                   , p_old_values
+                                   , p_new_values
+                                   , SYSDATE
+                                   , caco_utilities.get_syus_id);
+  EXCEPTION
+    WHEN others THEN
+      cout_err.report_and_go( sqlcode, sqlerrm(sqlcode) );
+    --
+  END log_transaction;
+  --
+  FUNCTION about RETURN VARCHAR2 IS
+  BEGIN
+    RETURN(g_revision||CHR(10)||g_header);
+  END about;
+  --
+BEGIN
+  /**
+  -- Initialization
+  */
+  init;
+  --
+END amfr_journal;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfr_journal.spc

@@ -0,0 +1,46 @@
+CREATE OR REPLACE PACKAGE amfr_journal IS
+  /**
+  -- Package to handle journalling of flexibly implemented business logic
+  -- #version $Revision: $
+  -- #author  $Author:   $
+  --
+  */
+  g_package_name CONSTANT VARCHAR2(30)  := 'amfl_journal';
+  g_header       CONSTANT VARCHAR2(160) := '$Header:   $';
+  g_revision     CONSTANT VARCHAR2(160) := '$Revision: $';
+  /*
+  VSS Information not documented by PL/SQL Developer
+  $Header:  $
+  $Date:    $  Date and time of last checkin
+  $Modtime: $  Date and time of last modification
+  $History:  $
+  */
+  /**
+  -- Global that may be used a a null value to pass into log_transaction
+  */
+  g_name_value_tab name_value_tab;
+  /**
+  -- Log details of a transaction in the audit table
+  -- #param p_operation_type The type of operation, either:
+  --     %value INSERT
+  --     %value UPDATE
+  --     %value DELETE
+  --     %value LOGON
+  --     %value LOGOFF
+  --     %value EXECUTE
+  -- #param p_operation_target The target of the operation
+  -- #param p_old_values Optional. A name value array containing details of the old values, before the action took place
+  -- #param p_new_values Optional. A name value array containing details of the new values, after the action took place
+  */
+  PROCEDURE log_transaction ( p_operation_type   audit_transactions.operation_type%TYPE
+                            , p_operation_target audit_transactions.operation_target%TYPE
+                            , p_old_values       name_value_tab
+                            , p_new_values       name_value_tab);
+  /**
+  -- Details about this module
+  -- %return A textual descrtiption of the version number and VSS header for this package
+  */
+  FUNCTION about RETURN VARCHAR2;
+  --
+END amfr_journal;
+/

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

@@ -0,0 +1,283 @@
+CREATE OR REPLACE PACKAGE BODY amfr_message IS
+  --
+  --
+  --
+  g_suca_id subscription_categories.suca_id%TYPE := efno_msgsubs.get_suca_id( p_suca_group => 'Notification'
+                                                                            , p_suca_name  => 'Commercial');
+  --
+  PROCEDURE send_messages ( p_bubm_id bulletin_board_messages.bubm_id%TYPE
+                          , p_syus_id system_users.syus_id%TYPE
+                          ) IS
+    --
+    --
+  BEGIN
+    --
+    FOR bubm_rec IN ( SELECT bubm.subject
+                            ,bubm.message_text
+                      FROM   bulletin_board_messages bubm
+                      WHERE  bubm.bubm_id = p_bubm_id
+                    ) LOOP
+      --
+      -- Should only loop once
+      --
+      efno_msgsubs.send_messages( p_syus_id          => p_syus_id
+                                , p_suca_id          => g_suca_id
+                                , p_email_subject_en => bubm_rec.subject
+                                , p_email_content_en => bubm_rec.message_text
+                                , p_sms_content_en   => bubm_rec.subject
+                                );
+      --
+    END LOOP;
+    --
+  END send_messages;
+  --
+  FUNCTION check_unread_messages ( p_syus_id IN system_users.syus_id%TYPE ) RETURN BOOLEAN IS
+    --
+    lb_found BOOLEAN;
+    --
+  BEGIN
+    --
+    -- Default indicator to not found
+    --
+    lb_found := FALSE;
+    --
+    -- Loop around all active unread messages for the current user
+    --
+    FOR cur_mere_rec IN (SELECT NULL
+                         FROM   message_recipient        mere
+                               ,bulletin_board_messages  bbme
+                         WHERE  mere.bubm_id = bbme.bubm_id
+                         AND    mere.syus_id = p_syus_id
+                         AND    mere.message_read = 'N'
+                         AND    SYSDATE BETWEEN bbme.active_from AND bbme.active_to) LOOP
+      --
+      -- We've found a record, set indicator to true
+      --
+      lb_found := TRUE;
+      --
+      EXIT;
+      --
+    END LOOP;
+    --
+    -- Return the indicator
+    --
+    RETURN lb_found;
+    --
+  END check_unread_messages;
+  --
+  PROCEDURE mark_message_as_read ( p_bubm_id IN bulletin_board_messages.bubm_id%TYPE
+                                 , p_syus_id IN system_users.syus_id%TYPE ) IS
+    --
+    --
+  BEGIN
+    --
+    --
+    --
+    UPDATE message_recipient
+    SET    message_recipient.message_read = 'Y'
+    WHERE  message_recipient.bubm_id      = p_bubm_id
+    AND    message_recipient.syus_id      = p_syus_id
+    AND    message_recipient.message_read = 'N'
+    AND    p_syus_id                      = caco_utilities.get_syus_id
+    ;
+    --
+  END mark_message_as_read;
+  --
+  PROCEDURE create_message ( p_bubm_id IN bulletin_board_messages.bubm_id%TYPE
+                           , p_cust_id IN customers.cust_id%TYPE
+                           , p_sypr_id IN system_profiles.sypr_id%TYPE
+                           , p_syus_id IN system_users.syus_id%TYPE
+                           , p_email_sms IN VARCHAR2 DEFAULT 'Y' ) IS
+    --
+    --
+  BEGIN
+    --
+    --
+    --
+    FOR i IN ( SELECT DISTINCT syus.syus_id
+               FROM   system_users            syus
+                    , user_profiles           uspr
+                    , intermediary_users      inus
+                    , customer_intermediaries cuin
+               WHERE  syus.syus_id = uspr.syus_id
+               AND  ( uspr.sypr_id = p_sypr_id
+               OR     p_sypr_id    IS NULL )
+               AND    syus.syus_id = inus.syus_id
+               AND    inus.inte_id = cuin.inte_id
+               AND  ( cuin.cust_id = p_cust_id
+               OR     p_cust_id IS NULL )
+               AND  ( syus.syus_id = p_syus_id
+               OR     p_syus_id IS NULL )
+               AND  syus.syus_id <> caco_utilities.get_system_user
+               AND  syus.period_start < SYSDATE
+               AND  ( syus.period_end > SYSDATE
+               OR     syus.period_end IS NULL)
+               AND  syus.user_locked = 'N' 
+               AND  inus.inte_id <> caco_utilities.get_system_intermediary
+               AND  cuin.cust_id <> caco_utilities.get_system_customer
+               AND  cuin.cust_id IN (SELECT cust_id
+                                     FROM   cust_by_cuty_v)
+             ) LOOP
+      --
+      -- Inser the message recipient records for the supplied parameters
+      --
+      INSERT INTO message_recipient ( bubm_id
+                                    , syus_id
+                                    , message_read
+                                    )
+      VALUES                        ( p_bubm_id
+                                    , i.syus_id
+                                    , 'N'
+                                    );
+      --
+      -- Now send via email or SMS
+      --
+      IF p_email_sms = 'Y' THEN
+        send_messages ( p_bubm_id => p_bubm_id
+                      , p_syus_id => i.syus_id
+                      );
+      END IF;              
+      --
+    END LOOP;
+    --
+  END create_message;
+  --
+  PROCEDURE create_message ( p_subject     IN bulletin_board_messages.subject%TYPE
+                           , p_message     IN bulletin_board_messages.message_text%TYPE
+                           , p_cust_id     IN customers.cust_id%TYPE
+                           , p_sypr_id     IN system_profiles.sypr_id%TYPE
+                           , p_syus_id     IN system_users.syus_id%TYPE
+                           , p_active_from IN bulletin_board_messages.active_from%TYPE DEFAULT TRUNC(SYSDATE)
+                           , p_active_to   IN bulletin_board_messages.active_to%TYPE   DEFAULT TRUNC(SYSDATE) + 14
+                           , p_email_sms   IN VARCHAR2 DEFAULT 'Y' ) IS
+    --
+    bbme_row cg$bulletin_board_messages.cg$row_type;
+    bbme_ind cg$bulletin_board_messages.cg$ind_type;
+    --
+  BEGIN
+    --
+    -- Check parameters
+    --
+    IF   p_subject     IS NULL
+    OR   p_message     IS NULL
+    OR   p_active_from IS NULL
+    OR   p_active_to   IS NULL
+    OR ( p_cust_id     IS NULL
+    AND  p_sypr_id     IS NULL
+    AND  p_syus_id     IS NULL ) THEN
+      --
+      -- Mandatory parameter missing
+      --
+      caco_utilities.raise_exception_error(-20100);
+      --
+    ELSE
+      --
+      -- Parameters OK, continuing
+      --
+      bbme_row.sypr_id      := p_sypr_id;
+      bbme_row.cust_id      := p_cust_id;
+      bbme_row.active_from  := p_active_from;
+      bbme_row.active_to    := p_active_to;
+      bbme_row.subject      := p_subject;
+      bbme_row.message_text := p_message;
+      --
+      cg$bulletin_board_messages.ins(cg$rec => bbme_row
+                                    ,cg$ind => bbme_ind
+                                    ,do_ins => TRUE);
+      --
+      create_message ( p_bubm_id => bbme_row.bubm_id
+                     , p_cust_id => bbme_row.cust_id
+                     , p_sypr_id => bbme_row.sypr_id
+                     , p_syus_id => p_syus_id
+                     , p_email_sms => p_email_sms
+                     );
+      --
+    END IF;
+    --
+  END create_message;
+  --
+  PROCEDURE create_message ( p_subject     IN bulletin_board_messages.subject%TYPE
+                           , p_message     IN bulletin_board_messages.message_text%TYPE
+                           , p_cust_name   IN customers.name%TYPE
+                           , p_sypr_id     IN system_profiles.sypr_id%TYPE
+                           , p_syus_id     IN system_users.syus_id%TYPE
+                           , p_active_from IN bulletin_board_messages.active_from%TYPE DEFAULT TRUNC(SYSDATE)
+                           , p_active_to   IN bulletin_board_messages.active_to%TYPE DEFAULT TRUNC(SYSDATE) + 14 ) IS
+    --
+    l_cust_id customers.cust_id%TYPE := NULL;
+    lb_found  BOOLEAN := FALSE;
+    --
+  BEGIN
+    --
+    -- Check parameters
+    --
+    IF   p_subject     IS NULL
+    OR   p_message     IS NULL
+    OR   p_active_from IS NULL
+    OR   p_active_to   IS NULL
+    OR ( p_cust_name   IS NULL
+    AND  p_sypr_id     IS NULL
+    AND  p_syus_id     IS NULL ) THEN
+      --
+      -- Mandatory parameter missing
+      --
+      caco_utilities.raise_exception_error(-20100);
+      --
+    ELSE
+      --
+      -- Parameters OK, continuing
+      --
+      IF p_cust_name IS NOT NULL THEN
+        --
+        -- Check that the customer name is valid
+        --
+        FOR i IN (SELECT cust.cust_id
+                  FROM   customers cust
+                  WHERE  cust.name = p_cust_name ) LOOP
+          --
+          l_cust_id := i.cust_id;
+          lb_found  := TRUE;
+          --
+        END LOOP;
+        --
+        IF NOT lb_found THEN
+          --
+          -- Customer was not found
+          --
+          caco_utilities.raise_exception_error(-20508); -- This specified customer does not exist.
+          --
+        END IF;
+        --
+      END IF;
+      --
+      create_message( p_subject     => p_subject
+                    , p_message     => p_message
+                    , p_cust_id     => l_cust_id
+                    , p_sypr_id     => p_sypr_id
+                    , p_syus_id     => p_syus_id
+                    , p_active_from => p_active_from
+                    , p_active_to   => p_active_to );
+      --
+    END IF;
+    --
+  END create_message;
+  --
+  FUNCTION about RETURN VARCHAR2 IS
+    --
+    --
+  BEGIN
+    --
+    --
+    --
+    RETURN ( g_revision || CHR(10) || g_header );
+    --
+  END about;
+  --
+BEGIN
+  /**
+  -- Initialization
+  */
+  NULL;
+  --
+END amfr_message;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfr_message.spc

@@ -0,0 +1,85 @@
+CREATE OR REPLACE PACKAGE amfr_message IS
+  /**
+  -- Package to handle messaging within the Access Manager Framework
+  -- #version $Revision: $
+  -- #author  $Author:   $
+  --
+  */
+  g_package_name CONSTANT VARCHAR2(30)  := 'amfl_message';
+  g_header       CONSTANT VARCHAR2(160) := '$Header:   $';
+  g_revision     CONSTANT VARCHAR2(160) := '$Revision: $';
+  /*
+  VSS Information not documented by PL/SQL Developer
+  $Header:  $
+  $Date:    $  Date and time of last checkin
+  $Modtime: $  Date and time of last modification
+  $History:  $
+  */
+
+  /**
+  -- Check if the current user has unread messages
+  -- %return Boolean indicator, TRUE indicating there are unread messages, FALSE indicatingh no unread messages.
+  */
+  FUNCTION check_unread_messages ( p_syus_id IN system_users.syus_id%TYPE ) RETURN BOOLEAN;
+  /**
+  -- Mark the selected unread message as read
+  -- #param p_bubm_id The identifier of the message.
+  -- #param p_syus_id The user that the message was sent to.
+  */
+  PROCEDURE mark_message_as_read ( p_bubm_id IN bulletin_board_messages.bubm_id%TYPE
+                                 , p_syus_id IN system_users.syus_id%TYPE );
+  /**
+  -- Create message recipients for a specified bulletin board message
+  -- #param p_bubm_id The identifier of the message.
+  -- #param p_cust_id The customer that the message is to be sent to.
+  -- #param p_sypr_id The profile that the message is to be sent to.
+  -- #param p_syus_id The user that the message is to be sent to.
+  */
+  PROCEDURE create_message ( p_bubm_id IN bulletin_board_messages.bubm_id%TYPE
+                           , p_cust_id IN customers.cust_id%TYPE
+                           , p_sypr_id IN system_profiles.sypr_id%TYPE
+                           , p_syus_id IN system_users.syus_id%TYPE
+                           , p_email_sms IN VARCHAR2 DEFAULT 'Y' );
+  /**
+  -- Create a bulletin board message and the create recipients for the specified message
+  -- #param p_subject The subject of the message.
+  -- #param p_subject The body of the message.
+  -- #param p_cust_id The customer that the message is to be sent to.
+  -- #param p_sypr_id The profile that the message is to be sent to.
+  -- #param p_syus_id The user that the message is to be sent to.
+  -- #param p_active_from The date that the message is active from, if NULL defaults to today.
+  -- #param p_active_to   The date that the message is active to, if NULL defaults to today + 14.
+  */
+  PROCEDURE create_message ( p_subject     IN bulletin_board_messages.subject%TYPE
+                           , p_message     IN bulletin_board_messages.message_text%TYPE
+                           , p_cust_id     IN customers.cust_id%TYPE
+                           , p_sypr_id     IN system_profiles.sypr_id%TYPE
+                           , p_syus_id     IN system_users.syus_id%TYPE
+                           , p_active_from IN bulletin_board_messages.active_from%TYPE DEFAULT TRUNC(SYSDATE)
+                           , p_active_to   IN bulletin_board_messages.active_to%TYPE   DEFAULT TRUNC(SYSDATE) + 14
+                           , p_email_sms   IN VARCHAR2 DEFAULT 'Y' );
+  /**
+  -- Create a bulletin board message and the create recipients for the specified message
+  -- #param p_subject The subject of the message.
+  -- #param p_subject The body of the message.
+  -- #param p_cust_name The customer name that the message is to be sent to.
+  -- #param p_sypr_id The profile that the message is to be sent to.
+  -- #param p_syus_id The user that the message is to be sent to.
+  -- #param p_active_from The date that the message is active from, if NULL defaults to today.
+  -- #param p_active_to   The date that the message is active to, if NULL defaults to today + 14.
+  */
+ PROCEDURE create_message ( p_subject     IN bulletin_board_messages.subject%TYPE
+                          , p_message     IN bulletin_board_messages.message_text%TYPE
+                          , p_cust_name   IN customers.name%TYPE
+                          , p_sypr_id     IN system_profiles.sypr_id%TYPE
+                          , p_syus_id     IN system_users.syus_id%TYPE
+                          , p_active_from IN bulletin_board_messages.active_from%TYPE DEFAULT TRUNC(SYSDATE)
+                          , p_active_to   IN bulletin_board_messages.active_to%TYPE DEFAULT TRUNC(SYSDATE) + 14 );
+  /**
+  -- Details about this module
+  -- %return A textual descrtiption of the version number and VSS header for this package
+  */
+  FUNCTION about RETURN VARCHAR2;
+  --
+END amfr_message;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfr_message_handler.spc

@@ -0,0 +1,95 @@
+CREATE OR REPLACE PACKAGE amfr_message_handler
+/**
+  #############################################################################
+  #                                                                           #
+  # Package:             amfr_message_handler                                 #
+  #                                                                           #
+  # Application System:  General                                              #
+  #                                                                           #
+  # Creation Date:       01/03/2006                                           #
+  #                                                                           #
+  # Author:              Oracle Team, Advantica Ltd                           #
+  #                                                                           #
+  # Purpose:             A flexible interface mechanism                       #
+  #                                                                           #
+  # Dependancies:        Access Manager Installation                          #
+  #                                                                           #
+  # Revision:            $Revision: 4 $                                       #
+  #                                                                           #
+  #                                                       Advantica Ltd, 2006 #
+  #############################################################################
+  */
+ IS
+  /**
+  --
+  -- Flexible Interface mechanism designed for the GIN-AGENT interface
+  --
+  -- #version $Revision: 4 $
+  -- #author  $Author: Gilberta $
+  --
+  */
+  g_package_name CONSTANT VARCHAR2(30) := 'amfr_message_handler';
+  g_header       CONSTANT VARCHAR2(160) := '$Header: /Isle Of Grain/database/PLSQL/Interface/amfr_message_handler.pck 4     24/03/06 8:37 Gilberta $';
+  g_revision     CONSTANT VARCHAR2(160) := '$Revision: 4 $';
+  /*
+   VSS Information not documented by PL/SQL Developer
+   $Header: /Isle Of Grain/database/PLSQL/Interface/amfr_message_handler.pck 4     24/03/06 8:37 Gilberta $
+   $Date: 24/03/06 8:37 $  Date and time of last checkin
+   $Modtime: 24/03/06 8:38 $  Date and time of last modification
+   $History: amfr_message_handler.pck $
+  *
+  * *****************  Version 4  *****************
+  * User: Gilberta     Date: 24/03/06   Time: 8:37
+  * Updated in $/Isle Of Grain/database/PLSQL/Interface
+  * Modified to include the service_status and service_request_status when
+  * not present
+  *
+  * *****************  Version 3  *****************
+  * User: Gilberta     Date: 20/03/06   Time: 10:10
+  * Updated in $/Isle Of Grain/database/PLSQL/Interface
+  * Modified to record sequest_protocol rather than server protocol.
+  *
+  * *****************  Version 2  *****************
+  * User: Gilberta     Date: 17/03/06   Time: 9:55
+  * Updated in $/Isle Of Grain/database/PLSQL/Interface
+  * Minor pre-system test modifications
+   */
+  -- Require access to this var from amfr_legacy interface
+  g_sere_id service_reqs.sere_id%TYPE;
+  --
+  -- Variable type, used for package declaration
+  --
+  g_vc_arr owa.vc_arr;
+  --
+  -- clob array
+  --
+  type clob_arr IS table of CLOB index by binary_integer;
+  --
+  g_clob_arr clob_arr;
+  --
+  -- Default date format
+  --
+  g_def_date_format VARCHAR2(20) := 'DD-MON-YYYY HH24:MI';
+  --
+  g_lang VARCHAR2(2) := 'EN';
+  /**
+  -- Main Entry Point
+  */
+  PROCEDURE service_request(name_array  IN owa.vc_arr DEFAULT g_vc_arr,
+                            value_array IN owa.vc_arr DEFAULT g_vc_arr);
+  --
+  PROCEDURE service_request_clob(name_array  IN owa.vc_arr DEFAULT g_vc_arr,
+                            value_array IN clob_arr DEFAULT g_clob_arr);
+  --
+  /**
+  -- Test interface procedure
+  */
+  PROCEDURE test_interface;
+  /**
+  -- Details about this module
+  -- %return A textual descrtiption of the version number and VSS header for this package
+  */
+  FUNCTION about RETURN VARCHAR2;
+  --
+END amfr_message_handler;
+/

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

@@ -0,0 +1,473 @@
+CREATE OR REPLACE PACKAGE BODY amfr_messaging IS
+  --
+  c_sms_spool_dir  CONSTANT VARCHAR2(200) := cout_system_configuration.get_configuration_item('G_SMS_SPOOL_DIR');
+  c_sms_enabled    CONSTANT VARCHAR2(200) := cout_system_configuration.get_configuration_item('G_SMS_ENABLED');
+  c_directory_name CONSTANT VARCHAR2(15)  := 'sms_spool_dir';
+  --
+  c_mslo_id        NUMBER := 0;
+  --
+  PROCEDURE setup_dir IS
+  BEGIN
+    --
+    EXECUTE IMMEDIATE 'CREATE OR REPLACE DIRECTORY '||c_directory_name||' as '''||c_sms_spool_dir||'''';
+    --
+  END setup_dir;
+  --
+  /**
+  -- Procedure to send an SMS message
+  -- @param p_sms_number  VARCHAR The number of the SMS recipient, including the international code but without the leading +
+  -- @param p_sms_message VARCHAR The SMS message to send, message passed in as text
+  */
+  PROCEDURE send_sms_message ( p_sms_number IN VARCHAR2
+                             , p_sms_message IN VARCHAR2
+                             ) IS
+    --
+    l_file_handle utl_file.file_type;
+    l_file_name   VARCHAR2(100);
+    --
+    l_unicode_message BOOLEAN := FALSE;
+    --
+  BEGIN
+    --
+    IF c_sms_spool_dir IS NOT NULL AND UPPER(c_sms_enabled) = 'Y' THEN
+      --
+      -- There is a spool directory specified and SMS messages are to be sent, set up the file name
+      --
+      IF cout_system_configuration.get_configuration_item('G_UNICODE_SMS') = 'Y' THEN
+        --
+        l_unicode_message := TRUE;
+        --
+      END IF;
+      --
+      SELECT  sms_seq.NEXTVAL
+      INTO    l_file_name
+      FROM    DUAL;
+      --
+      l_file_name := 'msg'||l_file_name||'.sms';
+      --
+      -- Open the file for writing
+      --
+      l_file_handle := utl_file.fopen ( location     => UPPER(c_directory_name)
+                                      , filename     => l_file_name
+                                      , open_mode    => 'w'
+                                      , max_linesize => 1024
+                                      );
+      --
+      utl_file.put_line( l_file_handle
+                       , 'To: ' || LTRIM(LTRIM(p_sms_number,'+'),'0'));
+      --
+      IF l_unicode_message THEN
+        --
+        utl_file.put_line( l_file_handle
+                         , 'Alphabet: unicode'
+                         );
+        --
+        utl_file.put_line( l_file_handle
+                         , ''
+                         );
+        --
+        utl_file.put_line( l_file_handle
+                         , p_sms_message
+                         );
+        --
+      ELSE
+        --
+        utl_file.put_line( l_file_handle
+                         , ''
+                         );
+        --
+        utl_file.put_line( l_file_handle
+                         , p_sms_message
+                         );
+        --
+      END IF;
+      --
+      utl_file.fclose(l_file_handle);
+      --
+    END IF;
+    --
+  END send_sms_message;
+  --
+  PROCEDURE send_smtp_email ( from_name      VARCHAR2
+                            , to_names       VARCHAR2
+                            , subject        VARCHAR2
+                            , message        VARCHAR2 DEFAULT NULL
+                            , html_message   VARCHAR2 DEFAULT NULL
+                            , cc_names       VARCHAR2 DEFAULT NULL
+                            , bcc_names      VARCHAR2 DEFAULT NULL
+                            , filename       VARCHAR2 DEFAULT NULL
+                            , file_mime_type VARCHAR2 DEFAULT NULL
+                            , filecontents   BLOB     DEFAULT NULL
+                            ) IS
+    --
+    smtp_host VARCHAR2(256) := cout_system_configuration.get_configuration_item('SYSTEM_SMTP_SERVER');
+    smtp_port NUMBER        := cout_system_configuration.get_configuration_item('SYSTEM_SMTP_PORT');
+    --
+    boundary CONSTANT VARCHAR2(256) := 'CES.Boundary.DACA587499938898'||TO_CHAR(SYSDATE, 'DDMMYYYYHH24MISS');
+    --
+    crlf            VARCHAR2(2) := chr(13) || chr(10);
+    mesg            VARCHAR2(32767);
+    conn            utl_smtp.connection;
+    --
+    max_base64_line CONSTANT pls_integer := 76 / 4 * 3; --32000;
+    --
+    ind             PLS_INTEGER;
+    len             PLS_INTEGER;
+    --
+  BEGIN
+      conn := utl_smtp.open_connection(smtp_host
+                                      ,smtp_port);
+      utl_smtp.helo(conn
+                   ,smtp_host);
+      utl_smtp.mail(conn
+                   ,from_name);
+      utl_smtp.rcpt(conn
+                   ,to_names);
+      IF cc_names IS NOT NULL THEN
+        utl_smtp.rcpt(conn
+                     ,cc_names);
+      END IF;
+      IF bcc_names IS NOT NULL THEN
+        utl_smtp.rcpt(conn
+                     ,bcc_names);
+      END IF;
+      utl_smtp.open_data(conn);
+
+      mesg := 'Date: ' || TO_CHAR(systimestamp
+                                 , 'dd Mon yyyy hh24:mi:ss tzhtzm','NLS_DATE_LANGUAGE=English')|| crlf ||
+              'From: ' ||
+              from_name || crlf || 'Subject: ' || subject || crlf || 'To: ' ||
+              to_names || crlf;
+      IF cc_names IS NOT NULL THEN
+        mesg := mesg || 'Cc: ' || cc_names || crlf;
+      END IF;
+      IF bcc_names IS NOT NULL THEN
+        mesg := mesg || 'Bcc: ' || bcc_names || crlf;
+      END IF;
+      mesg := mesg || 'Mime-Version: 1.0' || crlf ||
+              'Content-Type: multipart/mixed; boundary="' || boundary || '"' || crlf || crlf ||
+              'This is a Mime message, which your current mail reader may not' || crlf ||
+              'understand. Parts of the message will appear as text. If the remainder' || crlf ||
+              'appears as random characters in the message body, instead of as' || crlf ||
+              'attachments, then you''ll have to extract these parts and decode them' || crlf ||
+              'manually.' || crlf || crlf;
+      utl_smtp.write_data(conn
+                         ,mesg);
+      IF message IS NOT NULL THEN
+        mesg := '--' || boundary || crlf ||
+                'Content-Type: text/plain; name="message.txt"; charset="iso-8859-2"' || crlf ||
+                'Content-Disposition: inline; filename="message.txt"' || crlf ||
+                'Content-Transfer-Encoding: quoted-printable' || crlf || crlf;
+                
+        mesg := '--' || boundary || crlf ||
+                'Content-Type: text/plain;  charset="iso-8859-2"' || crlf ||
+                'Content-Disposition: inline; ' || crlf || crlf;
+        utl_smtp.write_data(conn
+                           ,mesg);
+        IF SUBSTR(message
+                 ,1
+                 ,1) = '/' THEN
+          utl_smtp.write_data(conn
+                             ,crlf);
+        ELSE
+          utl_smtp.write_data(conn
+                             ,message || crlf);
+        END IF;
+      END IF;
+      --
+      IF html_message IS NOT NULL THEN
+        mesg := '--' || boundary || crlf ||
+                'Content-Type: text/html; name="message.html"; charset=US-ASCII' || crlf ||
+                'Content-Disposition: inline; filename="message.html"' || crlf ||
+                'Content-Transfer-Encoding: 7bit' || crlf || crlf;
+        utl_smtp.write_data(conn
+                           ,mesg);
+        IF SUBSTR(html_message
+                 ,1
+                 ,1) = '/' THEN
+          utl_smtp.write_data(conn
+                             ,crlf);
+        ELSE
+          utl_smtp.write_data(conn
+                             ,html_message || crlf);
+        END IF;
+      END IF;
+      --
+      IF  filecontents IS NOT NULL
+      AND file_mime_type IS NOT NULL THEN
+        --
+        mesg := crlf || '--' || boundary || crlf;
+        mesg := mesg || 'Content-Type: ' || file_mime_type || '; name="' ||
+                filename || '"' || crlf || 'Content-Disposition: attachment; filename="' || filename || '"' || crlf;
+        mesg := mesg || 'Content-Transfer-Encoding: base64' || crlf ||
+                crlf;
+        utl_smtp.write_data(conn
+                           ,mesg);
+        --
+        ind := 1;
+        len := dbms_lob.getlength(filecontents);
+        --
+        WHILE ( ind < len ) LOOP
+          IF (ind + max_base64_line < len) THEN
+            --
+            utl_smtp.write_raw_data( conn
+                                   , utl_encode.base64_encode(dbms_lob.substr(filecontents, max_base64_line, ind))
+                                   );
+            --
+          ELSE
+            --
+            utl_smtp.write_raw_data( conn
+                                   , utl_encode.base64_encode(dbms_lob.substr(filecontents,  (len+1 - ind),  ind))
+                                   );
+            --
+          END IF;
+          --
+          utl_smtp.write_data(conn
+                             ,crlf);
+          --
+          ind := ind + max_base64_line;
+          --
+        END LOOP;
+        --
+        utl_smtp.write_data(conn
+                           ,crlf);
+        --
+      END IF;
+      --
+      mesg := crlf || '--' || boundary || '--' || crlf;
+      utl_smtp.write_data(conn
+                         ,mesg);
+      --
+      -- Close the SMTP connection
+      --
+      utl_smtp.close_data(conn);
+      utl_smtp.quit(conn);
+    --
+  END send_smtp_email;
+  --
+  PROCEDURE send_smime_email ( from_name      VARCHAR2
+                             , to_names       VARCHAR2
+                             , subject        VARCHAR2
+                             , message        VARCHAR2 DEFAULT NULL
+                             , html_message   VARCHAR2 DEFAULT NULL
+                             , cc_names       VARCHAR2 DEFAULT NULL
+                             , bcc_names      VARCHAR2 DEFAULT NULL
+                             , filename       VARCHAR2 DEFAULT NULL
+                             , file_mime_type VARCHAR2 DEFAULT NULL
+                             , filecontents   BLOB     DEFAULT NULL
+                             ) IS
+    --
+    l_job  VARCHAR2(1000);
+    l_lock NUMBER;
+    --
+  BEGIN
+    --
+    IF c_mslo_id = 0 THEN
+      --
+      INSERT INTO messaging_log
+        (mslo_id
+        ,from_name
+        ,to_names
+        ,subject
+        ,message
+        ,html_message
+        ,cc_names
+        ,bcc_names
+        ,filename
+        ,file_mime_type
+        ,filecontents
+        ,senton)
+    VALUES
+        ( mslo_seq.nextval
+        , from_name
+        , to_names
+        , subject
+        , NVL(message, ' ')
+        , NULL
+        , NULL
+        , NULL
+        , filename
+        , file_mime_type
+        , filecontents
+        , NULL) RETURNING mslo_id INTO c_mslo_id;
+      --
+      COMMIT; -- need this here for the external smime call
+      --
+    END IF;
+    --
+    l_job := 'email_'||c_mslo_id;
+    --
+    l_lock := dbms_lock.request(id       => 101202303
+                               ,lockmode => 6
+                               ,timeout  => 30);
+    --
+    dbms_scheduler.create_job(job_name   => l_job
+                             ,job_type   => 'EXECUTABLE'
+                             ,job_action => cout_system_configuration.get_configuration_item('G_SMIME_LOCATION') || '\smime.bat'
+                             ,number_of_arguments => 1
+                             ,enabled    => FALSE
+                             ,job_class => 'BATCH_EMAIL_CLASS'
+                             );
+   --
+   dbms_scheduler.set_job_argument_value(l_job,1,TO_CHAR(c_mslo_id));
+   --
+   dbms_scheduler.enable(l_job);
+   dbms_lock.sleep(2);
+   l_lock := dbms_lock.release(id => 101202303);
+    --
+  EXCEPTION
+    WHEN OTHERS THEN
+      --
+      cout_err.report_and_go;
+    --
+  END send_smime_email;
+  --
+  PROCEDURE send_email      ( from_name      VARCHAR2
+                            , to_names       VARCHAR2
+                            , subject        VARCHAR2
+                            , message        VARCHAR2 DEFAULT NULL
+                            , html_message   VARCHAR2 DEFAULT NULL
+                            , cc_names       VARCHAR2 DEFAULT NULL
+                            , bcc_names      VARCHAR2 DEFAULT NULL
+                            , filename       VARCHAR2 DEFAULT NULL
+                            , file_mime_type VARCHAR2 DEFAULT NULL
+                            , filecontents   BLOB     DEFAULT NULL
+                            ) IS
+  BEGIN
+    --
+    IF NVL(UPPER(cout_system_configuration.get_configuration_item('EMAIL_METHOD')), 'SMTP') = 'SMTP' THEN
+      --
+      send_smtp_email ( from_name      => from_name
+                      , to_names       => to_names
+                      , subject        => subject
+                      , message        => message
+                      , html_message   => html_message
+                      , cc_names       => cc_names
+                      , bcc_names      => bcc_names
+                      , filename       => filename
+                      , file_mime_type => file_mime_type
+                      , filecontents   => filecontents
+                      );
+      --
+    ELSIF UPPER(cout_system_configuration.get_configuration_item('EMAIL_METHOD')) = 'SMIME' THEN
+      --
+      send_smime_email ( from_name      => from_name
+                       , to_names       => to_names
+                       , subject        => subject
+                       , message        => message
+                       , html_message   => html_message
+                       , cc_names       => cc_names
+                       , bcc_names      => bcc_names
+                       , filename       => filename
+                       , file_mime_type => file_mime_type
+                       , filecontents   => filecontents
+                       );
+      --
+    ELSE
+      --
+      cout_err.report_and_stop('-20001','Unknown Email Method');
+      --
+    END IF;
+    --
+  END send_email;
+  --
+  PROCEDURE send_background_email ( from_name      VARCHAR2
+                                  , to_names       VARCHAR2
+                                  , subject        VARCHAR2
+                                  , message        VARCHAR2 DEFAULT NULL
+                                  , html_message   VARCHAR2 DEFAULT NULL
+                                  , cc_names       VARCHAR2 DEFAULT NULL
+                                  , bcc_names      VARCHAR2 DEFAULT NULL
+                                  , filename       VARCHAR2 DEFAULT NULL
+                                  , file_mime_type VARCHAR2 DEFAULT NULL
+                                  , filecontents   BLOB     DEFAULT NULL
+                                  ) IS
+    --
+    l_job     NUMBER;
+    l_mslo_id messaging_log.mslo_id%TYPE;
+    --
+  BEGIN
+    --
+    INSERT INTO messaging_log
+      (mslo_id
+      ,from_name
+      ,to_names
+      ,subject
+      ,message
+      ,html_message
+      ,cc_names
+      ,bcc_names
+      ,filename
+      ,file_mime_type
+      ,filecontents
+      ,senton)
+    VALUES
+      ( mslo_seq.nextval
+      , from_name
+      , to_names
+      , subject
+      , NVL(message, ' ')
+      , html_message
+      , cc_names
+      , bcc_names
+      , filename
+      , file_mime_type
+      , filecontents
+      , NULL)
+    RETURNING mslo_id INTO l_mslo_id;
+    --    
+    DBMS_JOB.SUBMIT ( l_job
+                    , 'amfr_messaging.send_email_job ( '||l_mslo_id||' );'
+                    );
+    --
+  END send_background_email;
+  --
+  PROCEDURE send_email_job ( p_job IN NUMBER ) IS
+    --
+    l_msg_rec messaging_log%ROWTYPE;
+    --
+  BEGIN
+    --
+    SELECT *
+    INTO   l_msg_rec
+    FROM   messaging_log ml
+    WHERE  ml.mslo_id = p_job;
+    --
+    c_mslo_id := p_job;
+    --
+    amfr_messaging.send_email ( from_name      => l_msg_rec.from_name
+                              , to_names       => l_msg_rec.to_names
+                              , subject        => l_msg_rec.subject
+                              , message        => l_msg_rec.message
+                              , html_message   => l_msg_rec.html_message
+                              , cc_names       => l_msg_rec.cc_names
+                              , bcc_names      => l_msg_rec.bcc_names
+                              , filename       => l_msg_rec.filename
+                              , file_mime_type => l_msg_rec.file_mime_type
+                              , filecontents   => l_msg_rec.filecontents
+                              );
+    --
+    UPDATE messaging_log ml
+    SET    ml.senton  = sysdate
+    WHERE  ml.mslo_id = p_job;
+    --
+  EXCEPTION
+    WHEN OTHERS THEN
+      cout_err.report_and_stop;
+  END send_email_job;
+  --
+  FUNCTION about RETURN VARCHAR2 IS
+  BEGIN
+    --
+    RETURN(g_package_name || CHR(10) || g_revision || CHR(10) || g_header);
+    --
+  END about;
+  --
+BEGIN
+  /**
+  -- Initialization
+  */
+  NULL;
+  --
+END amfr_messaging;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfr_messaging.spc

@@ -0,0 +1,77 @@
+CREATE OR REPLACE PACKAGE 
+/*
+ 2007 Advantica Ltd
+*/
+ amfr_messaging IS
+  /**
+  --
+  -- Messaging Routines
+  --
+  -- #version $Revision:  $
+  -- #author  $Author:    $
+  --
+  */
+  g_package_name CONSTANT VARCHAR2(30)  := 'amfr_messaging';
+  g_header       CONSTANT VARCHAR2(160) := '$Header:   $';
+  g_revision     CONSTANT VARCHAR2(160) := '$Revision: $';
+  /*
+  VSS Information not documented by PL/SQL Developer
+  $Header:   $
+  $Date:     $  Date and time of last checkin
+  $Modtime:  $  Date and time of last modification
+  $History:  $
+  */
+  --
+  -- Public Routines
+  --
+  /**
+  -- Procedure to setup the SMS spool directory.
+  */
+  PROCEDURE setup_dir;
+  /**
+  -- Procedure to send an SMS message
+  -- @param p_sms_number  VARCHAR The number of the SMS recipient, including the international code but without the leading +
+  -- @param p_sms_message VARCHAR The SMS message to send, message passed in as text
+  */
+  PROCEDURE send_sms_message ( p_sms_number  IN VARCHAR2
+                             , p_sms_message IN VARCHAR2
+                             );
+  /**
+  -- Procedure to send an email message
+  */
+  PROCEDURE send_email      ( from_name      VARCHAR2
+                            , to_names       VARCHAR2
+                            , subject        VARCHAR2
+                            , message        VARCHAR2 DEFAULT NULL
+                            , html_message   VARCHAR2 DEFAULT NULL
+                            , cc_names       VARCHAR2 DEFAULT NULL
+                            , bcc_names      VARCHAR2 DEFAULT NULL
+                            , filename       VARCHAR2 DEFAULT NULL
+                            , file_mime_type VARCHAR2 DEFAULT NULL
+                            , filecontents   BLOB     DEFAULT NULL
+                            );
+  /**
+  -- Procedure to send an email message
+  */
+  PROCEDURE send_background_email ( from_name      VARCHAR2
+                                  , to_names       VARCHAR2
+                                  , subject        VARCHAR2
+                                  , message        VARCHAR2 DEFAULT NULL
+                                  , html_message   VARCHAR2 DEFAULT NULL
+                                  , cc_names       VARCHAR2 DEFAULT NULL
+                                  , bcc_names      VARCHAR2 DEFAULT NULL
+                                  , filename       VARCHAR2 DEFAULT NULL
+                                  , file_mime_type VARCHAR2 DEFAULT NULL
+                                  , filecontents   BLOB     DEFAULT NULL
+                                  );
+  --
+  PROCEDURE send_email_job ( p_job IN NUMBER );
+  --
+  /**
+  -- Details about this module
+  -- %return A textual descrtiption of the version number and VSS header for this package
+  */
+  FUNCTION about RETURN VARCHAR2;
+  --
+END amfr_messaging;
+/

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

@@ -0,0 +1,408 @@
+CREATE OR REPLACE PACKAGE BODY amfr_timestamp IS
+  --
+  g_Empty_blob BLOB;
+  --
+  PROCEDURE Main(p_Args IN VARCHAR2) AS
+    LANGUAGE JAVA NAME 'tsdemo.amTimestamp.main(java.lang.String[])';
+  ---
+  -- A M T I M S T A M P
+  ---
+  FUNCTION Amtimestamp(p_File     IN BLOB,
+                       p_Url      IN VARCHAR2,
+                       p_Password IN VARCHAR2,
+                       p_Keystore IN VARCHAR2) RETURN VARCHAR2 AS
+    LANGUAGE JAVA NAME 'tsdemo.amTimestamp.amTimestamp(oracle.sql.BLOB,java.lang.String,java.lang.String,java.lang.String) return String';
+  ---
+  -- G E T H A S H
+  ---
+  FUNCTION Gethash RETURN VARCHAR2 AS
+    LANGUAGE JAVA NAME 'tsdemo.amTimestamp.getHash() return String';
+  ---
+  -- G E T R E S P B L O B
+  ---
+  FUNCTION Getrespblob RETURN BLOB AS
+    LANGUAGE JAVA NAME 'tsdemo.amTimestamp.getRespBlob() return oracle.sql.BLOB';
+  ---
+  -- S U B M I T   R E T R Y 
+  ---
+  PROCEDURE submit_retry(p_Identifier    IN Document_Timestamps.Doc_Identifier%TYPE,
+                         p_Doctype       IN Document_Timestamps.Doc_Type%TYPE,
+                         p_Url           IN VARCHAR2,
+                         p_Password      IN VARCHAR2,
+                         p_Keystore      IN VARCHAR2) IS
+    --
+    l_interval     VARCHAR2(255) := cout_system_configuration.get_configuration_item('G_TIMESTAMP_INTERVAL');
+    l_job          INTEGER;
+    --
+    PRAGMA AUTONOMOUS_TRANSACTION;
+    --
+  BEGIN
+    --
+    dbms_output.put_line('In Submit retry');
+    --
+    IF C_test_run THEN
+      --
+      NULL;
+      --
+    ELSE
+      --
+      dbms_job.submit(job  => l_job,
+                      what => 'amfr_timestamp.retry_timestamp( p_Identifier    => '||to_char(p_Identifier)||
+                                              ',p_Doctype       => '''||p_Doctype||''''||
+                                              ',p_Url           => '''||p_Url||''''||
+                                              ',p_Password      => '''||p_Password||''''||
+                                              ',p_Keystore      => '''||p_Keystore||''');',
+                      next_date => (SYSDATE + l_interval)
+                      );
+      --
+    END IF;
+    --
+    dbms_output.put_line('Commit In Submit retry');
+    --
+    COMMIT;
+    --
+    dbms_output.put_line('Exit Submit retry');
+    --
+  EXCEPTION
+    WHEN OTHERS THEN
+      --
+      dbms_output.put_line('ERROR in submit_retyr: '||SUBSTR(SQLERRM,1,200));
+      --
+      cout_err.report_and_stop(p_exception_message => 'ERROR in submit_retry: '||SUBSTR(SQLERRM,1,200));
+      --
+  END ;
+  ---
+  -- F O R M A T   J A V A   D A T E
+  ---
+  FUNCTION format_java_date(p_value IN VARCHAR2) RETURN VARCHAR2 IS
+    ---
+    -- Java date is return in this format: Wed Mar 28 13:47:48 GMT+01:00 2007
+    -- The basic date components must be stripped out and built into an Oracle format
+    -- NB The class the date originates form returns a String hence casting has not been done.
+    ---
+    l_month VARCHAR2(10);
+    l_year  VARCHAR2(10);
+    l_date  VARCHAR2(10);
+    l_time  VARCHAR2(10);
+    l_value VARCHAR2(255);
+    l_return VARCHAR2(255);
+    --
+  BEGIN
+    --
+    IF p_value IS NOT NULL THEN
+      --
+      l_value := TRIM(p_value);
+      --
+      l_month := SUBSTR(l_value,5,3);
+      --
+      l_date  := SUBSTR(l_value,9,2);
+      --
+      l_time  := SUBSTR(l_value,12,8);
+      --
+      l_year  := SUBSTR(l_value,-4,4);
+      --
+      l_return := l_date||'-'||l_month||'-'||l_year||' '||l_time;
+      dbms_output.put_line('Formated date: '||l_return);
+      --
+    ELSE
+      --
+      l_return := NULL;
+      --
+    END IF;
+    --
+    RETURN (l_return);
+    --
+  EXCEPTION
+    WHEN OTHERS THEN
+      cout_err.report_and_stop(p_exception_message => 'ERROR in format_java_date: '||SUBSTR(SQLERRM,1,200));
+  END ;
+  ---
+  -- R E T R Y   T I M E S T A M P
+  ---
+  PROCEDURE retry_timestamp(p_Identifier    IN Document_Timestamps.Doc_Identifier%TYPE,
+                            p_Doctype       IN Document_Timestamps.Doc_Type%TYPE,
+                            p_Url           IN VARCHAR2,
+                            p_Password      IN VARCHAR2,
+                            p_Keystore      IN VARCHAR2) IS
+    --
+    l_timestamp   DATE;
+    l_return      VARCHAR2(255);
+    l_retry_limit NUMBER := cout_system_configuration.get_configuration_item(p_parameter => 'G_RETRY_LIMIT');
+    l_retry_count NUMBER;
+    l_hashed_File BLOB;
+    l_formatted_date VARCHAR2(255);
+    l_timestamp_response BLOB;
+    --
+    CURSOR c_doti IS
+      SELECT retry_count,
+             hashed_file
+      FROM   document_timestamps
+      WHERE  Doc_Identifier = p_Identifier
+      AND    Doc_Type       = p_Doctype;
+    --
+  BEGIN
+    --
+    l_timestamp := NULL;
+    l_return    := NULL;
+    l_timestamp_response := g_Empty_blob;
+    ---
+    -- Need to get the retyr count to see if the limit has been reached,
+    -- also need to get the BLOB as can't pass as a parameter via DBMS_JOB.
+    ---
+    OPEN  c_doti;
+    FETCH c_doti INTO l_retry_count,
+                      l_hashed_file;
+    CLOSE c_doti;
+    --
+    BEGIN
+      ---
+      -- Return the JAVA date as a string so we can format it.
+      ---
+      l_return := Amtimestamp(p_File     => l_Hashed_file,
+                              p_Url      => p_Url,
+                              p_Password => p_Password,
+                              p_Keystore => p_Keystore);
+      --
+      dbms_output.put_line('Return Date: '||l_return);
+      ---
+      -- Manipulate the java format into one oracle can use
+      ---
+      l_formatted_date := format_java_date(l_return);
+      --
+      l_timestamp := TO_DATE(l_formatted_date,C_JAVA_DATA_FMT);
+      --
+    EXCEPTION
+      WHEN OTHERS THEN
+        cout_err.report_and_go(p_exception_number  => SQLCODE
+                              ,p_exception_message => SUBSTR(SQLERRM,1,200)
+                              ,p_error_group       => 'APPLICATION'
+                              ,p_severity          => 'W'
+                              ,p_source            => 'AMFR_TIMESTAMP');
+        --
+    END ;
+    --
+    IF l_timestamp IS NOT NULL THEN
+      ---
+      -- As GetRespBlob will cause an error if returns NULL need to ensure the timestamp was received first.
+      ---
+      l_timestamp_response := GetRespBlob;
+      --
+      UPDATE document_timestamps
+      SET    doc_timestamp = l_timestamp
+            ,status        = C_Retry
+            ,retry_count   = retry_count + 1
+            ,timestamp_response = l_timestamp_response
+      WHERE  doc_identifier = p_identifier
+      AND    doc_type       = p_doctype;
+      --
+    ELSIF l_timestamp IS NULL AND NVL(l_retry_count,0) < l_retry_limit THEN
+      --
+      UPDATE document_timestamps
+      SET    retry_count = retry_count + 1
+      WHERE  doc_identifier = p_identifier
+      AND    doc_type       = p_doctype;
+      --
+      submit_retry(p_Identifier    => p_Identifier,
+                   p_Doctype       => p_Doctype,
+                   p_Url           => p_URL,
+                   p_Password      => p_Password,
+                   p_Keystore      => p_keystore);
+      --
+    END IF;
+    --
+    COMMIT;
+    --
+  EXCEPTION
+    WHEN OTHERS THEN 
+      --
+      cout_err.report_and_stop(p_exception_message => 'ERROR in retry_timestamp: '||SUBSTR(SQLERRM,1,200));
+      --
+  END;
+  ---
+  -- C R E A T E   T I M E S T A M P 
+  ---
+  PROCEDURE Create_Timestamp(p_doc_identifier IN Document_Timestamps.Doc_Identifier%TYPE,
+                             p_Doc_Type       IN Document_Timestamps.Doc_Type%TYPE,
+                             p_Doc_Timestamp  IN Document_Timestamps.doc_timestamp%TYPE,
+                             p_Hash           IN Document_Timestamps.HASH%TYPE,
+                             p_Hashed_File    IN Document_Timestamps.hashed_file%TYPE,
+                             p_Status         IN Document_Timestamps.status%TYPE,
+                             p_timestamp_response IN Document_Timestamps.timestamp_response%TYPE) IS
+    --
+  BEGIN
+    --
+    INSERT INTO Document_Timestamps
+      (doc_identifier,
+       Doc_Type,
+       Doc_Timestamp,
+       HASH,
+       Hashed_File,
+       Status,
+       retry_count,
+       timestamp_response
+       )
+    VALUES
+      (p_doc_identifier,
+       p_Doc_Type,
+       p_Doc_Timestamp,
+       p_Hash,
+       p_Hashed_File,
+       p_Status,
+       0,
+       p_timestamp_response
+       );
+    --
+  EXCEPTION
+    WHEN OTHERS THEN
+      --
+      cout_err.report_and_stop(p_exception_message => 'ERROR in Create_Timestamp: '||SUBSTR(SQLERRM,1,200));
+      --
+  END;
+  ---
+  -- T I M E S T A M P   D O C U M E N T
+  ---
+  FUNCTION Timestamp_Document(p_Identifier    IN Document_Timestamps.Doc_Identifier%TYPE,
+                              p_Doctype       IN Document_Timestamps.Doc_Type%TYPE,
+                              p_File_For_Hash IN BLOB,
+                              p_Url           IN VARCHAR2 DEFAULT g_URL,
+                              p_Password      IN VARCHAR2 DEFAULT g_password,
+                              p_Keystore      IN VARCHAR2 DEFAULT g_keystore) RETURN DATE IS
+    --
+    l_timestamp DATE;
+    l_return    VARCHAR2(255);
+    l_status    VARCHAR2(1);
+    l_file_hash VARCHAR2(255);
+    l_formatted_date VARCHAR2(255);
+    l_timestamp_response BLOB;
+    l_success   BOOLEAN;
+    --
+  BEGIN
+    --
+    dbms_output.put_line('Got into package.');
+    --
+    l_success   := FALSE;
+    l_timestamp := NULL;
+    l_return    := NULL;
+    l_status    := NULL;
+    l_file_hash := NULL;
+    l_formatted_date := NULL;
+    l_timestamp_response := g_Empty_blob;
+    --
+    BEGIN
+      --
+      dbms_output.put_line('Called Timestamp_Document with URL: '||p_URL);
+      ---
+      -- Return the JAVA date as a string so we can format it.
+      ---
+      IF C_test_run THEN
+        --
+        l_return := SYSDATE;
+        l_Status := C_Valid;
+        l_timestamp := SYSDATE;
+        --
+      ELSE
+        --
+        l_return := Amtimestamp(p_File     => p_File_For_Hash,
+                                p_Url      => p_Url,
+                                p_Password => p_Password,
+                                p_Keystore => p_Keystore);
+        --
+        dbms_output.put_line('Return Date: '||l_return);
+        ---
+        -- Manipulate the java format into one oracle can use
+        ---
+        l_formatted_date := format_java_date(l_return);
+        --
+        l_timestamp := TO_DATE(l_formatted_date,C_JAVA_DATA_FMT);
+        --
+        l_Status := C_Valid;
+        --
+        l_success := TRUE;
+        --
+      END IF;
+        --
+    EXCEPTION
+      WHEN OTHERS THEN
+        cout_err.report_and_go(p_exception_number  => SQLCODE
+                              ,p_exception_message => SUBSTR(SQLERRM,1,200)
+                              ,p_error_group       => 'APPLICATION'
+                              ,p_severity          => 'W'
+                              ,p_source            => 'AMFR_TIMESTAMP');
+        --
+        l_timestamp := SYSDATE;
+        l_status    := C_Defaulted;
+        --
+        dbms_output.put_line('In exception block and submitting retry.');
+        --
+        submit_retry(p_Identifier    => p_Identifier,
+                     p_Doctype       => p_Doctype,
+                     p_Url           => p_URL,
+                     p_Password      => p_Password,
+                     p_Keystore      => p_keystore);
+        --
+        l_success := FALSE;
+        --
+    END ;
+    --
+    dbms_output.put_line('Completed Submit retry');
+    --
+    IF l_timestamp IS NULL THEN
+      --
+      dbms_output.put_line('Timestamp IS NULL and submitting retry.');
+      --
+      l_timestamp := SYSDATE;
+      l_status    := C_Defaulted;
+      --
+      submit_retry(p_Identifier    => p_Identifier,
+                   p_Doctype       => p_Doctype,
+                   p_Url           => p_URL,
+                   p_Password      => p_Password,
+                   p_Keystore      => p_keystore);
+      --
+    END IF;
+    --
+    IF C_test_run THEN
+      --
+      l_timestamp_response := g_Empty_blob;
+      l_file_hash := NULL;
+      --
+    ELSIF NOT l_success THEN -- Fails for some other reason e.g. connection refused....
+      --
+      l_timestamp_response := g_Empty_blob;
+      l_file_hash := NULL;
+      --
+    ELSE
+      --
+      --dbms_output.put_line('Doing BLOBBY things');
+      l_timestamp_response := GetRespBlob;
+      l_file_hash := Gethash;
+      --dbms_output.put_line('Finished doing BLOBBY things');
+      --
+    END IF;
+    --
+    dbms_output.put_line('Creating timestamp');
+    --
+    Create_Timestamp(p_doc_identifier => p_Identifier,
+                     p_Doc_Type       => p_Doctype,
+                     p_Doc_Timestamp  => l_timestamp,
+                     p_Hash           => l_file_hash,
+                     p_Hashed_File    => p_File_For_Hash,
+                     p_Status         => l_status,
+                     p_timestamp_response => l_timestamp_response);
+    --
+    dbms_output.put_line('Done the lot!');
+    --
+    RETURN (l_timestamp);
+    --
+  EXCEPTION
+    WHEN OTHERS THEN
+      --
+      cout_err.report_and_stop(p_exception_message => 'ERROR in Timestamp_Document: '||SUBSTR(SQLERRM,1,200));
+      --
+  END;
+  --
+BEGIN
+  -- Initialization
+  NULL;
+END amfr_timestamp;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfr_timestamp.spc

@@ -0,0 +1,90 @@
+CREATE OR REPLACE PACKAGE amfr_timestamp IS
+
+  -- Author  : RIDERC
+  -- Created : 21/03/2007 16:33:56
+  -- Purpose : Package to store timestamping routines.
+  --
+  -- PUBLIC constants
+  --
+  g_URL      CONSTANT VARCHAR2(255) := cout_system_configuration.get_configuration_item('G_TIMESTAMP_URL');
+  g_password CONSTANT VARCHAR2(255) := cout_system_configuration.get_configuration_item('G_TIMESTAMP_PASSWORD');
+  g_keystore CONSTANT VARCHAR2(255) := cout_system_configuration.get_configuration_item('G_TIMESTAMP_KEYSTORE');
+  --
+  C_Defaulted CONSTANT VARCHAR2(1) := 'D';
+  C_valid     CONSTANT VARCHAR2(1) := 'V';
+  C_Invalid   CONSTANT VARCHAR2(1) := 'I';
+  C_Retry     CONSTANT VARCHAR2(1) := 'R';
+  C_Yes       CONSTANT VARCHAR2(1) := 'Y';
+  --
+  C_test_run  CONSTANT BOOLEAN := (C_Yes = cout_system_configuration.get_configuration_item('G_TEST_RUN'));
+  --
+  C_Nomination CONSTANT VARCHAR2(1) := 'N';
+  C_Confirmation CONSTANT VARCHAR2(1) := 'C';
+  --
+  ---
+  -- Don't know what format this will be!
+  ---
+  C_JAVA_DATA_FMT CONSTANT VARCHAR2(255) := 'DD-MON-YYYY HH24:MI:SS';
+  --
+  /**
+   Wrapper for obtaining a timestamp from the timestamping service
+   
+   @param p_file     BLOB file for the hashing algorithm
+   @param p_URL      VARCHAR2 URL for the timestamping service
+   @param p_password VARCHAR2 password for the JKS keystore file
+   @param p_keystore VARCHAR2 keystore file location e.g. C:\\temp\\keystore.jks
+   @return The timestamp.
+  */
+  FUNCTION Amtimestamp(p_File     IN BLOB,
+                       p_Url      IN VARCHAR2,
+                       p_Password IN VARCHAR2,
+                       p_Keystore IN VARCHAR2) RETURN VARCHAR2;
+  /**
+   Wrapper for obtaining the file has.
+   
+   @return the hash used by the last call to amTimestamp.
+  */
+  FUNCTION Gethash RETURN VARCHAR2;
+  /**
+  Returns the entire response from the web service used for timestamping.
+  
+  @return the response as a BLOB.
+  */
+  FUNCTION Getrespblob RETURN BLOB;
+  /**
+   Function to record a timestamp from a trusted source for the logging of document submission.
+   This process inserts the timestamp into the DOCUEMTN_TIMESTAMPS table but relies on the calling procedure
+   to COMMIT the transaction.
+   
+   @param p_identifier identifier for the document being timestamped
+   @param p_docType  Type of document being timestamped
+   @param p_file_for_hash BLOB file for the hashing algorithm
+   @param p_URL      VARCHAR2 URL for the timestamping service
+   @param p_password VARCHAR2 password for the JKS keystore file
+   @param p_keystore VARCHAR2 keystore file location e.g. C:\\temp\\keystore.jks
+   --
+   @return DATE the timestamp as an Oracle DATE.
+  */
+  FUNCTION Timestamp_Document(p_Identifier    IN Document_Timestamps.Doc_Identifier%TYPE,
+                              p_Doctype       IN Document_Timestamps.Doc_Type%TYPE,
+                              p_File_For_Hash IN BLOB,
+                              p_Url           IN VARCHAR2 DEFAULT g_URL,
+                              p_Password      IN VARCHAR2 DEFAULT g_password,
+                              p_Keystore      IN VARCHAR2 DEFAULT g_keystore) RETURN DATE;
+  /**
+   Procedure to retry the call to the timestamp service.
+   
+   @param p_identifier identifier for the document being timestamped
+   @param p_docType  Type of document being timestamped
+   @param p_URL      VARCHAR2 URL for the timestamping service
+   @param p_password VARCHAR2 password for the JKS keystore file
+   @param p_keystore VARCHAR2 keystore file location e.g. C:\\temp\\keystore.jks
+  */
+  PROCEDURE retry_timestamp(p_Identifier    IN Document_Timestamps.Doc_Identifier%TYPE,
+                            p_Doctype       IN Document_Timestamps.Doc_Type%TYPE,
+                            p_Url           IN VARCHAR2,
+                            p_Password      IN VARCHAR2,
+                            p_Keystore      IN VARCHAR2);
+
+END amfr_timestamp;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw010$.bdy

@@ -0,0 +1,230 @@
+create or replace package body amfrw010$ is
+   private_ModuleRef WSGOC.MODULE_REF;
+
+
+   procedure CreateStartupJavaScript;
+--------------------------------------------------------------------------------
+-- Name:        amfrw010$.Startup
+--
+-- Description: This procedure is the entry point for the 'amfrw010$'
+--              module.
+--
+-- Parameters:  None
+--
+--------------------------------------------------------------------------------
+   procedure Startup
+   is
+   begin
+      if not caco_security.security_check('amfrw010$') then
+         return;
+      end if;
+
+      WSGL.RegisterURL('amfrw010$.startup');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+      WSGL.StoreURLLink(0, WSGL.MsgGetText(21,WSGLM.CAP021_TOP_LEVEL));
+      amfrw010$erlo.startup(
+         Z_DIRECT_CALL => TRUE
+      );
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw010$.Startup');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw010$.firstpage
+--
+-- Description: This procedure creates the first page for the 'amfrw010$'
+--              module.
+--
+-- Parameters:  Z_DIRECT_CALL
+
+--
+--------------------------------------------------------------------------------
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+) is
+   begin
+      if not caco_security.security_check('amfrw010$') then
+         return;
+      end if;
+
+      WSGL.OpenPageHead('');
+      WSGL.METATag;
+      WSGL.ClosePageHead;
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      CreateStartupJavaScript;
+
+      WSGL.DefaultPageCaption('', 1);
+      htp.formOpen(curl => 'ActionItem', cattributes => 'NAME="SP$AIForm"');
+      WSGL.NavLinks(WSGL.MENU_LONG, WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT), 0, 'amfrw010$.showabout', '_top', p_output_line=>FALSE);
+      WSGL.NavLinks;
+      htp.formClose;
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw010$.FirstPage');
+   end;
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw010$.showabout
+--
+-- Description: This procedure is used to display an 'About' page for the
+--		'amfrw010$' module.
+--
+--------------------------------------------------------------------------------
+   procedure showabout is
+      l_usr  varchar2(255) := null;
+   begin
+      if not caco_security.security_check('amfrw010$') then
+         return;
+      end if;
+      l_usr := caco_security.get_user;
+
+      WSGL.RegisterURL('amfrw010$.showabout');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+
+      WSGL.OpenPageHead(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+      WSGL.METATag;
+      TemplateHeader(TRUE,2);
+      WSGL.ClosePageHead;
+
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      htp.p(caco_system.menu);
+
+      WSGL.DefaultPageCaption(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+
+      htp.para;
+      htp.p('
+$Revision: 1.1 $');
+      htp.para;
+
+      htp.para;
+
+      htp.p(WSGL.MsgGetText(108,WSGLM.DSP108_GENERATED_BY, 'PL/SQL Web Generator', '10.1.2.6.18'));
+      htp.para;
+
+      WSGL.Info(FALSE, 'Access Manager Framework', 'AMFRW010', l_usr);
+
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw010$.ShowAbout');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw010$.TemplateHeader
+--
+-- Description:
+--
+--------------------------------------------------------------------------------
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number) is
+   begin
+      if not caco_security.security_check('amfrw010$') then
+         return;
+      end if;
+
+      if Z_TEMPLATE_ID = 1 then
+         -- Template defined in \\loordv01\framework\css2\css_content.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=content" >
+');
+      elsif Z_TEMPLATE_ID = 2 then
+         -- Template defined in \\loordv01\framework\css2\css_about.htm
+         htp.p('<title></title> <link rel="stylesheet" href="wwv_flow_file_mgr.get_file?p_security_group_id=11019802792885519&p_fname=common.css" type="text/css" /> <script src="/i/javascript/apex_ns_3_1.js" type="text/javascript"></script> <script src="/i/javascript/apex_3_1.js" type="text/javascript"></script> <script src="/i/javascript/apex_get_3_1.js" type="text/javascript"></script> <script src="/i/javascript/apex_builder.js" type="text/javascript"></script> <script type="text/javascript"> <!-- /*Global JS Variables*/ var htmldb_Img_Dir = "/i/"; //--> </script> <link rel="stylesheet" href="/i/css/apex_3_1.css" type="text/css" /> <!--[if IE]><link rel="stylesheet" href="/i/css/apex_ie_3_1.css" type="text/css" /><![endif]--> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252" />');
+      elsif Z_TEMPLATE_ID = 3 then
+         -- Template defined in \\loordv01\framework\css2\css_query.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=query" >
+');
+      elsif Z_TEMPLATE_ID = 4 then
+         -- Template defined in \\loordv01\framework\css2\css_view.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=view" >
+');
+      elsif Z_TEMPLATE_ID = 5 then
+         -- Template defined in \\loordv01\framework\css2\css_insert.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=insert" >
+');
+      elsif Z_TEMPLATE_ID = 6 then
+         -- Template defined in \\loordv01\framework\css2\css_recordlist.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=recordlist" >
+');
+      elsif Z_TEMPLATE_ID = 7 then
+         -- Template defined in \\loordv01\framework\css2\css_lov.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=lov" >
+');
+      elsif Z_TEMPLATE_ID = 8 then
+         -- Template defined in \\loordv01\framework\css2\css_text.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=text" >
+');
+      end if;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw010$.TemplateHeader');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw010$.GetRef
+--
+-- Description: Returns a handle to the display data for the
+--	             'amfrw010$' module.
+--              If the display object does not exist then it creates it first.
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+
+   function GetRef return WSGOC.MODULE_REF
+   is
+   begin
+      if ( WSGOC.Is_Null(private_ModuleRef)) then
+         private_ModuleRef := WSGOC.Module
+            ( pShortName           => 'amfrw010$'
+            , pFirstTitle          => ''
+            );
+      end if;
+      return private_ModuleRef;
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw010$.GetRef');
+         raise;
+   end;
+
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw010$.CreateStartupJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateStartupJavaScript is
+   begin
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Startup";');
+      htp.p(WSGJSL.CloseScript);
+   end;
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw010$.spc

@@ -0,0 +1,14 @@
+create or replace package amfrw010$ is
+
+   procedure Startup
+;
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+);
+   procedure ShowAbout;
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number);
+   function GetRef return WSGOC.MODULE_REF;
+
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw010$erlo.spc

@@ -0,0 +1,188 @@
+create or replace package amfrw010$erlo is
+
+
+   CURR_VAL   CG$ERROR_LOGS.CG$ROW_TYPE;
+
+
+   procedure Startup(
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null,
+             Z_FORM in varchar2 default null);
+   procedure ActionQuery(
+             P_ERROR_TYPE in varchar2 default null,
+             P_ERROR_DATE in varchar2 default null,
+             U_ERROR_DATE in varchar2 default null,
+             P_SOURCE in varchar2 default null,
+             P_ERROR_CODE in varchar2 default null,
+             P_SEVERITY in varchar2 default null,
+             P_ERROR_STATUS in varchar2 default null,
+	     Z_DIRECT_CALL in boolean default false,
+             Z_ACTION in varchar2 default null,
+             Z_CHK in varchar2 default null );
+
+   procedure FormQuery(
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure QueryView(
+             K_ERLO_ID in varchar2 default null,
+             P_ERROR_TYPE in varchar2 default null,
+             P_ERROR_DATE in varchar2 default null,
+             U_ERROR_DATE in varchar2 default null,
+             P_SOURCE in varchar2 default null,
+             P_ERROR_CODE in varchar2 default null,
+             P_SEVERITY in varchar2 default null,
+             P_ERROR_STATUS in varchar2 default null,
+             Z_EXECUTE_QUERY in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_START in varchar2 default '1',
+             Z_ACTION in varchar2 default null,
+             Z_CHK in varchar2 default null);
+   procedure QueryList(
+             P_ERROR_TYPE in varchar2 default null,
+             P_ERROR_DATE in varchar2 default null,
+             U_ERROR_DATE in varchar2 default null,
+             P_SOURCE in varchar2 default null,
+             P_ERROR_CODE in varchar2 default null,
+             P_SEVERITY in varchar2 default null,
+             P_ERROR_STATUS in varchar2 default null,
+             Z_START in varchar2 default null,
+             Z_ACTION in varchar2 default null,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null );
+   procedure QueryFirst(
+             P_ERROR_TYPE in varchar2 default null,
+             P_ERROR_DATE in varchar2 default null,
+             U_ERROR_DATE in varchar2 default null,
+             P_SOURCE in varchar2 default null,
+             P_ERROR_CODE in varchar2 default null,
+             P_SEVERITY in varchar2 default null,
+             P_ERROR_STATUS in varchar2 default null,
+             Z_ACTION in varchar2 default null,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+   function QueryHits(
+            P_ERROR_TYPE in varchar2 default null,
+            P_ERROR_DATE in varchar2 default null,
+            U_ERROR_DATE in varchar2 default null,
+            P_SOURCE in varchar2 default null,
+            P_ERROR_CODE in varchar2 default null,
+            P_SEVERITY in varchar2 default null,
+            P_ERROR_STATUS in varchar2 default null) return number;
+
+   procedure ActionView(
+             P_ERLO_ID in owa_text.vc_arr,
+             P_ERROR_TYPE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_SOURCE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_ERROR_CODE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_SEVERITY in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_ERROR_MESSAGE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_ERROR_STATUS in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_ERROR_TYPE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_ERROR_DATE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_SOURCE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_ERROR_CODE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_SEVERITY in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_ERROR_MESSAGE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_ERROR_STATUS in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_ERLO_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_CREATED_BY in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_UPDATED_ON in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_CREATED_ON in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_UPDATED_BY in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             Q_ERROR_TYPE in varchar2 default null,
+             Q_ERROR_DATE in varchar2 default null,
+             V_ERROR_DATE in varchar2 default null,
+             Q_SOURCE in varchar2 default null,
+             Q_ERROR_CODE in varchar2 default null,
+             Q_SEVERITY in varchar2 default null,
+             Q_ERROR_STATUS in varchar2 default null,
+             z_modified in owa_text.vc_arr,
+             Z_ACTION in varchar2 default null,
+             Z_START  in varchar2 default '1',
+             Z_CHK in varchar2 default null );
+   procedure ActionDelete(
+             P_ERLO_ID in varchar2 default null,
+             O_ERROR_TYPE in varchar2 default null,
+             O_ERROR_DATE in varchar2 default null,
+             O_SOURCE in varchar2 default null,
+             O_ERROR_CODE in varchar2 default null,
+             O_SEVERITY in varchar2 default null,
+             O_ERROR_MESSAGE in varchar2 default null,
+             O_ERROR_STATUS in varchar2 default null,
+             O_CREATED_BY in varchar2 default null,
+             O_UPDATED_ON in varchar2 default null,
+             O_CREATED_ON in varchar2 default null,
+             O_UPDATED_BY in varchar2 default null,
+             Z_ACTION in varchar2 default null,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure QueryViewByKey(
+             P_ERLO_ID in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure LoadCache
+             ( Z_CURR_DEPTH       in number
+             , Z_MAX_DEPTH        in number
+             , Z_OWN_ROW_VALUES   in boolean             default false
+             , Z_CONTEXT_FOR      in WSGOC.COMPONENT_REF default null
+             , Z_BRANCH           in WSGOC.BRANCH_REF    default null
+             );
+   function RestoreState
+             ( Z_CURR_DEPTH          in number
+             , Z_MAX_DEPTH           in number
+             , Z_RESTORE_OWN_ROW     in boolean default true
+             )  return boolean;
+   procedure SaveState;
+   function  GetRef return WSGOC.COMPONENT_REF;
+
+
+   procedure InitialiseDomain(P_ALIAS in varchar2);
+
+   procedure calendar
+     (
+      Z_FIELD_NAME   in varchar2,
+      Z_CALLER_URL   in varchar2,
+      Z_FIELD_VALUE  in varchar2 default null,
+      Z_FIELD_FORMAT in varchar2 default null,
+      Z_FIELD_PROMPT in varchar2 default null
+     );
+
+   procedure format_cal_date
+     (
+      Z_FIELD_NAME   in Varchar2,
+      Z_FIELD_FORMAT in varchar2,
+      day            in varchar2,
+      month          in varchar2,
+      year           in varchar2
+     );
+
+   D_ERROR_TYPE          WSGL.typDVRecord;
+   D_SEVERITY            WSGL.typDVRecord;
+   D_ERROR_STATUS        WSGL.typDVRecord;procedure ncalendar
+     (
+      Z_FIELD_NAME   in varchar2,
+      Z_CALLER_URL   in varchar2,
+      Z_FIELD_VALUE  in varchar2 default null,
+      Z_FIELD_FORMAT in varchar2 default null,
+      Z_FIELD_PROMPT in varchar2 default null
+     );
+
+procedure nformat_cal_date
+  (
+   Z_FIELD_NAME   in Varchar2,
+   Z_FIELD_FORMAT in varchar2,
+   day            in varchar2,
+   month          in varchar2,
+   year           in varchar2
+  );
+
+
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw010$js$erlo.bdy

@@ -0,0 +1,233 @@
+create or replace package body amfrw010$js$erlo is
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw010$js$erlo.CreateViewJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  RL_REQUERY_BUT_ACTION in varchar2,
+                                  LOV_FRAME in varchar2) is
+   begin
+      if not caco_security.security_check('amfrw010$erlo') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var index = 0;');
+      htp.p( 'var DataChangeErrors = false;' );
+      htp.p( 'var DataChange = false;' );
+
+
+      htp.p( 'var P_7 = new Array();' );
+      htp.p( 'P_7[0] = "' || WSGL.EscapeURLParam(to_char(amfrw010$erlo.CURR_VAL.ERLO_ID)) || '";' );
+
+      htp.p(WSGJSL.RtnNotNull);
+      htp.p(WSGJSL.RtnChkMaxLength);
+      htp.p(WSGJSL.RtnCheckModified);
+      htp.p(WSGJSL.RtnRevertForm);
+
+      WSGJSL.Output_Invoke_CAL_JS ('amfrw010$erlo', 'scrollbars=no,resizable=no,width=320,height=350');
+
+
+      htp.p(WSGJSL.OpenEvent('ERLO','Validate'));htp.p('var index = 0;');
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_SOURCE[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, '#Source#2167#:')));
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_ERROR_CODE[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, '#Error Code#3525#:')));
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_ERROR_MESSAGE[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, '#Error Message#3526#:')));
+      htp.p(WSGJSL.CallChkMaxLength('ctl.form.P_ERROR_MESSAGE[index]', 2000, WSGL.MsgGetText(230, WSGLM.MSG230_MAXLEN_ERROR, '#Error Message#3526#:', '2000')
+));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('ERLO','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFU','OnClick'));
+      htp.p('   if (!ERLO_Validate(ctl)) { return false; }');
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFD','OnClick'));
+      htp.p(WSGJSL.VerifyDelete(WSGL.MsgGetText(118, WSGLM.DSP118_CONFIRM_DELETE)));
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFR','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'#View error logs#2163#',
+                             VF_BODY_ATTRIBUTES, 'amfrw010$js$erlo.CreateViewJavaScript');
+   end;
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw010$js$erlo.CreateQueryJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateQueryJavaScript (
+                                    LOV_FRAME in varchar2,
+						                  QF_BODY_ATTRIBUTES in varchar2)
+   is
+   begin
+      if not caco_security.security_check('amfrw010$erlo') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Query";');
+
+
+
+      WSGJSL.Output_Invoke_CAL_JS ('amfrw010$erlo', 'scrollbars=no,resizable=no,width=320,height=350');
+
+
+
+      htp.p(
+'// CAL
+//
+//
+
+function CAL(the_fieldname, the_value, the_format, the_prompt) {
+   var filter = "";
+   var the_pathname = location.pathname;
+   var i            = the_pathname.indexOf (''/:'');
+   var j            = the_pathname.indexOf (''/'', ++i);
+   //var frmCAL;	//B1777722	Needs to be global to remember state between calls.
+
+   if (i != -1)
+   {
+
+     // Syntactically incorrect url so it needs to be corrected
+
+     the_pathname = the_pathname.substring (j, the_pathname.length);
+
+   }; // (i != -1)
+
+   // B1777722  and B1854252 for IE5
+   if ( navigator.appName == "Microsoft Internet Explorer" && typeof frmCAL == "object" )
+   {
+     frmCAL.close();
+   }
+
+   frmCAL = open ("amfrw010$erlo.ncalendar" +
+                 "?Z_FIELD_NAME=" + escape(the_fieldname) +
+                 "&Z_CALLER_URL=" + escape(location.protocol + ''//'' + location.host + the_pathname + location.search) +
+                 "&Z_FIELD_VALUE=" + escape(the_value) +
+                 "&Z_FIELD_FORMAT=" + escape(the_format) +
+                 "&Z_FIELD_PROMPT=" + escape(the_prompt),
+                 "winCAL", "scrollbars=no,resizable=no,width=320,height=350");
+
+   if (frmCAL.opener == null)
+   {
+      frmCAL.opener = self;
+   }
+} ');
+      htp.p(WSGJSL.OpenEvent('ERLO','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnQFQ','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'#View error logs#2163#',
+                             QF_BODY_ATTRIBUTES, 'amfrw010$js$erlo.CreateQueryJavaScript');
+   end;
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw010$js$erlo.CreateListJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateListJavaScript (
+                                   RL_BODY_ATTRIBUTES in varchar2)
+   is
+   begin
+      if not caco_security.security_check('amfrw010$erlo') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "List";');
+
+
+      htp.p( 'var P_7 = new Array();' );
+
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'#View error logs#2163#',
+                             RL_BODY_ATTRIBUTES, 'amfrw010$js$erlo.CreateListJavaScript');
+   end;
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw010$js$erlo.spc

@@ -0,0 +1,19 @@
+create or replace package amfrw010$js$erlo is
+
+   procedure CreateQueryJavaScript(
+						                 LOV_FRAME in varchar2,
+						                 QF_BODY_ATTRIBUTES in varchar2);
+
+   procedure CreateListJavaScript(
+                                   RL_BODY_ATTRIBUTES in varchar2);
+
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  RL_REQUERY_BUT_ACTION in varchar2,
+                                  LOV_FRAME in varchar2);
+
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw020$.bdy

@@ -0,0 +1,230 @@
+create or replace package body amfrw020$ is
+   private_ModuleRef WSGOC.MODULE_REF;
+
+
+   procedure CreateStartupJavaScript;
+--------------------------------------------------------------------------------
+-- Name:        amfrw020$.Startup
+--
+-- Description: This procedure is the entry point for the 'amfrw020$'
+--              module.
+--
+-- Parameters:  None
+--
+--------------------------------------------------------------------------------
+   procedure Startup
+   is
+   begin
+      if not caco_security.security_check('amfrw020$') then
+         return;
+      end if;
+
+      WSGL.RegisterURL('amfrw020$.startup');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+      WSGL.StoreURLLink(0, WSGL.MsgGetText(21,WSGLM.CAP021_TOP_LEVEL));
+      amfrw020$bbme.startup(
+         Z_DIRECT_CALL => TRUE
+      );
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw020$.Startup');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw020$.firstpage
+--
+-- Description: This procedure creates the first page for the 'amfrw020$'
+--              module.
+--
+-- Parameters:  Z_DIRECT_CALL
+
+--
+--------------------------------------------------------------------------------
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+) is
+   begin
+      if not caco_security.security_check('amfrw020$') then
+         return;
+      end if;
+
+      WSGL.OpenPageHead('');
+      WSGL.METATag;
+      WSGL.ClosePageHead;
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      CreateStartupJavaScript;
+
+      WSGL.DefaultPageCaption('', 1);
+      htp.formOpen(curl => 'ActionItem', cattributes => 'NAME="SP$AIForm"');
+      WSGL.NavLinks(WSGL.MENU_LONG, WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT), 0, 'amfrw020$.showabout', '_top', p_output_line=>FALSE);
+      WSGL.NavLinks;
+      htp.formClose;
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw020$.FirstPage');
+   end;
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw020$.showabout
+--
+-- Description: This procedure is used to display an 'About' page for the
+--		'amfrw020$' module.
+--
+--------------------------------------------------------------------------------
+   procedure showabout is
+      l_usr  varchar2(255) := null;
+   begin
+      if not caco_security.security_check('amfrw020$') then
+         return;
+      end if;
+      l_usr := caco_security.get_user;
+
+      WSGL.RegisterURL('amfrw020$.showabout');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+
+      WSGL.OpenPageHead(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+      WSGL.METATag;
+      TemplateHeader(TRUE,2);
+      WSGL.ClosePageHead;
+
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      htp.p(caco_system.menu);
+
+      WSGL.DefaultPageCaption(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+
+      htp.para;
+      htp.p('
+$Revision: 1.9 $');
+      htp.para;
+
+      htp.para;
+
+      htp.p(WSGL.MsgGetText(108,WSGLM.DSP108_GENERATED_BY, 'PL/SQL Web Generator', '10.1.2.6.18'));
+      htp.para;
+
+      WSGL.Info(FALSE, 'Access Manager Framework', 'AMFRW020', l_usr);
+
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw020$.ShowAbout');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw020$.TemplateHeader
+--
+-- Description:
+--
+--------------------------------------------------------------------------------
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number) is
+   begin
+      if not caco_security.security_check('amfrw020$') then
+         return;
+      end if;
+
+      if Z_TEMPLATE_ID = 1 then
+         -- Template defined in \\loordv01\framework\css2\css_content.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=content" >
+');
+      elsif Z_TEMPLATE_ID = 2 then
+         -- Template defined in \\loordv01\framework\css2\css_about.htm
+         htp.p('<title></title> <link rel="stylesheet" href="wwv_flow_file_mgr.get_file?p_security_group_id=11019802792885519&p_fname=common.css" type="text/css" /> <script src="/i/javascript/apex_ns_3_1.js" type="text/javascript"></script> <script src="/i/javascript/apex_3_1.js" type="text/javascript"></script> <script src="/i/javascript/apex_get_3_1.js" type="text/javascript"></script> <script src="/i/javascript/apex_builder.js" type="text/javascript"></script> <script type="text/javascript"> <!-- /*Global JS Variables*/ var htmldb_Img_Dir = "/i/"; //--> </script> <link rel="stylesheet" href="/i/css/apex_3_1.css" type="text/css" /> <!--[if IE]><link rel="stylesheet" href="/i/css/apex_ie_3_1.css" type="text/css" /><![endif]--> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252" />');
+      elsif Z_TEMPLATE_ID = 3 then
+         -- Template defined in \\loordv01\framework\css2\css_query.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=query" >
+');
+      elsif Z_TEMPLATE_ID = 4 then
+         -- Template defined in \\loordv01\framework\css2\css_view.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=view" >
+');
+      elsif Z_TEMPLATE_ID = 5 then
+         -- Template defined in \\loordv01\framework\css2\css_insert.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=insert" >
+');
+      elsif Z_TEMPLATE_ID = 6 then
+         -- Template defined in \\loordv01\framework\css2\css_recordlist.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=recordlist" >
+');
+      elsif Z_TEMPLATE_ID = 7 then
+         -- Template defined in \\loordv01\framework\css2\css_lov.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=lov" >
+');
+      elsif Z_TEMPLATE_ID = 8 then
+         -- Template defined in \\loordv01\framework\css2\css_text.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=text" >
+');
+      end if;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw020$.TemplateHeader');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw020$.GetRef
+--
+-- Description: Returns a handle to the display data for the
+--	             'amfrw020$' module.
+--              If the display object does not exist then it creates it first.
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+
+   function GetRef return WSGOC.MODULE_REF
+   is
+   begin
+      if ( WSGOC.Is_Null(private_ModuleRef)) then
+         private_ModuleRef := WSGOC.Module
+            ( pShortName           => 'amfrw020$'
+            , pFirstTitle          => ''
+            );
+      end if;
+      return private_ModuleRef;
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw020$.GetRef');
+         raise;
+   end;
+
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw020$.CreateStartupJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateStartupJavaScript is
+   begin
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Startup";');
+      htp.p(WSGJSL.CloseScript);
+   end;
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw020$.spc

@@ -0,0 +1,14 @@
+create or replace package amfrw020$ is
+
+   procedure Startup
+;
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+);
+   procedure ShowAbout;
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number);
+   function GetRef return WSGOC.MODULE_REF;
+
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw020$bbme.spc

@@ -0,0 +1,108 @@
+create or replace package amfrw020$bbme is
+
+   type NBT_REC is record
+      ( UI_SYUS_NAME        varchar2(32760)
+      );
+
+   NBT_VAL    NBT_REC;
+   CURR_VAL   CG$BULLETIN_BOARD_MESSAGES.CG$ROW_TYPE;
+
+
+   procedure Startup(
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null,
+             Z_FORM in varchar2 default null);   procedure SYUS_LOV(
+             Z_FILTER in varchar2,
+             Z_MODE in varchar2,
+             Z_CALLER_URL in varchar2,
+             Z_FORMROW in number default 0,
+             Z_LONG_LIST in varchar2 default null,
+             Z_ISSUE_WAIT in varchar2 default null);
+
+   procedure FormInsert(
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure QueryView(
+             K_BUBM_ID in varchar2 default null,
+             Z_EXECUTE_QUERY in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_START in varchar2 default '1',
+             Z_ACTION in varchar2 default null,
+             Z_CHK in varchar2 default null);
+   function QueryHits return number;
+
+   procedure ActionView(
+             P_BUBM_ID in owa_text.vc_arr,
+             O_SUBJECT in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_MESSAGE_TEXT in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_ACTIVE_FROM in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_ACTIVE_TO in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_CUST_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_SYPR_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_BUBM_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             z_modified in owa_text.vc_arr,
+             Z_ACTION in varchar2 default null,
+             Z_START  in varchar2 default '1',
+             Z_CHK in varchar2 default null );
+   procedure ActionInsert(
+             P_SUBJECT in owa_text.vc_arr,
+             P_MESSAGE_TEXT in owa_text.vc_arr,
+             P_ACTIVE_FROM in owa_text.vc_arr,
+             P_ACTIVE_TO in owa_text.vc_arr,
+             P_UI_SYUS_NAME in owa_text.vc_arr,
+             z_modified in owa_text.vc_arr,
+             Z_ACTION in varchar2 default null,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+   procedure QueryViewByKey(
+             P_BUBM_ID in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure LoadCache
+             ( Z_CURR_DEPTH       in number
+             , Z_MAX_DEPTH        in number
+             , Z_OWN_ROW_VALUES   in boolean             default false
+             , Z_CONTEXT_FOR      in WSGOC.COMPONENT_REF default null
+             , Z_BRANCH           in WSGOC.BRANCH_REF    default null
+             );
+   function RestoreState
+             ( Z_CURR_DEPTH          in number
+             , Z_MAX_DEPTH           in number
+             , Z_RESTORE_OWN_ROW     in boolean default true
+             )  return boolean;
+   procedure SaveState;
+   function  GetRef return WSGOC.COMPONENT_REF;
+
+
+
+   procedure calendar
+     (
+      Z_FIELD_NAME   in varchar2,
+      Z_CALLER_URL   in varchar2,
+      Z_FIELD_VALUE  in varchar2 default null,
+      Z_FIELD_FORMAT in varchar2 default null,
+      Z_FIELD_PROMPT in varchar2 default null
+     );
+
+   procedure format_cal_date
+     (
+      Z_FIELD_NAME   in Varchar2,
+      Z_FIELD_FORMAT in varchar2,
+      day            in varchar2,
+      month          in varchar2,
+      year           in varchar2
+     );
+PROCEDURE before (pRef in WSGOC.COMPONENT_REF, pDepth in number);
+
+PROCEDURE after (pRef in WSGOC.COMPONENT_REF, pDepth in number);
+
+
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw020$js$bbme.bdy

@@ -0,0 +1,236 @@
+create or replace package body amfrw020$js$bbme is
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw020$js$bbme.CreateViewJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  IF_ROWS_INSERTED in integer,
+                                  IF_ROWS_ERROR in integer,
+                                  LOV_FRAME in varchar2) is
+   begin
+      if not caco_security.security_check('amfrw020$bbme') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var index = 0;');
+	    if IF_ROWS_INSERTED > 0 then
+        htp.p( 'var DataChange = true;' );
+      else
+        htp.p( 'var DataChange = false;' );
+      end if;
+      if IF_ROWS_ERROR > 0 then
+        htp.p( 'var DataChangeErrors = true;' );
+      else
+        htp.p( 'var DataChangeErrors = false;' );
+      end if;
+
+
+      htp.p( 'var P_7 = new Array();' );
+      htp.p( 'P_7[0] = "' || WSGL.EscapeURLParam(to_char(amfrw020$bbme.CURR_VAL.BUBM_ID)) || '";' );
+
+      htp.p(WSGJSL.RtnOpenLOV);
+      htp.p(WSGJSL.RtnNotNull);
+      htp.p(WSGJSL.RtnChkMaxLength);
+      htp.p(WSGJSL.RtnCheckModified);
+      htp.p(WSGJSL.RtnRevertForm);
+      htp.p(WSGJSL.RtnFlagRow);
+      htp.p(WSGJSL.OpenEvent('BBME','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFU','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFD','OnClick'));
+      htp.p(WSGJSL.VerifyDelete(WSGL.MsgGetText(118, WSGLM.DSP118_CONFIRM_DELETE)));
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFR','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFI','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'#Create Message#2154#',
+                             VF_BODY_ATTRIBUTES, 'amfrw020$js$bbme.CreateViewJavaScript');
+   end;
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw020$js$bbme.CreateInsertJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+    procedure CreateInsertJavaScript(
+                                   IF_ROWS_INSERTED in integer,
+                                   IF_ROWS_ERROR in integer,
+                                   IF_BODY_ATTRIBUTES in varchar2,
+                                   LOV_FRAME in varchar2) is
+   begin
+      if not caco_security.security_check('amfrw020$bbme') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Insert";');
+      htp.p('var index = 0;');
+	  if IF_ROWS_INSERTED > 0 then
+        htp.p( 'var DataChange = true;' );
+      else
+        htp.p( 'var DataChange = false;' );
+      end if;
+      if IF_ROWS_ERROR > 0 then
+        htp.p( 'var DataChangeErrors = true;' );
+      else
+        htp.p( 'var DataChangeErrors = false;' );
+      end if;
+
+
+      htp.p(WSGJSL.RtnOpenLOV);
+      htp.p(WSGJSL.RtnNotNull);
+      htp.p(WSGJSL.RtnChkMaxLength);
+      htp.p(WSGJSL.RtnCheckModified);
+      htp.p(WSGJSL.RtnRevertForm);
+      htp.p(WSGJSL.RtnFlagRow);
+
+      WSGJSL.Output_Invoke_CAL_JS ('amfrw020$bbme', 'scrollbars=no,resizable=no,width=320,height=350');
+
+
+      htp.p(WSGJSL.OpenEvent('UI_SYUS_NAME','LOV'));      htp.p('
+    var depStr = "";
+    var modeStr = ""
+    if (index == null)
+       index = 0;
+    if (ctl[index].form.name.search(/VForm$/) == -1)
+    {
+      modeStr = "INS";
+    }
+    else
+    {
+      modeStr = "UPD";
+    }
+');
+
+      if LOV_FRAME is not null then
+         htp.p('    var lovFra = "'||LOV_FRAME||'";');
+         htp.p('    var winpar = "";');
+      else
+         htp.p('    var lovFra = "winLOV";');
+         htp.p('    var winpar = "scrollbars=yes,resizable=yes,width=400,height=400";');
+      end if;
+      htp.p('    var filterprompt = "";');
+      htp.p('
+
+    var lovTitle = "'||replace('','"','\"')||'";
+    window.current_lov_title = lovTitle;
+
+    JSLOpenLOV( ctl[index], index, modeStr,  "amfrw020$bbme.syus_lov", depStr, lovFra, winpar, filterprompt );
+
+');
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('BBME','Validate'));htp.p('var index = 0;');
+
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_SUBJECT[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, '#Subject(*)#3530#:')));
+
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_MESSAGE_TEXT[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, '#Message Text(*)#3532#:')));
+      htp.p(WSGJSL.CallChkMaxLength('ctl.form.P_MESSAGE_TEXT[index]', 2000, WSGL.MsgGetText(230, WSGLM.MSG230_MAXLEN_ERROR, '#Message Text(*)#3532#:', '2000')
+));
+
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_ACTIVE_FROM[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, '#Active From(*)#3531#:')));
+
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_ACTIVE_TO[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, '#Active To(*)#3533#:')));
+
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('BBME','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnIFI','OnClick'));
+      htp.p('   if (!BBME_Validate(ctl)) { return false; }');
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnIFR','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'#Create Message#2154#',
+                             IF_BODY_ATTRIBUTES, 'amfrw020$js$bbme.CreateInsertJavaScript');
+   end;
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw020$js$bbme.spc

@@ -0,0 +1,19 @@
+create or replace package amfrw020$js$bbme is
+
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  IF_ROWS_INSERTED in integer,
+                                  IF_ROWS_ERROR in integer,
+                                  LOV_FRAME in varchar2);
+
+   procedure CreateInsertJavaScript(
+                                   IF_ROWS_INSERTED in integer,
+                                   IF_ROWS_ERROR in integer,
+                                   IF_BODY_ATTRIBUTES in varchar2,
+                                   LOV_FRAME in varchar2);
+
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw021$.bdy

@@ -0,0 +1,804 @@
+CREATE OR REPLACE PACKAGE BODY amfrw021$ IS
+  --
+  -- Text constants
+  --
+  c_heading         CONSTANT NUMBER := 2154;
+  c_active_from     CONSTANT NUMBER := 2150;
+  c_active_to       CONSTANT NUMBER := 2151;
+  c_customer_name   CONSTANT NUMBER := 1145;
+  c_include_exclude CONSTANT NUMBER := 1146;
+  c_submit          CONSTANT NUMBER := 1147;
+  c_selectall       CONSTANT NUMBER := 1148;
+  c_selectallopen   CONSTANT NUMBER := 3926;
+  c_subject         CONSTANT NUMBER := 2148;
+  c_message_text    CONSTANT NUMBER := 3535;
+  c_customers       CONSTANT NUMBER := 1045;
+  c_sms             CONSTANT NUMBER := 3959;
+  c_message_sent_to CONSTANT NUMBER := 3927;
+  c_system_user     CONSTANT NUMBER := 1057;
+  --
+  -- Other Constants
+  --
+  c_yes             CONSTANT VARCHAR2(1) := 'Y';
+  c_date_format     CONSTANT VARCHAR2(255) := g_date_format;
+  --
+  -- Global variables
+  --
+  g_active_from_lbl     VARCHAR2(255) := caco_utilities.get_module_text(c_active_from);
+  g_active_to_lbl       VARCHAR2(255) := caco_utilities.get_module_text(c_active_to);
+  g_subject_lbl         VARCHAR2(255) := caco_utilities.get_module_text(c_subject);
+  g_customers           VARCHAR2(255) := caco_utilities.get_module_text(c_customers);
+  g_message_text_lbl    VARCHAR2(255) := caco_utilities.get_module_text(c_message_text);
+  g_sms_lbl             VARCHAR2(255) := caco_utilities.get_module_text(c_sms);
+  g_system_user_lbl     VARCHAR2(255) := caco_utilities.get_module_text(c_system_user);
+  --
+  -- Output contents of an array to debug table
+  -- useful for debugging..
+  --
+  PROCEDURE display_vc_arr(arr_name IN VARCHAR2,
+                           arr      IN owa_util.vc_arr) IS  
+  BEGIN
+    --
+    IF arr.COUNT > 0 THEN
+      caco_debug.putline('---------------------------------------');
+      FOR i IN arr.FIRST..arr.LAST LOOP
+        caco_debug.putline(arr_name||': '||i||' = '||arr(i));
+      END LOOP;
+      caco_debug.putline('---------------------------------------');
+    END IF;
+    --
+  END display_vc_arr;
+  --  
+  --
+  -- standard web calendar package
+  --
+  PROCEDURE calendar(z_field_name   IN VARCHAR2
+                    ,z_caller_url   IN VARCHAR2
+                    ,z_field_value  IN VARCHAR2 DEFAULT NULL
+                    ,z_field_format IN VARCHAR2 DEFAULT NULL
+                    ,z_field_prompt IN VARCHAR2 DEFAULT NULL) IS
+    --
+    field_caption VARCHAR2(2000);
+    --
+  BEGIN
+    --
+    IF z_field_prompt IS NULL THEN
+      --
+      field_caption := INITCAP(REPLACE(SUBSTR(z_field_name
+                                             ,3
+                                             ,LENGTH(z_field_name) - 2)
+                                      ,'_'
+                                      ,' '));
+      --
+    ELSE
+      --
+      field_caption := INITCAP(REPLACE(z_field_prompt
+                                      ,'_'
+                                      ,' '));
+      --
+    END IF;
+    --
+    wsgl.registerurl(g_package_name || '.calendar');
+    wsgl.addurlparam('Z_FIELD_NAME'
+                    ,z_field_name);
+    wsgl.addurlparam('Z_CALLER_URL'
+                    ,z_caller_url);
+    --
+    IF wsgl.notlowercase THEN
+      RETURN;
+    END IF;
+    --
+    wsgl.output_calendar(z_field_name
+                        ,z_field_value
+                        ,z_field_format
+                        ,wsgl.msggettext(123
+                                        ,wsglm.dsp128_cal_caption
+                                        ,field_caption)
+                        ,NULL
+                        ,g_package_name
+                        ,'Close'
+                        ,TRUE
+                        ,g_date_format);
+    --
+    wsgl.output_calendar(z_field_name
+                        ,z_field_value
+                        ,z_field_format
+                        ,wsgl.msggettext(123
+                                        ,wsglm.dsp128_cal_caption
+                                        ,field_caption)
+                        ,NULL
+                        ,g_package_name
+                        ,'Close'
+                        ,FALSE
+                        ,g_date_format);
+    --
+  EXCEPTION
+    WHEN OTHERS THEN
+      wsgl.displaymessage(wsgl.mess_exception
+                         ,SQLERRM
+                         ,''
+                         ,NULL
+                         ,g_package_name || '.calendar');
+  END calendar;
+  --
+  -- Standard web formatting package for submitted dates
+  --
+  PROCEDURE format_cal_date(z_field_name   IN VARCHAR2
+                           ,z_field_format IN VARCHAR2
+                           ,DAY            IN VARCHAR2
+                           ,MONTH          IN VARCHAR2
+                           ,YEAR           IN VARCHAR2) IS
+    --
+    field_caption VARCHAR2(2000) := INITCAP(REPLACE(SUBSTR(z_field_name
+                                                          ,3
+                                                          ,LENGTH(z_field_name) - 2)
+                                                   ,'_'
+                                                   ,' '));
+    l_day         VARCHAR2(15) := DAY;
+    --
+    PROCEDURE output_format_cal_js(page_header     IN VARCHAR2
+                                  ,body_attributes IN VARCHAR2
+                                  ,chosen_date     IN VARCHAR2
+                                  ,field_format    IN VARCHAR2) IS
+      --
+      -- Copied from WSGL
+      --
+      the_date DATE := TO_DATE(chosen_date
+                              ,'DD-MONTH-YYYY');
+      --
+    BEGIN
+      --
+      wsgl.openpagehead(page_header);
+      wsgl.closepagehead;
+      wsgl.openpagebody(FALSE
+                       ,p_attributes => body_attributes);
+      htp.p('<SCRIPT>');
+      htp.p('opener.dateField.value = "' ||
+            TO_CHAR(the_date
+                   ,field_format) || '";');
+      htp.p('opener.dateField.focus();');
+      htp.p('if(opener.dateField.onchange != null) { opener.dateField.onchange(); }');
+      htp.p('window.close();');
+      htp.p('</SCRIPT>');
+      wsgl.closepagebody;
+      --
+    END output_format_cal_js;
+    --
+  BEGIN
+    --
+    IF l_day = '0' THEN
+      l_day := '01';
+    END IF;
+    --
+    output_format_cal_js(wsgl.msggettext(123
+                                        ,wsglm.dsp128_cal_caption
+                                        ,field_caption)
+                        ,NULL
+                        ,l_day || '-' || MONTH || '-' || YEAR
+                        ,z_field_format);
+    --
+  END format_cal_date;
+  --
+  -- Procedure to display the system user poplist
+  --
+  PROCEDURE display_system_user
+  IS
+      -- Get all possible customers for the person logged in
+      CURSOR c_syus IS
+      SELECT syus.syus_id     syus_id
+            ,syus.db_username username
+      FROM   system_users syus
+      WHERE  SYSDATE BETWEEN syus.period_start AND
+             nvl(syus.period_end
+                ,SYSDATE)
+      AND    syus.user_locked = 'N'          
+      AND    syus.syus_id NOT IN (SELECT syus2.syus_id
+                                  FROM   system_users syus2
+                                  WHERE  upper(syus2.db_username) IN
+                                         ('SYSTEM'
+                                         ,'ADVANTICA'))
+      AND    syus_id IN
+             (SELECT inus.syus_id
+               FROM   intermediary_users inus
+               WHERE  inus.inte_id IN (SELECT cbcv.inte_id
+                                       FROM   cust_by_cuty_v cbcv))
+      ORDER BY syus.db_username;
+      --
+  BEGIN
+      --
+      htp.p('
+          <tr>
+            <td style="width:120px;"><b>'||g_system_user_lbl||'</b></td>');  -- System User
+      htp.p('          <td>
+              <select id="p_syus_id" name="p_syus_id" size="1">');
+      --
+      -- System User
+      -- Put out option list of available system users
+      htp.p('<option selected></option>');
+      FOR r IN c_syus LOOP
+        --
+        htp.p('<option value="'||r.syus_id||'">'||r.username||'</option>');
+        --
+      END LOOP;
+      --
+      htp.p('            </select>
+            </td>
+            <td>&nbsp</td>
+          </tr> ');    
+      --
+  END display_system_user;  
+  --
+  -- Output the HTML page head
+  --
+  PROCEDURE page_header IS
+    --
+    l_header         VARCHAR2(255);
+    --
+  BEGIN
+    --
+    l_header := caco_utilities.get_module_text(c_heading);
+    --
+    htp.p('<div id="header_div">
+           <h1>' || l_header || '</h1>');
+    --
+    htp.p('<br>');
+    --
+    htp.p('<table>');
+    --
+    htp.p('<tr valign="top">');
+    --
+    htp.p('<td style="width:120px;"><b>' || g_subject_lbl ||
+          '&nbsp;*&nbsp;</b></td>');
+    htp.p('<td><input name="p_subject" SIZE="40" MAXLENGTH="100"></input></td>');
+    --
+    htp.p('</tr>');
+    --
+    htp.p('<tr valign="top">');
+    --
+    htp.p('<td style="width:120px;"><b>' || g_message_text_lbl ||
+          '&nbsp;*&nbsp;</b></td>');
+    htp.p('<td><textarea name="p_message_text" rows=5 cols=30></textarea></td>');
+    --
+    htp.p('</tr>');
+    --
+    htp.p('</table>');
+    --
+    htp.p('<table>');
+    htp.p('<tr>
+            <td style="width:120px;"><b>' || g_active_from_lbl ||
+          '&nbsp;*&nbsp;</b></td>
+            <td>
+                <input id="p_active_from" name="p_active_from" size="11" type="text" value="' ||
+          TO_CHAR(TRUNC(SYSDATE)
+                 ,g_date_format) || '" />
+            </td>
+            <td>');
+    --
+    htp.p(wsgjsl.calbutton(field_name     => 'p_active_from'
+                          ,p_calbut       => htf.img(curl        => caco_system.images_path ||
+                                                                    'lov.gif'
+                                                    ,calign      => 'TOP'
+                                                    ,cattributes => 'ALT="List Values" WIDTH=18 HEIGHT=22 BORDER')
+                          ,field_format   => g_date_format
+                          ,p_field_prompt => g_active_from_lbl));
+    --
+    htp.p('   </td>
+          </tr>');
+    --
+    htp.p('<tr>
+            <td style="width:120px;"><b>' || g_active_to_lbl ||
+          '&nbsp;*&nbsp;</b></td>
+            <td>
+                <input id="p_active_to" name="p_active_to" size="11" type="text" value="' ||
+          TO_CHAR(TRUNC(SYSDATE)+14
+                 ,g_date_format) || '" />
+            </td>
+            <td>');
+    --
+    htp.p(wsgjsl.calbutton(field_name     => 'p_active_to'
+                          ,p_calbut       => htf.img(curl        => caco_system.images_path ||
+                                                                    'lov.gif'
+                                                    ,calign      => 'TOP'
+                                                    ,cattributes => 'ALT="List Values" WIDTH=18 HEIGHT=22 BORDER')
+                          ,field_format   => g_date_format
+                          ,p_field_prompt => g_active_to_lbl));
+    --
+    htp.p('   </td>
+          </tr>');    
+    --
+    display_system_user;
+    --
+    htp.p('<tr>');
+    htp.p('<td style="width:120px;"><b>' || g_sms_lbl || '</b></td>');
+    htp.p('<td>' || '<input type="checkbox" name="p_sms" VALUE="Y" checked="checked">' || '</td>');
+    htp.p('</tr>'); 
+    htp.p('</table>');         
+    htp.p('<br>');
+    htp.p('<hr/>');
+    --
+    htp.p('</div>');
+    --
+  END;
+  --
+  -- Output the form elements
+  --
+  PROCEDURE page_body IS
+    --
+    l_cust_name_lbl VARCHAR2(255);
+    l_inc_exc_lbl   VARCHAR2(255);
+    l_index         NUMBER;
+    l_open          VARCHAR2(1);
+    --
+    CURSOR c_cont (cp_cust_id NUMBER)IS
+    SELECT 'Y'
+    FROM   customers cust
+          ,contracts cont
+    WHERE  cust.cust_id = cp_cust_id     
+    AND    cont.cust_id = cust.cust_id
+    AND    cont.status  = 'O'
+    AND    TRUNC(SYSDATE) BETWEEN cont.valid_from AND cont.valid_until
+    ORDER BY cust.name;
+    --   
+  BEGIN
+    --
+    l_cust_name_lbl := caco_utilities.get_module_text(c_customer_name);
+    l_inc_exc_lbl   := caco_utilities.get_module_text(c_include_exclude);
+    --
+    htp.p('<div id="page_body_div">');
+    htp.p('<table>');
+    htp.p('<thead>');
+    --
+    htp.p('<tr>');
+    --
+    htp.print('<th align="left">' || l_cust_name_lbl || '</th>');
+    htp.print('<th align="left">' || l_inc_exc_lbl || '</th>');
+    --
+    htp.p('</tr>');
+    --
+    htp.p('</thead>');
+    --
+    htp.p('<tbody>');
+    --
+    l_index := 0;
+    --
+    FOR cust_rec IN (SELECT cust.cust_id    cust_id
+                           , cust.name      name
+                      FROM   customers               cust
+                           , customer_intermediaries cuin
+                      WHERE  cust.cust_id = cuin.cust_id
+                      AND   ( EXISTS ( SELECT 1
+                                       FROM   customer_intermediaries cuin1
+                                            , customers               cust1
+                                            , customer_types          cuty
+                                       WHERE  cuin.inte_id   = cuin1.inte_id
+                                       AND    cust1.cust_id  = cuin1.cust_id
+                                       AND    cust1.cuty_id  = cuty.cuty_id
+                                       AND    cuty.cuty_id   = caco_utilities.cuty_id_for_user )
+                              OR caco_utilities.user_has_system = c_yes 
+                              OR caco_utilities.user_has_EFT_admin = c_yes)
+                      AND   cuin.inte_id <> cout_system_configuration.get_configuration_item('INTE_ID')
+                      GROUP BY cust.cust_id, cust.name
+                      ORDER BY name 
+                    ) LOOP                                       
+      -- 
+      l_index := l_index + 1;
+      --
+      OPEN c_cont(cust_rec.cust_id);
+      FETCH c_cont INTO l_open;
+      IF c_cont%NOTFOUND THEN
+        l_open := 'N';
+      END IF;
+      CLOSE c_cont;
+      htp.p('<tr>');
+      htp.p('<td>' || cust_rec.name || '</td>');
+      htp.p('<td>' || '<input type="checkbox" name="p_cust_id" VALUE="' ||
+            cust_rec.cust_id || '"><input type="hidden" name="p_open" VALUE="' ||
+            l_open ||'"></td>');
+      htp.p('</tr>');
+      --
+    END LOOP;
+    --
+    htp.p('</tbody>');
+    htp.p('</table>');
+    htp.p('</div>');
+    --
+  END;
+  --
+  -- javascript routine to check all check boxes
+  --
+  PROCEDURE checkall_js IS
+    --
+    --
+  BEGIN
+    --
+    htp.p('
+    <script language="JavaScript">
+
+      function checkAll( field )
+      {
+        var x=document.getElementsByName(field);
+        var action=true;
+        if (x[0].checked == true ) {
+          action=false;
+          }
+        for (i = 0; i < x.length; i++)
+        {
+	        x[i].checked = action;
+        }
+     }
+   </script>
+');
+    --
+  END;
+  --
+  -- javascript routine to check all check boxes which belong to customers with open contracts
+  --
+  PROCEDURE checkallopencontracts_js IS
+    --
+    --
+  BEGIN
+    --
+    htp.p('
+    <script language="JavaScript">
+
+      function checkAllOpenContracts( field, open )
+      {
+        var x=document.getElementsByName(field);
+        var y=document.getElementsByName(open);   
+        for (i = 0; i < x.length; i++)
+        {
+          if (y[i].value == ''Y'' ) {
+            x[i].checked = true;
+            }
+          else {
+            x[i].checked = false;
+            }          	        
+        }
+     }
+   </script>
+');
+    --
+  END;  
+  --
+  -- Output the standard html page headers including the document type
+  --
+  PROCEDURE standard_html_header IS
+  BEGIN
+    --
+    htp.p('  <html xmlns="http://www.w3.org/1999/xhtml" lang="en" xml:lang="en">');
+    --
+    wsgl.openpagehead(g_title);
+    caco_system.content_type;
+    htp.p('<link rel=stylesheet href="caco_system.css?p_type=content" >');
+    --
+    -- Following required to show a calender screen
+    --
+    htp.p(wsgjsl.openscript);
+    wsgjsl.output_invoke_cal_js(g_package_name
+                               ,'scrollbars=no,resizable=no,width=320,height=350');
+    htp.p(wsgjsl.closescript);
+    --
+    checkall_js;
+    checkallopencontracts_js;
+    --
+    htp.p(CHR(10) ||
+          '<link rel="stylesheet" media="all" type="text/css" href="caco_system.css" />');
+    --
+    wsgl.closepagehead;
+    --
+    wsgl.openpagebody(FALSE);
+    --
+    htp.p(caco_system.menu);
+    --
+  END;
+  --
+  -- Entry procedure
+  --
+  PROCEDURE startup IS
+    --
+    l_submit_lbl        VARCHAR2(255);
+    l_selectall_lbl     VARCHAR2(255);
+    l_selectallopen_lbl VARCHAR2(255);
+    --
+  BEGIN
+    --
+    IF NOT caco_security.security_check(g_package_name) THEN
+      RETURN;
+    END IF;
+    --
+    l_submit_lbl        := caco_utilities.get_module_text(c_submit);
+    l_selectall_lbl     := caco_utilities.get_module_text(c_selectall);
+    l_selectallopen_lbl := caco_utilities.get_module_text(c_selectallopen);
+    --
+    standard_html_header;
+    --
+    htp.p('<div id="form_content">');
+    --
+    htp.p('<form id="submit_form" name="submit_form" method="get" action="amfrw021$.create_messages">');
+    --
+    -- Draw the page header
+    --
+    page_header;
+    --
+    page_body;
+    --
+    htp.p('<br>');
+    --
+    --
+    htp.p('<input type=button value="' || l_selectall_lbl ||
+          '" onClick="checkAll(''p_cust_id'')">');
+    --      
+    htp.p('<input type=button value="' || l_selectallopen_lbl ||
+          '" onClick="checkAllOpenContracts(''p_cust_id'',''p_open'')">');          
+    --
+    htp.p('<br><br>');
+    htp.p('<input type=submit value="' || l_submit_lbl || '">');
+    htp.p('<br><br>');
+    htp.p('<i>''*''' || caco_utilities.get_module_text(2202) || '</i>'); -- '*' Denotes a mandatory field 
+    --
+    htp.p('</form>'); -- Submit_form
+    --
+    htp.p('</div>');
+    --
+    wsgl.closepagebody;
+    --
+  END;
+  --
+  -- Function to check the date format
+  --
+  FUNCTION invalid_date_format(p_date IN VARCHAR2) RETURN BOOLEAN IS
+    --
+    l_date DATE;
+    --
+  BEGIN
+    --
+    l_date := TO_DATE(p_date
+                     ,c_date_format);
+    --
+    RETURN(FALSE);
+    --
+  EXCEPTION
+    WHEN OTHERS THEN
+      RETURN(TRUE);
+  END;
+  --
+  -- Submit procedure called by the form
+  --
+  PROCEDURE create_messages(p_subject       IN VARCHAR2 
+                           ,p_message_text  IN VARCHAR2 
+                           ,p_active_from   IN VARCHAR2 
+                           ,p_active_to     IN VARCHAR2 
+                           ,p_syus_id       IN VARCHAR2 
+                           ,p_sms           IN VARCHAR2 DEFAULT NULL
+                           ,p_cust_id       IN owa_util.vc_arr DEFAULT g_empty_vc_array
+                           ,p_open          IN owa_util.vc_arr DEFAULT g_empty_vc_array) IS
+    --
+    missing_params         EXCEPTION;
+    missing_user_or_cust   EXCEPTION;
+    date_in_past           EXCEPTION;
+    dates_overlap          EXCEPTION;
+    l_error_list           caco_utilities.g_t_substitution_list;
+    l_empty_error_list     caco_utilities.g_t_substitution_list;
+    l_error                VARCHAR2(255);
+    l_error_type           exception_messages.exme_type%TYPE;
+    l_cust_tab             t_cust_tab;
+    ex_invalid_date_format EXCEPTION;
+    l_message_sent_to_lbl  VARCHAR2(255);
+    l_temp_link            VARCHAR2(255);         
+    --     
+    CURSOR c_cust(cp_cust_id IN customers.cust_id%TYPE) IS
+      SELECT NAME
+      FROM   customers
+      WHERE  cust_id = cp_cust_id;
+    --  
+    l_cust_name customers.NAME%TYPE;
+    --    
+  BEGIN
+    --
+    standard_html_header;
+    --
+    l_error_list           := l_empty_error_list;
+    l_message_sent_to_lbl  := caco_utilities.get_module_text(c_message_sent_to);    
+    --
+    -- Check mandatory parameters are entered.
+    --
+    IF p_subject IS NULL THEN
+      --
+      l_error_list(1) := g_subject_lbl;
+      RAISE missing_params;
+      --
+    ELSIF p_message_text IS NULL THEN
+      --
+      l_error_list(1) := g_message_text_lbl;
+      RAISE missing_params;
+      --
+    ELSIF p_active_from IS NULL THEN
+      --
+      l_error_list(1) := g_active_from_lbl;
+      RAISE missing_params;
+      --
+    ELSIF p_active_to IS NULL THEN
+      --
+      l_error_list(1) := g_active_to_lbl;
+      RAISE missing_params;
+    -- a system user or at least 1 customer checkbox must be selected               
+    ELSIF p_cust_id.COUNT < 1 AND p_syus_id IS NULL THEN
+      --
+      l_error_list(1) := g_customers;
+      RAISE missing_user_or_cust;
+      --
+    END IF;
+    --
+    -- Check dates.
+    --    
+    IF invalid_date_format(p_active_from) THEN
+      RAISE ex_invalid_date_format;
+    END IF;
+    IF invalid_date_format(p_active_to) THEN
+      RAISE ex_invalid_date_format;
+    END IF;    
+    --
+    IF to_date(p_active_from,c_date_format) < trunc(SYSDATE) THEN
+      --
+      RAISE date_in_past;
+      --
+    ELSIF to_date(p_active_to,c_date_format) < to_date(p_active_from,c_date_format) THEN
+      --
+      RAISE dates_overlap;
+      --
+    END IF;
+    -- 
+    -- loop around the customers selected
+    --                                                          
+    FOR i IN 1 .. p_cust_id.COUNT LOOP
+      --
+      OPEN  c_cust(p_cust_id(i));
+      FETCH c_cust
+      INTO  l_cust_name;
+      CLOSE c_cust;
+      --
+      l_cust_tab(i) := l_cust_name;
+      --
+      -- Create messages for customers selected
+      --      
+      amfr_message.create_message(p_subject => p_subject,
+                                  p_message => p_message_text,
+                                  p_cust_id => p_cust_id(i),
+                                  p_sypr_id => NULL,
+                                  p_syus_id => NULL,
+                                  p_active_from => to_date(p_active_from,c_date_format),
+                                  p_active_to => to_date(p_active_to,c_date_format),
+                                  p_email_sms => NVL(p_sms,'N'));                                                                                                    
+      --
+    END LOOP;  
+    --
+    -- now deal with the system user
+    --
+    IF p_syus_id IS NOT NULL THEN
+      --
+      -- Create messages for system user selected
+      --             
+      amfr_message.create_message(p_subject => p_subject,
+                                  p_message => p_message_text,
+                                  p_cust_id => NULL,
+                                  p_sypr_id => NULL,
+                                  p_syus_id => p_syus_id,
+                                  p_active_from => to_date(p_active_from,c_date_format),
+                                  p_active_to => to_date(p_active_to,c_date_format),
+                                  p_email_sms => NVL(p_sms,'N'));                                                        
+      --                            
+    END IF;    
+    htp.p('<h1>'||caco_utilities.get_module_text(c_heading)||'</h1>');
+    --
+    wsgl.displaymessage(p_type => wsgl.mess_success
+                       ,p_mess => l_message_sent_to_lbl);
+    --
+    IF p_syus_id IS NOT NULL THEN
+      htp.p('<br>');
+      htp.p('<b>' || g_system_user_lbl || '</b>');
+      htp.p('<br>');
+      htp.p('<p>&nbsp;&nbsp;' || caco_utilities.get_syus_name(p_syus_id) || '</p>');          
+    END IF;
+    --
+    IF l_cust_tab.COUNT > 0 THEN
+      htp.p('<br>');
+      htp.p('<b>' || g_customers || '</b>');
+      htp.p('<br>');
+      --
+      FOR r IN 1 .. l_cust_tab.COUNT LOOP
+        --
+        htp.p('<p>&nbsp;&nbsp;' || l_cust_tab(r) || '</p>');
+        --
+      END LOOP;
+    END IF;
+    htp.p('<br>');    
+    l_temp_link := caco_system.dad_path||'amfrw021$.startup';
+    --
+    htp.p('<input type="button" value="'||caco_utilities.get_module_text(851)||'"'); -- New button
+    htp.p('  onclick="location.href='''||l_temp_link||'''" />');   
+    --
+    wsgl.closepagebody;
+    --
+    COMMIT;
+    --
+  EXCEPTION
+    WHEN ex_invalid_date_format THEN
+      --
+      caco_utilities.get_exception_message(p_exception_number  => -20538
+                                          ,p_message           => l_error
+                                          ,p_exme_type         => l_error_type
+                                          ,p_substitution_list => l_error_list
+                                          ,p_language          => caco_utilities.get_syus_lang);
+      --
+      wsgl.displaymessage(p_type => wsgl.mess_error
+                         ,p_mess => l_error);
+      --
+    WHEN missing_params THEN
+      --
+      caco_utilities.get_exception_message(p_exception_number  => -20506
+                                          ,p_message           => l_error
+                                          ,p_exme_type         => l_error_type
+                                          ,p_substitution_list => l_error_list
+                                          ,p_language          => caco_utilities.get_syus_lang);
+      --
+      wsgl.displaymessage(p_type => wsgl.mess_error
+                         ,p_mess => l_error);
+      --
+    WHEN missing_user_or_cust THEN
+      --
+      caco_utilities.get_exception_message(p_exception_number  => -20553
+                                          ,p_message           => l_error
+                                          ,p_exme_type         => l_error_type
+                                          ,p_substitution_list => l_error_list
+                                          ,p_language          => caco_utilities.get_syus_lang);
+      --
+      wsgl.displaymessage(p_type => wsgl.mess_error
+                         ,p_mess => l_error);
+      --      
+    WHEN date_in_past THEN
+      --
+      caco_utilities.get_exception_message(p_exception_number  => -20551
+                                          ,p_message           => l_error
+                                          ,p_exme_type         => l_error_type
+                                          ,p_substitution_list => l_error_list
+                                          ,p_language          => caco_utilities.get_syus_lang);
+      --
+      wsgl.displaymessage(p_type => wsgl.mess_error
+                         ,p_mess => l_error);
+      --
+    WHEN dates_overlap THEN
+      --
+      caco_utilities.get_exception_message(p_exception_number  => -20552
+                                          ,p_message           => l_error
+                                          ,p_exme_type         => l_error_type
+                                          ,p_substitution_list => l_error_list
+                                          ,p_language          => caco_utilities.get_syus_lang);
+      --
+      wsgl.displaymessage(p_type => wsgl.mess_error
+                         ,p_mess => l_error);
+      --
+    WHEN OTHERS THEN
+      --
+      l_error := 'ERROR in amfrw021$.create_messages: ' || SQLERRM;
+      --
+      ROLLBACK;
+      --
+      wsgl.displaymessage(p_type => wsgl.mess_error
+                         ,p_mess => l_error);
+    
+  END;
+  --
+  -- About procedure
+  --
+  FUNCTION about RETURN VARCHAR2 IS
+  BEGIN
+    RETURN(g_package_name || chr(10) || g_revision || chr(10) || g_header);
+  END about;
+  --
+-- Package initialisation
+--
+BEGIN
+  -- Initialization
+  NULL;
+END amfrw021$;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw021$.spc

@@ -0,0 +1,57 @@
+CREATE OR REPLACE PACKAGE amfrw021$ IS
+  --
+  g_title        CONSTANT VARCHAR2(50)  := 'Create Message';
+  g_header       CONSTANT VARCHAR2(160) := '$Header:   $';
+  g_revision     CONSTANT VARCHAR2(160) := '$Revision: $';
+  g_package_name CONSTANT VARCHAR2(30)  := 'amfrw021$';
+  --
+  -- Types
+  --
+  TYPE t_cust_tab IS TABLE OF VARCHAR2(255) INDEX BY BINARY_INTEGER;
+  g_empty_vc_array owa_util.vc_arr;
+  --
+  -- Global date format
+  --
+  g_date_format CONSTANT VARCHAR2(20) := nvl(cout_system_configuration.get_configuration_item('g_date_format')
+                                            ,'DD/MM/YYYY');
+  --
+  /**
+  -- Generic procedures for the date LOV, same as designer generated code
+  */
+  PROCEDURE calendar(z_field_name   IN VARCHAR2
+                    ,z_caller_url   IN VARCHAR2
+                    ,z_field_value  IN VARCHAR2 DEFAULT NULL
+                    ,z_field_format IN VARCHAR2 DEFAULT NULL
+                    ,z_field_prompt IN VARCHAR2 DEFAULT NULL);
+  --
+  PROCEDURE format_cal_date(z_field_name   IN VARCHAR2
+                           ,z_field_format IN VARCHAR2
+                           ,DAY            IN VARCHAR2
+                           ,MONTH          IN VARCHAR2
+                           ,YEAR           IN VARCHAR2);
+  --
+  --
+  PROCEDURE startup;
+  --
+  /** create records in the nomination_windows and nom_window_customers tables
+      to specify timefgrames where customers may renominate within day.
+  */
+  PROCEDURE create_messages(p_subject       IN VARCHAR2 
+                           ,p_message_text  IN VARCHAR2 
+                           ,p_active_from   IN VARCHAR2 
+                           ,p_active_to     IN VARCHAR2 
+                           ,p_syus_id       IN VARCHAR2 
+                           ,p_sms           IN VARCHAR2 DEFAULT NULL
+                           ,p_cust_id       IN owa_util.vc_arr DEFAULT g_empty_vc_array
+                           ,p_open          IN owa_util.vc_arr DEFAULT g_empty_vc_array);
+  --
+  /**
+    -- FUNCTION about
+    -- Returns the version number and VSS header for this package
+    --
+    -- %return The version number and VSS header for this package
+  */
+  FUNCTION about RETURN VARCHAR2;
+  --
+END amfrw021$;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw030$.bdy

@@ -0,0 +1,226 @@
+create or replace package body amfrw030$ is
+   private_ModuleRef WSGOC.MODULE_REF;
+
+
+   procedure CreateStartupJavaScript;
+--------------------------------------------------------------------------------
+-- Name:        amfrw030$.Startup
+--
+-- Description: This procedure is the entry point for the 'amfrw030$'
+--              module.
+--
+-- Parameters:  None
+--
+--------------------------------------------------------------------------------
+   procedure Startup
+   is
+   begin
+      if not caco_security.security_check('amfrw030$') then
+         return;
+      end if;
+
+      WSGL.RegisterURL('amfrw030$.startup');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+      WSGL.StoreURLLink(0, WSGL.MsgGetText(21,WSGLM.CAP021_TOP_LEVEL));
+      amfrw030$mere.startup(
+         Z_DIRECT_CALL => TRUE
+      );
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw030$.Startup');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw030$.firstpage
+--
+-- Description: This procedure creates the first page for the 'amfrw030$'
+--              module.
+--
+-- Parameters:  Z_DIRECT_CALL
+
+--
+--------------------------------------------------------------------------------
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+) is
+   begin
+      if not caco_security.security_check('amfrw030$') then
+         return;
+      end if;
+
+      WSGL.OpenPageHead('');
+      WSGL.METATag;
+      WSGL.ClosePageHead;
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      CreateStartupJavaScript;
+
+      WSGL.DefaultPageCaption('', 1);
+      htp.formOpen(curl => 'ActionItem', cattributes => 'NAME="SP$AIForm"');
+      WSGL.NavLinks(WSGL.MENU_LONG, WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT), 0, 'amfrw030$.showabout', '_top', p_output_line=>FALSE);
+      WSGL.NavLinks;
+      htp.formClose;
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw030$.FirstPage');
+   end;
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw030$.showabout
+--
+-- Description: This procedure is used to display an 'About' page for the
+--		'amfrw030$' module.
+--
+--------------------------------------------------------------------------------
+   procedure showabout is
+      l_usr  varchar2(255) := null;
+   begin
+      if not caco_security.security_check('amfrw030$') then
+         return;
+      end if;
+      l_usr := caco_security.get_user;
+
+      WSGL.RegisterURL('amfrw030$.showabout');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+
+      WSGL.OpenPageHead(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+      WSGL.METATag;
+      TemplateHeader(TRUE,2);
+      WSGL.ClosePageHead;
+
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      htp.p(caco_system.menu);
+
+      WSGL.DefaultPageCaption(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+
+
+      htp.para;
+
+      htp.p(WSGL.MsgGetText(108,WSGLM.DSP108_GENERATED_BY, 'PL/SQL Web Generator', '10.1.2.6.18'));
+      htp.para;
+
+      WSGL.Info(FALSE, 'Access Manager Framework', 'AMFRW030', l_usr);
+
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw030$.ShowAbout');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw030$.TemplateHeader
+--
+-- Description:
+--
+--------------------------------------------------------------------------------
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number) is
+   begin
+      if not caco_security.security_check('amfrw030$') then
+         return;
+      end if;
+
+      if Z_TEMPLATE_ID = 1 then
+         -- Template defined in \\loordv01\framework\css2\css_content.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=content" >
+');
+      elsif Z_TEMPLATE_ID = 2 then
+         -- Template defined in \\loordv01\framework\css2\css_about.htm
+         htp.p('<title></title> <link rel="stylesheet" href="wwv_flow_file_mgr.get_file?p_security_group_id=11019802792885519&p_fname=common.css" type="text/css" /> <script src="/i/javascript/apex_ns_3_1.js" type="text/javascript"></script> <script src="/i/javascript/apex_3_1.js" type="text/javascript"></script> <script src="/i/javascript/apex_get_3_1.js" type="text/javascript"></script> <script src="/i/javascript/apex_builder.js" type="text/javascript"></script> <script type="text/javascript"> <!-- /*Global JS Variables*/ var htmldb_Img_Dir = "/i/"; //--> </script> <link rel="stylesheet" href="/i/css/apex_3_1.css" type="text/css" /> <!--[if IE]><link rel="stylesheet" href="/i/css/apex_ie_3_1.css" type="text/css" /><![endif]--> <meta http-equiv="Content-Type" content="text/html; charset=windows-1252" />');
+      elsif Z_TEMPLATE_ID = 3 then
+         -- Template defined in \\loordv01\framework\css2\css_query.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=query" >
+');
+      elsif Z_TEMPLATE_ID = 4 then
+         -- Template defined in \\loordv01\framework\css2\css_view.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=view" >
+');
+      elsif Z_TEMPLATE_ID = 5 then
+         -- Template defined in \\loordv01\framework\css2\css_insert.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=insert" >
+');
+      elsif Z_TEMPLATE_ID = 6 then
+         -- Template defined in \\loordv01\framework\css2\css_recordlist.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=recordlist" >
+');
+      elsif Z_TEMPLATE_ID = 7 then
+         -- Template defined in \\loordv01\framework\css2\css_lov.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=lov" >
+');
+      elsif Z_TEMPLATE_ID = 8 then
+         -- Template defined in \\loordv01\framework\css2\css_text.htm
+         htp.p('<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-2">
+<link rel=stylesheet href="caco_system.css?p_type=text" >
+');
+      end if;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw030$.TemplateHeader');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw030$.GetRef
+--
+-- Description: Returns a handle to the display data for the
+--	             'amfrw030$' module.
+--              If the display object does not exist then it creates it first.
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+
+   function GetRef return WSGOC.MODULE_REF
+   is
+   begin
+      if ( WSGOC.Is_Null(private_ModuleRef)) then
+         private_ModuleRef := WSGOC.Module
+            ( pShortName           => 'amfrw030$'
+            , pFirstTitle          => ''
+            );
+      end if;
+      return private_ModuleRef;
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw030$.GetRef');
+         raise;
+   end;
+
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw030$.CreateStartupJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateStartupJavaScript is
+   begin
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Startup";');
+      htp.p(WSGJSL.CloseScript);
+   end;
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw030$.spc

@@ -0,0 +1,14 @@
+create or replace package amfrw030$ is
+
+   procedure Startup
+;
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+);
+   procedure ShowAbout;
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number);
+   function GetRef return WSGOC.MODULE_REF;
+
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw030$bbme.spc

@@ -0,0 +1,96 @@
+create or replace package amfrw030$bbme is
+
+   type NBT_REC is record
+      ( UI_DUMMY            varchar2(32760)
+      );
+
+   NBT_VAL    NBT_REC;
+   CURR_VAL   BULLETIN_BOARD_MESSAGES%rowtype;
+
+
+   procedure Startup(
+             P_BUBM_ID in varchar2,
+             P_4 in varchar2,
+             P_5 in varchar2,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null,
+             Z_FORM in varchar2 default null);
+   procedure QueryView(
+             K_BUBM_ID in varchar2 default null,
+             P_4 in varchar2 default null,
+             P_5 in varchar2 default null,
+             P_BUBM_ID in varchar2 default null,
+             Z_EXECUTE_QUERY in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_START in varchar2 default '1',
+             Z_ACTION in varchar2 default null,
+             Z_CHK in varchar2 default null);
+   function QueryHits(
+            P_BUBM_ID in varchar2 default null) return number;
+
+   procedure ActionView(
+             P_BUBM_ID in owa_text.vc_arr,
+             P_4 in varchar2 default null,
+             P_5 in varchar2 default null,
+             O_SUBJECT in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_BUBM_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_MESSAGE_TEXT in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_ACTIVE_FROM in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_ACTIVE_TO in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_MESSAGE_TEXT in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_UI_DUMMY in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_ACTIVE_FROM in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_ACTIVE_TO in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             Q_BUBM_ID in varchar2 default null,
+             z_modified in owa_text.vc_arr,
+             Z_ACTION in varchar2 default null,
+             Z_START  in varchar2 default '1',
+             Z_CHK in varchar2 default null );
+   procedure QueryViewByKey(
+             P_BUBM_ID in varchar2 default null,
+             P_4 in varchar2 default null,
+             P_5 in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure LoadCache
+             ( Z_CURR_DEPTH       in number
+             , Z_MAX_DEPTH        in number
+             , Z_OWN_ROW_VALUES   in boolean             default false
+             , Z_CONTEXT_FOR      in WSGOC.COMPONENT_REF default null
+             , Z_BRANCH           in WSGOC.BRANCH_REF    default null
+             );
+   function RestoreState
+             ( Z_CURR_DEPTH          in number
+             , Z_MAX_DEPTH           in number
+             , Z_RESTORE_OWN_ROW     in boolean default true
+             )  return boolean;
+   procedure SaveState;
+   function  GetRef return WSGOC.COMPONENT_REF;
+
+
+
+   procedure calendar
+     (
+      Z_FIELD_NAME   in varchar2,
+      Z_CALLER_URL   in varchar2,
+      Z_FIELD_VALUE  in varchar2 default null,
+      Z_FIELD_FORMAT in varchar2 default null,
+      Z_FIELD_PROMPT in varchar2 default null
+     );
+
+   procedure format_cal_date
+     (
+      Z_FIELD_NAME   in Varchar2,
+      Z_FIELD_FORMAT in varchar2,
+      day            in varchar2,
+      month          in varchar2,
+      year           in varchar2
+     );
+
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw030$js$bbme.bdy

@@ -0,0 +1,114 @@
+create or replace package body amfrw030$js$bbme is
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw030$js$bbme.CreateViewJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  LOV_FRAME in varchar2) is
+   begin
+      if not caco_security.security_check('amfrw030$bbme') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var index = 0;');
+      htp.p( 'var DataChangeErrors = false;' );
+      htp.p( 'var DataChange = false;' );
+
+      if to_char(amfrw030$mere.CURR_VAL.BUBM_ID) is not null then
+         htp.p( 'var P_BUBM_ID = new Array();' );
+         htp.p( 'P_BUBM_ID[0] = "' || WSGL.EscapeURLParam(to_char(amfrw030$mere.CURR_VAL.BUBM_ID)) || '";' );
+      end if;
+      htp.p( 'var P_4 = new Array();' );
+      htp.p( 'P_4[0] = "' || WSGL.EscapeURLParam(nvl(to_char(amfrw030$mere.CURR_VAL.BUBM_ID), '')) || '";' );
+      htp.p( 'var P_5 = new Array();' );
+      htp.p( 'P_5[0] = "' || WSGL.EscapeURLParam(nvl(to_char(amfrw030$mere.CURR_VAL.SYUS_ID), '')) || '";' );
+      htp.p( 'var BBME_CHK_VALUE = new Array();' );
+      htp.p( 'BBME_CHK_VALUE[0] = ' || to_char(WSGL.Checksum(''|| to_char(amfrw030$mere.CURR_VAL.BUBM_ID)|| to_char(amfrw030$mere.CURR_VAL.BUBM_ID)|| to_char(amfrw030$mere.CURR_VAL.SYUS_ID))) || ';' );
+
+      htp.p( 'var P_12 = new Array();' );
+
+      htp.p(WSGJSL.RtnCheckModified);
+      htp.p(WSGJSL.RtnRevertForm);
+      htp.p(WSGJSL.RtnFindTargetFrame);
+
+
+   htp.p('
+function ResetRadios( form, num_rows )
+{
+   return;
+};
+');
+
+      htp.p(WSGJSL.OpenEvent('BBME','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFU','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFD','OnClick'));
+      htp.p(WSGJSL.VerifyDelete(WSGL.MsgGetText(118, WSGLM.DSP118_CONFIRM_DELETE)));
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFR','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('AI_BACK','OnClick'));
+      htp.p('
+   var TargetFrame = JSLFindTargetFrame( "_top");
+   var Url = "AMFRW030$MERE.startup?Z_FORM=QUERY&Z_CHK=0";
+   if (TargetFrame)
+   {
+      TargetFrame.location = Url;
+   }
+   else
+   {
+      location = Url;
+   }
+   return false;');
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'#Read Message#2156#',
+                             VF_BODY_ATTRIBUTES, 'amfrw030$js$bbme.CreateViewJavaScript');
+   end;
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw030$js$bbme.spc

@@ -0,0 +1,11 @@
+create or replace package amfrw030$js$bbme is
+
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  LOV_FRAME in varchar2);
+
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw030$js$mere.bdy

@@ -0,0 +1,92 @@
+create or replace package body amfrw030$js$mere is
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw030$js$mere.CreateViewJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  LOV_FRAME in varchar2) is
+   begin
+      if not caco_security.security_check('amfrw030$mere') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var index = 0;');
+      htp.p( 'var DataChangeErrors = false;' );
+      htp.p( 'var DataChange = false;' );
+
+
+      htp.p( 'var P_BUBM_ID = new Array();' );
+      htp.p( 'var P_4 = new Array();' );
+      htp.p( 'var P_5 = new Array();' );
+      htp.p( 'var BBME_CHK_VALUE = new Array();' );
+
+      htp.p(WSGJSL.RtnCheckModified);
+      htp.p(WSGJSL.RtnRevertForm);
+
+   amfrw030$mere.InitialiseDomain('MESSAGE_READ');
+
+   htp.p('
+function ResetRadios( form, num_rows )
+{
+   return;
+};
+');
+
+      htp.p(WSGJSL.OpenEvent('MERE','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFU','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFD','OnClick'));
+      htp.p(WSGJSL.VerifyDelete(WSGL.MsgGetText(118, WSGLM.DSP118_CONFIRM_DELETE)));
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFR','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'#Messages#2155#',
+                             VF_BODY_ATTRIBUTES, 'amfrw030$js$mere.CreateViewJavaScript');
+   end;
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw030$js$mere.spc

@@ -0,0 +1,11 @@
+create or replace package amfrw030$js$mere is
+
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  LOV_FRAME in varchar2);
+
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw030$mere.spc

@@ -0,0 +1,108 @@
+create or replace package amfrw030$mere is
+
+   type NBT_REC is record
+      ( UI_READ             varchar2(4000)
+      , UI_MESSAGE_SUBJECT  varchar2(4000)
+      , UI_MESSAGE_DATE     varchar2(4000)
+      , UI_MESSAGE_BY       varchar2(4000)
+      );
+
+   NBT_VAL    NBT_REC;
+   CURR_VAL   CG$MESSAGE_RECIPIENT.CG$ROW_TYPE;
+
+
+   procedure Startup(
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null,
+             Z_FORM in varchar2 default null);
+   procedure QueryView(
+             K_BUBM_ID in varchar2 default null,
+             K_SYUS_ID in varchar2 default null,
+             Z_EXECUTE_QUERY in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_START in varchar2 default '1',
+             Z_ACTION in varchar2 default null,
+             Z_CHK in varchar2 default null);
+   function QueryHits return number;
+
+   procedure ActionView(
+             P_BUBM_ID in owa_text.vc_arr,
+             P_SYUS_ID in owa_text.vc_arr,
+             O_BUBM_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_SYUS_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_MESSAGE_READ in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_CREATED_BY in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_CREATED_ON in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_UPDATED_BY in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_UPDATED_ON in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_UI_READ in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_UI_MESSAGE_SUBJECT in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_UI_MESSAGE_DATE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_UI_MESSAGE_BY in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             z_modified in owa_text.vc_arr,
+             z_delete   in owa_text.vc_arr,
+             Z_ACTION in varchar2 default null,
+             Z_START  in varchar2 default '1',
+             Z_CHK in varchar2 default null ,
+             C_BBME in owa_text.vc_arr default WSGL.EmptyVCArrLong );
+   procedure ActionDelete(
+             P_BUBM_ID in varchar2 default null,
+             P_SYUS_ID in varchar2 default null,
+             O_MESSAGE_READ in varchar2 default null,
+             O_CREATED_BY in varchar2 default null,
+             O_CREATED_ON in varchar2 default null,
+             O_UPDATED_BY in varchar2 default null,
+             O_UPDATED_ON in varchar2 default null,
+             Z_ACTION in varchar2 default null,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null,
+             z_success in out boolean);
+   procedure QueryViewByKey(
+             P_BUBM_ID in varchar2 default null,
+             P_SYUS_ID in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure LoadCache
+             ( Z_CURR_DEPTH       in number
+             , Z_MAX_DEPTH        in number
+             , Z_OWN_ROW_VALUES   in boolean             default false
+             , Z_CONTEXT_FOR      in WSGOC.COMPONENT_REF default null
+             , Z_BRANCH           in WSGOC.BRANCH_REF    default null
+             );
+   function RestoreState
+             ( Z_CURR_DEPTH          in number
+             , Z_MAX_DEPTH           in number
+             , Z_RESTORE_OWN_ROW     in boolean default true
+             )  return boolean;
+   procedure SaveState;
+   function  GetRef return WSGOC.COMPONENT_REF;
+
+
+   procedure InitialiseDomain(P_ALIAS in varchar2);
+
+   procedure calendar
+     (
+      Z_FIELD_NAME   in varchar2,
+      Z_CALLER_URL   in varchar2,
+      Z_FIELD_VALUE  in varchar2 default null,
+      Z_FIELD_FORMAT in varchar2 default null,
+      Z_FIELD_PROMPT in varchar2 default null
+     );
+
+   procedure format_cal_date
+     (
+      Z_FIELD_NAME   in Varchar2,
+      Z_FIELD_FORMAT in varchar2,
+      day            in varchar2,
+      month          in varchar2,
+      year           in varchar2
+     );
+
+   D_MESSAGE_READ        WSGL.typDVRecord;
+end;
+/

Data/BulkLoad/EFT/Nominations/plsql/amfrw040$.bdy

@@ -0,0 +1,233 @@
+create or replace package body eft_nom.amfrw040$ is
+   private_ModuleRef WSGOC.MODULE_REF;
+
+
+   procedure CreateStartupJavaScript;
+--------------------------------------------------------------------------------
+-- Name:        amfrw040$.Startup
+--
+-- Description: This procedure is the entry point for the 'amfrw040$'
+--              module.
+--
+-- Parameters:  None
+--
+--------------------------------------------------------------------------------
+   procedure Startup
+   is
+   begin
+      if not caco_security.security_check('amfrw040$') then
+         return;
+      end if;
+
+      WSGL.RegisterURL('amfrw040$.startup');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+      WSGL.StoreURLLink(0, WSGL.MsgGetText(21,WSGLM.CAP021_TOP_LEVEL));
+      amfrw040$autr.startup(
+         Z_DIRECT_CALL => TRUE
+      );
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw040$.Startup');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw040$.firstpage
+--
+-- Description: This procedure creates the first page for the 'amfrw040$'
+--              module.
+--
+-- Parameters:  Z_DIRECT_CALL
+
+--
+--------------------------------------------------------------------------------
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+) is
+   begin
+      if not caco_security.security_check('amfrw040$') then
+         return;
+      end if;
+
+      WSGL.OpenPageHead('');
+      WSGL.METATag;
+      WSGL.ClosePageHead;
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      CreateStartupJavaScript;
+
+      WSGL.DefaultPageCaption('', 1);
+      htp.formOpen(curl => 'ActionItem', cattributes => 'NAME="SP$AIForm"');
+      WSGL.NavLinks(WSGL.MENU_LONG, WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT), 0, 'amfrw040$.showabout', '_top', p_output_line=>FALSE);
+      WSGL.NavLinks;
+      htp.formClose;
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw040$.FirstPage');
+   end;
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw040$.showabout
+--
+-- Description: This procedure is used to display an 'About' page for the
+--		'amfrw040$' module.
+--
+--------------------------------------------------------------------------------
+   procedure showabout is
+      l_usr  varchar2(255) := null;
+   begin
+      if not caco_security.security_check('amfrw040$') then
+         return;
+      end if;
+      l_usr := caco_security.get_user;
+
+      WSGL.RegisterURL('amfrw040$.showabout');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+
+      WSGL.OpenPageHead(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+      WSGL.METATag;
+      TemplateHeader(TRUE,2);
+      WSGL.ClosePageHead;
+
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      htp.p(caco_system.menu);
+
+      WSGL.DefaultPageCaption(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+
+      htp.para;
+      htp.p('
+$Revision: $');
+      htp.para;
+
+      htp.para;
+
+      htp.p(WSGL.MsgGetText(108,WSGLM.DSP108_GENERATED_BY, 'PL/SQL Web Generator', '10.1.2.6.18'));
+      htp.para;
+
+      WSGL.Info(FALSE, 'Access Manager Framework', 'AMFRW040', l_usr);
+
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw040$.ShowAbout');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw040$.TemplateHeader
+--
+-- Description:
+--
+--------------------------------------------------------------------------------
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number) is
+   begin
+      if not caco_security.security_check('amfrw040$') then
+         return;
+      end if;
+
+      if Z_TEMPLATE_ID = 1 then
+         -- Template defined in \\soas001\framework\css\css_content.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=content" >
+');
+      elsif Z_TEMPLATE_ID = 2 then
+         -- Template defined in \\soas001\framework\css\css_about.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=about" >
+');
+      elsif Z_TEMPLATE_ID = 3 then
+         -- Template defined in \\soas001\framework\css\css_query.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=query" >
+');
+      elsif Z_TEMPLATE_ID = 4 then
+         -- Template defined in \\soas001\framework\css\css_view.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=view" >
+');
+      elsif Z_TEMPLATE_ID = 5 then
+         -- Template defined in \\soas001\framework\css\css_insert.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=insert" >
+');
+      elsif Z_TEMPLATE_ID = 6 then
+         -- Template defined in \\soas001\framework\css\css_recordlist.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=recordlist" >
+');
+      elsif Z_TEMPLATE_ID = 7 then
+         -- Template defined in \\soas001\framework\css\css_lov.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=lov" >
+');
+      elsif Z_TEMPLATE_ID = 8 then
+         -- Template defined in \\soas001\framework\css\css_text.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=text" >
+');
+      end if;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw040$.TemplateHeader');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw040$.GetRef
+--
+-- Description: Returns a handle to the display data for the
+--	             'amfrw040$' module.
+--              If the display object does not exist then it creates it first.
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+
+   function GetRef return WSGOC.MODULE_REF
+   is
+   begin
+      if ( WSGOC.Is_Null(private_ModuleRef)) then
+         private_ModuleRef := WSGOC.Module
+            ( pShortName           => 'amfrw040$'
+            , pFirstTitle          => ''
+            );
+      end if;
+      return private_ModuleRef;
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw040$.GetRef');
+         raise;
+   end;
+
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw040$.CreateStartupJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateStartupJavaScript is
+   begin
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Startup";');
+      htp.p(WSGJSL.CloseScript);
+   end;
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw040$.spc

@@ -0,0 +1,15 @@
+create or replace package eft_nom.amfrw040$ is
+
+   procedure Startup
+;
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+);
+   procedure ShowAbout;
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number);
+   function GetRef return WSGOC.MODULE_REF;
+
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw040$autr.spc

@@ -0,0 +1,86 @@
+create or replace package eft_nom.amfrw040$autr is
+
+   type NBT_REC is record
+      ( UI_CREATED_ON       date
+      , L_AUSE_USERNAME     AUDIT_SESSIONS.USERNAME%type
+      , L_AUSE_IP_ADDRESS   AUDIT_SESSIONS.IP_ADDRESS%type
+      , L_AUSE_CREATED_ON   AUDIT_SESSIONS.CREATED_ON%type
+      , L_AUSE_SESSION_ID   AUDIT_SESSIONS.SESSION_ID%type
+      , L_AUSE_AUSE_ID      AUDIT_SESSIONS.AUSE_ID%type
+      );
+
+   NBT_VAL    NBT_REC;
+   CURR_VAL   AUDIT_TRANSACTIONS%rowtype;
+
+
+   procedure Startup(
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null,
+             Z_FORM in varchar2 default null);
+   procedure ActionQuery(
+             P_L_AUSE_USERNAME in varchar2 default null,
+             P_OPERATION_TYPE in varchar2 default null,
+             P_L_AUSE_CREATED_ON in varchar2 default null,
+             U_L_AUSE_CREATED_ON in varchar2 default null,
+	     Z_DIRECT_CALL in boolean default false,
+             Z_ACTION in varchar2 default null,
+             Z_CHK in varchar2 default null );
+
+   procedure FormQuery(
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure QueryList(
+             P_L_AUSE_USERNAME in varchar2 default null,
+             P_OPERATION_TYPE in varchar2 default null,
+             P_L_AUSE_CREATED_ON in varchar2 default null,
+             U_L_AUSE_CREATED_ON in varchar2 default null,
+             Z_START in varchar2 default null,
+             Z_ACTION in varchar2 default null,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null );
+   function QueryHits(
+            P_L_AUSE_USERNAME in varchar2 default null,
+            P_OPERATION_TYPE in varchar2 default null,
+            P_L_AUSE_CREATED_ON in varchar2 default null,
+            U_L_AUSE_CREATED_ON in varchar2 default null) return number;
+   procedure LoadCache
+             ( Z_CURR_DEPTH       in number
+             , Z_MAX_DEPTH        in number
+             , Z_OWN_ROW_VALUES   in boolean             default false
+             , Z_CONTEXT_FOR      in WSGOC.COMPONENT_REF default null
+             , Z_BRANCH           in WSGOC.BRANCH_REF    default null
+             );
+   function RestoreState
+             ( Z_CURR_DEPTH          in number
+             , Z_MAX_DEPTH           in number
+             , Z_RESTORE_OWN_ROW     in boolean default true
+             )  return boolean;
+   procedure SaveState;
+   function  GetRef return WSGOC.COMPONENT_REF;
+
+
+   procedure InitialiseDomain(P_ALIAS in varchar2);
+
+   procedure calendar
+     (
+      Z_FIELD_NAME   in varchar2,
+      Z_CALLER_URL   in varchar2,
+      Z_FIELD_VALUE  in varchar2 default null,
+      Z_FIELD_FORMAT in varchar2 default null,
+      Z_FIELD_PROMPT in varchar2 default null
+     );
+
+   procedure format_cal_date
+     (
+      Z_FIELD_NAME   in Varchar2,
+      Z_FIELD_FORMAT in varchar2,
+      day            in varchar2,
+      month          in varchar2,
+      year           in varchar2
+     );
+
+   D_OPERATION_TYPE      WSGL.typDVRecord;
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw040$autr_details.spc

@@ -0,0 +1,88 @@
+create or replace package eft_nom.amfrw040$autr_details is
+
+
+   CURR_VAL   AUDIT_TRANSACTIONS%rowtype;
+
+
+   procedure Startup(
+             P_AUTR_ID in varchar2,
+             P_8 in varchar2,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null,
+             Z_FORM in varchar2 default null);
+   procedure QueryView(
+             K_AUTR_ID in varchar2 default null,
+             P_8 in varchar2 default null,
+             P_AUTR_ID in varchar2 default null,
+             Z_EXECUTE_QUERY in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_START in varchar2 default '1',
+             Z_ACTION in varchar2 default null,
+             Z_CHK in varchar2 default null);
+   function QueryHits(
+            P_AUTR_ID in varchar2 default null) return number;
+
+   procedure ActionView(
+             P_AUTR_ID in owa_text.vc_arr,
+             P_8 in varchar2 default null,
+             O_AUTR_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_OPERATION_TYPE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_OPERATION_TARGET in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_CREATED_ON in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_AUSE_AUSE_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_CREATED_ON in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             Q_AUTR_ID in varchar2 default null,
+             z_modified in owa_text.vc_arr,
+             Z_ACTION in varchar2 default null,
+             Z_START  in varchar2 default '1',
+             Z_CHK in varchar2 default null );
+   procedure QueryViewByKey(
+             P_AUTR_ID in varchar2 default null,
+             P_8 in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure LoadCache
+             ( Z_CURR_DEPTH       in number
+             , Z_MAX_DEPTH        in number
+             , Z_OWN_ROW_VALUES   in boolean             default false
+             , Z_CONTEXT_FOR      in WSGOC.COMPONENT_REF default null
+             , Z_BRANCH           in WSGOC.BRANCH_REF    default null
+             );
+   function RestoreState
+             ( Z_CURR_DEPTH          in number
+             , Z_MAX_DEPTH           in number
+             , Z_RESTORE_OWN_ROW     in boolean default true
+             )  return boolean;
+   procedure SaveState;
+   function  GetRef return WSGOC.COMPONENT_REF;
+
+
+   procedure InitialiseDomain(P_ALIAS in varchar2);
+
+   procedure calendar
+     (
+      Z_FIELD_NAME   in varchar2,
+      Z_CALLER_URL   in varchar2,
+      Z_FIELD_VALUE  in varchar2 default null,
+      Z_FIELD_FORMAT in varchar2 default null,
+      Z_FIELD_PROMPT in varchar2 default null
+     );
+
+   procedure format_cal_date
+     (
+      Z_FIELD_NAME   in Varchar2,
+      Z_FIELD_FORMAT in varchar2,
+      day            in varchar2,
+      month          in varchar2,
+      year           in varchar2
+     );
+
+   D_OPERATION_TYPE      WSGL.typDVRecord;
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw040$js$autr.bdy

@@ -0,0 +1,125 @@
+create or replace package body eft_nom.amfrw040$js$autr is
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw040$js$autr.CreateQueryJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateQueryJavaScript (
+                                    LOV_FRAME in varchar2,
+						                  QF_BODY_ATTRIBUTES in varchar2)
+   is
+   begin
+      if not caco_security.security_check('amfrw040$autr') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Query";');
+
+
+
+      WSGJSL.Output_Invoke_CAL_JS ('amfrw040$autr', 'scrollbars=no,resizable=no,width=320,height=350');
+
+
+      htp.p(WSGJSL.OpenEvent('L_AUSE_USERNAME','LOV'));      htp.p('
+    var depStr = "";
+    var modeStr = ""
+    index = -1;
+    modeStr = "Q";
+');
+
+      if LOV_FRAME is not null then
+         htp.p('    var lovFra = "'||LOV_FRAME||'";');
+         htp.p('    var winpar = "";');
+      else
+         htp.p('    var lovFra = "winLOV";');
+         htp.p('    var winpar = "scrollbars=yes,resizable=yes,width=400,height=400";');
+      end if;
+      htp.p('    var filterprompt = "";');
+      htp.p('
+
+    var lovTitle = "'||replace('','"','\"')||'";
+    window.current_lov_title = lovTitle;
+
+    JSLOpenLOV( ctl, index, modeStr,  "amfrw040$autr.l_ause_username_lov", depStr, lovFra, winpar, filterprompt );
+
+');
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('AUTR','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnQFQ','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'Journal Data',
+                             QF_BODY_ATTRIBUTES, 'amfrw040$js$autr.CreateQueryJavaScript');
+   end;
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw040$js$autr.CreateListJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateListJavaScript (
+                                   RL_BODY_ATTRIBUTES in varchar2)
+   is
+   begin
+      if not caco_security.security_check('amfrw040$autr') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "List";');
+
+
+      htp.p( 'var P_AUTR_ID = new Array();' );
+      htp.p( 'var P_8 = new Array();' );
+      htp.p( 'var AUTR_DETAILS_CHK_VALUE = new Array();' );
+
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'Journal Data',
+                             RL_BODY_ATTRIBUTES, 'amfrw040$js$autr.CreateListJavaScript');
+   end;
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw040$js$autr.spc

@@ -0,0 +1,12 @@
+create or replace package eft_nom.amfrw040$js$autr is
+
+   procedure CreateQueryJavaScript(
+						                 LOV_FRAME in varchar2,
+						                 QF_BODY_ATTRIBUTES in varchar2);
+
+   procedure CreateListJavaScript(
+                                   RL_BODY_ATTRIBUTES in varchar2);
+
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw040$js$autr_details.bdy

@@ -0,0 +1,98 @@
+create or replace package body eft_nom.amfrw040$js$autr_details is
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw040$js$autr_details.CreateViewJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  LOV_FRAME in varchar2) is
+   begin
+      if not caco_security.security_check('amfrw040$autr_details') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var index = 0;');
+      htp.p( 'var DataChangeErrors = false;' );
+      htp.p( 'var DataChange = false;' );
+
+      if to_char(amfrw040$autr.CURR_VAL.AUTR_ID) is not null then
+         htp.p( 'var P_AUTR_ID = new Array();' );
+         htp.p( 'P_AUTR_ID[0] = "' || WSGL.EscapeURLParam(to_char(amfrw040$autr.CURR_VAL.AUTR_ID)) || '";' );
+      end if;
+      htp.p( 'var P_8 = new Array();' );
+      htp.p( 'P_8[0] = "' || WSGL.EscapeURLParam(nvl(to_char(amfrw040$autr.CURR_VAL.AUTR_ID), '')) || '";' );
+      htp.p( 'var AUTR_DETAILS_CHK_VALUE = new Array();' );
+      htp.p( 'AUTR_DETAILS_CHK_VALUE[0] = ' || to_char(WSGL.Checksum(''|| to_char(amfrw040$autr.CURR_VAL.AUTR_ID)|| to_char(amfrw040$autr.CURR_VAL.AUTR_ID))) || ';' );
+
+      htp.p( 'var P_11 = new Array();' );
+
+      htp.p(WSGJSL.RtnCheckModified);
+      htp.p(WSGJSL.RtnRevertForm);
+
+   amfrw040$autr_details.InitialiseDomain('OPERATION_TYPE');
+
+   htp.p('
+function ResetRadios( form, num_rows )
+{
+   return;
+};
+');
+
+      htp.p(WSGJSL.OpenEvent('AUTR_DETAILS','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFU','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFD','OnClick'));
+      htp.p(WSGJSL.VerifyDelete(WSGL.MsgGetText(118, WSGLM.DSP118_CONFIRM_DELETE)));
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFR','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'Transaction Details',
+                             VF_BODY_ATTRIBUTES, 'amfrw040$js$autr_details.CreateViewJavaScript');
+   end;
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw040$js$autr_details.spc

@@ -0,0 +1,12 @@
+create or replace package eft_nom.amfrw040$js$autr_details is
+
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  LOV_FRAME in varchar2);
+
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw050$.bdy

@@ -0,0 +1,233 @@
+create or replace package body eft_nom.amfrw050$ is
+   private_ModuleRef WSGOC.MODULE_REF;
+
+
+   procedure CreateStartupJavaScript;
+--------------------------------------------------------------------------------
+-- Name:        amfrw050$.Startup
+--
+-- Description: This procedure is the entry point for the 'amfrw050$'
+--              module.
+--
+-- Parameters:  None
+--
+--------------------------------------------------------------------------------
+   procedure Startup
+   is
+   begin
+      if not caco_security.security_check('amfrw050$') then
+         return;
+      end if;
+
+      WSGL.RegisterURL('amfrw050$.startup');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+      WSGL.StoreURLLink(0, WSGL.MsgGetText(21,WSGLM.CAP021_TOP_LEVEL));
+      amfrw050$syus.startup(
+         Z_DIRECT_CALL => TRUE
+      );
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw050$.Startup');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw050$.firstpage
+--
+-- Description: This procedure creates the first page for the 'amfrw050$'
+--              module.
+--
+-- Parameters:  Z_DIRECT_CALL
+
+--
+--------------------------------------------------------------------------------
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+) is
+   begin
+      if not caco_security.security_check('amfrw050$') then
+         return;
+      end if;
+
+      WSGL.OpenPageHead('');
+      WSGL.METATag;
+      WSGL.ClosePageHead;
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      CreateStartupJavaScript;
+
+      WSGL.DefaultPageCaption('', 1);
+      htp.formOpen(curl => 'ActionItem', cattributes => 'NAME="SP$AIForm"');
+      WSGL.NavLinks(WSGL.MENU_LONG, WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT), 0, 'amfrw050$.showabout', '_top', p_output_line=>FALSE);
+      WSGL.NavLinks;
+      htp.formClose;
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw050$.FirstPage');
+   end;
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw050$.showabout
+--
+-- Description: This procedure is used to display an 'About' page for the
+--		'amfrw050$' module.
+--
+--------------------------------------------------------------------------------
+   procedure showabout is
+      l_usr  varchar2(255) := null;
+   begin
+      if not caco_security.security_check('amfrw050$') then
+         return;
+      end if;
+      l_usr := caco_security.get_user;
+
+      WSGL.RegisterURL('amfrw050$.showabout');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+
+      WSGL.OpenPageHead(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+      WSGL.METATag;
+      TemplateHeader(TRUE,2);
+      WSGL.ClosePageHead;
+
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      htp.p(caco_system.menu);
+
+      WSGL.DefaultPageCaption(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+
+      htp.para;
+      htp.p('
+$Revision: 1.0 $');
+      htp.para;
+
+      htp.para;
+
+      htp.p(WSGL.MsgGetText(108,WSGLM.DSP108_GENERATED_BY, 'PL/SQL Web Generator', '10.1.2.6.18'));
+      htp.para;
+
+      WSGL.Info(FALSE, 'AM2', 'AMFRW050', l_usr);
+
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw050$.ShowAbout');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw050$.TemplateHeader
+--
+-- Description:
+--
+--------------------------------------------------------------------------------
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number) is
+   begin
+      if not caco_security.security_check('amfrw050$') then
+         return;
+      end if;
+
+      if Z_TEMPLATE_ID = 1 then
+         -- Template defined in \\soas001\framework\css\css_content.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=content" >
+');
+      elsif Z_TEMPLATE_ID = 2 then
+         -- Template defined in \\soas001\framework\css\css_about.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=about" >
+');
+      elsif Z_TEMPLATE_ID = 3 then
+         -- Template defined in \\soas001\framework\css\css_query.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=query" >
+');
+      elsif Z_TEMPLATE_ID = 4 then
+         -- Template defined in \\soas001\framework\css\css_view.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=view" >
+');
+      elsif Z_TEMPLATE_ID = 5 then
+         -- Template defined in \\soas001\framework\css\css_insert.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=insert" >
+');
+      elsif Z_TEMPLATE_ID = 6 then
+         -- Template defined in \\soas001\framework\css\css_recordlist.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=recordlist" >
+');
+      elsif Z_TEMPLATE_ID = 7 then
+         -- Template defined in \\soas001\framework\css\css_lov.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=lov" >
+');
+      elsif Z_TEMPLATE_ID = 8 then
+         -- Template defined in \\soas001\framework\css\css_text.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=text" >
+');
+      end if;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw050$.TemplateHeader');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw050$.GetRef
+--
+-- Description: Returns a handle to the display data for the
+--	             'amfrw050$' module.
+--              If the display object does not exist then it creates it first.
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+
+   function GetRef return WSGOC.MODULE_REF
+   is
+   begin
+      if ( WSGOC.Is_Null(private_ModuleRef)) then
+         private_ModuleRef := WSGOC.Module
+            ( pShortName           => 'amfrw050$'
+            , pFirstTitle          => ''
+            );
+      end if;
+      return private_ModuleRef;
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw050$.GetRef');
+         raise;
+   end;
+
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw050$.CreateStartupJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateStartupJavaScript is
+   begin
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Startup";');
+      htp.p(WSGJSL.CloseScript);
+   end;
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw050$.spc

@@ -0,0 +1,15 @@
+create or replace package eft_nom.amfrw050$ is
+
+   procedure Startup
+;
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+);
+   procedure ShowAbout;
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number);
+   function GetRef return WSGOC.MODULE_REF;
+
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw050$js$syus.bdy

@@ -0,0 +1,862 @@
+create or replace package body eft_nom.amfrw050$js$syus is
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw050$js$syus.CreateViewJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  IF_ROWS_INSERTED in integer,
+                                  IF_ROWS_ERROR in integer,
+                                  LOV_FRAME in varchar2) is
+   begin
+      if not caco_security.security_check('amfrw050$syus') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var index = 0;');
+	    if IF_ROWS_INSERTED > 0 then
+        htp.p( 'var DataChange = true;' );
+      else
+        htp.p( 'var DataChange = false;' );
+      end if;
+      if IF_ROWS_ERROR > 0 then
+        htp.p( 'var DataChangeErrors = true;' );
+      else
+        htp.p( 'var DataChangeErrors = false;' );
+      end if;
+
+
+      htp.p( 'var P_24 = new Array();' );
+
+      htp.p(WSGJSL.RtnNotNull);
+      htp.p(WSGJSL.RtnChkMaxLength);
+      htp.p(WSGJSL.RtnReplace);
+      htp.p(WSGJSL.RtnGetValue);
+      htp.p(WSGJSL.RtnStripMask);
+      htp.p(WSGJSL.RtnToNumber);
+      htp.p(WSGJSL.RtnChkNumScale);
+      htp.p(WSGJSL.RtnRadioChange);
+      htp.p(WSGJSL.RtnCheckModified);
+      htp.p(WSGJSL.RtnRevertForm);
+      htp.p(WSGJSL.RtnFlagRow);
+
+      WSGJSL.Output_Invoke_CAL_JS ('amfrw050$syus', 'scrollbars=no,resizable=no,width=320,height=350');
+
+
+   amfrw050$syus.InitialiseDomain('TITLE');
+   amfrw050$syus.InitialiseDomain('LANGUAGE');
+   amfrw050$syus.InitialiseDomain('USER_LOCKED');
+
+   htp.p('
+function ResetRadios( form, num_rows )
+{
+   var count = 0 ;
+   for ( row = 0 ; row < num_rows ; row++ )
+   {
+      // Change the images on the radio buttons
+      count = 0 ;
+      for ( i=0 ; i < document.images.length ; i++ )
+      {
+         if ( document.images[i].name == "RADIO_P_USER_LOCKED" + row )
+         {
+            count++ ;
+            if ( count == RADIO_P_USER_LOCKED_option[row] )
+            {
+               document.images[i].src = "/images/'||WSGL.IMG_RADIO_SEL||'";
+            }
+            else
+            {
+               document.images[i].src = "/images/'||WSGL.IMG_RADIO_UNSEL||'";
+            }
+         }
+      }
+   }
+   return;
+};
+');
+
+      htp.p(WSGJSL.OpenEvent('TITLE','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('FIRST_NAME','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('LAST_NAME','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('DESCRIPTION','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('EMAIL_ADDRESS','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(
+'
+// Validate
+//
+//
+return emailCheck(ctl.value);');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('CONTACT_TELEPHONE','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('CONTACT_FAX','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('PERIOD_START','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('PERIOD_END','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('LANGUAGE','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('PASSWORD','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('PASSWORD_EXPIRES','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('GRACE_LOGINS','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('USER_LOCKED','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+
+      htp.p(
+'// emailCheck
+//
+//
+
+function emailCheck (emailStr) {
+
+/* The following variable tells the rest of the function whether or not
+to verify that the address ends in a two-letter country or well-known
+TLD.  1 means check it, 0 means don''t. */
+
+var checkTLD=1;
+
+/* The following is the list of known TLDs that an e-mail address must end with. */
+
+var knownDomsPat=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum)$/;
+
+/* The following pattern is used to check if the entered e-mail address
+fits the user@domain format.  It also is used to separate the username
+from the domain. */
+
+var emailPat=/^(.+)@(.+)$/;
+
+/* The following string represents the pattern for matching all special
+characters.  We don''t want to allow special characters in the address.
+These characters include ( ) < > @ , ; : \ " . [ ] */
+
+var specialChars="\\(\\)><@,;:\\\\\\\"\\.\\[\\]";
+
+/* The following string represents the range of characters allowed in a
+username or domainname.  It really states which chars aren''t allowed.*/
+
+var validChars="\[^\\s" + specialChars + "\]";
+
+/* The following pattern applies if the "user" is a quoted string (in
+which case, there are no rules about which characters are allowed
+and which aren''t; anything goes).  E.g. "jiminy cricket"@disney.com
+is a legal e-mail address. */
+
+var quotedUser="(\"[^\"]*\")";
+
+/* The following pattern applies for domains that are IP addresses,
+rather than symbolic names.  E.g. joe@[123.124.233.4] is a legal
+e-mail address. NOTE: The square brackets are required. */
+
+var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;
+
+/* The following string represents an atom (basically a series of non-special characters.) */
+
+var atom=validChars + ''+'';
+
+/* The following string represents one word in the typical username.
+For example, in john.doe@somewhere.com, john and doe are words.
+Basically, a word is either an atom or quoted string. */
+
+var word="(" + atom + "|" + quotedUser + ")";
+
+// The following pattern describes the structure of the user
+
+var userPat=new RegExp("^" + word + "(\\." + word + ")*$");
+
+/* The following pattern describes the structure of a normal symbolic
+domain, as opposed to ipDomainPat, shown above. */
+
+var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$");
+
+/* Finally, let''s start trying to figure out if the supplied address is valid. */
+
+/* Begin with the coarse pattern to simply break up user@domain into
+different pieces that are easy to analyze. */
+
+var matchArray=emailStr.match(emailPat);
+
+if (matchArray==null) {
+
+/* Too many/few @''s or something; basically, this address doesn''t
+even fit the general mould of a valid e-mail address. */
+
+alert("Email address seems incorrect (check @ and .''s)");
+return false;
+}
+var user=matchArray[1];
+var domain=matchArray[2];
+
+// Start by checking that only basic ASCII characters are in the strings (0-127).
+
+for (i=0; i<user.length; i++) {
+if (user.charCodeAt(i)>127) {
+alert("Ths username contains invalid characters.");
+return false;
+   }
+}
+for (i=0; i<domain.length; i++) {
+if (domain.charCodeAt(i)>127) {
+alert("Ths domain name contains invalid characters.");
+return false;
+   }
+}
+
+// See if "user" is valid
+
+if (user.match(userPat)==null) {
+
+// user is not valid
+
+alert("The username doesn''t seem to be valid.");
+return false;
+}
+
+/* if the e-mail address is at an IP address (as opposed to a symbolic
+host name) make sure the IP address is valid. */
+
+var IPArray=domain.match(ipDomainPat);
+if (IPArray!=null) {
+
+// this is an IP address
+
+for (var i=1;i<=4;i++) {
+if (IPArray[i]>255) {
+alert("Destination IP address is invalid!");
+return false;
+   }
+}
+return true;
+}
+
+// Domain is symbolic name.  Check if it''s valid.
+
+var atomPat=new RegExp("^" + atom + "$");
+var domArr=domain.split(".");
+var len=domArr.length;
+for (i=0;i<len;i++) {
+if (domArr[i].search(atomPat)==-1) {
+alert("The domain name does not seem to be valid.");
+return false;
+   }
+}
+
+/* domain name seems valid, but now make sure that it ends in a
+known top-level domain (like com, edu, gov) or a two-letter word,
+representing country (uk, nl), and that there''s a hostname preceding
+the domain or country. */
+
+if (checkTLD && domArr[domArr.length-1].length!=2 &&
+domArr[domArr.length-1].search(knownDomsPat)==-1) {
+alert("The address must end in a well-known domain or two letter " + "country.");
+return false;
+}
+
+// Make sure there''s a host name preceding the domain.
+
+if (len<2) {
+alert("This address is missing a hostname!");
+return false;
+}
+
+// If we''ve gotten this far, everything''s valid!
+return true;
+}
+
+//  End -->
+');
+      htp.p(WSGJSL.OpenEvent('SYUS','Validate'));htp.p('var index = 0;');
+htp.p('
+for (index = 0; index < ctl.form.P_FIRST_NAME.length; index++)
+{');
+htp.p('   if (!(ctl.form.z_modified[index].value == "Y")) { continue;};');
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_FIRST_NAME[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, 'First Name:'), true));
+htp.p('
+}');
+htp.p('
+for (index = 0; index < ctl.form.P_LAST_NAME.length; index++)
+{');
+htp.p('   if (!(ctl.form.z_modified[index].value == "Y")) { continue;};');
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_LAST_NAME[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, 'Last Name:'), true));
+htp.p('
+}');
+htp.p('
+for (index = 0; index < ctl.form.P_DESCRIPTION.length; index++)
+{');
+htp.p('   if (!(ctl.form.z_modified[index].value == "Y")) { continue;};');
+
+      htp.p(WSGJSL.CallChkMaxLength('ctl.form.P_DESCRIPTION[index]', 80, WSGL.MsgGetText(230, WSGLM.MSG230_MAXLEN_ERROR, 'Description:', '80')
+, true));
+htp.p('
+}');
+htp.p('
+for (index = 0; index < ctl.form.P_EMAIL_ADDRESS.length; index++)
+{');
+htp.p('   if (!(ctl.form.z_modified[index].value == "Y")) { continue;};');
+
+htp.p('
+}');
+htp.p('
+for (index = 0; index < ctl.form.P_CONTACT_TELEPHONE.length; index++)
+{');
+htp.p('   if (!(ctl.form.z_modified[index].value == "Y")) { continue;};');
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_CONTACT_TELEPHONE[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, 'Telephone:'), true));
+htp.p('
+}');
+htp.p('
+for (index = 0; index < ctl.form.P_CONTACT_FAX.length; index++)
+{');
+htp.p('   if (!(ctl.form.z_modified[index].value == "Y")) { continue;};');
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_CONTACT_FAX[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, 'Fax:'), true));
+htp.p('
+}');
+htp.p('
+for (index = 0; index < ctl.form.P_PERIOD_START.length; index++)
+{');
+htp.p('   if (!(ctl.form.z_modified[index].value == "Y")) { continue;};');
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_PERIOD_START[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, 'Period Start:'), true));
+htp.p('
+}');
+htp.p('
+for (index = 0; index < ctl.form.P_PERIOD_END.length; index++)
+{');
+htp.p('   if (!(ctl.form.z_modified[index].value == "Y")) { continue;};');
+
+htp.p('
+}');
+htp.p('
+for (index = 0; index < ctl.form.P_PASSWORD.length; index++)
+{');
+htp.p('   if (!(ctl.form.z_modified[index].value == "Y")) { continue;};');
+
+htp.p('
+}');
+htp.p('
+for (index = 0; index < ctl.form.P_PASSWORD_EXPIRES.length; index++)
+{');
+htp.p('   if (!(ctl.form.z_modified[index].value == "Y")) { continue;};');
+
+htp.p('
+}');
+htp.p('
+for (index = 0; index < ctl.form.P_GRACE_LOGINS.length; index++)
+{');
+htp.p('   if (!(ctl.form.z_modified[index].value == "Y")) { continue;};');
+
+htp.p('
+}');
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('SYUS','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFU','OnClick'));
+      htp.p('   if (!SYUS_Validate(ctl)) { return false; }');
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFD','OnClick'));
+      htp.p(WSGJSL.VerifyDelete(WSGL.MsgGetText(118, WSGLM.DSP118_CONFIRM_DELETE)));
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFR','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFI','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'Maintain User',
+                             VF_BODY_ATTRIBUTES, 'amfrw050$js$syus.CreateViewJavaScript');
+   end;
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw050$js$syus.CreateInsertJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+    procedure CreateInsertJavaScript(
+                                   IF_ROWS_INSERTED in integer,
+                                   IF_ROWS_ERROR in integer,
+                                   IF_BODY_ATTRIBUTES in varchar2,
+                                   LOV_FRAME in varchar2) is
+   begin
+      if not caco_security.security_check('amfrw050$syus') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Insert";');
+      htp.p('var index = 0;');
+	  if IF_ROWS_INSERTED > 0 then
+        htp.p( 'var DataChange = true;' );
+      else
+        htp.p( 'var DataChange = false;' );
+      end if;
+      if IF_ROWS_ERROR > 0 then
+        htp.p( 'var DataChangeErrors = true;' );
+      else
+        htp.p( 'var DataChangeErrors = false;' );
+      end if;
+
+
+      htp.p(WSGJSL.RtnNotNull);
+      htp.p(WSGJSL.RtnChkMaxLength);
+      htp.p(WSGJSL.RtnReplace);
+      htp.p(WSGJSL.RtnGetValue);
+      htp.p(WSGJSL.RtnStripMask);
+      htp.p(WSGJSL.RtnToNumber);
+      htp.p(WSGJSL.RtnChkNumScale);
+      htp.p(WSGJSL.RtnRadioChange);
+      htp.p(WSGJSL.RtnCheckModified);
+      htp.p(WSGJSL.RtnRevertForm);
+      htp.p(WSGJSL.RtnFlagRow);
+
+      WSGJSL.Output_Invoke_CAL_JS ('amfrw050$syus', 'scrollbars=no,resizable=no,width=320,height=350');
+
+
+      htp.p(WSGJSL.OpenEvent('EMAIL_ADDRESS','OnChange'));
+      htp.p(
+'
+// Validate
+//
+//
+return emailCheck(ctl.value);');
+      htp.p(WSGJSL.CloseEvent);
+
+      htp.p(
+'// emailCheck
+//
+//
+
+function emailCheck (emailStr) {
+
+/* The following variable tells the rest of the function whether or not
+to verify that the address ends in a two-letter country or well-known
+TLD.  1 means check it, 0 means don''t. */
+
+var checkTLD=1;
+
+/* The following is the list of known TLDs that an e-mail address must end with. */
+
+var knownDomsPat=/^(com|net|org|edu|int|mil|gov|arpa|biz|aero|name|coop|info|pro|museum)$/;
+
+/* The following pattern is used to check if the entered e-mail address
+fits the user@domain format.  It also is used to separate the username
+from the domain. */
+
+var emailPat=/^(.+)@(.+)$/;
+
+/* The following string represents the pattern for matching all special
+characters.  We don''t want to allow special characters in the address.
+These characters include ( ) < > @ , ; : \ " . [ ] */
+
+var specialChars="\\(\\)><@,;:\\\\\\\"\\.\\[\\]";
+
+/* The following string represents the range of characters allowed in a
+username or domainname.  It really states which chars aren''t allowed.*/
+
+var validChars="\[^\\s" + specialChars + "\]";
+
+/* The following pattern applies if the "user" is a quoted string (in
+which case, there are no rules about which characters are allowed
+and which aren''t; anything goes).  E.g. "jiminy cricket"@disney.com
+is a legal e-mail address. */
+
+var quotedUser="(\"[^\"]*\")";
+
+/* The following pattern applies for domains that are IP addresses,
+rather than symbolic names.  E.g. joe@[123.124.233.4] is a legal
+e-mail address. NOTE: The square brackets are required. */
+
+var ipDomainPat=/^\[(\d{1,3})\.(\d{1,3})\.(\d{1,3})\.(\d{1,3})\]$/;
+
+/* The following string represents an atom (basically a series of non-special characters.) */
+
+var atom=validChars + ''+'';
+
+/* The following string represents one word in the typical username.
+For example, in john.doe@somewhere.com, john and doe are words.
+Basically, a word is either an atom or quoted string. */
+
+var word="(" + atom + "|" + quotedUser + ")";
+
+// The following pattern describes the structure of the user
+
+var userPat=new RegExp("^" + word + "(\\." + word + ")*$");
+
+/* The following pattern describes the structure of a normal symbolic
+domain, as opposed to ipDomainPat, shown above. */
+
+var domainPat=new RegExp("^" + atom + "(\\." + atom +")*$");
+
+/* Finally, let''s start trying to figure out if the supplied address is valid. */
+
+/* Begin with the coarse pattern to simply break up user@domain into
+different pieces that are easy to analyze. */
+
+var matchArray=emailStr.match(emailPat);
+
+if (matchArray==null) {
+
+/* Too many/few @''s or something; basically, this address doesn''t
+even fit the general mould of a valid e-mail address. */
+
+alert("Email address seems incorrect (check @ and .''s)");
+return false;
+}
+var user=matchArray[1];
+var domain=matchArray[2];
+
+// Start by checking that only basic ASCII characters are in the strings (0-127).
+
+for (i=0; i<user.length; i++) {
+if (user.charCodeAt(i)>127) {
+alert("Ths username contains invalid characters.");
+return false;
+   }
+}
+for (i=0; i<domain.length; i++) {
+if (domain.charCodeAt(i)>127) {
+alert("Ths domain name contains invalid characters.");
+return false;
+   }
+}
+
+// See if "user" is valid
+
+if (user.match(userPat)==null) {
+
+// user is not valid
+
+alert("The username doesn''t seem to be valid.");
+return false;
+}
+
+/* if the e-mail address is at an IP address (as opposed to a symbolic
+host name) make sure the IP address is valid. */
+
+var IPArray=domain.match(ipDomainPat);
+if (IPArray!=null) {
+
+// this is an IP address
+
+for (var i=1;i<=4;i++) {
+if (IPArray[i]>255) {
+alert("Destination IP address is invalid!");
+return false;
+   }
+}
+return true;
+}
+
+// Domain is symbolic name.  Check if it''s valid.
+
+var atomPat=new RegExp("^" + atom + "$");
+var domArr=domain.split(".");
+var len=domArr.length;
+for (i=0;i<len;i++) {
+if (domArr[i].search(atomPat)==-1) {
+alert("The domain name does not seem to be valid.");
+return false;
+   }
+}
+
+/* domain name seems valid, but now make sure that it ends in a
+known top-level domain (like com, edu, gov) or a two-letter word,
+representing country (uk, nl), and that there''s a hostname preceding
+the domain or country. */
+
+if (checkTLD && domArr[domArr.length-1].length!=2 &&
+domArr[domArr.length-1].search(knownDomsPat)==-1) {
+alert("The address must end in a well-known domain or two letter " + "country.");
+return false;
+}
+
+// Make sure there''s a host name preceding the domain.
+
+if (len<2) {
+alert("This address is missing a hostname!");
+return false;
+}
+
+// If we''ve gotten this far, everything''s valid!
+return true;
+}
+
+//  End -->
+');
+      htp.p(WSGJSL.OpenEvent('SYUS','Validate'));htp.p('var index = 0;');
+
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_DB_USERNAME[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, 'Username:')));
+
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_FIRST_NAME[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, 'First Name:')));
+
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_LAST_NAME[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, 'Last Name:')));
+
+      htp.p(WSGJSL.CallChkMaxLength('ctl.form.P_DESCRIPTION[index]', 80, WSGL.MsgGetText(230, WSGLM.MSG230_MAXLEN_ERROR, 'Description:', '80')
+));
+
+
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_CONTACT_TELEPHONE[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, 'Telephone:')));
+
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_CONTACT_FAX[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, 'Fax:')));
+
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_PERIOD_START[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, 'Period Start:')));
+
+
+
+
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('SYUS','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnIFI','OnClick'));
+      htp.p('   if (!SYUS_Validate(ctl)) { return false; }');
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnIFR','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'Maintain User',
+                             IF_BODY_ATTRIBUTES, 'amfrw050$js$syus.CreateInsertJavaScript');
+   end;
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw050$js$syus.CreateQueryJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateQueryJavaScript (
+                                    LOV_FRAME in varchar2,
+						                  QF_BODY_ATTRIBUTES in varchar2)
+   is
+   begin
+      if not caco_security.security_check('amfrw050$syus') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Query";');
+
+
+      htp.p(WSGJSL.RtnOpenLOV);
+
+      htp.p(WSGJSL.OpenEvent('DB_USERNAME','LOV'));      htp.p('
+    var depStr = "";
+    var modeStr = ""
+    index = -1;
+    modeStr = "Q";
+');
+
+      if LOV_FRAME is not null then
+         htp.p('    var lovFra = "'||LOV_FRAME||'";');
+         htp.p('    var winpar = "";');
+      else
+         htp.p('    var lovFra = "winLOV";');
+         htp.p('    var winpar = "scrollbars=yes,resizable=yes,width=400,height=400";');
+      end if;
+      htp.p('    var filterprompt = "";');
+      htp.p('
+
+    var lovTitle = "'||replace('','"','\"')||'";
+    window.current_lov_title = lovTitle;
+
+    JSLOpenLOV( ctl, index, modeStr,  "amfrw050$syus.lv_syus_lov", depStr, lovFra, winpar, filterprompt );
+
+');
+
+      htp.p(WSGJSL.CloseEvent);
+      WSGJSL.Output_Invoke_CAL_JS ('amfrw050$syus', 'scrollbars=no,resizable=no,width=320,height=350');
+
+
+      htp.p(WSGJSL.OpenEvent('SYUS','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnQFQ','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'Maintain User',
+                             QF_BODY_ATTRIBUTES, 'amfrw050$js$syus.CreateQueryJavaScript');
+   end;
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw050$js$syus.spc

@@ -0,0 +1,24 @@
+create or replace package eft_nom.amfrw050$js$syus is
+
+   procedure CreateQueryJavaScript(
+						                 LOV_FRAME in varchar2,
+						                 QF_BODY_ATTRIBUTES in varchar2);
+
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  IF_ROWS_INSERTED in integer,
+                                  IF_ROWS_ERROR in integer,
+                                  LOV_FRAME in varchar2);
+
+   procedure CreateInsertJavaScript(
+                                   IF_ROWS_INSERTED in integer,
+                                   IF_ROWS_ERROR in integer,
+                                   IF_BODY_ATTRIBUTES in varchar2,
+                                   LOV_FRAME in varchar2);
+
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw050$syus.spc

@@ -0,0 +1,174 @@
+create or replace package eft_nom.amfrw050$syus is
+
+   type NBT_REC is record
+      ( UBI_CUST_NAME       varchar2(32760)
+      , UBI_INTE_NAME       varchar2(32760)
+      );
+
+   NBT_VAL    NBT_REC;
+   CURR_VAL   CG$SYSTEM_USERS.CG$ROW_TYPE;
+
+
+   procedure Startup(
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null,
+             Z_FORM in varchar2 default null);
+   procedure ActionQuery(
+             P_DB_USERNAME in varchar2 default null,
+             P_USER_LOCKED in varchar2 default null,
+	     Z_DIRECT_CALL in boolean default false,
+             Z_ACTION in varchar2 default null,
+             Z_CHK in varchar2 default null );
+
+   procedure FormQuery(
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+   procedure LV_SYUS_LOV(
+             Z_FILTER in varchar2,
+             Z_MODE in varchar2,
+             Z_CALLER_URL in varchar2,
+             Z_FORMROW in number default 0,
+             Z_LONG_LIST in varchar2 default null,
+             Z_ISSUE_WAIT in varchar2 default null);
+
+   procedure FormInsert(
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure QueryView(
+             K_SYUS_ID in varchar2 default null,
+             P_DB_USERNAME in varchar2 default null,
+             P_USER_LOCKED in varchar2 default null,
+             Z_EXECUTE_QUERY in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_START in varchar2 default '1',
+             Z_ACTION in varchar2 default null,
+             Z_CHK in varchar2 default null);
+   function QueryHits(
+            P_DB_USERNAME in varchar2 default null,
+            P_USER_LOCKED in varchar2 default null) return number;
+
+   procedure ActionView(
+             P_SYUS_ID in owa_text.vc_arr,
+             P_TITLE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_FIRST_NAME in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_LAST_NAME in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_DESCRIPTION in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_EMAIL_ADDRESS in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_CONTACT_TELEPHONE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_CONTACT_FAX in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_PERIOD_START in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_PERIOD_END in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_LANGUAGE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_PASSWORD in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_PASSWORD_EXPIRES in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_GRACE_LOGINS in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             P_USER_LOCKED in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_DB_USERNAME in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_TITLE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_FIRST_NAME in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_LAST_NAME in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_DESCRIPTION in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_EMAIL_ADDRESS in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_CONTACT_TELEPHONE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_CONTACT_FAX in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_CUST_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_INTE_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_PERIOD_START in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_PERIOD_END in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_LANGUAGE in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_PASSWORD in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_PASSWORD_EXPIRES in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_GRACE_LOGINS in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_USER_LOCKED in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_CREATED_BY in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_CREATED_ON in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_DESIGNATION in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_UPDATED_BY in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_UPDATED_ON in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_SYUS_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_DB_USERNAME in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_UBI_CUST_NAME in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_UBI_INTE_NAME in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             Q_DB_USERNAME in varchar2 default null,
+             Q_USER_LOCKED in varchar2 default null,
+             z_modified in owa_text.vc_arr,
+             Z_ACTION in varchar2 default null,
+             Z_START  in varchar2 default '1',
+             Z_CHK in varchar2 default null );
+   procedure ActionInsert(
+             P_DB_USERNAME in owa_text.vc_arr,
+             P_TITLE in owa_text.vc_arr,
+             P_FIRST_NAME in owa_text.vc_arr,
+             P_LAST_NAME in owa_text.vc_arr,
+             P_DESCRIPTION in owa_text.vc_arr,
+             P_EMAIL_ADDRESS in owa_text.vc_arr,
+             P_CONTACT_TELEPHONE in owa_text.vc_arr,
+             P_CONTACT_FAX in owa_text.vc_arr,
+             P_PERIOD_START in owa_text.vc_arr,
+             P_PERIOD_END in owa_text.vc_arr,
+             P_LANGUAGE in owa_text.vc_arr,
+             P_PASSWORD in owa_text.vc_arr,
+             P_PASSWORD_EXPIRES in owa_text.vc_arr,
+             P_GRACE_LOGINS in owa_text.vc_arr,
+             P_USER_LOCKED in owa_text.vc_arr,
+             z_modified in owa_text.vc_arr,
+             Z_ACTION in varchar2 default null,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+   procedure QueryViewByKey(
+             P_SYUS_ID in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure LoadCache
+             ( Z_CURR_DEPTH       in number
+             , Z_MAX_DEPTH        in number
+             , Z_OWN_ROW_VALUES   in boolean             default false
+             , Z_CONTEXT_FOR      in WSGOC.COMPONENT_REF default null
+             , Z_BRANCH           in WSGOC.BRANCH_REF    default null
+             );
+   function RestoreState
+             ( Z_CURR_DEPTH          in number
+             , Z_MAX_DEPTH           in number
+             , Z_RESTORE_OWN_ROW     in boolean default true
+             )  return boolean;
+   procedure SaveState;
+   function  GetRef return WSGOC.COMPONENT_REF;
+
+
+   procedure InitialiseDomain(P_ALIAS in varchar2);
+
+   procedure calendar
+     (
+      Z_FIELD_NAME   in varchar2,
+      Z_CALLER_URL   in varchar2,
+      Z_FIELD_VALUE  in varchar2 default null,
+      Z_FIELD_FORMAT in varchar2 default null,
+      Z_FIELD_PROMPT in varchar2 default null
+     );
+
+   procedure format_cal_date
+     (
+      Z_FIELD_NAME   in Varchar2,
+      Z_FIELD_FORMAT in varchar2,
+      day            in varchar2,
+      month          in varchar2,
+      year           in varchar2
+     );
+
+   D_TITLE               WSGL.typDVRecord;
+   D_LANGUAGE            WSGL.typDVRecord;
+   D_USER_LOCKED         WSGL.typDVRecord;PROCEDURE update_user_details ( p_username  IN VARCHAR2
+                              , p_password  IN VARCHAR2
+                              , p_operation IN VARCHAR2);
+
+
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw060$.bdy

@@ -0,0 +1,233 @@
+create or replace package body eft_nom.amfrw060$ is
+   private_ModuleRef WSGOC.MODULE_REF;
+
+
+   procedure CreateStartupJavaScript;
+--------------------------------------------------------------------------------
+-- Name:        amfrw060$.Startup
+--
+-- Description: This procedure is the entry point for the 'amfrw060$'
+--              module.
+--
+-- Parameters:  None
+--
+--------------------------------------------------------------------------------
+   procedure Startup
+   is
+   begin
+      if not caco_security.security_check('amfrw060$') then
+         return;
+      end if;
+
+      WSGL.RegisterURL('amfrw060$.startup');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+      WSGL.StoreURLLink(0, WSGL.MsgGetText(21,WSGLM.CAP021_TOP_LEVEL));
+      amfrw060$uspr.startup(
+         Z_DIRECT_CALL => TRUE
+      );
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw060$.Startup');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw060$.firstpage
+--
+-- Description: This procedure creates the first page for the 'amfrw060$'
+--              module.
+--
+-- Parameters:  Z_DIRECT_CALL
+
+--
+--------------------------------------------------------------------------------
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+) is
+   begin
+      if not caco_security.security_check('amfrw060$') then
+         return;
+      end if;
+
+      WSGL.OpenPageHead('');
+      WSGL.METATag;
+      WSGL.ClosePageHead;
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      CreateStartupJavaScript;
+
+      WSGL.DefaultPageCaption('', 1);
+      htp.formOpen(curl => 'ActionItem', cattributes => 'NAME="SP$AIForm"');
+      WSGL.NavLinks(WSGL.MENU_LONG, WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT), 0, 'amfrw060$.showabout', '_top', p_output_line=>FALSE);
+      WSGL.NavLinks;
+      htp.formClose;
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw060$.FirstPage');
+   end;
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw060$.showabout
+--
+-- Description: This procedure is used to display an 'About' page for the
+--		'amfrw060$' module.
+--
+--------------------------------------------------------------------------------
+   procedure showabout is
+      l_usr  varchar2(255) := null;
+   begin
+      if not caco_security.security_check('amfrw060$') then
+         return;
+      end if;
+      l_usr := caco_security.get_user;
+
+      WSGL.RegisterURL('amfrw060$.showabout');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+
+      WSGL.OpenPageHead(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+      WSGL.METATag;
+      TemplateHeader(TRUE,2);
+      WSGL.ClosePageHead;
+
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      htp.p(caco_system.menu);
+
+      WSGL.DefaultPageCaption(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+
+      htp.para;
+      htp.p('
+$Revision: $');
+      htp.para;
+
+      htp.para;
+
+      htp.p(WSGL.MsgGetText(108,WSGLM.DSP108_GENERATED_BY, 'PL/SQL Web Generator', '10.1.2.6.18'));
+      htp.para;
+
+      WSGL.Info(FALSE, 'AM2', 'AMFRW060', l_usr);
+
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw060$.ShowAbout');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw060$.TemplateHeader
+--
+-- Description:
+--
+--------------------------------------------------------------------------------
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number) is
+   begin
+      if not caco_security.security_check('amfrw060$') then
+         return;
+      end if;
+
+      if Z_TEMPLATE_ID = 1 then
+         -- Template defined in \\soas001\framework\css\css_content.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=content" >
+');
+      elsif Z_TEMPLATE_ID = 2 then
+         -- Template defined in \\soas001\framework\css\css_about.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=about" >
+');
+      elsif Z_TEMPLATE_ID = 3 then
+         -- Template defined in \\soas001\framework\css\css_query.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=query" >
+');
+      elsif Z_TEMPLATE_ID = 4 then
+         -- Template defined in \\soas001\framework\css\css_view.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=view" >
+');
+      elsif Z_TEMPLATE_ID = 5 then
+         -- Template defined in \\soas001\framework\css\css_insert.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=insert" >
+');
+      elsif Z_TEMPLATE_ID = 6 then
+         -- Template defined in \\soas001\framework\css\css_recordlist.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=recordlist" >
+');
+      elsif Z_TEMPLATE_ID = 7 then
+         -- Template defined in \\soas001\framework\css\css_lov.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=lov" >
+');
+      elsif Z_TEMPLATE_ID = 8 then
+         -- Template defined in \\soas001\framework\css\css_text.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=text" >
+');
+      end if;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw060$.TemplateHeader');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw060$.GetRef
+--
+-- Description: Returns a handle to the display data for the
+--	             'amfrw060$' module.
+--              If the display object does not exist then it creates it first.
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+
+   function GetRef return WSGOC.MODULE_REF
+   is
+   begin
+      if ( WSGOC.Is_Null(private_ModuleRef)) then
+         private_ModuleRef := WSGOC.Module
+            ( pShortName           => 'amfrw060$'
+            , pFirstTitle          => ''
+            );
+      end if;
+      return private_ModuleRef;
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw060$.GetRef');
+         raise;
+   end;
+
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw060$.CreateStartupJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateStartupJavaScript is
+   begin
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Startup";');
+      htp.p(WSGJSL.CloseScript);
+   end;
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw060$.spc

@@ -0,0 +1,15 @@
+create or replace package eft_nom.amfrw060$ is
+
+   procedure Startup
+;
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+);
+   procedure ShowAbout;
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number);
+   function GetRef return WSGOC.MODULE_REF;
+
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw060$js$uspr.bdy

@@ -0,0 +1,385 @@
+create or replace package body eft_nom.amfrw060$js$uspr is
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw060$js$uspr.CreateViewJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  IF_ROWS_INSERTED in integer,
+                                  IF_ROWS_ERROR in integer,
+                                  RL_REQUERY_BUT_ACTION in varchar2,
+                                  LOV_FRAME in varchar2) is
+   begin
+      if not caco_security.security_check('amfrw060$uspr') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var index = 0;');
+	    if IF_ROWS_INSERTED > 0 then
+        htp.p( 'var DataChange = true;' );
+      else
+        htp.p( 'var DataChange = false;' );
+      end if;
+      if IF_ROWS_ERROR > 0 then
+        htp.p( 'var DataChangeErrors = true;' );
+      else
+        htp.p( 'var DataChangeErrors = false;' );
+      end if;
+
+
+      htp.p( 'var P_1 = new Array();' );
+      htp.p( 'P_1[0] = "' || WSGL.EscapeURLParam(to_char(amfrw060$uspr.CURR_VAL.SYPR_ID)) || '";' );
+      htp.p( 'var P_2 = new Array();' );
+      htp.p( 'P_2[0] = "' || WSGL.EscapeURLParam(to_char(amfrw060$uspr.CURR_VAL.SYUS_ID)) || '";' );
+
+      htp.p(WSGJSL.RtnCheckModified);
+      htp.p(WSGJSL.RtnRevertForm);
+      htp.p(WSGJSL.RtnFlagRow);
+      htp.p(WSGJSL.OpenEvent('USPR','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFU','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFD','OnClick'));
+      htp.p(WSGJSL.VerifyDelete(WSGL.MsgGetText(118, WSGLM.DSP118_CONFIRM_DELETE)));
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFR','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFI','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'Maintain User Roles',
+                             VF_BODY_ATTRIBUTES, 'amfrw060$js$uspr.CreateViewJavaScript');
+   end;
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw060$js$uspr.CreateInsertJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+    procedure CreateInsertJavaScript(
+                                   IF_ROWS_INSERTED in integer,
+                                   IF_ROWS_ERROR in integer,
+                                   IF_BODY_ATTRIBUTES in varchar2,
+                                   RL_REQUERY_BUT_ACTION in varchar2,
+                                   LOV_FRAME in varchar2) is
+   begin
+      if not caco_security.security_check('amfrw060$uspr') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Insert";');
+      htp.p('var index = 0;');
+	  if IF_ROWS_INSERTED > 0 then
+        htp.p( 'var DataChange = true;' );
+      else
+        htp.p( 'var DataChange = false;' );
+      end if;
+      if IF_ROWS_ERROR > 0 then
+        htp.p( 'var DataChangeErrors = true;' );
+      else
+        htp.p( 'var DataChangeErrors = false;' );
+      end if;
+
+
+      htp.p(WSGJSL.RtnCheckModified);
+      htp.p(WSGJSL.RtnRevertForm);
+      htp.p(WSGJSL.RtnFlagRow);
+      htp.p(WSGJSL.OpenEvent('L_SYSTEM_USERS_DB_USERNAME','LOV'));      htp.p('
+    var depStr = "";
+    var modeStr = ""
+    if (index == null)
+       index = 0;
+    if (ctl[index].form.name.search(/VForm$/) == -1)
+    {
+      modeStr = "INS";
+    }
+    else
+    {
+      modeStr = "UPD";
+    }
+');
+
+      if LOV_FRAME is not null then
+         htp.p('    var lovFra = "'||LOV_FRAME||'";');
+         htp.p('    var winpar = "";');
+      else
+         htp.p('    var lovFra = "winLOV";');
+         htp.p('    var winpar = "scrollbars=yes,resizable=yes,width=400,height=400";');
+      end if;
+      htp.p('    var filterprompt = "";');
+      htp.p('
+
+    var lovTitle = "'||replace('','"','\"')||'";
+    window.current_lov_title = lovTitle;
+
+    JSLOpenLOV( ctl[index], index, modeStr,  "amfrw060$uspr.l_system_users_db_username_lov", depStr, lovFra, winpar, filterprompt );
+
+');
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('L_SYSTEM_PROFILES_NAME','LOV'));      htp.p('
+    var depStr = "";
+    var modeStr = ""
+    if (index == null)
+       index = 0;
+    if (ctl[index].form.name.search(/VForm$/) == -1)
+    {
+      modeStr = "INS";
+    }
+    else
+    {
+      modeStr = "UPD";
+    }
+');
+
+      if LOV_FRAME is not null then
+         htp.p('    var lovFra = "'||LOV_FRAME||'";');
+         htp.p('    var winpar = "";');
+      else
+         htp.p('    var lovFra = "winLOV";');
+         htp.p('    var winpar = "scrollbars=yes,resizable=yes,width=400,height=400";');
+      end if;
+      htp.p('    var filterprompt = "";');
+      htp.p('
+
+    var lovTitle = "'||replace('','"','\"')||'";
+    window.current_lov_title = lovTitle;
+
+    JSLOpenLOV( ctl[index], index, modeStr,  "amfrw060$uspr.l_system_profiles_name_lov", depStr, lovFra, winpar, filterprompt );
+
+');
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('USPR','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnIFI','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnIFR','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'Maintain User Roles',
+                             IF_BODY_ATTRIBUTES, 'amfrw060$js$uspr.CreateInsertJavaScript');
+   end;
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw060$js$uspr.CreateQueryJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateQueryJavaScript (
+                                    LOV_FRAME in varchar2,
+						                  QF_BODY_ATTRIBUTES in varchar2)
+   is
+   begin
+      if not caco_security.security_check('amfrw060$uspr') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Query";');
+
+
+      htp.p(WSGJSL.OpenEvent('L_SYSTEM_USERS_DB_USERNAME','LOV'));      htp.p('
+    var depStr = "";
+    var modeStr = ""
+    index = -1;
+    modeStr = "Q";
+');
+
+      if LOV_FRAME is not null then
+         htp.p('    var lovFra = "'||LOV_FRAME||'";');
+         htp.p('    var winpar = "";');
+      else
+         htp.p('    var lovFra = "winLOV";');
+         htp.p('    var winpar = "scrollbars=yes,resizable=yes,width=400,height=400";');
+      end if;
+      htp.p('    var filterprompt = "";');
+      htp.p('
+
+    var lovTitle = "'||replace('','"','\"')||'";
+    window.current_lov_title = lovTitle;
+
+    JSLOpenLOV( ctl, index, modeStr,  "amfrw060$uspr.l_system_users_db_username_lov", depStr, lovFra, winpar, filterprompt );
+
+');
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('L_SYSTEM_PROFILES_NAME','LOV'));      htp.p('
+    var depStr = "";
+    var modeStr = ""
+    index = -1;
+    modeStr = "Q";
+');
+
+      if LOV_FRAME is not null then
+         htp.p('    var lovFra = "'||LOV_FRAME||'";');
+         htp.p('    var winpar = "";');
+      else
+         htp.p('    var lovFra = "winLOV";');
+         htp.p('    var winpar = "scrollbars=yes,resizable=yes,width=400,height=400";');
+      end if;
+      htp.p('    var filterprompt = "";');
+      htp.p('
+
+    var lovTitle = "'||replace('','"','\"')||'";
+    window.current_lov_title = lovTitle;
+
+    JSLOpenLOV( ctl, index, modeStr,  "amfrw060$uspr.l_system_profiles_name_lov", depStr, lovFra, winpar, filterprompt );
+
+');
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('USPR','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnQFQ','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'Maintain User Roles',
+                             QF_BODY_ATTRIBUTES, 'amfrw060$js$uspr.CreateQueryJavaScript');
+   end;
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw060$js$uspr.CreateListJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateListJavaScript (
+                                   RL_BODY_ATTRIBUTES in varchar2)
+   is
+   begin
+      if not caco_security.security_check('amfrw060$uspr') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "List";');
+
+
+      htp.p( 'var P_1 = new Array();' );
+      htp.p( 'var P_2 = new Array();' );
+
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'Maintain User Roles',
+                             RL_BODY_ATTRIBUTES, 'amfrw060$js$uspr.CreateListJavaScript');
+   end;
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw060$js$uspr.spc

@@ -0,0 +1,29 @@
+create or replace package eft_nom.amfrw060$js$uspr is
+
+   procedure CreateQueryJavaScript(
+						                 LOV_FRAME in varchar2,
+						                 QF_BODY_ATTRIBUTES in varchar2);
+
+   procedure CreateListJavaScript(
+                                   RL_BODY_ATTRIBUTES in varchar2);
+
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  IF_ROWS_INSERTED in integer,
+                                  IF_ROWS_ERROR in integer,
+                                  RL_REQUERY_BUT_ACTION in varchar2,
+                                  LOV_FRAME in varchar2);
+
+   procedure CreateInsertJavaScript(
+                                   IF_ROWS_INSERTED in integer,
+                                   IF_ROWS_ERROR in integer,
+                                   IF_BODY_ATTRIBUTES in varchar2,
+                                   RL_REQUERY_BUT_ACTION in varchar2,
+                                   LOV_FRAME in varchar2);
+
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw060$uspr.spc

@@ -0,0 +1,114 @@
+create or replace package eft_nom.amfrw060$uspr is
+
+   type NBT_REC is record
+      ( L_SYSTEM_USERS_DB_USERNAME SYSTEM_USERS.DB_USERNAME%type
+      , L_SYSTEM_PROFILES_NAME SYSTEM_PROFILES.NAME%type
+      );
+
+   NBT_VAL    NBT_REC;
+   CURR_VAL   CG$USER_PROFILES.CG$ROW_TYPE;
+
+
+   procedure Startup(
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null,
+             Z_FORM in varchar2 default null);
+   procedure ActionQuery(
+             P_L_SYSTEM_USERS_DB_USERNAME in varchar2 default null,
+             P_L_SYSTEM_PROFILES_NAME in varchar2 default null,
+	     Z_DIRECT_CALL in boolean default false,
+             Z_ACTION in varchar2 default null,
+             Z_CHK in varchar2 default null );
+
+   procedure FormQuery(
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure FormInsert(
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure QueryView(
+             K_SYPR_ID in varchar2 default null,
+             K_SYUS_ID in varchar2 default null,
+             P_L_SYSTEM_USERS_DB_USERNAME in varchar2 default null,
+             P_L_SYSTEM_PROFILES_NAME in varchar2 default null,
+             Z_EXECUTE_QUERY in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_START in varchar2 default '1',
+             Z_ACTION in varchar2 default null,
+             Z_CHK in varchar2 default null);
+   procedure QueryList(
+             P_L_SYSTEM_USERS_DB_USERNAME in varchar2 default null,
+             P_L_SYSTEM_PROFILES_NAME in varchar2 default null,
+             Z_START in varchar2 default null,
+             Z_ACTION in varchar2 default null,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null );
+   procedure QueryFirst(
+             P_L_SYSTEM_USERS_DB_USERNAME in varchar2 default null,
+             P_L_SYSTEM_PROFILES_NAME in varchar2 default null,
+             Z_ACTION in varchar2 default null,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+   function QueryHits(
+            P_L_SYSTEM_USERS_DB_USERNAME in varchar2 default null,
+            P_L_SYSTEM_PROFILES_NAME in varchar2 default null) return number;
+
+   procedure ActionView(
+             P_SYPR_ID in owa_text.vc_arr,
+             P_SYUS_ID in owa_text.vc_arr,
+             O_SYPR_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_SYUS_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_L_SYSTEM_USERS_DB_USERNAME in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             H_L_SYSTEM_PROFILES_NAME in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             Q_L_SYSTEM_USERS_DB_USERNAME in varchar2 default null,
+             Q_L_SYSTEM_PROFILES_NAME in varchar2 default null,
+             z_modified in owa_text.vc_arr,
+             Z_ACTION in varchar2 default null,
+             Z_START  in varchar2 default '1',
+             Z_CHK in varchar2 default null );
+   procedure ActionInsert(
+             P_L_SYSTEM_USERS_DB_USERNAME in owa_text.vc_arr,
+             P_L_SYSTEM_PROFILES_NAME in owa_text.vc_arr,
+             z_modified in owa_text.vc_arr,
+             Z_ACTION in varchar2 default null,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+   procedure ActionDelete(
+             P_SYPR_ID in varchar2 default null,
+             P_SYUS_ID in varchar2 default null,
+             Z_ACTION in varchar2 default null,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure QueryViewByKey(
+             P_SYPR_ID in varchar2 default null,
+             P_SYUS_ID in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure LoadCache
+             ( Z_CURR_DEPTH       in number
+             , Z_MAX_DEPTH        in number
+             , Z_OWN_ROW_VALUES   in boolean             default false
+             , Z_CONTEXT_FOR      in WSGOC.COMPONENT_REF default null
+             , Z_BRANCH           in WSGOC.BRANCH_REF    default null
+             );
+   function RestoreState
+             ( Z_CURR_DEPTH          in number
+             , Z_MAX_DEPTH           in number
+             , Z_RESTORE_OWN_ROW     in boolean default true
+             )  return boolean;
+   procedure SaveState;
+   function  GetRef return WSGOC.COMPONENT_REF;
+
+
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw070$.bdy

@@ -0,0 +1,233 @@
+create or replace package body eft_nom.amfrw070$ is
+   private_ModuleRef WSGOC.MODULE_REF;
+
+
+   procedure CreateStartupJavaScript;
+--------------------------------------------------------------------------------
+-- Name:        amfrw070$.Startup
+--
+-- Description: This procedure is the entry point for the 'amfrw070$'
+--              module.
+--
+-- Parameters:  None
+--
+--------------------------------------------------------------------------------
+   procedure Startup
+   is
+   begin
+      if not caco_security.security_check('amfrw070$') then
+         return;
+      end if;
+
+      WSGL.RegisterURL('amfrw070$.startup');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+      WSGL.StoreURLLink(0, WSGL.MsgGetText(21,WSGLM.CAP021_TOP_LEVEL));
+      amfrw070$code.startup(
+         Z_DIRECT_CALL => TRUE
+      );
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw070$.Startup');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw070$.firstpage
+--
+-- Description: This procedure creates the first page for the 'amfrw070$'
+--              module.
+--
+-- Parameters:  Z_DIRECT_CALL
+
+--
+--------------------------------------------------------------------------------
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+) is
+   begin
+      if not caco_security.security_check('amfrw070$') then
+         return;
+      end if;
+
+      WSGL.OpenPageHead('');
+      WSGL.METATag;
+      WSGL.ClosePageHead;
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      CreateStartupJavaScript;
+
+      WSGL.DefaultPageCaption('', 1);
+      htp.formOpen(curl => 'ActionItem', cattributes => 'NAME="SP$AIForm"');
+      WSGL.NavLinks(WSGL.MENU_LONG, WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT), 0, 'amfrw070$.showabout', '_top', p_output_line=>FALSE);
+      WSGL.NavLinks;
+      htp.formClose;
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw070$.FirstPage');
+   end;
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw070$.showabout
+--
+-- Description: This procedure is used to display an 'About' page for the
+--		'amfrw070$' module.
+--
+--------------------------------------------------------------------------------
+   procedure showabout is
+      l_usr  varchar2(255) := null;
+   begin
+      if not caco_security.security_check('amfrw070$') then
+         return;
+      end if;
+      l_usr := caco_security.get_user;
+
+      WSGL.RegisterURL('amfrw070$.showabout');
+      if WSGL.NotLowerCase then
+         return;
+      end if;
+
+      WSGL.OpenPageHead(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+      WSGL.METATag;
+      TemplateHeader(TRUE,2);
+      WSGL.ClosePageHead;
+
+      WSGL.OpenPageBody(FALSE, p_attributes=>'');
+
+      htp.p(caco_system.menu);
+
+      WSGL.DefaultPageCaption(WSGL.MsgGetText(107,WSGLM.DSP107_ABOUT)||' ');
+
+      htp.para;
+      htp.p('
+$Revision: $');
+      htp.para;
+
+      htp.para;
+
+      htp.p(WSGL.MsgGetText(108,WSGLM.DSP108_GENERATED_BY, 'PL/SQL Web Generator', '10.1.2.6.18'));
+      htp.para;
+
+      WSGL.Info(FALSE, 'AM2', 'AMFRW070', l_usr);
+
+
+      WSGL.ClosePageBody;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw070$.ShowAbout');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw070$.TemplateHeader
+--
+-- Description:
+--
+--------------------------------------------------------------------------------
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number) is
+   begin
+      if not caco_security.security_check('amfrw070$') then
+         return;
+      end if;
+
+      if Z_TEMPLATE_ID = 1 then
+         -- Template defined in \\soas001\framework\css\css_content.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=content" >
+');
+      elsif Z_TEMPLATE_ID = 2 then
+         -- Template defined in \\soas001\framework\css\css_about.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=about" >
+');
+      elsif Z_TEMPLATE_ID = 3 then
+         -- Template defined in \\soas001\framework\css\css_query.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=query" >
+');
+      elsif Z_TEMPLATE_ID = 4 then
+         -- Template defined in \\soas001\framework\css\css_view.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=view" >
+');
+      elsif Z_TEMPLATE_ID = 5 then
+         -- Template defined in \\soas001\framework\css\css_insert.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=insert" >
+');
+      elsif Z_TEMPLATE_ID = 6 then
+         -- Template defined in \\soas001\framework\css\css_recordlist.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=recordlist" >
+');
+      elsif Z_TEMPLATE_ID = 7 then
+         -- Template defined in \\soas001\framework\css\css_lov.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=lov" >
+');
+      elsif Z_TEMPLATE_ID = 8 then
+         -- Template defined in \\soas001\framework\css\css_text.htm
+         htp.p('<META http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
+<LINK REL=stylesheet HREF="caco_system.css?p_type=text" >
+');
+      end if;
+
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw070$.TemplateHeader');
+   end;
+--------------------------------------------------------------------------------
+-- Name:        amfrw070$.GetRef
+--
+-- Description: Returns a handle to the display data for the
+--	             'amfrw070$' module.
+--              If the display object does not exist then it creates it first.
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+
+   function GetRef return WSGOC.MODULE_REF
+   is
+   begin
+      if ( WSGOC.Is_Null(private_ModuleRef)) then
+         private_ModuleRef := WSGOC.Module
+            ( pShortName           => 'amfrw070$'
+            , pFirstTitle          => ''
+            );
+      end if;
+      return private_ModuleRef;
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, '',
+                             '', 'amfrw070$.GetRef');
+         raise;
+   end;
+
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw070$.CreateStartupJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateStartupJavaScript is
+   begin
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var FormType = "Startup";');
+      htp.p(WSGJSL.CloseScript);
+   end;
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw070$.spc

@@ -0,0 +1,15 @@
+create or replace package eft_nom.amfrw070$ is
+
+   procedure Startup
+;
+   procedure FirstPage(Z_DIRECT_CALL in boolean
+
+);
+   procedure ShowAbout;
+   procedure TemplateHeader(Z_DIRECT_CALL in boolean,
+                            Z_TEMPLATE_ID in number);
+   function GetRef return WSGOC.MODULE_REF;
+
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw070$code.spc

@@ -0,0 +1,56 @@
+create or replace package eft_nom.amfrw070$code is
+
+
+   CURR_VAL   CG$CONTACT_DETAILS.CG$ROW_TYPE;
+
+
+   procedure Startup(
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null,
+             Z_FORM in varchar2 default null);
+   procedure QueryView(
+             K_CODE_ID in varchar2 default null,
+             Z_EXECUTE_QUERY in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_START in varchar2 default '1',
+             Z_ACTION in varchar2 default null,
+             Z_CHK in varchar2 default null);
+   function QueryHits return number;
+
+   procedure ActionView(
+             P_CODE_ID in owa_text.vc_arr,
+             P_DESCRIPTION in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_DESCRIPTION in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             O_CODE_ID in owa_text.vc_arr default WSGL.EmptyVCArrLong,
+             z_modified in owa_text.vc_arr,
+             Z_ACTION in varchar2 default null,
+             Z_START  in varchar2 default '1',
+             Z_CHK in varchar2 default null );
+   procedure QueryViewByKey(
+             P_CODE_ID in varchar2 default null,
+             Z_POST_DML in boolean default false,
+             Z_FORM_STATUS in number default WSGL.FORM_STATUS_OK,
+             Z_DIRECT_CALL in boolean default false,
+             Z_CHK in varchar2 default null);
+
+   procedure LoadCache
+             ( Z_CURR_DEPTH       in number
+             , Z_MAX_DEPTH        in number
+             , Z_OWN_ROW_VALUES   in boolean             default false
+             , Z_CONTEXT_FOR      in WSGOC.COMPONENT_REF default null
+             , Z_BRANCH           in WSGOC.BRANCH_REF    default null
+             );
+   function RestoreState
+             ( Z_CURR_DEPTH          in number
+             , Z_MAX_DEPTH           in number
+             , Z_RESTORE_OWN_ROW     in boolean default true
+             )  return boolean;
+   procedure SaveState;
+   function  GetRef return WSGOC.COMPONENT_REF;
+
+
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw070$js$code.bdy

@@ -0,0 +1,110 @@
+create or replace package body eft_nom.amfrw070$js$code is
+
+
+--------------------------------------------------------------------------------
+-- Name:        amfrw070$js$code.CreateViewJavaScript
+--
+-- Description:
+--
+-- Parameters:
+--
+--------------------------------------------------------------------------------
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  LOV_FRAME in varchar2) is
+   begin
+      if not caco_security.security_check('amfrw070$code') then
+         return;
+      end if;
+
+      htp.p(WSGJSL.OpenScript);
+      htp.p('var index = 0;');
+      htp.p( 'var DataChangeErrors = false;' );
+      htp.p( 'var DataChange = false;' );
+
+
+      htp.p( 'var P_1 = new Array();' );
+
+      htp.p(WSGJSL.RtnNotNull);
+      htp.p(WSGJSL.RtnChkMaxLength);
+      htp.p(WSGJSL.RtnCheckModified);
+      htp.p(WSGJSL.RtnRevertForm);
+      htp.p(WSGJSL.OpenEvent('DESCRIPTION','OnChange'));      htp.p('
+   if (ctl != null)
+   {
+      ctl.form.z_modified[index].value = "Y";
+   }');
+      htp.p(WSGJSL.CloseEvent);
+
+   htp.p('
+function ResetRadios( form, num_rows )
+{
+   return;
+};
+');
+
+      htp.p(WSGJSL.OpenEvent('CODE','Validate'));htp.p('var index = 0;');
+htp.p('
+for (index = 0; index < ctl.form.P_DESCRIPTION.length; index++)
+{');
+htp.p('   if (!(ctl.form.z_modified[index].value == "Y")) { continue;};');
+
+      htp.p(WSGJSL.CallNotNull('ctl.form.P_DESCRIPTION[index]', WSGL.MsgGetText(219, WSGLM.MSG219_MISSING_MANDATORY, 'Details:'), true));
+      htp.p(WSGJSL.CallChkMaxLength('ctl.form.P_DESCRIPTION[index]', 4000, WSGL.MsgGetText(230, WSGLM.MSG230_MAXLEN_ERROR, 'Details:', '4000')
+, true));
+htp.p('
+}');
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('CODE','OnLoad'));
+      htp.p('
+   if ( FormType != "PostDelete")
+   {
+      form_num=0;
+      do
+      {
+         elem_num=0;
+         len = document.forms[form_num].elements.length;
+         if (len > 0)
+         {
+            while (elem_num < len &&
+                   document.forms[form_num].elements[elem_num].type != "text" &&
+                   document.forms[form_num].elements[elem_num].type != "textarea")
+            {
+               elem_num++;
+            }
+            if (elem_num < len)
+            {
+               document.forms[form_num].elements[elem_num].focus();
+               break;
+            }
+         }
+         form_num++;
+      } while ( form_num < document.forms.length );
+   }
+');
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFU','OnClick'));
+      htp.p('   if (!CODE_Validate(ctl)) { return false; }');
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFD','OnClick'));
+      htp.p(WSGJSL.VerifyDelete(WSGL.MsgGetText(118, WSGLM.DSP118_CONFIRM_DELETE)));
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.OpenEvent('btnVFR','OnClick'));
+      htp.p(WSGJSL.StandardSubmit(false));
+
+      htp.p(WSGJSL.CloseEvent);
+      htp.p(WSGJSL.CloseScript);
+   exception
+      when others then
+         WSGL.DisplayMessage(WSGL.MESS_EXCEPTION, SQLERRM, ''||' : '||'Maintain Contact Information',
+                             VF_BODY_ATTRIBUTES, 'amfrw070$js$code.CreateViewJavaScript');
+   end;
+end;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/amfrw070$js$code.spc

@@ -0,0 +1,12 @@
+create or replace package eft_nom.amfrw070$js$code is
+
+   procedure CreateViewJavaScript(
+                                  VF_ROWS_UPDATED in integer,
+                                  VF_ROWS_DELETED in integer,
+                                  VF_ROWS_ERROR in integer,
+                                  VF_BODY_ATTRIBUTES in varchar2,
+                                  LOV_FRAME in varchar2);
+
+end;
+/
+

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

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

Data/BulkLoad/EFT/Nominations/plsql/amut_adhoc.spc

@@ -0,0 +1,37 @@
+CREATE OR REPLACE PACKAGE EFT_NOM.amut_adhoc IS
+  /**
+  #############################################################################
+  #                                                                           #
+  # Package:             amut_adhoc                                           #
+  #                                                                           #
+  # Application System:  General                                              #
+  #                                                                           #
+  # Creation Date:       17/10/2006                                           #
+  #                                                                           #
+  # Author:              Oracle Team, Advantica Ltd                           #
+  #                                                                           #
+  # Purpose:             A flexible reporting infrastructure providing output #
+  #                      in HTML                                              #
+  #                                                                           #
+  # Dependancies:        Reporting Schema as defined in Designer              #
+  #                                                                           #
+  # Header Information:  $Header: $                                           #
+  #                                                                           #
+  # Revision:            $Revision: 1 $                                       #
+  #                                                                           #
+  #                                                     ? Advantica Ltd, 2006 #
+  #############################################################################
+  */
+  --
+  -- Public type declarations
+  --
+  g_package_name CONSTANT VARCHAR2(15) := 'amut_adhoc';
+  --
+  /**
+  -- Procedure to return ad-hoc reporting screen
+  */
+  PROCEDURE reporting;
+  --
+END amut_adhoc;
+/
+

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

@@ -0,0 +1,59 @@
+create or replace package body eft_nom.caco_api is
+
+  g_header   CONSTANT VARCHAR2(160) := '$Header: /Isle Of Grain/database/PLSQL/caco_api.pck 1     7/01/05 12:54 Gilberta $';
+  g_revision CONSTANT VARCHAR2(160) := '$Revision: 1 $';
+
+---
+-- F C O P Y
+---
+FUNCTION fcopy (filefrom IN VARCHAR2, fileto IN VARCHAR2) RETURN NUMBER
+AS LANGUAGE JAVA
+NAME 'JFile.copyfile (java.lang.String, java.lang.String) return int';
+---
+-- F D E L E T E
+---
+FUNCTION fdelete (p_file IN VARCHAR2) RETURN NUMBER
+AS language JAVA
+NAME 'JFile.delete (java.lang.String) return int';
+---
+-- F D I R
+---
+FUNCTION fdir (p_dir IN VARCHAR2) RETURN filelist
+AS language JAVA
+NAME 'JDirList.getList (java.lang.String) return oracle.sql.ARRAY.ARRAY';
+---
+-- S E N D F A X
+---
+FUNCTION sendfax (pfilename IN CHAR,
+                  pnumber   IN CHAR,
+                  pchannel  IN BINARY_INTEGER) return BINARY_INTEGER
+as
+BEGIN
+  RETURN 0;
+END;
+/*language C
+name "Oracle_SendFax"
+library TESTINTERFACE
+parameters (pFilename STRING
+           ,pNumber   STRING
+           ,pchannel  INT
+           ,return    INT);*/
+---
+-- S E N D V O I C E
+---
+FUNCTION sendvoice (pfilename IN CHAR,
+                    pnumber IN CHAR) return BINARY_INTEGER
+as
+BEGIN
+  RETURN 0;
+END;
+/*language C
+name "Oracle_VoiceCall"
+library TESTINTERFACE
+parameters (pFilename STRING
+           ,pNumber   STRING
+           ,return    INT);*/
+--
+end caco_api;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/caco_api.spc

@@ -0,0 +1,21 @@
+create or replace package eft_nom.caco_api is
+
+  -- Created : 24/04/2003 15:46:26
+  -- Purpose : To hold programmatic interface modules
+
+  FUNCTION fcopy (filefrom IN VARCHAR2, fileto IN VARCHAR2) RETURN NUMBER;
+  --
+  FUNCTION fdelete (p_file IN VARCHAR2) RETURN NUMBER;
+  --
+  FUNCTION fdir (p_dir IN VARCHAR2) RETURN filelist;
+  --
+  FUNCTION sendfax (pfilename IN CHAR,
+                    pnumber IN CHAR,
+                    pchannel IN BINARY_INTEGER) return BINARY_INTEGER;
+  --
+  FUNCTION sendvoice (pfilename IN CHAR,
+                      pnumber IN CHAR) RETURN BINARY_INTEGER;
+  --
+end caco_api;
+/
+

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

@@ -0,0 +1,304 @@
+CREATE OR REPLACE PACKAGE BODY caco_debug IS
+  /*
+      * $Header: /Isle Of Grain/Database/PLSQL/caco_debug.pck 3     8/04/05 11:06 Hardya $
+      * $Revision: 3 $
+      *
+      * $History: caco_debug.pck $
+  *
+  * *****************  Version 3  *****************
+  * User: Hardya       Date: 8/04/05    Time: 11:06
+  * Updated in $/Isle Of Grain/Database/PLSQL
+  * Add function about to package specification.
+   *
+   * *****************  Version 2  *****************
+   * User: Hardya       Date: 18/03/05   Time: 11:24
+   * Updated in $/Isle Of Grain/Database/PLSQL
+   * Added use of debug_options table. Added procedures to allow invocation
+   * from web.
+    *
+    * *****************  Version 1  *****************
+    * User: Gilberta     Date: 7/01/05    Time: 12:54
+    * Created in $/Isle Of Grain/database/PLSQL
+    * Initial Version
+      *
+      * *****************  Version 1  *****************
+      * User: Hardya       Date: 18/09/01   Time: 15:32
+      * Created in $/Database/Packages/Debug
+      * Routine to write debugging messages to the DEBUG table.
+     */
+  g_debugging BOOLEAN DEFAULT FALSE;
+
+  PROCEDURE debug_on(p_package_name IN VARCHAR2 DEFAULT NULL) IS
+  BEGIN
+    g_debugging := TRUE;
+  END;
+
+  PROCEDURE debug_off IS
+  BEGIN
+    g_debugging := FALSE;
+  END;
+
+  FUNCTION debugging RETURN BOOLEAN IS
+  BEGIN
+    RETURN g_debugging;
+  END;
+
+  PROCEDURE who_called_me(p_owner       OUT VARCHAR2
+                         ,p_name        OUT VARCHAR2
+                         ,p_lineno      OUT NUMBER
+                         ,p_caller_type OUT VARCHAR2) AS
+    v_call_stack  VARCHAR2(4096) DEFAULT dbms_utility.format_call_stack;
+    n             NUMBER;
+    v_found_stack BOOLEAN DEFAULT FALSE;
+    v_line        VARCHAR2(255);
+    v_count       NUMBER := 0;
+    l_handle      VARCHAR2(20);
+    l_linenum     NUMBER;
+  BEGIN
+    --
+    LOOP
+      n := instr(v_call_stack
+                ,chr(10));
+      EXIT WHEN(v_count = 3 OR n IS NULL OR n = 0);
+      --
+      v_line       := substr(v_call_stack
+                            ,1
+                            ,n - 1);
+      v_call_stack := substr(v_call_stack
+                            ,n + 1);
+      --
+      IF (NOT v_found_stack) THEN
+        IF (v_line LIKE '%handle%number%name%') THEN
+          v_found_stack := TRUE;
+        END IF;
+      ELSE
+        v_count := v_count + 1;
+        -- v_count = 1 is ME
+        -- v_count = 2 is MY Caller
+        -- v_count = 3 is Their Caller
+        IF (v_count = 3) THEN
+          -- Within a call, we have the object handle, then the line number, then the object name,
+          -- separated by spaces. We need to separate them out
+          --
+          -- Trim white space from the call first.
+          v_line := ltrim(v_line);
+          -- handle is the first part
+          l_handle := substr(v_line
+                            ,1
+                            ,instr(v_line
+                                  ,' '));
+          --
+          -- Now, remove the object handle, then the white space from the call.
+          v_line := substr(v_line
+                          ,length(l_handle) + 1);
+          v_line := ltrim(v_line);
+          -- Now we can get the line number.
+          l_linenum := to_number(substr(v_line
+                                       ,1
+                                       ,instr(v_line
+                                             ,' ')));
+
+          p_lineno := l_linenum;
+
+          -- Remove the line number, and white space.
+          v_line := substr(v_line
+                          ,length(l_linenum) + 1);
+          v_line := ltrim(v_line);
+
+          IF (v_line LIKE 'pr%') THEN
+            n := length('procedure ');
+          ELSIF (v_line LIKE 'fun%') THEN
+            n := length('function ');
+          ELSIF (v_line LIKE 'package body%') THEN
+            n := length('package body ');
+          ELSIF (v_line LIKE 'pack%') THEN
+            n := length('package ');
+          ELSIF (v_line LIKE 'anonymous%') THEN
+            n := length('anonymous block ');
+          ELSE
+            n := NULL;
+          END IF;
+          IF (n IS NOT NULL) THEN
+            p_caller_type := ltrim(rtrim(upper(substr(v_line
+                                                     ,1
+                                                     ,n - 1))));
+          ELSE
+            p_caller_type := 'TRIGGER';
+          END IF;
+
+          v_line  := substr(v_line
+                           ,nvl(n
+                               ,1));
+          n       := instr(v_line
+                          ,'.');
+          p_owner := ltrim(rtrim(substr(v_line
+                                       ,1
+                                       ,n - 1)));
+          p_name  := ltrim(rtrim(substr(v_line
+                                       ,n + 1)));
+        END IF;
+      END IF;
+    END LOOP;
+  EXCEPTION
+    WHEN OTHERS THEN
+      htp.p('error ' || SQLERRM);
+  END;
+
+  PROCEDURE putline(p_line IN VARCHAR2) IS
+    PRAGMA AUTONOMOUS_TRANSACTION;
+    v_owner       VARCHAR2(80);
+    v_name        VARCHAR2(80);
+    v_lineno      NUMBER;
+    v_caller_type VARCHAR2(80);
+    v_debugging   BOOLEAN := g_debugging;
+    l_match_owner VARCHAR2(80);
+    l_match_name  VARCHAR2(80);    
+  BEGIN
+    who_called_me(v_owner
+                 ,v_name
+                 ,v_lineno
+                 ,v_caller_type);
+    --             
+    BEGIN
+      SELECT NAME
+            ,owner
+        INTO l_match_name
+            ,l_match_owner
+        FROM (SELECT NAME
+                    ,owner
+                FROM debug_options
+               WHERE v_name LIKE NAME
+                 AND (owner IS NULL OR v_owner LIKE owner))
+       WHERE rownum < 2;
+      v_debugging := TRUE;
+    EXCEPTION
+      WHEN no_data_found THEN
+        NULL; --v_debugging := FALSE;
+    END;
+    --
+    IF v_debugging THEN
+      INSERT INTO debug
+        (owner
+        ,NAME
+        ,lineno
+        ,caller_type
+        ,line)
+      VALUES
+        (v_owner
+        ,v_name
+        ,v_lineno
+        ,v_caller_type
+        ,p_line);
+      COMMIT;
+    END IF;
+  END putline;
+
+  FUNCTION check_password(p_password IN VARCHAR2) RETURN BOOLEAN IS
+    l_check VARCHAR2(80);
+  BEGIN
+    l_check := 'DUMMY';
+    l_check := to_char(SYSDATE - 2
+                      ,'DDMMYYYY');
+    RETURN(l_check = p_password);
+  END check_password;
+
+  PROCEDURE htp_msg(p_msg IN VARCHAR2) IS
+  BEGIN
+    htp.htmlopen;
+    htp.bodyopen;
+    htp.p(p_msg);
+    htp.bodyclose;
+    htp.htmlclose;
+    dbms_output.put_line(p_msg);
+  END htp_msg;
+
+  PROCEDURE clear_debug_table(p_name        IN debug.NAME%TYPE DEFAULT NULL
+                             ,p_before_date IN DATE DEFAULT SYSDATE
+                             ,p_owner       IN debug.owner%TYPE DEFAULT USER
+                             ,p_password    IN VARCHAR2) IS
+  BEGIN
+    IF check_password(p_password) THEN
+      DELETE FROM debug d
+       WHERE NAME = nvl(upper(p_name)
+                       ,NAME)
+         AND d.created_on <= p_before_date
+         AND d.owner = upper(p_owner);
+      htp_msg('Cleared debug table of ' || SQL%ROWCOUNT || ' rows for ' ||
+              p_name || ' ' || p_before_date || ' ' || p_owner);
+
+    END IF;
+  END clear_debug_table;
+
+  PROCEDURE add_debug_option(p_name     IN debug_options.NAME%TYPE
+                            ,p_owner    IN debug_options.owner%TYPE DEFAULT USER
+                            ,p_password IN VARCHAR2) IS
+  BEGIN
+    IF check_password(p_password) THEN
+      INSERT INTO debug_options
+        (NAME
+        ,owner)
+      VALUES
+        (upper(p_name)
+        ,upper(p_owner));
+      htp_msg('Added debug option for ' || upper(p_name) || ' ' ||
+              upper(p_owner));
+    END IF;
+  EXCEPTION
+    WHEN dup_val_on_index THEN
+      htp_msg('Already have debug option for ' || upper(p_name) || ' ' ||
+              upper(p_owner));
+  END add_debug_option;
+
+  PROCEDURE remove_debug_option(p_name     IN debug_options.NAME%TYPE
+                               ,p_owner    IN debug_options.owner%TYPE DEFAULT USER
+                               ,p_password IN VARCHAR2) IS
+  BEGIN
+    IF check_password(p_password) THEN
+      DELETE FROM debug_options
+       WHERE NAME = upper(p_name)
+         AND owner = upper(p_owner);
+
+      htp_msg('Removed debug option for ' || upper(p_name) || ' ' ||
+              upper(p_owner));
+    END IF;
+  END remove_debug_option;
+
+  PROCEDURE show_debug_table(p_name     IN debug_options.NAME%TYPE DEFAULT NULL
+                            ,p_owner    IN debug_options.owner%TYPE DEFAULT USER
+                            ,p_password IN VARCHAR2) IS
+  BEGIN
+    IF check_password(p_password) THEN
+      htp.htmlopen;
+      htp.bodyopen;
+      htp.p(htf.tableopen);
+      htp.p(htf.tableheader(cvalue => 'Created On'));
+      htp.p(htf.tableheader(cvalue => 'Module'));
+      htp.p(htf.tableheader(cvalue => 'Details'));
+      htp.p(htf.tableheader(cvalue => 'Line No'));
+      FOR l_rec_debug IN (SELECT *
+                            FROM debug
+                           WHERE NAME = nvl(upper(p_name)
+                                           ,NAME)
+                             AND owner = upper(p_owner)
+                           ORDER BY debu_id) LOOP
+        htp.p(htf.tablerowopen);
+        htp.p(htf.tabledata(to_char(l_rec_debug.created_on
+                                   ,'DD-MON-YYYY HH24:MI:SS')));
+        htp.p(htf.tabledata(l_rec_debug.NAME));
+        htp.p(htf.tabledata(l_rec_debug.line));
+        htp.p(htf.tabledata(l_rec_debug.lineno));
+        htp.p(htf.tablerowclose);
+      END LOOP;
+      htp.p(htf.tableclose);
+      htp.bodyclose;
+      htp.htmlclose;
+    END IF;
+  END show_debug_table;
+
+  FUNCTION about RETURN VARCHAR2 IS
+  BEGIN
+    RETURN g_header;
+  END about;
+
+END caco_debug;
+/

Data/BulkLoad/EFT/Nominations/plsql/caco_debug.spc

@@ -0,0 +1,58 @@
+CREATE OR REPLACE PACKAGE caco_debug IS
+  g_header   CONSTANT VARCHAR2(160) := '$Header: /Isle Of Grain/Database/PLSQL/caco_debug.pck 3     8/04/05 11:06 Hardya $';
+  g_revision CONSTANT VARCHAR2(160) := '$Revision: 3 $';
+
+  /*
+       * $History: caco_debug.pck $
+  *
+  * *****************  Version 3  *****************
+  * User: Hardya       Date: 8/04/05    Time: 11:06
+  * Updated in $/Isle Of Grain/Database/PLSQL
+  * Add function about to package specification.
+   *
+   * *****************  Version 2  *****************
+   * User: Hardya       Date: 18/03/05   Time: 11:24
+   * Updated in $/Isle Of Grain/Database/PLSQL
+   * Added use of debug_options table. Added procedures to allow invocation
+   * from web.
+    *
+    * *****************  Version 1  *****************
+    * User: Gilberta     Date: 7/01/05    Time: 12:54
+    * Created in $/Isle Of Grain/database/PLSQL
+    * Initial Version
+       *
+       * *****************  Version 1  *****************
+       * User: Hardya       Date: 18/09/01   Time: 15:32
+       * Created in $/Database/Packages/Debug
+       * Routine to write debugging messages to the DEBUG table.
+      */
+  PROCEDURE debug_on(p_package_name IN VARCHAR2 DEFAULT NULL);
+  PROCEDURE debug_off;
+  FUNCTION debugging RETURN BOOLEAN;
+
+  PROCEDURE putline(p_line IN VARCHAR2);
+  PROCEDURE who_called_me(p_owner       OUT VARCHAR2
+                         ,p_name        OUT VARCHAR2
+                         ,p_lineno      OUT NUMBER
+                         ,p_caller_type OUT VARCHAR2);
+
+  PROCEDURE clear_debug_table(p_name        IN debug.NAME%TYPE DEFAULT NULL
+                             ,p_before_date IN DATE DEFAULT SYSDATE
+                             ,p_owner       IN debug.owner%TYPE DEFAULT USER
+                             ,p_password    IN VARCHAR2);
+
+  PROCEDURE add_debug_option(p_name     IN debug_options.NAME%TYPE
+                            ,p_owner    IN debug_options.owner%TYPE DEFAULT USER
+                            ,p_password IN VARCHAR2);
+
+  PROCEDURE remove_debug_option(p_name     IN debug_options.NAME%TYPE
+                               ,p_owner    IN debug_options.owner%TYPE DEFAULT USER
+                               ,p_password IN VARCHAR2);
+
+  PROCEDURE show_debug_table(p_name     IN debug_options.NAME%TYPE DEFAULT NULL
+                            ,p_owner    IN debug_options.owner%TYPE DEFAULT USER
+                            ,p_password IN VARCHAR2);
+
+  FUNCTION about RETURN VARCHAR2;
+END caco_debug;
+/

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

@@ -0,0 +1,152 @@
+CREATE OR REPLACE PACKAGE BODY EFT_NOM.caco_file_io IS
+
+/*
+ * $Header: /Isle Of Grain/database/PLSQL/caco_file_io.pck 1     7/01/05 12:54 Gilberta $
+ * $Revision: 1 $
+ *
+ */
+
+  --
+  PROCEDURE put_line  ( p_record    IN VARCHAR2 ) IS
+  BEGIN
+    --
+    utl_file.put_line ( g_file_handle, p_record );
+    --
+  EXCEPTION
+    --
+    WHEN no_data_found THEN
+      dbms_output.put_line('no_data_found');
+      utl_file.fclose(g_file_handle);
+    --
+    WHEN utl_file.invalid_path THEN
+      dbms_output.put_line('utl_file.invalid_path');
+      utl_file.fclose(g_file_handle);
+    --
+    WHEN utl_file.read_error THEN
+      dbms_output.put_line(' utl_file.read_error');
+      utl_file.fclose(g_file_handle);
+    --
+    WHEN utl_file.write_error THEN
+      dbms_output.put_line('utl_file.write_error');
+      utl_file.fclose(g_file_handle);
+    --
+    WHEN others THEN
+      dbms_output.put_line('other stuff');
+      utl_file.fclose(g_file_handle);
+    --
+  END put_line;
+  ---
+  -- G E T   L I N E
+  ---
+  PROCEDURE get_line (p_file_line OUT VARCHAR2,
+                      p_EOF       OUT BOOLEAN)  IS
+    --
+    l_file_line VARCHAR2(2000);
+    --
+  BEGIN
+    --
+    p_EOF       := FALSE;
+    l_file_line := NULL;
+    --
+    UTL_FILE.get_line(g_file_handle,l_file_line);
+    --
+    IF l_file_line IS NULL THEN
+      p_EOF := TRUE;
+      p_file_line := NULL;
+    ELSE
+      p_EOF := FALSE;
+      p_file_line := l_file_line;
+    END IF;
+    --
+  EXCEPTION
+    WHEN no_data_found THEN
+      dbms_output.put_line('No file line found');
+      p_EOF := TRUE;
+    WHEN value_error THEN
+      dbms_output.put_line('Value error');
+      utl_file.fclose(g_file_handle);
+      p_EOF := TRUE;
+    WHEN utl_file.invalid_filehandle THEN
+      dbms_output.put_line('Invalid file handle');
+      utl_file.fclose(g_file_handle);
+      p_EOF := TRUE;
+    WHEN utl_file.invalid_operation THEN
+      dbms_output.put_line('Invalid operation');
+      utl_file.fclose(g_file_handle);
+      p_EOF := TRUE;
+    WHEN utl_file.read_error THEN
+      dbms_output.put_line('Read error');
+      utl_file.fclose(g_file_handle);
+      p_EOF := TRUE;
+    WHEN OTHERS THEN
+      dbms_output.put_line('Unexpected error'||SQLERRM);
+      utl_file.fclose(g_file_handle);
+      p_EOF := TRUE;
+  END ;
+  --
+  PROCEDURE open_file ( p_file_dir  IN VARCHAR2
+                      , p_file_name IN VARCHAR2
+                      , p_file_mode IN VARCHAR2 ) IS
+  BEGIN
+    --
+    g_file_handle := utl_file.fopen ( p_file_dir
+                                    , p_file_name
+                                    , p_file_mode );
+    --
+  EXCEPTION
+    --
+    WHEN no_data_found THEN
+      dbms_output.put_line('no_data_found');
+      utl_file.fclose(g_file_handle);
+    --
+    WHEN utl_file.invalid_path THEN
+      dbms_output.put_line('utl_file.invalid_path');
+      utl_file.fclose(g_file_handle);
+    --
+    WHEN utl_file.read_error THEN
+      dbms_output.put_line(' utl_file.read_error');
+      utl_file.fclose(g_file_handle);
+    --
+    WHEN utl_file.write_error THEN
+      dbms_output.put_line('utl_file.write_error');
+      utl_file.fclose(g_file_handle);
+    --
+    WHEN others THEN
+      dbms_output.put_line('other stuff');
+      utl_file.fclose(g_file_handle);
+    --
+  END open_file;
+  --
+  PROCEDURE close_file IS
+  BEGIN
+    --
+    utl_file.fclose ( g_file_handle );
+    --
+  EXCEPTION
+    --
+    WHEN no_data_found THEN
+      dbms_output.put_line('no_data_found');
+      utl_file.fclose(g_file_handle);
+    --
+    WHEN utl_file.invalid_path THEN
+      dbms_output.put_line('utl_file.invalid_path');
+      utl_file.fclose(g_file_handle);
+    --
+    WHEN utl_file.read_error THEN
+      dbms_output.put_line(' utl_file.read_error');
+      utl_file.fclose(g_file_handle);
+    --
+    WHEN utl_file.write_error THEN
+      dbms_output.put_line('utl_file.write_error');
+      utl_file.fclose(g_file_handle);
+    --
+    WHEN others THEN
+      dbms_output.put_line('other stuff');
+      utl_file.fclose(g_file_handle);
+    --
+  END close_file;
+  --
+  --
+END caco_file_io;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/caco_file_io.spc

@@ -0,0 +1,36 @@
+CREATE OR REPLACE PACKAGE EFT_NOM.caco_file_io IS
+	--
+   g_header 	CONSTANT VARCHAR2(160) := '$Header: /Isle Of Grain/database/PLSQL/caco_file_io.pck 1     7/01/05 12:54 Gilberta $';
+   g_revision 	CONSTANT VARCHAR2(160) := '$Revision: 1 $';
+
+   /*
+    * $Header: /Isle Of Grain/database/PLSQL/caco_file_io.pck 1     7/01/05 12:54 Gilberta $
+    * $Revision: 1 $
+    *
+    * $History: caco_file_io.pck $
+ *
+ * *****************  Version 1  *****************
+ * User: Gilberta     Date: 7/01/05    Time: 12:54
+ * Created in $/Isle Of Grain/database/PLSQL
+ * Initial Version
+ *
+ * *****************  Version 1  *****************
+ * User: Hardya       Date: 26/11/01   Time: 16:41
+ * Created in $/Database/Common
+ * Common routine for wrapper of utl_file.
+    *
+    */
+   --
+   g_file_handle    utl_file.file_type;
+   --
+   PROCEDURE put_line  ( p_record    IN VARCHAR2 );
+   PROCEDURE open_file ( p_file_dir  IN VARCHAR2
+                         , p_file_name IN VARCHAR2
+                         , p_file_mode IN VARCHAR2 );
+   PROCEDURE close_file;
+   PROCEDURE get_line (p_file_line OUT VARCHAR2,
+                       p_EOF       OUT BOOLEAN);
+   --
+END caco_file_io;
+/
+

Data/BulkLoad/EFT/Nominations/plsql/caco_security.spc

@@ -0,0 +1,170 @@
+CREATE OR REPLACE PACKAGE caco_security IS
+  --
+  g_header CONSTANT VARCHAR2(160) := '$Header: /Isle Of Grain/database/PLSQL/caco_security.pck 4     20/10/05 13:33 Gilberta $';
+  g_revision CONSTANT VARCHAR2(160) := '$Revision: 4 $ Patch 0.2';
+  --
+  /*
+   * $History: caco_security.pck $
+ *
+ * ******** EFT - Nominations - Patch 0.2 ********
+ * Added logging of failed login
+ *
+ * *****************  Version 4  *****************
+ * User: Gilberta     Date: 20/10/05   Time: 13:33
+ * Updated in $/Isle Of Grain/database/PLSQL
+ * Modified to size the username and password fields on the login screen
+ * for the benefit of IE6.
+ *
+ * *****************  Version 3  *****************
+ * User: Gilberta     Date: 18/07/05   Time: 10:22
+ * Updated in $/Isle Of Grain/database/PLSQL
+ * Modified to fix password expiry
+ *
+ * *****************  Version 1  *****************
+ * User: Gilberta     Date: 7/01/05    Time: 12:54
+ * Created in $/Isle Of Grain/database/PLSQL
+ * Initial Version
+   *
+  */
+  --
+  -- Globals
+  --
+  g_current_user    VARCHAR2(30);
+  g_current_syus_id NUMBER;
+  g_current_cust_id NUMBER;
+  g_current_inte_id NUMBER;
+  C_password_max_tries CONSTANT NUMBER := NVL(cout_system_configuration.get_configuration_item('G_PASSWORD_FAILED_LOGINS'),3);
+
+  --
+  g_client_id VARCHAR2(240);
+  --
+  ---------------------------------------------------------------------
+  --  Security API functions
+  --  These functions may be called from generated WSG applications.
+  ---------------------------------------------------------------------
+  --
+  --  Security_Check: Returns true if the currently logged on user is
+  --                  allowed access to the specified package. If not,
+  --                  will return false. This function will also provide
+  --                  a means for the user to log on.
+  --
+  FUNCTION security_check(p_package_name IN VARCHAR2) RETURN BOOLEAN;
+  --
+  --
+  --  Add_Package_Resp: Adds a respondibility to a package, allowing users
+  --                    with that responsibility to access the application.
+  --                    This is called from the generated application
+  --                    installation script if a value is supplied for
+  --                    preference SECRES.
+  --
+  PROCEDURE add_package_resp(p_package_name   IN VARCHAR2
+                            ,p_responsibility IN VARCHAR2);
+  --
+  --------------------------------------------------------------------------
+  --  Implementation specific functions
+  --  These functions are used only by this implementation of the
+  --  security package.
+  --------------------------------------------------------------------------
+  --
+  -- Get User
+  --
+  FUNCTION get_user RETURN VARCHAR2;
+  --
+  -- get session data
+  --
+  PROCEDURE get_session_data(p_client_id IN VARCHAR2 DEFAULT NULL);
+  --
+  --
+  --  Show_Logon_Form: Renders logon form
+  --
+  PROCEDURE show_logon_form(p_embedded IN BOOLEAN DEFAULT FALSE
+                           ,h_href     IN VARCHAR2 DEFAULT NULL);
+  --
+  --
+  --  Process_Logon: Accepts submitted logon form and logs user on. If logon
+  --                 fails then notifies user.
+  --
+  PROCEDURE process_logon(p_username     IN VARCHAR2 DEFAULT NULL
+                         ,p_password     IN VARCHAR2 DEFAULT NULL
+                         ,h_href         IN VARCHAR2 DEFAULT NULL
+                         ,p_login_button IN VARCHAR2 DEFAULT NULL
+                         );
+  --
+  -- Process_Logon: Overloaded version for client certificate
+  --
+  PROCEDURE process_certificate_logon;
+  --
+  --
+  --  Show_No_Access: Displays message to inform user that they do not
+  --                  have access to the application. Provides a link
+  --                  to the logon form.
+  --
+  PROCEDURE show_no_access;
+  --
+  --
+  --  Call_Logon_Form: Output HTML to call the logon form, which
+  --                   may be in a separate window.
+  --
+  PROCEDURE call_logon_form;
+  --
+  --
+  --  Logoff: Removes the current user's session, logging them off. Outputs
+  --          HTML message when complete.
+  --
+  PROCEDURE logoff;
+  --
+  -- Logout: Removes the current user's session, logging them off. Redirects to the
+  -- home page
+  --
+  PROCEDURE logout;
+  --
+  ---
+  -- Moved from CACO_UTILITIES 26-APR-2003
+  ---
+  PROCEDURE change_cust_inte(p_inte_id IN intermediaries.inte_id%TYPE DEFAULT NULL
+                            ,p_cust_id IN customers.cust_id%TYPE DEFAULT NULL
+                            ,p_savebtn IN VARCHAR2 DEFAULT NULL
+                            ,p_cancbtn IN VARCHAR2 DEFAULT NULL
+                            ,p_message IN VARCHAR2 DEFAULT NULL);
+  /**
+  -- Procedure to allow user to change their password.
+  -- Call without parameters to display the startup screen, other parameters are used internally.
+  -- @param p_call_type Used internally to determine which screen to display
+  -- @param p_old_password Existing password for the user
+  -- @param p_password New password for the user
+  -- @param p_confirm New password for the user
+  -- @param p_button Value returned by a button press
+  --
+  */
+  PROCEDURE change_password(p_call_type    IN VARCHAR2 DEFAULT NULL
+                           ,p_old_password IN VARCHAR2 DEFAULT NULL
+                           ,p_password     IN VARCHAR2 DEFAULT NULL
+                           ,p_confirm      IN VARCHAR2 DEFAULT NULL
+                           ,p_button       IN VARCHAR2 DEFAULT NULL
+                           ,p_embedded     IN BOOLEAN DEFAULT FALSE);
+  /**
+  -- Procedure to remove expired sessions
+  -- No parameters required
+  */
+  PROCEDURE remove_expired_sessions;
+  /**
+  -- Procedure to produce the register screen
+  */
+  PROCEDURE online_user_registration ( p_register_title      IN VARCHAR2 DEFAULT NULL
+                                     , p_register_first_name IN VARCHAR2 DEFAULT NULL
+                                     , p_register_surname    IN VARCHAR2 DEFAULT NULL
+                                     , p_register_company    IN VARCHAR2 DEFAULT NULL
+                                     , p_register_email      IN VARCHAR2 DEFAULT NULL
+                                     , p_register_phone      IN VARCHAR2 DEFAULT NULL
+                                     , p_register_submit     IN VARCHAR2 DEFAULT NULL
+                                     );
+  /**
+  -- Procedure to process a logon using an interface
+  */                                     
+  PROCEDURE process_interface_logon ( p_username    IN      VARCHAR2
+                                    , p_password    IN      VARCHAR2
+                                    , p_success     OUT     BOOLEAN
+                                    , p_message     OUT     VARCHAR2 );                                     
+  --
+END caco_security;
+/

Data/BulkLoad/EFT/Nominations/plsql/caco_system.spc

@@ -0,0 +1,48 @@
+CREATE OR REPLACE PACKAGE caco_system IS
+
+  g_header   CONSTANT VARCHAR2(160) := '$Header: /Isle Of Grain/database/PLSQL/caco_system.pck 6     20/10/05 17:12 Gilberta $';
+  g_revision CONSTANT VARCHAR2(160) := '$Revision: 6 $';
+
+  /*
+  * $Header: /Isle Of Grain/database/PLSQL/caco_system.pck 6     20/10/05 17:12 Gilberta $
+  * $Revision: 6 $
+  *
+  */
+
+  g_images_dir VARCHAR2(80) := 'notset';
+
+  g_package_name VARCHAR2(50) := 'caco_system';
+
+  FUNCTION dad_path    RETURN VARCHAR2;
+  FUNCTION home_path   RETURN VARCHAR2;
+  FUNCTION images_path RETURN VARCHAR2;
+
+  FUNCTION  statusbar RETURN VARCHAR2;
+  PROCEDURE css(p_type IN VARCHAR2 DEFAULT 'general');
+  PROCEDURE homecss;
+
+  PROCEDURE clock_js;
+
+  PROCEDURE set_language (p_language IN VARCHAR2);
+
+  FUNCTION  menu ( p_syop_id IN system_options.syop_id%TYPE DEFAULT NULL ) RETURN VARCHAR2;
+  /**
+  -- Generic function to close off all the divs opened by the menu
+  */
+  FUNCTION  footer (p_closebody IN BOOLEAN DEFAULT FALSE) RETURN VARCHAR2;
+  PROCEDURE footer (p_closebody IN BOOLEAN DEFAULT FALSE);
+  --
+  -- EFT homepages elements
+  --
+  PROCEDURE sitemap;
+  --
+  PROCEDURE contact;
+  --
+  PROCEDURE switch_language;
+  --
+  PROCEDURE eon_css;
+  --
+  PROCEDURE content_type;
+  --
+END caco_system;
+/