17: l_proc varchar2(72) := g_package||'constraint_error';
18: --
19: Begin
20: --
21: If (p_constraint_name = 'PER_RI_WORKBENCH_ITEMS_PK') Then
22: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
23: fnd_message.set_token('PROCEDURE', l_proc);
24: fnd_message.set_token('STEP','5');
25: fnd_message.raise_error;
53: ,workbench_parent_item_code
54: ,workbench_item_creation_date
55: ,workbench_item_type
56: ,object_version_number
57: from per_ri_workbench_items
58: where workbench_item_code = p_workbench_item_code;
59: --
60: l_fct_ret boolean;
61: --
125: ,workbench_parent_item_code
126: ,workbench_item_creation_date
127: ,workbench_item_type
128: ,object_version_number
129: from per_ri_workbench_items
130: where workbench_item_code = p_workbench_item_code
131: for update nowait;
132: --
133: l_proc varchar2(72) := g_package||'lck';
174: -- The object is locked therefore we need to supply a meaningful
175: -- error message.
176: --
177: fnd_message.set_name('PAY', 'HR_7165_OBJECT_LOCKED');
178: fnd_message.set_token('TABLE_NAME', 'per_ri_workbench_items');
179: fnd_message.raise_error;
180: End lck;
181: --
182: -- ----------------------------------------------------------------------------