1: Package Body pay_wci_rates_api as
2: /* $Header: pypwrapi.pkb 115.2 2002/12/05 15:26:16 swinton noship $ */
3: --
4: -- Package Variables
5: --
2: /* $Header: pypwrapi.pkb 115.2 2002/12/05 15:26:16 swinton noship $ */
3: --
4: -- Package Variables
5: --
6: g_package varchar2(33) := 'pay_wci_rates_api';
7: --
8: -- ----------------------------------------------------------------------------
9: -- |--------------------------
10: -- ----------------------------------------------------------------------------
49: --
50: -- Call Before Process User Hook
51: --
52: begin
53: pay_wci_rates_bk1.create_wci_rate_b
54: (p_business_group_id => l_business_group_id
55: ,p_account_id => p_account_id
56: ,p_code => p_code
57: ,p_rate => p_rate
91: --
92: -- Call After Process User Hook
93: --
94: begin
95: pay_wci_rates_bk1.create_wci_rate_a
96: (p_business_group_id => l_business_group_id
97: ,p_account_id => p_account_id
98: ,p_code => p_code
99: ,p_rate => p_rate
175: l_object_version_number number;
176: --
177: cursor csr_record_details is
178: select business_group_id, account_id
179: from pay_wci_rates
180: where rate_id = p_rate_id;
181:
182: begin
183:
202: --
203: -- Call Before Process User Hook
204: --
205: begin
206: pay_wci_rates_bk2.update_wci_rate_b
207: (p_rate_id => p_rate_id
208: ,p_object_version_number => l_object_version_number
209: ,p_business_group_id => l_business_group_id
210: ,p_account_id => l_account_id
243: --
244: -- Call After Process User Hook
245: --
246: begin
247: pay_wci_rates_bk2.update_wci_rate_a
248: (p_rate_id => p_rate_id
249: ,p_object_version_number => l_object_version_number
250: ,p_business_group_id => l_business_group_id
251: ,p_account_id => l_account_id
322: l_business_group_id number;
323: --
324: cursor csr_business_group_id is
325: select business_group_id
326: from pay_wci_rates
327: where rate_id = p_rate_id;
328:
329: begin
330:
346: --
347: -- Call Before Process User Hook
348: --
349: begin
350: pay_wci_rates_bk3.delete_wci_rate_b
351: (p_rate_id => p_rate_id
352: ,p_object_version_number => p_object_version_number
353: ,p_business_group_id => l_business_group_id
354: );
378: --
379: -- Call After Process User Hook
380: --
381: begin
382: pay_wci_rates_bk3.delete_wci_rate_a
383: (p_rate_id => p_rate_id
384: ,p_object_version_number => p_object_version_number
385: ,p_business_group_id => l_business_group_id
386: );
426: raise;
427:
428: end delete_wci_rate;
429: --
430: end pay_wci_rates_api;