DBA Data[Home] [Help]

APPS.HR_DM_GEN_TUPS dependencies on HR_DM_GEN_TUPS

Line 1: package body hr_dm_gen_tups as

1: package body hr_dm_gen_tups as
2: /* $Header: perdmgnu.pkb 120.1 2005/08/14 23:22:37 mmudigon noship $ */
3:
4:
5: type t_varchar2_32k_tbl is table of varchar2(32767) index by binary_integer;

Line 85: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.indent',

81: p_newline => p_newline);
82: return l_spaces;
83: exception
84: when others then
85: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.indent',
86: '(p_indent_spaces - ' || p_indent_spaces ||
87: ')(p_newline - ' || p_newline || ')',
88: 'R');
89: end indent;

Line 120: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.init_package_body', 5);

116: -------------------------------------------------------------------------------
117: procedure init_package_body is
118: l_index number := g_package_body.first;
119: begin
120: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.init_package_body', 5);
121: -- delete all elements from package body pl/sql table.
122: while l_index is not null loop
123: g_package_body.delete(l_index);
124: l_index := g_package_body.next(l_index);

Line 143: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.init_package_body',

139: g_chk_row_exists.where_clause := null;
140: g_chk_row_exists.call_to_proc := null;
141: g_chk_row_exists.proc_parameters := null;
142:
143: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.init_package_body',
144: 25);
145: exception
146: when others then
147: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.init_package_body',

Line 147: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.init_package_body',

143: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.init_package_body',
144: 25);
145: exception
146: when others then
147: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.init_package_body',
148: '(none)','R');
149: raise;
150: end init_package_body;
151:

Line 172: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.add_to_package_body-1', 5);

168: l_string_index number; -- variable to read the string characters
169: l_loop_cnt number;
170: begin
171:
172: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.add_to_package_body-1', 5);
173: hr_dm_utility.message('PARA','(p_proc_body_tbl - table of varchar2',10);
174:
175: while l_proc_index is not null loop
176:

Line 205: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.add_to_package_body -1',

201: '(l_loop_cnt - ' || l_loop_cnt ||
202: ')(l_string_index - ' ||l_string_index ||
203: ')( g_package_index - ' || g_package_index || ')'
204: ,15);
205: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.add_to_package_body -1',
206: 25);
207: exception
208: when others then
209: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.add_to_package_body-1',

Line 209: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.add_to_package_body-1',

205: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.add_to_package_body -1',
206: 25);
207: exception
208: when others then
209: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.add_to_package_body-1',
210: '(l_loop_cnt - ' || l_loop_cnt ||
211: ')(l_string_index - ' ||l_string_index ||
212: ')( g_package_index - ' || g_package_index || ')'
213: ,'R');

Line 307: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.format_comment',

303: end if;
304: return l_comment_text;
305: exception
306: when others then
307: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.format_comment',
308: '(p_ins_blank_lines - ' || p_ins_blank_lines ||
309: ')(p_indent_spaces - ' || p_indent_spaces ||
310: ')(p_comment_text - ' || p_comment_text || ')'
311: ,'R');

Line 362: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.prepare_code_for_resolving_pk ', 5);

358: l_index2 number;
359: l_duplicate number;
360:
361: begin
362: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.prepare_code_for_resolving_pk ', 5);
363:
364:
365: while l_index is not null loop
366: l_column_name :=

Line 406: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_code_for_resolving_pk',

402: p_table_info.upload_table_name || '.' || l_column_name ||'%type;';
403: end if;
404: l_index := g_pk_columns_tbl.next(l_index);
405: end loop;
406: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_code_for_resolving_pk',
407: 25);
408: exception
409: when others then
410: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_code_for_resolving_pk',

Line 410: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_code_for_resolving_pk',

406: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_code_for_resolving_pk',
407: 25);
408: exception
409: when others then
410: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_code_for_resolving_pk',
411: '(none)','R');
412: raise;
413: end prepare_code_for_resolving_pk;
414: ------- prepare_code_for_resolving_pk(Overloaded)-----------------------

Line 468: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.prepare_code_for_resolving_pk ', 5);

464: l_index2 number;
465: l_duplicate number;
466:
467: begin
468: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.prepare_code_for_resolving_pk ', 5);
469:
470:
471: while l_index is not null loop
472: l_column_name :=

Line 522: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_code_for_resolving_pk',

518: p_table_info.upload_table_name || '.' || l_column_name ||'%type;';
519: end if;
520: l_index := g_resolve_pk_columns_tbl.next(l_index);
521: end loop;
522: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_code_for_resolving_pk',
523: 25);
524: exception
525: when others then
526: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_code_for_resolving_pk',

