DBA Data[Home] [Help]

APPS.BEN_DM_GEN_UPLOAD dependencies on HR_UTILITY

Line 41: hr_utility.set_location('Entering:'||l_proc, 5);

37: l_index number := g_package_body.first;
38: l_proc varchar2(75) ;
39: begin
40: l_proc := g_package || 'init_package_body' ;
41: hr_utility.set_location('Entering:'||l_proc, 5);
42: ben_dm_utility.message('ROUT','entry:'|| l_proc , 5);
43: -- delete all elements from package body pl/sql table.
44: while l_index is not null loop
45: g_package_body.delete(l_index);

Line 56: hr_utility.set_location('Leaving:'||l_proc, 10);

52: g_package_index := 0;
53:
54:
55: ben_dm_utility.message('ROUT','exit:' || l_proc , 25);
56: hr_utility.set_location('Leaving:'||l_proc, 10);
57: exception
58: when others then
59: ben_dm_utility.error(SQLCODE,'hr_dm_gen_tups.init_package_body',
60: '(none)','R');

Line 86: hr_utility.set_location('Entering:'||l_proc, 5);

82: l_proc varchar2(75) ;
83: begin
84:
85: l_proc := g_package||'add_to_package_body' ;
86: hr_utility.set_location('Entering:'||l_proc, 5);
87:
88: ben_dm_utility.message('ROUT','entry:' || l_proc , 5);
89: ben_dm_utility.message('PARA','(p_proc_body_tbl - table of varchar2',10);
90:

Line 122: hr_utility.set_location('Leaving:'||l_proc, 5);

118: ')(l_string_index - ' ||l_string_index ||
119: ')( g_package_index - ' || g_package_index || ')'
120: ,15);
121: ben_dm_utility.message('ROUT','exit:'|| l_proc , 25);
122: hr_utility.set_location('Leaving:'||l_proc, 5);
123: exception
124: when others then
125: ben_dm_utility.error(SQLCODE,l_proc,
126: '(l_loop_cnt - ' || l_loop_cnt ||

Line 181: hr_utility.set_location('Entering : ' || l_proc , 5 ) ;

177: l_proc_index number := 1;
178: l_proc varchar2(75) ;
179: begin
180: l_proc := g_package|| 'generate_upload' ;
181: hr_utility.set_location('Entering : ' || l_proc , 5 ) ;
182: ben_dm_utility.message('ROUT','entry:' || l_proc , 5);
183:
184:
185: l_interface := indent ||

Line 283: hr_utility.set_location('Leaving:'||l_proc, 10);

279:
280: -- add the body of this procedure to the package.
281: add_to_package_body( l_proc_body_tbl );
282: ben_dm_utility.message('ROUT',l_proc, 25);
283: hr_utility.set_location('Leaving:'||l_proc, 10);
284: exception
285: when others then
286: ben_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_upload',
287: '(none)','R');

Line 372: hr_utility.set_location('Entering : ' || l_proc , 5 ) ;

368: l_dummy varchar2(1) ;
369:
370: begin
371: l_proc := g_package || 'generate_insert_dml' ;
372: hr_utility.set_location('Entering : ' || l_proc , 5 ) ;
373: ben_dm_utility.message('ROUT','entry:' || l_proc , 5);
374:
375: -- input parameters for the procedure
376:

Line 377: l_cursor := indent( l_indent) || 'hr_utility.set_location(''Entering : '' || l_proc,5) ; ' || indent(l_indent) ||

373: ben_dm_utility.message('ROUT','entry:' || l_proc , 5);
374:
375: -- input parameters for the procedure
376:
377: l_cursor := indent( l_indent) || 'hr_utility.set_location(''Entering : '' || l_proc,5) ; ' || indent(l_indent) ||
378: ' ben_dm_utility.message(''ROUT'','' Entering '' ||l_proc,5) ; ' || indent(l_indent) ||
379: ' ben_dm_utility.message(''PARA'', '' ( Source BG - '' || p_business_group_id || '')'' , 10) ;'|| indent(l_indent) ||
380: ' ben_dm_utility.message(''PARA'', '' ( Target BG - '' || p_business_group_name || '')'' , 10) ;'|| indent(l_indent)||
381: ' ben_dm_utility.message(''PARA'', '' ( group_order - '' || p_group_order || '')'' , 10) ; '|| indent(l_indent) ;

