14: --
15: l_proc varchar2(72) := g_package||'return_api_dml_status';
16: --
17: Begin
18: hr_utility.set_location('Entering:'||l_proc, 5);
19: --
20: Return (nvl(g_api_dml, false));
21: --
22: hr_utility.set_location(' Leaving:'||l_proc, 10);
18: hr_utility.set_location('Entering:'||l_proc, 5);
19: --
20: Return (nvl(g_api_dml, false));
21: --
22: hr_utility.set_location(' Leaving:'||l_proc, 10);
23: End return_api_dml_status;
24: --
25: -- ----------------------------------------------------------------------------
26: -- |---------------------------< constraint_error >---------------------------|
30: --
31: l_proc varchar2(72) := g_package||'constraint_error';
32: --
33: Begin
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'PER_QUALIFICATIONS_FK1') Then
37: hr_utility.set_message(801, 'HR_51850_ass_ATT_ID_FK');
38: hr_utility.raise_error;
33: Begin
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'PER_QUALIFICATIONS_FK1') Then
37: hr_utility.set_message(801, 'HR_51850_ass_ATT_ID_FK');
38: hr_utility.raise_error;
39: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_FK2') Then
40: hr_utility.set_message(801, 'HR_51851_ass_QUAL_TYPE_ID_FK');
41: hr_utility.raise_error;
34: hr_utility.set_location('Entering:'||l_proc, 5);
35: --
36: If (p_constraint_name = 'PER_QUALIFICATIONS_FK1') Then
37: hr_utility.set_message(801, 'HR_51850_ass_ATT_ID_FK');
38: hr_utility.raise_error;
39: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_FK2') Then
40: hr_utility.set_message(801, 'HR_51851_ass_QUAL_TYPE_ID_FK');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_FK3') Then
36: If (p_constraint_name = 'PER_QUALIFICATIONS_FK1') Then
37: hr_utility.set_message(801, 'HR_51850_ass_ATT_ID_FK');
38: hr_utility.raise_error;
39: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_FK2') Then
40: hr_utility.set_message(801, 'HR_51851_ass_QUAL_TYPE_ID_FK');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_FK3') Then
43: hr_utility.set_message(801, 'HR_51852_ass_BUS_GRP_ID_FK');
44: hr_utility.raise_error;
37: hr_utility.set_message(801, 'HR_51850_ass_ATT_ID_FK');
38: hr_utility.raise_error;
39: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_FK2') Then
40: hr_utility.set_message(801, 'HR_51851_ass_QUAL_TYPE_ID_FK');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_FK3') Then
43: hr_utility.set_message(801, 'HR_51852_ass_BUS_GRP_ID_FK');
44: hr_utility.raise_error;
45: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_UK') Then
39: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_FK2') Then
40: hr_utility.set_message(801, 'HR_51851_ass_QUAL_TYPE_ID_FK');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_FK3') Then
43: hr_utility.set_message(801, 'HR_51852_ass_BUS_GRP_ID_FK');
44: hr_utility.raise_error;
45: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_UK') Then
46: hr_utility.set_message(801,'HR_51847_ass_REC_EXISTS');
47: hr_utility.raise_error;
40: hr_utility.set_message(801, 'HR_51851_ass_QUAL_TYPE_ID_FK');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_FK3') Then
43: hr_utility.set_message(801, 'HR_51852_ass_BUS_GRP_ID_FK');
44: hr_utility.raise_error;
45: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_UK') Then
46: hr_utility.set_message(801,'HR_51847_ass_REC_EXISTS');
47: hr_utility.raise_error;
48: ElsIf (p_constraint_name = 'PER_ass_CHK_DATES') Then
42: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_FK3') Then
43: hr_utility.set_message(801, 'HR_51852_ass_BUS_GRP_ID_FK');
44: hr_utility.raise_error;
45: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_UK') Then
46: hr_utility.set_message(801,'HR_51847_ass_REC_EXISTS');
47: hr_utility.raise_error;
48: ElsIf (p_constraint_name = 'PER_ass_CHK_DATES') Then
49: hr_utility.set_message(801, 'HR_51853_ass_DATE_INV');
50: hr_utility.raise_error;
43: hr_utility.set_message(801, 'HR_51852_ass_BUS_GRP_ID_FK');
44: hr_utility.raise_error;
45: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_UK') Then
46: hr_utility.set_message(801,'HR_51847_ass_REC_EXISTS');
47: hr_utility.raise_error;
48: ElsIf (p_constraint_name = 'PER_ass_CHK_DATES') Then
49: hr_utility.set_message(801, 'HR_51853_ass_DATE_INV');
50: hr_utility.raise_error;
51: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_PK') Then
45: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_UK') Then
46: hr_utility.set_message(801,'HR_51847_ass_REC_EXISTS');
47: hr_utility.raise_error;
48: ElsIf (p_constraint_name = 'PER_ass_CHK_DATES') Then
49: hr_utility.set_message(801, 'HR_51853_ass_DATE_INV');
50: hr_utility.raise_error;
51: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_PK') Then
52: hr_utility.set_message(801, 'HR_51854_ass_QUAL_ID_PK');
53: hr_utility.raise_error;
46: hr_utility.set_message(801,'HR_51847_ass_REC_EXISTS');
47: hr_utility.raise_error;
48: ElsIf (p_constraint_name = 'PER_ass_CHK_DATES') Then
49: hr_utility.set_message(801, 'HR_51853_ass_DATE_INV');
50: hr_utility.raise_error;
51: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_PK') Then
52: hr_utility.set_message(801, 'HR_51854_ass_QUAL_ID_PK');
53: hr_utility.raise_error;
54: Else
48: ElsIf (p_constraint_name = 'PER_ass_CHK_DATES') Then
49: hr_utility.set_message(801, 'HR_51853_ass_DATE_INV');
50: hr_utility.raise_error;
51: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_PK') Then
52: hr_utility.set_message(801, 'HR_51854_ass_QUAL_ID_PK');
53: hr_utility.raise_error;
54: Else
55: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
56: hr_utility.set_message_token('PROCEDURE', l_proc);
49: hr_utility.set_message(801, 'HR_51853_ass_DATE_INV');
50: hr_utility.raise_error;
51: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_PK') Then
52: hr_utility.set_message(801, 'HR_51854_ass_QUAL_ID_PK');
53: hr_utility.raise_error;
54: Else
55: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
56: hr_utility.set_message_token('PROCEDURE', l_proc);
57: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
51: ElsIf (p_constraint_name = 'PER_QUALIFICATIONS_PK') Then
52: hr_utility.set_message(801, 'HR_51854_ass_QUAL_ID_PK');
53: hr_utility.raise_error;
54: Else
55: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
56: hr_utility.set_message_token('PROCEDURE', l_proc);
57: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
58: hr_utility.raise_error;
59: End If;
52: hr_utility.set_message(801, 'HR_51854_ass_QUAL_ID_PK');
53: hr_utility.raise_error;
54: Else
55: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
56: hr_utility.set_message_token('PROCEDURE', l_proc);
57: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
58: hr_utility.raise_error;
59: End If;
60: --
53: hr_utility.raise_error;
54: Else
55: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
56: hr_utility.set_message_token('PROCEDURE', l_proc);
57: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
58: hr_utility.raise_error;
59: End If;
60: --
61: hr_utility.set_location(' Leaving:'||l_proc, 10);
54: Else
55: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
56: hr_utility.set_message_token('PROCEDURE', l_proc);
57: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
58: hr_utility.raise_error;
59: End If;
60: --
61: hr_utility.set_location(' Leaving:'||l_proc, 10);
62: End constraint_error;
57: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
58: hr_utility.raise_error;
59: End If;
60: --
61: hr_utility.set_location(' Leaving:'||l_proc, 10);
62: End constraint_error;
63: --
64: -- ----------------------------------------------------------------------------
65: -- |---------------------------------< lck >----------------------------------|
86:
87: l_proc varchar2(72) := g_package||'lck';
88: --
89: Begin
90: hr_utility.set_location('Entering:'||l_proc, 5);
91: --
92: -- Add any mandatory argument checking here:
93: -- Example:
94: -- hr_api.mandatory_arg_error
106: Close C_Sel1;
107: --
108: -- The primary key is invalid therefore we must error
109: --
110: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
111: hr_utility.raise_error;
112: End If;
113: Close C_Sel1;
114: --
107: --
108: -- The primary key is invalid therefore we must error
109: --
110: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
111: hr_utility.raise_error;
112: End If;
113: Close C_Sel1;
114: --
115: hr_utility.set_location(' Leaving:'||l_proc, 10);
111: hr_utility.raise_error;
112: End If;
113: Close C_Sel1;
114: --
115: hr_utility.set_location(' Leaving:'||l_proc, 10);
116: --
117: -- We need to trap the ORA LOCK exception
118: --
119: Exception
121: --
122: -- The object is locked therefore we need to supply a meaningful
123: -- error message.
124: --
125: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
126: hr_utility.set_message_token('TABLE_NAME', 'per_za_ao_assessments');
127: hr_utility.raise_error;
128: End lck;
129: --
122: -- The object is locked therefore we need to supply a meaningful
123: -- error message.
124: --
125: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
126: hr_utility.set_message_token('TABLE_NAME', 'per_za_ao_assessments');
127: hr_utility.raise_error;
128: End lck;
129: --
130: -- ----------------------------------------------------------------------------
123: -- error message.
124: --
125: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
126: hr_utility.set_message_token('TABLE_NAME', 'per_za_ao_assessments');
127: hr_utility.raise_error;
128: End lck;
129: --
130: -- ----------------------------------------------------------------------------
131: -- |-----------------------------< convert_args >-----------------------------|
143: l_proc varchar2(72) := g_package||'convert_args';
144: --
145: Begin
146: --
147: hr_utility.set_location('Entering:'||l_proc, 5);
148: --
149: -- Convert arguments into local l_rec structure.
150: --
151: l_rec.area_of_assessment_id := p_area_of_assessment_id;
156:
157: --
158: -- Return the plsql record structure.
159: --
160: hr_utility.set_location(' Leaving:'||l_proc, 10);
161: Return(l_rec);
162: --
163: End convert_args;
164: --