Line 526: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_code_for_resolving_pk',

522: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_code_for_resolving_pk',
523: 25);
524: exception
525: when others then
526: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_code_for_resolving_pk',
527: '(none)','R');
528: raise;
529: end prepare_code_for_resolving_pk;
530: ------- generate_get_id_frm_dev_key -----------------------

Line 592: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.generate_get_id_frm_dev_key ', 5);

588:
589: l_indent number;
590: l_index number := p_fk_to_aol_columns_tbl.first;
591: begin
592: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.generate_get_id_frm_dev_key ', 5);
593:
594: while l_index is not null loop
595:
596: l_column_name :=

Line 699: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_get_id_frm_dev_key',

695: || 'l_' || rpad(l_column_name,28) || ' ' ||
696: p_table_info.upload_table_name || '.' || l_column_name ||'%type;';
697: l_index := p_fk_to_aol_columns_tbl.next(l_index);
698: end loop;
699: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_get_id_frm_dev_key',
700: 25);
701: exception
702: when others then
703: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_get_id_frm_dev_key',

Line 703: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_get_id_frm_dev_key',

699: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_get_id_frm_dev_key',
700: 25);
701: exception
702: when others then
703: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_get_id_frm_dev_key',
704: '(none)','R');
705: raise;
706: end generate_get_id_frm_dev_key;
707: --

Line 725: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.prepare_glob_var_def_for_dt ', 5);

721: ) is
722: l_list_index number;
723: l_count number;
724: begin
725: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.prepare_glob_var_def_for_dt ', 5);
726:
727: -- initialise the variables
728: l_list_index := g_pk_columns_tbl.first;
729: l_count := 1;

Line 746: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_glob_var_def_for_dt',

742:
743: l_list_index := g_pk_columns_tbl.next(l_list_index);
744: l_count := l_count + 1;
745: end loop;
746: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_glob_var_def_for_dt',
747: 25);
748: exception
749: when others then
750: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_glob_var_def_for_dt',

Line 750: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_glob_var_def_for_dt',

746: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_glob_var_def_for_dt',
747: 25);
748: exception
749: when others then
750: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_glob_var_def_for_dt',
751: '(none)','R');
752: raise;
753: end prepare_glob_var_def_for_dt;
754:

Line 772: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.prepare_ins_dt_delete_stmt ', 5);

768: )
769: is
770: l_table_name varchar2(30) := upper(p_table_info.upload_table_name);
771: begin
772: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.prepare_ins_dt_delete_stmt ', 5);
773:
774: if p_table_info.surrogate_primary_key = 'Y' then
775: p_proc_body := p_proc_body ||
776: 'hr_dm_library.ins_dt_delete (p_id => ' || 'p_' ||

Line 815: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_ins_dt_delete_stmt',

811: end if;
812:
813: p_proc_body := p_proc_body || ');';
814: end if;
815: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_ins_dt_delete_stmt',
816: 25);
817: exception
818: when others then
819: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_ins_dt_delete_stmt',

Line 819: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_ins_dt_delete_stmt',

815: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_ins_dt_delete_stmt',
816: 25);
817: exception
818: when others then
819: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_ins_dt_delete_stmt',
820: '(none)','R');
821: raise;
822: end prepare_ins_dt_delete_stmt;
823: --

Line 846: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.prepare_chk_dt_delete_stmt ', 5);

842: is
843: l_proc_name varchar2(30) ;
844: l_table_name varchar2(30) := upper(p_table_info.upload_table_name);
845: begin
846: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.prepare_chk_dt_delete_stmt ', 5);
847:
848: if p_table_info.surrogate_primary_key = 'Y' then
849: p_proc_body := p_proc_body ||
850: 'hr_dm_library.chk_row_in_dt_delete (p_id => p_' ||

Line 895: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_chk_dt_delete_stmt',

891: end if;
892:
893: p_proc_body := p_proc_body || ');';
894: end if;
895: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_chk_dt_delete_stmt',
896: 25);
897: exception
898: when others then
899: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_chk_dt_delete_stmt',

Line 899: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_chk_dt_delete_stmt',

895: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_chk_dt_delete_stmt',
896: 25);
897: exception
898: when others then
899: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_chk_dt_delete_stmt',
900: '(none)','R');
901: raise;
902: end prepare_chk_dt_delete_stmt;
903: --

Line 927: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.prepare_dt_upload_body', 5);

