1: Package Body hxc_lkr_shd as
2: /* $Header: hxclockrulesrhi.pkb 120.2 2005/09/23 07:58:43 nissharm noship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' hxc_lkr_shd.'; -- Global package name
9:
10: g_debug boolean := hr_utility.debug_enabled;
11: --
12: -- ----------------------------------------------------------------------------
78: --
79: l_fct_ret := false;
80: Else
81: If (p_locker_type_owner_id
82: = hxc_lkr_shd.g_old_rec.locker_type_owner_id and
83: p_locker_type_requestor_id
84: = hxc_lkr_shd.g_old_rec.locker_type_requestor_id
85: ) Then
86: --
80: Else
81: If (p_locker_type_owner_id
82: = hxc_lkr_shd.g_old_rec.locker_type_owner_id and
83: p_locker_type_requestor_id
84: = hxc_lkr_shd.g_old_rec.locker_type_requestor_id
85: ) Then
86: --
87: -- The g_old_rec is current therefore we must
88: -- set the returning function to true
92: --
93: -- Select the current row into g_old_rec
94: --
95: Open C_Sel1;
96: Fetch C_Sel1 Into hxc_lkr_shd.g_old_rec;
97: If C_Sel1%notfound Then
98: Close C_Sel1;
99: --
100: -- The primary key is invalid therefore we must error
155: ,p_argument_value => p_locker_type_requestor_id
156: );
157: --
158: Open C_Sel1;
159: Fetch C_Sel1 Into hxc_lkr_shd.g_old_rec;
160: If C_Sel1%notfound then
161: Close C_Sel1;
162: --
163: -- The primary key is invalid therefore we must error
210: Return(l_rec);
211: --
212: End convert_args;
213: --
214: end hxc_lkr_shd;