Line 399: hr_utility.set_location('PK column name : ' || p_table_info.SURROGATE_PK_COLUMN_NAME , 5 ) ;

395: l_cursor := l_cursor || 'Loop ' || indent(l_indent) ;
396: -- Assign the Primary key to the variable
397: -- if the table is date tracked find the key in cache before creating
398:
399: hr_utility.set_location('PK column name : ' || p_table_info.SURROGATE_PK_COLUMN_NAME , 5 ) ;
400: if p_table_info.SURROGATE_PK_COLUMN_NAME is not null then
401: l_indent := 6 ;
402: l_cursor := l_cursor ||indent( l_indent) || '-- Assign the Primary key to the variable ' || indent(l_indent) ;
403: l_cursor := l_cursor || 'if ' || 'l_rslt.' || p_table_info.SURROGATE_PK_COLUMN_NAME||' Is not null '||indent(l_indent);

Line 411: hr_utility.set_location('datetrack : ' || p_table_info.DATETRACK , 5 ) ;

407: l_cursor := l_cursor|| 'l_old_pk_id := l_rslt.'|| p_table_info.SURROGATE_PK_COLUMN_NAME||' ; '||indent(l_indent);
408: --l_indent := 4 ;
409:
410: --- check the pk from cache whne the table is date track
411: hr_utility.set_location('datetrack : ' || p_table_info.DATETRACK , 5 ) ;
412: if p_table_info.DATETRACK = 'Y' or l_h_hierarcy = 'Y' then
413:
414: l_indent := 40 ;
415: l_cursor:= l_cursor||'l_pk_key := ben_dm_data_util.get_cache_target('||indent(l_indent);

Line 427: l_cursor := l_cursor || 'hr_utility.set_location( ''PK OF '||p_table_info.table_name ||' ''|| l_rslt.PM_KEY'||',20) ;'

423: l_cursor:= l_cursor|| '-- if the l_pk_key is value null or same as source then assign the new value '||indent(l_indent);
424: l_indent := 12 ;
425: l_cursor:= l_cursor|| 'if l_pk_key is null or l_pk_key = l_fk_map_id then '||indent(l_indent);
426: l_cursor := l_cursor || 'l_rslt.' || p_table_info.SURROGATE_PK_COLUMN_NAME || ':= l_rslt.PM_KEY ; '|| indent(l_indent);
427: l_cursor := l_cursor || 'hr_utility.set_location( ''PK OF '||p_table_info.table_name ||' ''|| l_rslt.PM_KEY'||',20) ;'
428: || indent(l_indent) ;
429:
430: -- update the prmiary key to mapping table
431: l_cursor := l_cursor || '-- update the primiary key to mapping table ' || indent(l_indent) ;

Line 444: l_cursor:= l_cursor|| indent(l_indent)||'hr_utility.set_location('' PK Already exisit : '' || l_pk_key,10) ;'

440: l_indent:= 9 ;
441: l_cursor:= l_cursor|| indent(l_indent);
442: l_indent:= 12 ;
443: l_cursor:= l_cursor|| 'Else '||indent(l_indent);
444: l_cursor:= l_cursor|| indent(l_indent)||'hr_utility.set_location('' PK Already exisit : '' || l_pk_key,10) ;'
445: ||indent(l_indent);
446: l_cursor:= l_cursor || 'l_rslt.'||p_table_info.SURROGATE_PK_COLUMN_NAME || ':= l_pk_key ; '|| indent(l_indent);
447: l_indent:= 6 ;
448: l_cursor:= l_cursor|| indent(l_indent);

Line 452: l_cursor := l_cursor || 'hr_utility.set_location( ''PK OF '||p_table_info.table_name ||' ''|| l_rslt.PM_KEY' ||',20) ;'