923: l_migrate_data boolean := true;
924: l_indent number;
925:
926: begin
927: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.prepare_dt_upload_body', 5);
928:
929: l_indent := 2;
930:
931: -- add in SR migration code

Line 1249: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_dt_upload_body',

1245: 'end if;';
1246: end if;
1247:
1248: p_proc_body := p_proc_body || l_proc_body;
1249: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_dt_upload_body',
1250: 25);
1251: exception
1252: when others then
1253: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_dt_upload_body',

Line 1253: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_dt_upload_body',

1249: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_dt_upload_body',
1250: 25);
1251: exception
1252: when others then
1253: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_dt_upload_body',
1254: '(none)','R');
1255: raise;
1256: end prepare_dt_upload_body;
1257: -- ----------------------- prepare_non_dt_upload_body ----------------------

Line 1281: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.prepare_non_dt_upload_body ', 5);

1277: -- after which the staement should start.
1278:
1279: l_indent number;
1280: begin
1281: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.prepare_non_dt_upload_body ', 5);
1282:
1283: l_indent := 2;
1284:
1285: -- add in SR migration code

Line 1423: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_non_dt_upload_body',

1419: indent(l_indent + 2) || 'l_insert := TRUE;' || indent(l_indent) ||
1420: 'end if;';
1421: end if;
1422: p_proc_body := p_proc_body || l_proc_body;
1423: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_non_dt_upload_body',
1424: 25);
1425: exception
1426: when others then
1427: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_non_dt_upload_body',

Line 1427: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_non_dt_upload_body',

1423: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_non_dt_upload_body',
1424: 25);
1425: exception
1426: when others then
1427: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_non_dt_upload_body',
1428: '(none)','R');
1429: raise;
1430: end prepare_non_dt_upload_body;
1431: -- ----------------------- generate_upload --------------------------------

Line 1466: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.generate_upload', 5);

1462: l_parameters_tbl hr_dm_library.t_varchar2_tbl;
1463: l_proc_body_tbl t_varchar2_32k_tbl;
1464: l_proc_index number := 1;
1465: begin
1466: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.generate_upload', 5);
1467:
1468: if p_table_info.fk_to_aol_table = 'N' then
1469: l_parameters_tbl := g_parameters_tbl;
1470: else

Line 1702: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_upload',

1698: || indent ;
1699:
1700: -- add the body of this procedure to the package.
1701: add_to_package_body( l_proc_body_tbl );
1702: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_upload',
1703: 25);
1704: exception
1705: when others then
1706: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_upload',

Line 1706: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_upload',

1702: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_upload',
1703: 25);
1704: exception
1705: when others then
1706: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_upload',
1707: '(none)','R');
1708: raise;
1709: end generate_upload;
1710: -- ----------------------- get_derive_from_clause -------------------------

Line 1738: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.get_derive_from_clause', 5);

1734: l_start_ptr number;
1735: l_end_ptr number;
1736: l_terminator varchar2(5) := ';';
1737: begin
1738: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.get_derive_from_clause', 5);
1739: hr_dm_utility.message('PARA','(p_from_clause - ' || p_from_clause ||
1740: ')(p_lpad_spaces - ' || p_lpad_spaces ||
1741: ')', 10);
1742: l_derive_sql := p_derive_from;

Line 1769: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.get_derive_from_clause',

1765: exit;
1766: end if;
1767: end loop;
1768:
1769: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.get_derive_from_clause',
1770: 25);
1771: hr_dm_utility.message('PARA','(p_from_clause - ' || p_from_clause || ')',30);
1772: exception
1773: when others then

Line 1774: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.get_derive_from_clause',

1770: 25);
1771: hr_dm_utility.message('PARA','(p_from_clause - ' || p_from_clause || ')',30);
1772: exception
1773: when others then
1774: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.get_derive_from_clause',
1775: '(l_derive_sql - ' || l_derive_sql ||
1776: ')(l_end_ptr - ' || l_end_ptr ||
1777: ')(p_from_clause - ' || p_from_clause || ')'
1778: ,'R');

Line 1817: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.get_derive_where_clause', 5);

1813: l_start_ptr number;
1814: l_end_ptr number;
1815: l_terminator varchar2(5) := ';';
1816: begin
1817: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.get_derive_where_clause', 5);
1818:
1819: l_derive_sql := p_table_info.derive_sql_chk_row_exists;
1820:
1821: -- if terminator ';' is there in derive sql then set the terminator to null.

Line 1851: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.get_derive_where_clause',

