58 lines
2.2 KiB
Plaintext
58 lines
2.2 KiB
Plaintext
CREATE OR REPLACE PACKAGE efnow131$ IS
|
|
--
|
|
g_title CONSTANT VARCHAR2(50) := 'Renomination Window';
|
|
g_header CONSTANT VARCHAR2(160) := '$Header: $';
|
|
g_revision CONSTANT VARCHAR2(160) := '$Revision: $';
|
|
g_package_name CONSTANT VARCHAR2(30) := 'efnow131$';
|
|
--
|
|
-- Types
|
|
--
|
|
TYPE t_cont_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;
|
|
--
|
|
/** Open renom window create records in the nomination_windows and nom_window_contracts tables
|
|
to specify timefgrames where customers may renominate within day.
|
|
*/
|
|
PROCEDURE open_renom_window(p_gas_day IN VARCHAR2
|
|
,p_wdw_open_hr IN VARCHAR2
|
|
,p_wdw_open_min IN VARCHAR2
|
|
,p_wdw_close_hr IN VARCHAR2
|
|
,p_wdw_close_min IN VARCHAR2
|
|
,p_subject IN VARCHAR2
|
|
,p_message IN VARCHAR2
|
|
,p_cont_id 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 efnow131$;
|
|
/
|