1: package body Fnd_Dictionary_Pkg as
2: /* $Header: AFDICTB.pls 120.5 2005/11/22 11:30:03 rsheh ship $ */
3:
4: c_log_head CONSTANT varchar2(40) := 'fnd.plsql.fnd_dictionary_pkg.';
5: visited_tables fnd_dictionary_pkg.NameArrayTyp;
1: package body Fnd_Dictionary_Pkg as
2: /* $Header: AFDICTB.pls 120.5 2005/11/22 11:30:03 rsheh ship $ */
3:
4: c_log_head CONSTANT varchar2(40) := 'fnd.plsql.fnd_dictionary_pkg.';
5: visited_tables fnd_dictionary_pkg.NameArrayTyp;
6: visited_table_count number := 0;
7: checking_log boolean := FALSE;
8:
1: package body Fnd_Dictionary_Pkg as
2: /* $Header: AFDICTB.pls 120.5 2005/11/22 11:30:03 rsheh ship $ */
3:
4: c_log_head CONSTANT varchar2(40) := 'fnd.plsql.fnd_dictionary_pkg.';
5: visited_tables fnd_dictionary_pkg.NameArrayTyp;
6: visited_table_count number := 0;
7: checking_log boolean := FALSE;
8:
9: --
1744: and TABLE_NAME = x_table_name;
1745: end if;
1746: exception
1747: when no_data_found then
1748: Fnd_Dictionary_Pkg.InsertTable(
1749: appl_id,
1750: x_table_name,
1751: x_user_table_name,
1752: x_table_type,
1861: and COLUMN_NAME = x_column_name;
1862: end if;
1863: exception
1864: when no_data_found then
1865: Fnd_Dictionary_Pkg.InsertColumn(
1866: appl_id,
1867: tab_id,
1868: x_column_name,
1869: x_user_column_name,
2108: and COLUMN_SEQUENCE = 0;
2109:
2110: exception
2111: when no_data_found then
2112: Fnd_Dictionary_Pkg.InsertIndex(
2113: appl_id,
2114: tab_id,
2115: x_index_name,
2116: x_uniqueness,
2545: and PRIMARY_KEY_ID = pk_id
2546: and PRIMARY_KEY_SEQUENCE = 0;
2547:
2548: else
2549: Fnd_Dictionary_Pkg.InsertPrimaryKey(
2550: appl_id,
2551: tab_id,
2552: x_primary_key_name,
2553: x_primary_key_type,
2562: end if;
2563:
2564: exception
2565: when no_data_found then
2566: Fnd_Dictionary_Pkg.InsertPrimaryKey(
2567: appl_id,
2568: tab_id,
2569: x_primary_key_name,
2570: x_primary_key_type,
2977: and FOREIGN_KEY_SEQUENCE = 0;
2978:
2979: exception
2980: when no_data_found then
2981: Fnd_Dictionary_Pkg.InsertForeignKey(
2982: appl_id,
2983: tab_id,
2984: x_foreign_key_name,
2985: pk_appl_id,
3330: and SEQUENCE_NAME = x_sequence_name;
3331: end if;
3332: exception
3333: when no_data_found then
3334: Fnd_Dictionary_Pkg.InsertSequence(
3335: appl_id,
3336: x_sequence_name,
3337: x_start_value,
3338: x_description,
3439: and VIEW_ID = vw_id;
3440:
3441: exception
3442: when no_data_found then
3443: Fnd_Dictionary_Pkg.InsertView(
3444: appl_id,
3445: x_view_name,
3446: x_text,
3447: x_description,
4267: end CheckPKColumns;
4268:
4269:
4270:
4271: end Fnd_Dictionary_Pkg;