1847: end if;
1848: end loop;
1849:
1850: p_where_clause := p_where_clause || l_terminator;
1851: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.get_derive_where_clause',
1852: 25);
1853: hr_dm_utility.message('PARA','(p_where_clause - ' || p_where_clause,30);
1854: exception
1855: when others then

Line 1856: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.get_derive_where_clause',

1852: 25);
1853: hr_dm_utility.message('PARA','(p_where_clause - ' || p_where_clause,30);
1854: exception
1855: when others then
1856: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.get_derive_where_clause',
1857: '(none)','R');
1858: raise;
1859: end get_derive_where_clause;
1860: -- ----------------------- prepare_chk_row_exists_cursor ---------------------

Line 1878: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.prepare_chk_row_exists_cursor', 5);

1874: l_cursor_select_where varchar2(32767);
1875:
1876:
1877: begin
1878: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.prepare_chk_row_exists_cursor', 5);
1879:
1880: -- comments about the cursor
1881: l_cursor_comment := format_comment('cursor to get the row from '||
1882: p_table_info.upload_table_name || 'for a given primary key',2);

Line 1947: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_chk_row_exists_cursor',

1943: l_cursor_select_cols || indent ||
1944: l_cursor_select_from || indent ||
1945: l_cursor_select_where || indent;
1946:
1947: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_chk_row_exists_cursor',
1948: 25);
1949: exception
1950: when others then
1951: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_chk_row_exists_cursor',

Line 1951: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_chk_row_exists_cursor',

1947: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.prepare_chk_row_exists_cursor',
1948: 25);
1949: exception
1950: when others then
1951: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.prepare_chk_row_exists_cursor',
1952: '(none)','R');
1953: raise;
1954: end prepare_chk_row_exists_cursor;
1955:

Line 2044: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.generate_chk_row_exists', 5);

2040: l_pay_owner,
2041: l_per_owner);
2042:
2043: begin
2044: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.generate_chk_row_exists', 5);
2045:
2046: -- indentation required for call to chk_row_exists procedure in upload process
2047: -- will vary depending upon the table properties.
2048:

Line 2317: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_chk_row_exists',

2313: 'begin' ||indent || l_proc_body;
2314:
2315: -- add the body of this procedure to the package.
2316: add_to_package_body( l_proc_body_tbl );
2317: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_chk_row_exists',
2318: 25);
2319: exception
2320: when others then
2321: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_chk_row_exists',

Line 2321: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_chk_row_exists',

2317: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_chk_row_exists',
2318: 25);
2319: exception
2320: when others then
2321: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_chk_row_exists',
2322: '(none)','R');
2323: raise;
2324: end generate_chk_row_exists;
2325:

Line 2352: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.generate_insert_dml', 5);

2348: l_proc_body_tbl t_varchar2_32k_tbl;
2349: l_proc_index number := 1;
2350: l_list_index number;
2351: begin
2352: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.generate_insert_dml', 5);
2353:
2354: -- input parameters for the procedure
2355:
2356: l_proc_body_tbl(l_proc_index) := indent || '(' ||

Line 2581: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_insert_dml',

2577: l_proc_body_tbl(1) || ' is' || l_locals || 'begin' ||indent;
2578:
2579: -- add the body of this procedure to the package.
2580: add_to_package_body( l_proc_body_tbl );
2581: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_insert_dml',
2582: 25);
2583: exception
2584: when others then
2585: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_insert_dml',

Line 2585: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_insert_dml',

2581: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_insert_dml',
2582: 25);
2583: exception
2584: when others then
2585: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_insert_dml',
2586: '(none)','R');
2587: raise;
2588: end generate_insert_dml;
2589: -- ----------------------- generate_update_dml ---------------------------

Line 2615: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.generate_update_dml', 5);

2611: l_proc_index number := 1;
2612:
2613: l_columns_tbl hr_dm_library.t_varchar2_tbl;
2614: begin
2615: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.generate_update_dml', 5);
2616:
2617: -- input parameters for the procedure
2618:
2619: l_proc_body_tbl(l_proc_index) := indent || '(' ||

Line 2719: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_update_dml',

2715: 'begin' || indent;
2716:
2717: -- add the body of this procedure to the package.
2718: add_to_package_body( l_proc_body_tbl );
2719: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_update_dml',
2720: 25);
2721: exception
2722: when others then
2723: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_update_dml',

Line 2723: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_update_dml',

2719: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_update_dml',
2720: 25);
2721: exception
2722: when others then
2723: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_update_dml',
2724: '(none)','R');
2725: raise;
2726: end generate_update_dml;
2727: -- ----------------------- generate_upload_hierarchy ---------------------------

