379: -- 115.23 set cache entry at current index location
380: g_cache_ast_rec(l_index):=p_rec;
381: end set_object;
382: --
383: procedure set_object(p_rec in out NOCOPY per_assignment_extra_info%rowtype) is
384: --
385: l_proc varchar2(80) := g_package||'set_object aei';
386: l_index pls_integer;
387: --
1189: end set_ast_object;
1190: --
1191: procedure set_ass_object
1192: (p_assignment_id in number,
1193: p_rec in out nocopy per_assignment_extra_info%rowtype) is
1194: --
1195: l_proc varchar2(80) := g_package||'set_ass_object';
1196: --
1197: cursor c1 is
1195: l_proc varchar2(80) := g_package||'set_ass_object';
1196: --
1197: cursor c1 is
1198: select pei.*
1199: from per_assignment_extra_info pei
1200: where pei.assignment_id = p_assignment_id
1201: and pei.information_type = 'BEN_DERIVED';
1202: --
1203: --l_rec per_assignment_extra_info%rowtype;
1199: from per_assignment_extra_info pei
1200: where pei.assignment_id = p_assignment_id
1201: and pei.information_type = 'BEN_DERIVED';
1202: --
1203: --l_rec per_assignment_extra_info%rowtype;
1204: --115.23 - comment out unneeded record
1205: --
1206: begin
1207: --
2584: --
2585: end get_object;
2586: --
2587: procedure get_object(p_assignment_id in number,
2588: p_rec in out nocopy per_assignment_extra_info%rowtype) is
2589: --
2590: l_proc varchar2(80) := g_package||'get_object aei';
2591: l_index pls_integer;
2592: --l_not_hash_found boolean;
2589: --
2590: l_proc varchar2(80) := g_package||'get_object aei';
2591: l_index pls_integer;
2592: --l_not_hash_found boolean;
2593: --l_rec per_assignment_extra_info%rowtype;
2594: --
2595: begin
2596: --
2597: -- hr_utility.set_location('Entering '||l_proc,10);