[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: --
1978: -- assignment will be returned into
1979: CURSOR get_outs(cp_id IN NUMBER) IS
1980: SELECT parameter_name,
1981: value_name
1982: FROM pay_trigger_parameters
1983: WHERE parameter_type = 'R'
1984: AND usage_id = cp_id
1985: AND usage_type = 'I'
1986: ORDER BY parameter_id;
1988: -- Get the mappings for the parameter list of a function or procedure
1989: CURSOR get_parms(cp_id IN NUMBER) IS
1990: SELECT parameter_name,
1991: value_name
1992: FROM pay_trigger_parameters
1993: WHERE parameter_type IN ('I','O')
1994: AND value_name IS NOT NULL
1995: AND usage_id = cp_id
1996: AND usage_type = 'I'
2152: -- Cursor to fetch the parameter mappings for the specified module
2153: CURSOR get_parms(cp_id IN NUMBER) IS
2154: SELECT parameter_name,
2155: value_name
2156: FROM pay_trigger_parameters
2157: WHERE parameter_type IN ('I','O')
2158: AND value_name IS NOT NULL
2159: AND usage_id = cp_id
2160: AND usage_type = 'C'
2566: BEGIN
2567: --
2568: -- Delete all the parameters that the requested initialisation uses
2569: DELETE
2570: FROM pay_trigger_parameters
2571: WHERE usage_type = 'I'
2572: AND usage_id = p_id;
2573: --
2574: -- The caller must delete the initialisation itself
2583: BEGIN
2584: --
2585: -- Delete all the parameters that the requested component uses
2586: DELETE
2587: FROM pay_trigger_parameters
2588: WHERE usage_type = 'C'
2589: AND usage_id = p_id;
2590: --
2591: -- The caller must delete the component itself
2600: BEGIN
2601: --
2602: -- Delete a parameter directly, used by table event updates form
2603: DELETE
2604: FROM pay_trigger_parameters
2605: WHERE parameter_id = p_param_id;
2606: --
2607: -- The caller must delete the initialisation itself
2608: END delete_parameters_directly;
2620: --
2621: cursor csr_params (cp_tab_id in number)
2622: is
2623: select parameter_name, usage_type, value_name
2624: from pay_trigger_parameters
2625: where usage_type in ('PI','PU','PD')
2626: and usage_id = cp_tab_id
2627: order by parameter_name;
2628:
2919:
2920: cursor csr_missing_params (cp_table_name in varchar2, cp_type in varchar2) is
2921: /* Component calls use this , ignore locals cos these will always be made*/
2922: SELECT upper(value_name) name
2923: FROM pay_trigger_parameters
2924: WHERE parameter_type IN ('I','O')
2925: AND value_name IS NOT NULL
2926: AND usage_id in (select component_id
2927: from pay_trigger_events te, pay_trigger_components tc
2932: AND value_name like ':%'
2933: MINUS
2934: /* aru params use this */
2935: SELECT upper(parameter_name)
2936: FROM pay_trigger_parameters
2937: WHERE usage_type = 'P'||cp_type
2938: AND usage_id = (select dated_table_id
2939: from pay_dated_tables
2940: where table_name = cp_table_name);