448: l_cursor:= l_cursor|| indent(l_indent);
449: l_cursor:= l_cursor|| 'End if ; -- Primary key for date track table '||indent(l_indent);
450: else
451: l_cursor := l_cursor || 'l_rslt.' || p_table_info.SURROGATE_PK_COLUMN_NAME || ':= l_rslt.PM_KEY ; '|| indent(l_indent);
452: l_cursor := l_cursor || 'hr_utility.set_location( ''PK OF '||p_table_info.table_name ||' ''|| l_rslt.PM_KEY' ||',20) ;'
453: || indent(l_indent) ;
454:
455: -- update the prmiary key to mapping table
456: l_cursor := l_cursor || '-- update the prmiary key to mapping table ' || indent(l_indent) ;

Line 477: hr_utility.set_location('after PK column name : ' || p_table_info.SURROGATE_PK_COLUMN_NAME , 5 ) ;

473:
474:
475:
476: end if ; -- if the surrogate key is not null create pm key
477: hr_utility.set_location('after PK column name : ' || p_table_info.SURROGATE_PK_COLUMN_NAME , 5 ) ;
478:
479: l_proc_body_tbl(l_proc_index) := l_cursor ;
480: l_proc_index := l_proc_index + 1;
481:

Line 485: hr_utility.set_location('before FK column name ' , 5 ) ;

481:
482: l_indent := 4 ;
483:
484: -- Assign the foreign key to the variable
485: hr_utility.set_location('before FK column name ' , 5 ) ;
486:
487: l_cursor := indent( l_indent) || '-- Assign the Foreign key to the variable ' || indent(l_indent) ;
488: -- download the mapping keys
489: for l_pk_rec in c_pk_hier(p_table_info.table_id ) Loop

Line 490: hr_utility.set_location('IN FK column name '||p_table_info.table_id || l_pk_rec.column_name , 5 ) ;

486:
487: l_cursor := indent( l_indent) || '-- Assign the Foreign key to the variable ' || indent(l_indent) ;
488: -- download the mapping keys
489: for l_pk_rec in c_pk_hier(p_table_info.table_id ) Loop
490: hr_utility.set_location('IN FK column name '||p_table_info.table_id || l_pk_rec.column_name , 5 ) ;
491:
492: l_cursor := l_cursor||indent(l_indent) || '--' || 'Get the Key for '||l_pk_rec.parent_table_name ||'.'||
493: l_pk_rec.parent_column_name || indent(l_indent) ;
494: l_cursor := l_cursor|| 'If l_rslt.'||l_pk_rec.column_name||' IS NOT NULL THEN '||indent(l_indent+3);

Line 507: hr_utility.set_location(' hierarchy_type e '|| l_hierarchy_type , 5 ) ;

503: l_hierarchy_type,
504: l_parent_table_name ,
505: l_parent_id_column_name ;
506: close hier_type ;
507: hr_utility.set_location(' hierarchy_type e '|| l_hierarchy_type , 5 ) ;
508: if l_hierarchy_type is not null then
509: if l_hierarchy_type = 'S' then
510: l_cursor:=l_cursor||'l_rslt.'||l_pk_rec.column_name||':= ben_dm_data_util.get_mapping_target('||indent(l_indent+40);
511: else

Line 523: l_cursor := l_cursor|| 'hr_utility.set_location(''FK OF '||l_pk_rec.column_name||'''||l_rslt.'||l_pk_rec.column_name

519: l_cursor := l_cursor|| indent(l_indent +3) ;
520: l_cursor := l_cursor|| '-- if the source value is not null and target value is null ' || indent(l_indent +3) ;
521: l_cursor := l_cursor|| '-- assign back the source value ' || indent(l_indent +3) ;
522: l_cursor := l_cursor|| '-- if the column is pig year then get new id from seq and store in cache ' || indent(l_indent +3) ;
523: l_cursor := l_cursor|| 'hr_utility.set_location(''FK OF '||l_pk_rec.column_name||'''||l_rslt.'||l_pk_rec.column_name
524: ||',20) ; ' || indent(l_indent +3) ;
525: l_cursor := l_cursor|| 'if l_fk_map_id is not null and ( l_rslt.'||l_pk_rec.column_name||
526: ' = l_fk_map_id or l_rslt.'||l_pk_rec.column_name||' is null ) then ' ||indent(l_indent+6);
527: -- handle the hieracy H - Pig year

