[Home] [Help]
7: -- ----------------------------------------------------------------------------
8: --
9: g_package varchar2(33) := ' ben_extract.'; -- Global package name
10: --
11: g_debug boolean := hr_utility.debug_enabled;
12: --
13: Procedure setup_rcd_typ_lvl (
14: p_ext_file_id in number
15: )
85:
86: --
87: Begin
88: --
89: g_debug := hr_utility.debug_enabled;
90: if g_debug then
91: l_proc := g_package||'setup_rcd_typ_lvl';
92: hr_utility.set_location('Entering:'||l_proc, 5);
93: end if;
88: --
89: g_debug := hr_utility.debug_enabled;
90: if g_debug then
91: l_proc := g_package||'setup_rcd_typ_lvl';
92: hr_utility.set_location('Entering:'||l_proc, 5);
93: end if;
94: --
95: /*
96: nw variable created with seq number
168: gtt_rcd_typ_vals(1).low_lvl_cd := 'NOREQTYP';
169: END IF;
170: --
171: if g_debug then
172: hr_utility.set_location('Exiting:'||l_proc, 15);
173: end if;
174: --
175: End setup_rcd_typ_lvl;
176:
268: l_err_message fnd_new_messages.message_text%type ;
269: --
270: BEGIN
271: --
272: g_debug := hr_utility.debug_enabled;
273: if g_debug then
274: l_proc := g_package||'xtrct_skltn';
275: hr_utility.set_location('Entering:'||l_proc, 5);
276: end if;
271: --
272: g_debug := hr_utility.debug_enabled;
273: if g_debug then
274: l_proc := g_package||'xtrct_skltn';
275: hr_utility.set_location('Entering:'||l_proc, 5);
276: end if;
277: --
278: -- This next condition was added for performance enhancements. The
279: -- encompassed routines should only be called once per thread, not once
306: fetch c_ext_dfn into g_spcl_hndl_flag,
307: ben_ext_person.g_upd_cm_sent_dt_flag ,
308: ben_ext_person.g_ext_global_flag ;
309: close c_ext_dfn;
310: hr_utility.set_location( 'GLOBAL Flag ' || ben_ext_person.g_ext_global_flag , 99 ) ;
311: /*
312: --
313: -- MH moved call to thread level (ben_ext_thread.do_multithread)
314: -- rather than chunk level to minimize
393: for vaen in l_personid_va.first..l_personid_va.last
394: loop
395: --
396: if g_debug then
397: hr_utility.set_location(' Person ID '||l_personid_va(vaen), 00 );
398: end if;
399: Begin
400: --
401: ben_ext_person.process_ext_person
436:
437: l_err_message := ben_ext_fmt.get_error_msg(ben_Ext_person.g_err_num,
438: ben_Ext_person.g_err_name,ben_Ext_person.g_elmt_name ) ;
439: if g_debug then
440: hr_utility.set_location('err msg ' || l_err_message, 99.98 );
441: end if;
442: ben_ext_person.write_error(
443: p_err_num => ben_Ext_person.g_err_num,
444: p_err_name => l_err_message,
459: where range_id = p_range_id and range_status_cd = 'P';
460: if nvl(ben_ext_person.g_err_num,-1) <> 94102 then
461: l_err_message := substr(sqlerrm,1,2000) ;
462: if g_debug then
463: hr_utility.set_location('err msg ' || l_err_message, 99.98 );
464: end if;
465: ben_ext_person.write_error(
466: p_err_num => 94701,
467: p_err_name => l_err_message,
483: --
484: --
485: --
486: if g_debug then
487: hr_utility.set_location(' Person ID ' || person.person_id, 00 );
488: end if;
489: ben_ext_person.process_ext_person
490: ( p_person_id => person.person_id
491: , p_ext_dfn_id => p_ext_dfn_id
509: */
510: --
511: --
512: if g_debug then
513: hr_utility.set_location('Exiting'||l_proc, 70);
514: end if;
515: --
516: commit;
517: --
673:
674: --
675: begin
676: --
677: g_debug := hr_utility.debug_enabled;
678: if g_debug then
679: l_proc := g_package||'set_ext_lvls';
680: hr_utility.set_location('Entering'||l_proc, 5);
681: end if;
676: --
677: g_debug := hr_utility.debug_enabled;
678: if g_debug then
679: l_proc := g_package||'set_ext_lvls';
680: hr_utility.set_location('Entering'||l_proc, 5);
681: end if;
682: --
683: -- determine extract record levels:
684: -- ==============================================================
805: end if ;
806: -- eof subheader
807:
808: if g_debug then
809: hr_utility.set_location('Exiting'||l_proc, 15);
810: end if;
811: --
812: End set_ext_lvls;
813: --