[Home] [Help]
170: ) RETURN NUMBER IS
171: --
172: -- Get the next primary key value from the database sequence
173: CURSOR get_id IS
174: SELECT pay_trigger_parameters_s.NEXTVAL
175: FROM dual;
176: --
177: -- Find any existing parameter matching the name, type and usage ID
178: CURSOR get_existing(
180: cp_type IN VARCHAR2,
181: cp_name IN VARCHAR2
182: ) IS
183: SELECT parameter_id,automatic
184: FROM pay_trigger_parameters
185: WHERE UPPER(parameter_name) = UPPER(cp_name)
186: AND usage_type = cp_type
187: AND usage_id = cp_id;
188: --
207: FETCH get_id INTO l_rc;
208: CLOSE get_id;
209: --
210: -- Insert the new row
211: INSERT INTO pay_trigger_parameters(
212: parameter_id,
213: usage_type,
214: usage_id,
215: parameter_type,
229: -- If l_auto is 'Y' then the parameter
230: -- can be updated it with new values, if the parameter is not automatic
231: -- then the user has modified it in some way so we can't change it
232: ELSIF (l_auto = 'Y') THEN
233: UPDATE pay_trigger_parameters
234: SET usage_type = p_usage_type,
235: usage_id = p_usage_id,
236: parameter_type = p_parameter_type,
237: parameter_name = p_parameter_name,
692: -- are always inputs
693: CURSOR get_places(cp_id IN NUMBER) IS
694: SELECT parameter_name,
695: value_name
696: FROM pay_trigger_parameters
697: WHERE usage_type = 'I'
698: AND parameter_type = 'I'
699: AND usage_id = cp_id;
700: --
2007: -- assignment will be returned into
2008: CURSOR get_outs(cp_id IN NUMBER) IS
2009: SELECT parameter_name,
2010: value_name
2011: FROM pay_trigger_parameters
2012: WHERE parameter_type = 'R'
2013: AND usage_id = cp_id
2014: AND usage_type = 'I'
2015: ORDER BY parameter_id;
2017: -- Get the mappings for the parameter list of a function or procedure
2018: CURSOR get_parms(cp_id IN NUMBER) IS
2019: SELECT parameter_name,
2020: value_name
2021: FROM pay_trigger_parameters
2022: WHERE parameter_type IN ('I','O')
2023: AND value_name IS NOT NULL
2024: AND usage_id = cp_id
2025: AND usage_type = 'I'
2181: -- Cursor to fetch the parameter mappings for the specified module
2182: CURSOR get_parms(cp_id IN NUMBER) IS
2183: SELECT parameter_name,
2184: value_name
2185: FROM pay_trigger_parameters
2186: WHERE parameter_type IN ('I','O')
2187: AND value_name IS NOT NULL
2188: AND usage_id = cp_id
2189: AND usage_type = 'C'
2596: BEGIN
2597: --
2598: -- Delete all the parameters that the requested initialisation uses
2599: DELETE
2600: FROM pay_trigger_parameters
2601: WHERE usage_type = 'I'
2602: AND usage_id = p_id;
2603: --
2604: -- The caller must delete the initialisation itself
2613: BEGIN
2614: --
2615: -- Delete all the parameters that the requested component uses
2616: DELETE
2617: FROM pay_trigger_parameters
2618: WHERE usage_type = 'C'
2619: AND usage_id = p_id;
2620: --
2621: -- The caller must delete the component itself
2630: BEGIN
2631: --
2632: -- Delete a parameter directly, used by table event updates form
2633: DELETE
2634: FROM pay_trigger_parameters
2635: WHERE parameter_id = p_param_id;
2636: --
2637: -- The caller must delete the initialisation itself
2638: END delete_parameters_directly;
2650: --
2651: cursor csr_params (cp_tab_id in number)
2652: is
2653: select parameter_name, usage_type, value_name
2654: from pay_trigger_parameters
2655: where usage_type in ('PI','PU','PD')
2656: and usage_id = cp_tab_id
2657: order by parameter_name;
2658:
2956:
2957: cursor csr_missing_params (cp_table_name in varchar2, cp_type in varchar2) is
2958: /* Component calls use this , ignore locals cos these will always be made*/
2959: SELECT upper(value_name) name
2960: FROM pay_trigger_parameters
2961: WHERE parameter_type IN ('I','O')
2962: AND value_name IS NOT NULL
2963: AND usage_id in (select component_id
2964: from pay_trigger_events te, pay_trigger_components tc
2969: AND value_name like ':%'
2970: MINUS
2971: /* aru params use this */
2972: SELECT upper(parameter_name)
2973: FROM pay_trigger_parameters
2974: WHERE usage_type = 'P'||cp_type
2975: AND usage_id = (select dated_table_id
2976: from pay_dated_tables
2977: where table_name = cp_table_name);