Line 552: hr_utility.set_location('after FK column name '|| l_pk_rec.column_name , 5 ) ;

548: l_cursor := l_cursor|| 'l_rslt.'||l_pk_rec.column_name|| ' := l_fk_map_id ; ' || indent(l_indent+3);
549: end if ;
550: l_cursor := l_cursor|| 'End if ;' || indent(l_indent);
551: end if ;
552: hr_utility.set_location('after FK column name '|| l_pk_rec.column_name , 5 ) ;
553: l_cursor := l_cursor|| 'End If ; '||indent(l_indent) ;
554:
555: --- whne the cariable length grows beyond
556: if length(l_cursor) > 30000 then

Line 557: hr_utility.set_location('length of cursor '|| length(l_cursor) , 5 ) ;

553: l_cursor := l_cursor|| 'End If ; '||indent(l_indent) ;
554:
555: --- whne the cariable length grows beyond
556: if length(l_cursor) > 30000 then
557: hr_utility.set_location('length of cursor '|| length(l_cursor) , 5 ) ;
558: l_proc_body_tbl(l_proc_index) := l_cursor ;
559: l_proc_index := l_proc_index + 1;
560: l_cursor := ' ' ;
561:

Line 587: hr_utility.set_location('special handing BEN_LE_CLSN_N_RSTR ' , 99 ) ;

583:
584: ---special treatment for BEN_LE_CLSN_N_RSTR to fix the PK
585: l_cursor := indent(l_indent) ;
586: if p_table_info.table_name = 'BEN_LE_CLSN_N_RSTR' then
587: hr_utility.set_location('special handing BEN_LE_CLSN_N_RSTR ' , 99 ) ;
588: l_cursor := l_cursor|| 'l_table_name := l_rslt.BKUP_TBL_TYP_CD ; '||indent(l_indent);
589: l_cursor := l_cursor|| 'if substr(l_table_name,-8) = ''_CORRECT'' then '||indent(l_indent+3);
590: l_cursor := l_cursor|| 'l_table_name := rtrim(l_table_name, ''_CORRECT'') ; '||indent(l_indent);
591: l_cursor := l_cursor|| 'End if ; '||indent(l_indent);

Line 596: l_cursor := l_cursor|| 'hr_utility.set_location(''table name '' || l_table_name , 90); '||indent(l_indent) ;

592:
593: l_cursor := l_cursor|| 'if substr(l_table_name,-5) = ''_CORR'' then '||indent(l_indent+3);
594: l_cursor := l_cursor|| 'l_table_name := rtrim(l_table_name, ''_CORR'') ; '||indent(l_indent);
595: l_cursor := l_cursor|| 'End if ; '||indent(l_indent) || indent(l_indent) ;
596: l_cursor := l_cursor|| 'hr_utility.set_location(''table name '' || l_table_name , 90); '||indent(l_indent) ;
597:
598: l_cursor := l_cursor|| 'l_pk_column_name := null ; ' || indent(l_indent) ;
599: l_cursor := l_cursor|| 'open c_pk_column (l_table_name) ; ' || indent(l_indent) ;
600: l_cursor := l_cursor|| 'fetch c_pk_column into l_pk_column_name ; ' || indent(l_indent) ;

Line 602: l_cursor := l_cursor|| 'hr_utility.set_location(''PK name '' || l_pk_column_name , 90); ' || indent(l_indent) ;

598: l_cursor := l_cursor|| 'l_pk_column_name := null ; ' || indent(l_indent) ;
599: l_cursor := l_cursor|| 'open c_pk_column (l_table_name) ; ' || indent(l_indent) ;
600: l_cursor := l_cursor|| 'fetch c_pk_column into l_pk_column_name ; ' || indent(l_indent) ;
601: l_cursor := l_cursor|| 'close c_pk_column ; ' || indent(l_indent) ;
602: l_cursor := l_cursor|| 'hr_utility.set_location(''PK name '' || l_pk_column_name , 90); ' || indent(l_indent) ;
603: l_cursor := l_cursor|| 'hr_utility.set_location(''old value '' || l_rslt.BKUP_TBL_ID , 90);' || indent(l_indent) ;
604: l_cursor := l_cursor|| 'if l_pk_column_name is not null then ' || indent(l_indent+3) ;
605: l_cursor := l_cursor|| 'l_fk_map_id := l_rslt.BKUP_TBL_ID ; '||indent(l_indent+3);
606: l_cursor := l_cursor|| 'l_rslt.BKUP_TBL_ID '||':= ben_dm_data_util.get_cache_target('||indent(l_indent+40);

