[Home] [Help]
1: Package Body pay_puc_bus as
2: /* $Header: pypucrhi.pkb 115.1 2003/10/29 21:15 tvankayl noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' pay_puc_bus.'; -- Global package name
9: --
10: -- The following two global variables are only to be
11: -- used by the return_legislation_code function.
12: --
116: ,p_argument => 'user_column_id'
117: ,p_argument_value => p_user_column_id
118: );
119: --
120: if ( nvl(pay_puc_bus.g_user_column_id, hr_api.g_number)
121: = p_user_column_id) then
122: --
123: -- The legislation code has already been found with a previous
124: -- call to this function. Just return the value in the global
123: -- The legislation code has already been found with a previous
124: -- call to this function. Just return the value in the global
125: -- variable.
126: --
127: l_legislation_code := pay_puc_bus.g_legislation_code;
128: hr_utility.set_location(l_proc, 20);
129: else
130: --
131: -- The ID is different to the last call to this function
147: -- Set the global variables so the values are
148: -- available for the next call to this function.
149: --
150: close csr_leg_code;
151: pay_puc_bus.g_user_column_id := p_user_column_id;
152: pay_puc_bus.g_legislation_code := l_legislation_code;
153: end if;
154: hr_utility.set_location(' Leaving:'|| l_proc, 40);
155: return l_legislation_code;
148: -- available for the next call to this function.
149: --
150: close csr_leg_code;
151: pay_puc_bus.g_user_column_id := p_user_column_id;
152: pay_puc_bus.g_legislation_code := l_legislation_code;
153: end if;
154: hr_utility.set_location(' Leaving:'|| l_proc, 40);
155: return l_legislation_code;
156: end return_legislation_code;
431: -- |-------------------------< set_formula_type_id >--------------------------|
432: -- ----------------------------------------------------------------------------
433: procedure set_formula_type_id is
434: begin
435: if pay_puc_bus.g_formula_type_id is null then
436: select fft.formula_type_id
437: into pay_puc_bus.g_formula_type_id
438: from ff_formula_types fft
439: where formula_type_name = pay_puc_bus.g_formula_type_name
433: procedure set_formula_type_id is
434: begin
435: if pay_puc_bus.g_formula_type_id is null then
436: select fft.formula_type_id
437: into pay_puc_bus.g_formula_type_id
438: from ff_formula_types fft
439: where formula_type_name = pay_puc_bus.g_formula_type_name
440: ;
441: end if;
435: if pay_puc_bus.g_formula_type_id is null then
436: select fft.formula_type_id
437: into pay_puc_bus.g_formula_type_id
438: from ff_formula_types fft
439: where formula_type_name = pay_puc_bus.g_formula_type_name
440: ;
441: end if;
442: end set_formula_type_id;
443: --
456: select ff.business_group_id
457: , ff.legislation_code
458: from ff_formulas_f ff
459: where ff.formula_id = p_formula_id
460: and ff.formula_type_id = pay_puc_bus.g_formula_type_id
461: ;
462: --
463: l_updating boolean;
464: l_ftypeid number;
497: if csr_formula_exists%notfound then
498: close csr_formula_exists;
499: --
500: fnd_message.set_name('PAY', 'PAY_33176_UCOL_FF_NOT_FOUND');
501: fnd_message.set_token('FORMULA_TYPE', pay_puc_bus.g_formula_type_name);
502: fnd_message.raise_error;
503: end if;
504: close csr_formula_exists;
505: --
801: chk_delete(p_user_column_id => p_rec.user_column_id);
802: hr_utility.set_location(' Leaving:'||l_proc, 10);
803: End delete_validate;
804: --
805: end pay_puc_bus;