32: --
33: Begin
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'PER_APPLICATIONS_FK1') Then
37: hr_utility.set_message(801, 'HR_51183_APL_BUS_GRP_INVALID');
38: hr_utility.raise_error;
39: ElsIf (p_constraint_name = 'PER_APPLICATIONS_PK') Then
40: hr_utility.set_message(801, 'HR_51184_APL_PK');
35: --
36: If (p_constraint_name = 'PER_APPLICATIONS_FK1') Then
37: hr_utility.set_message(801, 'HR_51183_APL_BUS_GRP_INVALID');
38: hr_utility.raise_error;
39: ElsIf (p_constraint_name = 'PER_APPLICATIONS_PK') Then
40: hr_utility.set_message(801, 'HR_51184_APL_PK');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PER_APPL_SUCCESSFUL_FLAG_CHK') Then
43: hr_utility.set_message(801, 'HR_51186_APL_CHK');
101: appl_attribute18,
102: appl_attribute19,
103: appl_attribute20,
104: object_version_number
105: from per_applications
106: where application_id = p_application_id;
107: --
108: l_proc varchar2(72) := g_package||'api_updating';
109: l_fct_ret boolean;
206: appl_attribute18,
207: appl_attribute19,
208: appl_attribute20,
209: object_version_number
210: from per_applications
211: where application_id = p_application_id
212: for update nowait;
213: --
214: l_proc varchar2(72) := g_package||'lck';
249: -- The object is locked therefore we need to supply a meaningful
250: -- error message.
251: --
252: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
253: hr_utility.set_message_token('TABLE_NAME', 'per_applications');
254: hr_utility.raise_error;
255: End lck;
256: --
257: -- ----------------------------------------------------------------------------