[Home] [Help]
1: PACKAGE BODY per_ric_pkg as
2: /* $Header: pericpkg.pkb 120.3 2011/06/15 12:14:12 sidsaxen noship $ */
3:
4: g_package varchar2(30) := 'per_ric_pkg';
5: g_debug boolean := true;
1: PACKAGE BODY per_ric_pkg as
2: /* $Header: pericpkg.pkb 120.3 2011/06/15 12:14:12 sidsaxen noship $ */
3:
4: g_package varchar2(30) := 'per_ric_pkg';
5: g_debug boolean := true;
6:
7: --
8: -- ----------------------------------------------------------------------------
130: if g_debug then
131: hr_utility.set_location('Entering: '||l_func,10);
132: end if;
133:
134: per_ric_pkg.chk_integrity(
135: p_entity_NAME => p_entity_NAME
136: ,p_ref_entity_info =>
137: per_ric_pkg.ref_entity_tbl(
138: ref_info_rec(
133:
134: per_ric_pkg.chk_integrity(
135: p_entity_NAME => p_entity_NAME
136: ,p_ref_entity_info =>
137: per_ric_pkg.ref_entity_tbl(
138: ref_info_rec(
139: p_ref_entity_NAME => p_ref_entity
140: ,p_column_info_rec =>
141: per_ric_pkg.column_info_tbl(
137: per_ric_pkg.ref_entity_tbl(
138: ref_info_rec(
139: p_ref_entity_NAME => p_ref_entity
140: ,p_column_info_rec =>
141: per_ric_pkg.column_info_tbl(
142: col_info_rec(
143: column_NAME => p_ref_column_NAME
144: ,value_VARCHAR => p_ref_col_value_VARCHAR
145: ,value_NUMBER => p_ref_col_value_NUMBER
171: if g_debug then
172: hr_utility.set_location('Entering: '||l_proc,10);
173: end if;
174:
175: per_ric_pkg.chk_integrity(
176: p_entity_NAME => p_entity_NAME
177: ,p_ref_entity_info =>
178: per_ric_pkg.ref_entity_tbl(
179: ref_info_rec(
174:
175: per_ric_pkg.chk_integrity(
176: p_entity_NAME => p_entity_NAME
177: ,p_ref_entity_info =>
178: per_ric_pkg.ref_entity_tbl(
179: ref_info_rec(
180: p_ref_entity_NAME => p_ref_entity
181: ,p_column_info_rec =>
182: per_ric_pkg.column_info_tbl(
178: per_ric_pkg.ref_entity_tbl(
179: ref_info_rec(
180: p_ref_entity_NAME => p_ref_entity
181: ,p_column_info_rec =>
182: per_ric_pkg.column_info_tbl(
183: col_info_rec(
184: column_NAME => p_ref_column_NAME
185: ,value_VARCHAR => p_ref_col_value_VARCHAR
186: ,value_NUMBER => p_ref_col_value_NUMBER
209: if g_debug then
210: hr_utility.set_location('Entering: '||l_proc,10);
211: end if;
212:
213: per_ric_pkg.chk_integrity(
214: p_entity_NAME => p_entity_NAME
215: ,p_ref_entity_info =>
216: per_ric_pkg.ref_entity_tbl(
217: ref_info_rec(
212:
213: per_ric_pkg.chk_integrity(
214: p_entity_NAME => p_entity_NAME
215: ,p_ref_entity_info =>
216: per_ric_pkg.ref_entity_tbl(
217: ref_info_rec(
218: p_ref_entity_NAME => p_ref_entity
219: ,p_column_info_rec => p_ref_column_info))
220: ,p_ref_type => p_ref_type
241: if g_debug then
242: hr_utility.set_location('Entering: '||l_proc,10);
243: end if;
244:
245: per_ric_pkg.chk_integrity(
246: p_entity_NAME => p_entity_NAME
247: ,p_ref_entity_info =>
248: per_ric_pkg.ref_entity_tbl(
249: ref_info_rec(
244:
245: per_ric_pkg.chk_integrity(
246: p_entity_NAME => p_entity_NAME
247: ,p_ref_entity_info =>
248: per_ric_pkg.ref_entity_tbl(
249: ref_info_rec(
250: p_ref_entity_NAME => p_ref_entity
251: ,p_column_info_rec => p_ref_column_info))
252: ,p_ref_type => p_ref_type
273: if g_debug then
274: hr_utility.set_location('Entering: '||l_proc,10);
275: end if;
276:
277: per_ric_pkg.chk_integrity(
278: p_entity_NAME => p_entity_NAME
279: ,p_ref_entity_info => p_ref_entity_info
280: ,p_ref_type => p_ref_type
281: ,p_integrity_error => l_integrity_error);
573: hr_utility.set_message_token('CONSTRAINT_NAME',p_entity_NAME||'.'||p_ref_type||'_REFERENTIAL_INTEGRITY');
574: hr_utility.raise_error;
575: END;
576:
577: END per_ric_pkg;