Line 603: l_cursor := l_cursor|| 'hr_utility.set_location(''old value '' || l_rslt.BKUP_TBL_ID , 90);' || indent(l_indent) ;

599: l_cursor := l_cursor|| 'open c_pk_column (l_table_name) ; ' || indent(l_indent) ;
600: l_cursor := l_cursor|| 'fetch c_pk_column into l_pk_column_name ; ' || indent(l_indent) ;
601: l_cursor := l_cursor|| 'close c_pk_column ; ' || indent(l_indent) ;
602: l_cursor := l_cursor|| 'hr_utility.set_location(''PK name '' || l_pk_column_name , 90); ' || indent(l_indent) ;
603: l_cursor := l_cursor|| 'hr_utility.set_location(''old value '' || l_rslt.BKUP_TBL_ID , 90);' || indent(l_indent) ;
604: l_cursor := l_cursor|| 'if l_pk_column_name is not null then ' || indent(l_indent+3) ;
605: l_cursor := l_cursor|| 'l_fk_map_id := l_rslt.BKUP_TBL_ID ; '||indent(l_indent+3);
606: l_cursor := l_cursor|| 'l_rslt.BKUP_TBL_ID '||':= ben_dm_data_util.get_cache_target('||indent(l_indent+40);
607: l_cursor := l_cursor|| ' p_table_name => l_table_name '||indent(l_indent+40) ;

Line 612: l_cursor := l_cursor|| 'hr_utility.set_location(''new value '' || l_rslt.BKUP_TBL_ID , 90); ' || indent(l_indent) ;

608: l_cursor := l_cursor|| ',p_source_id => l_rslt.BKUP_TBL_ID '||indent(l_indent+40);
609: l_cursor := l_cursor|| ',p_source_column => l_pk_column_name ' || indent(l_indent+40);
610: l_cursor := l_cursor|| ',p_business_group_name => p_business_group_name ' || indent(l_indent+40);
611: l_cursor := l_cursor|| ');' || indent(l_indent) ;
612: l_cursor := l_cursor|| 'hr_utility.set_location(''new value '' || l_rslt.BKUP_TBL_ID , 90); ' || indent(l_indent) ;
613: l_cursor := l_cursor|| indent(l_indent +3) ;
614: l_cursor := l_cursor|| '-- if the source value is not null and target value is null ' || indent(l_indent +3) ;
615: l_cursor := l_cursor|| '-- assign back the source value ' || indent(l_indent +3) ;
616: l_cursor := l_cursor|| 'hr_utility.set_location(''FK OF BKUP_TBL_ID ''||l_rslt.BKUP_TBL_ID '||',20);'||indent(l_indent +3) ;

Line 616: l_cursor := l_cursor|| 'hr_utility.set_location(''FK OF BKUP_TBL_ID ''||l_rslt.BKUP_TBL_ID '||',20);'||indent(l_indent +3) ;

612: l_cursor := l_cursor|| 'hr_utility.set_location(''new value '' || l_rslt.BKUP_TBL_ID , 90); ' || indent(l_indent) ;
613: l_cursor := l_cursor|| indent(l_indent +3) ;
614: l_cursor := l_cursor|| '-- if the source value is not null and target value is null ' || indent(l_indent +3) ;
615: l_cursor := l_cursor|| '-- assign back the source value ' || indent(l_indent +3) ;
616: l_cursor := l_cursor|| 'hr_utility.set_location(''FK OF BKUP_TBL_ID ''||l_rslt.BKUP_TBL_ID '||',20);'||indent(l_indent +3) ;
617: l_cursor := l_cursor|| 'if l_fk_map_id is not null and l_rslt.BKUP_TBL_ID is null then'||indent(l_indent+6);
618: l_cursor := l_cursor|| 'l_rslt.BKUP_TBL_ID := l_fk_map_id ; ' || indent(l_indent+3);
619: l_cursor := l_cursor|| 'End if ;' || indent(l_indent);
620: l_cursor := l_cursor || 'End if ; ---Spl handling ' || indent(l_indent) ;