Line 2759: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.generate_upload_hierarchy', 5);

2755: l_indent number;
2756: l_proc_body_tbl t_varchar2_32k_tbl;
2757: l_proc_index number := 1;
2758: begin
2759: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.generate_upload_hierarchy', 5);
2760:
2761: -- input parameters for the procedure
2762:
2763: l_interface := indent ||'(p_last_migration_date in date' ||

Line 2874: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_upload_hierarchy',

2870: || indent ;
2871:
2872: -- add the body of this procedure to the package.
2873: add_to_package_body( l_proc_body_tbl);
2874: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_upload_hierarchy',
2875: 25);
2876: exception
2877: when others then
2878: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_upload_hierarchy',

Line 2878: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_upload_hierarchy',

2874: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_upload_hierarchy',
2875: 25);
2876: exception
2877: when others then
2878: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_upload_hierarchy',
2879: '(none)','R');
2880: raise;
2881: end generate_upload_hierarchy;
2882: -- ----------------------- generate_delete_dml ---------------------------

Line 2905: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.generate_delete_dml', 5);

2901:
2902: l_indent number;
2903: l_proc_body_tbl t_varchar2_32k_tbl;
2904: begin
2905: hr_dm_utility.message('ROUT','entry:hr_dm_gen_tups.generate_delete_dml', 5);
2906:
2907: -- input parameters for the procedure
2908:
2909: if p_table_info.use_non_pk_col_for_chk_row = 'Y' then

Line 2988: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_delete_dml',

2984: indent || l_proc_body ;
2985:
2986: -- add the body of this procedure to the package.
2987: add_to_package_body( l_proc_body_tbl );
2988: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_delete_dml',
2989: 25);
2990: exception
2991: when others then
2992: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_delete_dml',

Line 2992: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_delete_dml',

2988: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.generate_delete_dml',
2989: 25);
2990: exception
2991: when others then
2992: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.generate_delete_dml',
2993: '(none)','R');
2994: raise;
2995: end generate_delete_dml;
2996:

Line 3063: hr_dm_library.get_package_version ( p_package_name => 'HR_DM_GEN_TUPS',

3059: hr_dm_library.get_generator_version(p_generator_version => l_generator_version,
3060: p_format_output => 'Y');
3061:
3062: -- Get the package version of this TDS package body.
3063: hr_dm_library.get_package_version ( p_package_name => 'HR_DM_GEN_TUPS',
3064: p_package_version => l_package_version,
3065: p_version_type => 'FULL');
3066:
3067: -- if there is a column hirearchy then store the hierarchy columns list and

Line 3103: ' * Generated by hr_dm_gen_tups at: ' ||

3099: --
3100: -- Set up initial parts of the package header and body.
3101: --
3102: l_header_comment := l_package_version || indent || '/*' || indent ||
3103: ' * Generated by hr_dm_gen_tups at: ' ||
3104: to_char( sysdate, 'YYYY/MM/DD HH24:MM:SS' ) || indent ||
3105: ' * Generated Data Migrator TUPS for : ' || p_table_info.upload_table_name || '.' ||
3106: indent ||
3107: ' * Generator Version Used to generate this TUPS is : ' || indent ||

Line 3210: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.create_tds_pacakge',

3206: l_header := l_header || 'end ' || l_package_name || ';';
3207: l_body := l_body || 'end ' || l_package_name || ';';
3208: exception
3209: when plsql_value_error then
3210: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.create_tds_pacakge',
3211: 'Either TDS package code size is too big or ' ||
3212: ' a value error)',
3213: 'R');
3214: raise;

Line 3241: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.create_tups_pacakge',

3237: p_table_info.table_name ,'(none)','R');
3238: raise;
3239: end;
3240:
3241: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.create_tups_pacakge',
3242: 25);
3243: exception
3244: when others then
3245: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.create_tups_pacakge',

Line 3245: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.create_tups_pacakge',

3241: hr_dm_utility.message('ROUT','exit:hr_dm_gen_tups.create_tups_pacakge',
3242: 25);
3243: exception
3244: when others then
3245: hr_dm_utility.error(SQLCODE,'hr_dm_gen_tups.create_tups_pacakge',
3246: '(none)','R');
3247: raise;
3248: end create_tups_pacakge ;
3249:

Line 3250: end hr_dm_gen_tups;

3246: '(none)','R');
3247: raise;
3248: end create_tups_pacakge ;
3249:
3250: end hr_dm_gen_tups;