40: dml_mode varchar2(10), -- 'NONE', 'PARTIAL, 'FULL'.
41: max_errors_allowed number,
42: max_single_undo number,
43: limit_dml boolean,
44: retro_purge pay_action_parameters.parameter_value%type,
45: single_bal_table pay_action_parameters.parameter_value%type,
46: set_date_earned pay_action_parameters.parameter_value%type,
47: sub_ledger_acc pay_action_parameters.parameter_value%type
48: );
41: max_errors_allowed number,
42: max_single_undo number,
43: limit_dml boolean,
44: retro_purge pay_action_parameters.parameter_value%type,
45: single_bal_table pay_action_parameters.parameter_value%type,
46: set_date_earned pay_action_parameters.parameter_value%type,
47: sub_ledger_acc pay_action_parameters.parameter_value%type
48: );
49: --
42: max_single_undo number,
43: limit_dml boolean,
44: retro_purge pay_action_parameters.parameter_value%type,
45: single_bal_table pay_action_parameters.parameter_value%type,
46: set_date_earned pay_action_parameters.parameter_value%type,
47: sub_ledger_acc pay_action_parameters.parameter_value%type
48: );
49: --
50: -- Data structure to hold information on next range.
43: limit_dml boolean,
44: retro_purge pay_action_parameters.parameter_value%type,
45: single_bal_table pay_action_parameters.parameter_value%type,
46: set_date_earned pay_action_parameters.parameter_value%type,
47: sub_ledger_acc pay_action_parameters.parameter_value%type
48: );
49: --
50: -- Data structure to hold information on next range.
51: type range_rec is record
58: g_error_count number;
59: g_debug boolean := hr_utility.debug_enabled;
60: --
61: -- cache variables
62: mtgl_mode pay_action_parameters.parameter_value%type;
63: mtgl_mode_cached boolean := false;
64: --
65: -- The End of Time.
66: c_eot constant date := to_date('31/12/4712', 'DD/MM/YYYY');
110: * the relevant default value.
111: */
112: function action_parameter(p_param_name in varchar2)
113: return varchar2 is
114: l_name pay_action_parameters.parameter_name%type;
115: param_value pay_action_parameters.parameter_value%type;
116: c_indent constant varchar2(40) := 'py_rollback_pkg.action_parameter';
117: l_found boolean;
118: begin
111: */
112: function action_parameter(p_param_name in varchar2)
113: return varchar2 is
114: l_name pay_action_parameters.parameter_name%type;
115: param_value pay_action_parameters.parameter_value%type;
116: c_indent constant varchar2(40) := 'py_rollback_pkg.action_parameter';
117: l_found boolean;
118: begin
119: -- Attempt to find value of the parameter
456: end if;
457: begin
458: select upper(parameter_value)
459: into mtgl_mode
460: from pay_action_parameters
461: where parameter_name = 'TRANSGL_THREAD';
462: exception
463: when others then
464: mtgl_mode := 'Y';