Line 621: hr_utility.set_location('EOF BEN_LE_CLSN_N_RSTR ' , 99 ) ;

617: l_cursor := l_cursor|| 'if l_fk_map_id is not null and l_rslt.BKUP_TBL_ID is null then'||indent(l_indent+6);
618: l_cursor := l_cursor|| 'l_rslt.BKUP_TBL_ID := l_fk_map_id ; ' || indent(l_indent+3);
619: l_cursor := l_cursor|| 'End if ;' || indent(l_indent);
620: l_cursor := l_cursor || 'End if ; ---Spl handling ' || indent(l_indent) ;
621: hr_utility.set_location('EOF BEN_LE_CLSN_N_RSTR ' , 99 ) ;
622: elsif p_table_info.table_name = 'BEN_ELIG_PER_ELCTBL_CHC' then
623: --
624: hr_utility.set_location('special handing BEN_ELIG_PER_ELCTBL_CHC ' , 99 ) ;
625: l_cursor := l_cursor|| 'declare '||indent(l_indent+3);

Line 624: hr_utility.set_location('special handing BEN_ELIG_PER_ELCTBL_CHC ' , 99 ) ;

620: l_cursor := l_cursor || 'End if ; ---Spl handling ' || indent(l_indent) ;
621: hr_utility.set_location('EOF BEN_LE_CLSN_N_RSTR ' , 99 ) ;
622: elsif p_table_info.table_name = 'BEN_ELIG_PER_ELCTBL_CHC' then
623: --
624: hr_utility.set_location('special handing BEN_ELIG_PER_ELCTBL_CHC ' , 99 ) ;
625: l_cursor := l_cursor|| 'declare '||indent(l_indent+3);
626:
627: l_cursor := l_cursor|| 'l_prev_rslt_id_at number := 0 ;'||indent(l_indent+3);
628: l_cursor := l_cursor|| 'l_prev_prtt_enrt_rslt_id number ;' ||indent(l_indent+3);

Line 651: l_cursor := l_cursor|| 'hr_utility.set_location(''FK OF PRTT_ENRT_RSLT_ID''||l_curr_prtt_enrt_rslt_id,20) ; '||indent(l_indent+7);

647: l_cursor := l_cursor|| ',p_source_id => l_fk_map_id '||indent(l_indent+12);
648: l_cursor := l_cursor|| ',p_source_column => ''PRTT_ENRT_RSLT_ID'' '||indent(l_indent+12);
649: l_cursor := l_cursor|| ',p_business_group_name => p_business_group_name '||indent(l_indent+12);
650: l_cursor := l_cursor|| '); '||indent(l_indent+9);
651: l_cursor := l_cursor|| 'hr_utility.set_location(''FK OF PRTT_ENRT_RSLT_ID''||l_curr_prtt_enrt_rslt_id,20) ; '||indent(l_indent+7);
652: l_cursor := l_cursor|| 'End If ; '||indent(l_indent+7);
653: l_cursor := l_cursor|| 'Exception '||indent(l_indent+5);
654: l_cursor := l_cursor|| 'when value_error then '||indent(l_indent+7);
655: l_cursor := l_cursor|| 'l_prev_prtt_enrt_rslt_id := null; '||indent(l_indent+5);

Line 664: hr_utility.set_location('EOF special handing BEN_ELIG_PER_ELCTBL_CHC ' , 99 ) ;

