20: -----------------------------------------------------------------------------
21: */
22: --
23: g_package varchar2(30) := 'ben_org_object.';
24: g_hash_key number := ben_hash_utility.get_hash_key;
25: g_hash_jump number := ben_hash_utility.get_hash_jump;
26: --
27: -- Set object routines
28: --
21: */
22: --
23: g_package varchar2(30) := 'ben_org_object.';
24: g_hash_key number := ben_hash_utility.get_hash_key;
25: g_hash_jump number := ben_hash_utility.get_hash_jump;
26: --
27: -- Set object routines
28: --
29: procedure set_object(p_rec in out NOCOPY per_business_groups%rowtype) is
42: -- 4) If hash index is used and not correct then try next hash index
43: --
44: -- Get hashed index value
45: --
46: l_index := ben_hash_utility.get_hashed_index(p_id => p_rec.business_group_id);
47: -- 115.2 check for cache entry at current index. if none exists the NO_DATA_FOUND expection will fire
48: if g_cache_bus_rec(l_index).business_group_id = p_rec.business_group_id then
49: -- do nothing, cache entry already exists
50: null;
87: -- 4) If hash index is used and not correct then try next hash index
88: --
89: -- Get hashed index value
90: --
91: l_index := ben_hash_utility.get_hashed_index(p_id => p_rec.organization_id);
92: -- 115.2 check for cache entry at current index. if none exists the NO_DATA_FOUND expection will fire
93: if g_cache_org_rec(l_index).organization_id = p_rec.organization_id then
94: -- do nothing, cache entry already exists
95: null;
132: -- 4) If hash index is used and not correct then try next hash index
133: --
134: -- Get hashed index value
135: --
136: l_index := ben_hash_utility.get_hashed_index(p_id => p_rec.payroll_id);
137: -- 115.2 check for cache entry at current index. if none exists the NO_DATA_FOUND expection will fire
138: if g_cache_pay_rec(l_index).payroll_id = p_rec.payroll_id then
139: -- do nothing, cache entry already exists
140: null;
177: -- 4) If hash index is used and not correct then try next hash index
178: --
179: -- Get hashed index value
180: --
181: l_index := ben_hash_utility.get_hashed_index(p_id => p_rec.benfts_grp_id);
182: -- 115.2 check for cache entry at current index. if none exists the NO_DATA_FOUND expection will fire
183: if g_cache_ben_rec(l_index).benfts_grp_id = p_rec.benfts_grp_id then
184: -- do nothing, cache entry already exists
185: null;
415: -- 4) Repest 3 until correct program found, if not found raise error.
416: --
417: -- Get hashed index value
418: --
419: l_index := ben_hash_utility.get_hashed_index(p_id => p_business_group_id);
420: --
421: if g_cache_bus_rec(l_index).business_group_id = p_business_group_id then
422: --
423: g_cache_last_bus_rec := g_cache_bus_rec(l_index);
483: -- 4) Repest 3 until correct program found, if not found raise error.
484: --
485: -- Get hashed index value
486: --
487: l_index := ben_hash_utility.get_hashed_index(p_id => p_organization_id);
488: --
489: if g_cache_org_rec(l_index).organization_id = p_organization_id then
490: --
491: g_cache_last_org_rec := g_cache_org_rec(l_index);
551: -- 4) Repest 3 until correct program found, if not found raise error.
552: --
553: -- Get hashed index value
554: --
555: l_index := ben_hash_utility.get_hashed_index(p_id => p_payroll_id);
556: --
557: if g_cache_pay_rec(l_index).payroll_id = p_payroll_id then
558: --
559: g_cache_last_pay_rec := g_cache_pay_rec(l_index);
620: -- 4) Repest 3 until correct program found, if not found raise error.
621: --
622: -- Get hashed index value
623: --
624: l_index := ben_hash_utility.get_hashed_index(p_id => p_benfts_grp_id);
625: --
626: if g_cache_ben_rec(l_index).benfts_grp_id = p_benfts_grp_id then
627: --
628: g_cache_last_ben_rec := g_cache_ben_rec(l_index);