660: l_cursor := l_cursor|| 'l_rslt.cryfwd_elig_dpnt_cd := l_cryfwd_elig_dpnt_cd||''^''||l_curr_prtt_enrt_rslt_id ;'||indent(l_indent+5);
661: l_cursor := l_cursor|| 'END IF; '||indent(l_indent+3);
662: l_cursor := l_cursor|| ' end if ; '||indent(l_indent);
663: l_cursor := l_cursor|| ' end; '||indent(l_indent);
664: hr_utility.set_location('EOF special handing BEN_ELIG_PER_ELCTBL_CHC ' , 99 ) ;
665: --
666: end if ;
667:
668:

Line 691: l_proc_body_tbl(l_proc_index) := indent( l_indent)|| 'hr_utility.set_location(''Leaving : '' || l_proc,5) ; ' ||

687: || 'End Loop ; -- for geting record informations ' || indent(l_indent-2) ;
688:
689: l_proc_index := l_proc_index + 1;
690:
691: l_proc_body_tbl(l_proc_index) := indent( l_indent)|| 'hr_utility.set_location(''Leaving : '' || l_proc,5) ; ' ||
692: indent(l_indent) || ' ben_dm_utility.message(''ROUT'','' Exit '' ||l_proc,5) ; ' ;
693: l_proc_index := l_proc_index + 1;
694:
695: add_to_package_body( l_proc_body_tbl );

Line 698: hr_utility.set_location('Leaving '|| l_proc , 5 ) ;

694:
695: add_to_package_body( l_proc_body_tbl );
696:
697: ben_dm_utility.message('ROUT','exit:'|| l_proc , 25);
698: hr_utility.set_location('Leaving '|| l_proc , 5 ) ;
699: exception
700: when others then
701: ben_dm_utility.error(SQLCODE,l_proc , '(none)','R');
702: raise;

Line 754: hr_utility.set_location('Entering:'||l_proc, 5);

750: l_proc varchar2(75) ;
751: begin
752:
753: l_proc := g_package||'main' ;
754: hr_utility.set_location('Entering:'||l_proc, 5);
755: ben_dm_utility.message('ROUT','entry:'||l_proc , 5);
756:
757:
758:

Line 879: hr_utility.set_location( 'calling run_sql for header ' , 99 ) ;

875: --
876: -- Compile the header and body.
877: --
878:
879: hr_utility.set_location( 'calling run_sql for header ' , 99 ) ;
880:
881: hr_dm_library.run_sql( l_header );
882:
883: g_package_index := g_package_index+1;

Line 892: hr_utility.set_location( 'calling run_sql for body ' , 99 ) ;

888: indent(6)|| ' Raise ; ' || indent(2) ||
889: 'End upload ;' || indent || 'end ' ||
890: l_package_name || ';';
891:
892: hr_utility.set_location( 'calling run_sql for body ' , 99 ) ;
893: hr_dm_library.run_sql( g_package_body,
894: g_package_index);
895:
896: -- check the status of the package

Line 903: hr_utility.set_location('Error :'||l_tbl_rec.table_name, 10);

899: p_object_type => 'PACKAGE BODY' );
900: exception
901: when others then
902:
903: hr_utility.set_location('Error :'||l_tbl_rec.table_name, 10);
904: ben_dm_utility.error(SQLCODE,'Error in compiling TUPS for ' ||
905: l_tbl_rec.table_name ,'(none)','R');
906: raise;
907: end;

Line 909: hr_utility.set_location( 'Uplaod complteed '|| l_tbl_rec.table_name , 99 ) ;

905: l_tbl_rec.table_name ,'(none)','R');
906: raise;
907: end;
908:
909: hr_utility.set_location( 'Uplaod complteed '|| l_tbl_rec.table_name , 99 ) ;
910: -- update the generated version number
911: -- ben_dm_data_util.update_gen_version (p_table_id => l_tbl_rec.table_id
912: -- ,p_version => l_generator_version
913: -- ) ;

Line 917: hr_utility.set_location('Leaving:'||l_proc, 10);

913: -- ) ;
914: --
915:
916: ben_dm_utility.message('ROUT','exit:'|| l_proc , 25);
917: hr_utility.set_location('Leaving:'||l_proc, 10);
918:
919: exception
920: when others then
921: ben_dm_utility.error(SQLCODE,l_proc, '(none)','R');