16: --
17: l_proc varchar2(72) := g_package||'constraint_error';
18: --
19: Begin
20: hr_utility.set_location('Entering:'||l_proc, 5);
21: --
22: If (p_constraint_name = 'PER_ASSESSMENTS_DATE_CHK') Then
23: hr_utility.set_message(801, 'HR_51591_ASN_END_STA_DATE_ERR');
24: hr_utility.set_message_token('PROCEDURE', l_proc);
19: Begin
20: hr_utility.set_location('Entering:'||l_proc, 5);
21: --
22: If (p_constraint_name = 'PER_ASSESSMENTS_DATE_CHK') Then
23: hr_utility.set_message(801, 'HR_51591_ASN_END_STA_DATE_ERR');
24: hr_utility.set_message_token('PROCEDURE', l_proc);
25: hr_utility.set_message_token('STEP','5');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_DATE_END_CHK') Then
20: hr_utility.set_location('Entering:'||l_proc, 5);
21: --
22: If (p_constraint_name = 'PER_ASSESSMENTS_DATE_CHK') Then
23: hr_utility.set_message(801, 'HR_51591_ASN_END_STA_DATE_ERR');
24: hr_utility.set_message_token('PROCEDURE', l_proc);
25: hr_utility.set_message_token('STEP','5');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_DATE_END_CHK') Then
28: hr_utility.set_message(801, 'HR_51590_ASN_START_DATE_NULL');
21: --
22: If (p_constraint_name = 'PER_ASSESSMENTS_DATE_CHK') Then
23: hr_utility.set_message(801, 'HR_51591_ASN_END_STA_DATE_ERR');
24: hr_utility.set_message_token('PROCEDURE', l_proc);
25: hr_utility.set_message_token('STEP','5');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_DATE_END_CHK') Then
28: hr_utility.set_message(801, 'HR_51590_ASN_START_DATE_NULL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
22: If (p_constraint_name = 'PER_ASSESSMENTS_DATE_CHK') Then
23: hr_utility.set_message(801, 'HR_51591_ASN_END_STA_DATE_ERR');
24: hr_utility.set_message_token('PROCEDURE', l_proc);
25: hr_utility.set_message_token('STEP','5');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_DATE_END_CHK') Then
28: hr_utility.set_message(801, 'HR_51590_ASN_START_DATE_NULL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','10');
24: hr_utility.set_message_token('PROCEDURE', l_proc);
25: hr_utility.set_message_token('STEP','5');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_DATE_END_CHK') Then
28: hr_utility.set_message(801, 'HR_51590_ASN_START_DATE_NULL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','10');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK1') Then
25: hr_utility.set_message_token('STEP','5');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_DATE_END_CHK') Then
28: hr_utility.set_message(801, 'HR_51590_ASN_START_DATE_NULL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','10');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK1') Then
33: hr_utility.set_message(801, 'HR_51583_ASN_NO_AST_EXISTS');
26: hr_utility.raise_error;
27: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_DATE_END_CHK') Then
28: hr_utility.set_message(801, 'HR_51590_ASN_START_DATE_NULL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','10');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK1') Then
33: hr_utility.set_message(801, 'HR_51583_ASN_NO_AST_EXISTS');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
27: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_DATE_END_CHK') Then
28: hr_utility.set_message(801, 'HR_51590_ASN_START_DATE_NULL');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','10');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK1') Then
33: hr_utility.set_message(801, 'HR_51583_ASN_NO_AST_EXISTS');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP','15');
29: hr_utility.set_message_token('PROCEDURE', l_proc);
30: hr_utility.set_message_token('STEP','10');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK1') Then
33: hr_utility.set_message(801, 'HR_51583_ASN_NO_AST_EXISTS');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP','15');
36: hr_utility.raise_error;
37: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK2') Then
30: hr_utility.set_message_token('STEP','10');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK1') Then
33: hr_utility.set_message(801, 'HR_51583_ASN_NO_AST_EXISTS');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP','15');
36: hr_utility.raise_error;
37: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK2') Then
38: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
31: hr_utility.raise_error;
32: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK1') Then
33: hr_utility.set_message(801, 'HR_51583_ASN_NO_AST_EXISTS');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP','15');
36: hr_utility.raise_error;
37: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK2') Then
38: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
32: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK1') Then
33: hr_utility.set_message(801, 'HR_51583_ASN_NO_AST_EXISTS');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP','15');
36: hr_utility.raise_error;
37: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK2') Then
38: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','20');
34: hr_utility.set_message_token('PROCEDURE', l_proc);
35: hr_utility.set_message_token('STEP','15');
36: hr_utility.raise_error;
37: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK2') Then
38: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','20');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK3') Then
35: hr_utility.set_message_token('STEP','15');
36: hr_utility.raise_error;
37: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK2') Then
38: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','20');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK3') Then
43: hr_utility.set_message(801, 'HR_51592_ASN_GROUP_NO_EXIST');
36: hr_utility.raise_error;
37: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK2') Then
38: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','20');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK3') Then
43: hr_utility.set_message(801, 'HR_51592_ASN_GROUP_NO_EXIST');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
37: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK2') Then
38: hr_utility.set_message(801, 'HR_7208_API_BUS_GRP_INVALID');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','20');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK3') Then
43: hr_utility.set_message(801, 'HR_51592_ASN_GROUP_NO_EXIST');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','25');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','20');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK3') Then
43: hr_utility.set_message(801, 'HR_51592_ASN_GROUP_NO_EXIST');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','25');
46: hr_utility.raise_error;
47: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK4') Then
40: hr_utility.set_message_token('STEP','20');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK3') Then
43: hr_utility.set_message(801, 'HR_51592_ASN_GROUP_NO_EXIST');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','25');
46: hr_utility.raise_error;
47: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK4') Then
48: hr_utility.set_message(801, 'HR_51830_ASN_APPRAI_NO_EXIST');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK3') Then
43: hr_utility.set_message(801, 'HR_51592_ASN_GROUP_NO_EXIST');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','25');
46: hr_utility.raise_error;
47: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK4') Then
48: hr_utility.set_message(801, 'HR_51830_ASN_APPRAI_NO_EXIST');
49: hr_utility.set_message_token('PROCEDURE', l_proc);
42: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK3') Then
43: hr_utility.set_message(801, 'HR_51592_ASN_GROUP_NO_EXIST');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','25');
46: hr_utility.raise_error;
47: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK4') Then
48: hr_utility.set_message(801, 'HR_51830_ASN_APPRAI_NO_EXIST');
49: hr_utility.set_message_token('PROCEDURE', l_proc);
50: hr_utility.set_message_token('STEP','25');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','25');
46: hr_utility.raise_error;
47: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK4') Then
48: hr_utility.set_message(801, 'HR_51830_ASN_APPRAI_NO_EXIST');
49: hr_utility.set_message_token('PROCEDURE', l_proc);
50: hr_utility.set_message_token('STEP','25');
51: hr_utility.raise_error;
52: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_PK') Then
45: hr_utility.set_message_token('STEP','25');
46: hr_utility.raise_error;
47: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK4') Then
48: hr_utility.set_message(801, 'HR_51830_ASN_APPRAI_NO_EXIST');
49: hr_utility.set_message_token('PROCEDURE', l_proc);
50: hr_utility.set_message_token('STEP','25');
51: hr_utility.raise_error;
52: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_PK') Then
53: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
46: hr_utility.raise_error;
47: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK4') Then
48: hr_utility.set_message(801, 'HR_51830_ASN_APPRAI_NO_EXIST');
49: hr_utility.set_message_token('PROCEDURE', l_proc);
50: hr_utility.set_message_token('STEP','25');
51: hr_utility.raise_error;
52: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_PK') Then
53: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
54: hr_utility.set_message_token('PROCEDURE', l_proc);
47: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_FK4') Then
48: hr_utility.set_message(801, 'HR_51830_ASN_APPRAI_NO_EXIST');
49: hr_utility.set_message_token('PROCEDURE', l_proc);
50: hr_utility.set_message_token('STEP','25');
51: hr_utility.raise_error;
52: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_PK') Then
53: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
54: hr_utility.set_message_token('PROCEDURE', l_proc);
55: hr_utility.set_message_token('STEP','30');
49: hr_utility.set_message_token('PROCEDURE', l_proc);
50: hr_utility.set_message_token('STEP','25');
51: hr_utility.raise_error;
52: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_PK') Then
53: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
54: hr_utility.set_message_token('PROCEDURE', l_proc);
55: hr_utility.set_message_token('STEP','30');
56: hr_utility.raise_error;
57: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_UK1') Then
50: hr_utility.set_message_token('STEP','25');
51: hr_utility.raise_error;
52: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_PK') Then
53: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
54: hr_utility.set_message_token('PROCEDURE', l_proc);
55: hr_utility.set_message_token('STEP','30');
56: hr_utility.raise_error;
57: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_UK1') Then
58: hr_utility.set_message(801, 'HR_51593_ASN_DUP_ROW_EXIST');
51: hr_utility.raise_error;
52: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_PK') Then
53: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
54: hr_utility.set_message_token('PROCEDURE', l_proc);
55: hr_utility.set_message_token('STEP','30');
56: hr_utility.raise_error;
57: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_UK1') Then
58: hr_utility.set_message(801, 'HR_51593_ASN_DUP_ROW_EXIST');
59: hr_utility.set_message_token('PROCEDURE', l_proc);
52: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_PK') Then
53: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
54: hr_utility.set_message_token('PROCEDURE', l_proc);
55: hr_utility.set_message_token('STEP','30');
56: hr_utility.raise_error;
57: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_UK1') Then
58: hr_utility.set_message(801, 'HR_51593_ASN_DUP_ROW_EXIST');
59: hr_utility.set_message_token('PROCEDURE', l_proc);
60: hr_utility.set_message_token('STEP','35');
54: hr_utility.set_message_token('PROCEDURE', l_proc);
55: hr_utility.set_message_token('STEP','30');
56: hr_utility.raise_error;
57: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_UK1') Then
58: hr_utility.set_message(801, 'HR_51593_ASN_DUP_ROW_EXIST');
59: hr_utility.set_message_token('PROCEDURE', l_proc);
60: hr_utility.set_message_token('STEP','35');
61: hr_utility.raise_error;
62: Else
55: hr_utility.set_message_token('STEP','30');
56: hr_utility.raise_error;
57: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_UK1') Then
58: hr_utility.set_message(801, 'HR_51593_ASN_DUP_ROW_EXIST');
59: hr_utility.set_message_token('PROCEDURE', l_proc);
60: hr_utility.set_message_token('STEP','35');
61: hr_utility.raise_error;
62: Else
63: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
56: hr_utility.raise_error;
57: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_UK1') Then
58: hr_utility.set_message(801, 'HR_51593_ASN_DUP_ROW_EXIST');
59: hr_utility.set_message_token('PROCEDURE', l_proc);
60: hr_utility.set_message_token('STEP','35');
61: hr_utility.raise_error;
62: Else
63: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
64: hr_utility.set_message_token('PROCEDURE', l_proc);
57: ElsIf (p_constraint_name = 'PER_ASSESSMENTS_UK1') Then
58: hr_utility.set_message(801, 'HR_51593_ASN_DUP_ROW_EXIST');
59: hr_utility.set_message_token('PROCEDURE', l_proc);
60: hr_utility.set_message_token('STEP','35');
61: hr_utility.raise_error;
62: Else
63: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
64: hr_utility.set_message_token('PROCEDURE', l_proc);
65: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
59: hr_utility.set_message_token('PROCEDURE', l_proc);
60: hr_utility.set_message_token('STEP','35');
61: hr_utility.raise_error;
62: Else
63: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
64: hr_utility.set_message_token('PROCEDURE', l_proc);
65: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
66: hr_utility.raise_error;
67: End If;
60: hr_utility.set_message_token('STEP','35');
61: hr_utility.raise_error;
62: Else
63: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
64: hr_utility.set_message_token('PROCEDURE', l_proc);
65: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
66: hr_utility.raise_error;
67: End If;
68: --
61: hr_utility.raise_error;
62: Else
63: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
64: hr_utility.set_message_token('PROCEDURE', l_proc);
65: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
66: hr_utility.raise_error;
67: End If;
68: --
69: hr_utility.set_location(' Leaving:'||l_proc, 10);
62: Else
63: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');
64: hr_utility.set_message_token('PROCEDURE', l_proc);
65: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
66: hr_utility.raise_error;
67: End If;
68: --
69: hr_utility.set_location(' Leaving:'||l_proc, 10);
70: End constraint_error;
65: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);
66: hr_utility.raise_error;
67: End If;
68: --
69: hr_utility.set_location(' Leaving:'||l_proc, 10);
70: End constraint_error;
71: --
72: -- ----------------------------------------------------------------------------
73: -- |-----------------------------< api_updating >-----------------------------|
126: l_proc varchar2(72) := g_package||'api_updating';
127: l_fct_ret boolean;
128: --
129: Begin
130: hr_utility.set_location('Entering:'||l_proc, 5);
131: --
132: If (
133: p_assessment_id is null and
134: p_object_version_number is null
142: If (
143: p_assessment_id = g_old_rec.assessment_id and
144: p_object_version_number = g_old_rec.object_version_number
145: ) Then
146: hr_utility.set_location(l_proc, 10);
147: --
148: -- The g_old_rec is current therefore we must
149: -- set the returning function to true
150: --
159: Close C_Sel1;
160: --
161: -- The primary key is invalid therefore we must error
162: --
163: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
164: hr_utility.raise_error;
165: End If;
166: Close C_Sel1;
167: If (p_object_version_number <> g_old_rec.object_version_number) Then
160: --
161: -- The primary key is invalid therefore we must error
162: --
163: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
164: hr_utility.raise_error;
165: End If;
166: Close C_Sel1;
167: If (p_object_version_number <> g_old_rec.object_version_number) Then
168: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
164: hr_utility.raise_error;
165: End If;
166: Close C_Sel1;
167: If (p_object_version_number <> g_old_rec.object_version_number) Then
168: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
169: hr_utility.raise_error;
170: End If;
171: hr_utility.set_location(l_proc, 15);
172: l_fct_ret := true;
165: End If;
166: Close C_Sel1;
167: If (p_object_version_number <> g_old_rec.object_version_number) Then
168: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
169: hr_utility.raise_error;
170: End If;
171: hr_utility.set_location(l_proc, 15);
172: l_fct_ret := true;
173: End If;
167: If (p_object_version_number <> g_old_rec.object_version_number) Then
168: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
169: hr_utility.raise_error;
170: End If;
171: hr_utility.set_location(l_proc, 15);
172: l_fct_ret := true;
173: End If;
174: End If;
175: hr_utility.set_location(' Leaving:'||l_proc, 20);
171: hr_utility.set_location(l_proc, 15);
172: l_fct_ret := true;
173: End If;
174: End If;
175: hr_utility.set_location(' Leaving:'||l_proc, 20);
176: Return (l_fct_ret);
177: --
178: End api_updating;
179: --
232: --
233: l_proc varchar2(72) := g_package||'lck';
234: --
235: Begin
236: hr_utility.set_location('Entering:'||l_proc, 5);
237: --
238: -- Add any mandatory argument checking here:
239: -- Example:
240: -- hr_api.mandatory_arg_error
248: Close C_Sel1;
249: --
250: -- The primary key is invalid therefore we must error
251: --
252: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
253: hr_utility.raise_error;
254: End If;
255: Close C_Sel1;
256: If (p_object_version_number <> g_old_rec.object_version_number) Then
249: --
250: -- The primary key is invalid therefore we must error
251: --
252: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
253: hr_utility.raise_error;
254: End If;
255: Close C_Sel1;
256: If (p_object_version_number <> g_old_rec.object_version_number) Then
257: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
253: hr_utility.raise_error;
254: End If;
255: Close C_Sel1;
256: If (p_object_version_number <> g_old_rec.object_version_number) Then
257: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
258: hr_utility.raise_error;
259: End If;
260: --
261: hr_utility.set_location(' Leaving:'||l_proc, 10);
254: End If;
255: Close C_Sel1;
256: If (p_object_version_number <> g_old_rec.object_version_number) Then
257: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
258: hr_utility.raise_error;
259: End If;
260: --
261: hr_utility.set_location(' Leaving:'||l_proc, 10);
262: --
257: hr_utility.set_message(801, 'HR_7155_OBJECT_INVALID');
258: hr_utility.raise_error;
259: End If;
260: --
261: hr_utility.set_location(' Leaving:'||l_proc, 10);
262: --
263: -- We need to trap the ORA LOCK exception
264: --
265: Exception
267: --
268: -- The object is locked therefore we need to supply a meaningful
269: -- error message.
270: --
271: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
272: hr_utility.set_message_token('TABLE_NAME', 'per_assessments');
273: hr_utility.raise_error;
274: End lck;
275: --
268: -- The object is locked therefore we need to supply a meaningful
269: -- error message.
270: --
271: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
272: hr_utility.set_message_token('TABLE_NAME', 'per_assessments');
273: hr_utility.raise_error;
274: End lck;
275: --
276: -- ----------------------------------------------------------------------------
269: -- error message.
270: --
271: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
272: hr_utility.set_message_token('TABLE_NAME', 'per_assessments');
273: hr_utility.raise_error;
274: End lck;
275: --
276: -- ----------------------------------------------------------------------------
277: -- |-----------------------------< convert_args >-----------------------------|
322: l_proc varchar2(72) := g_package||'convert_args';
323: --
324: Begin
325: --
326: hr_utility.set_location('Entering:'||l_proc, 5);
327: --
328: -- Convert arguments into local l_rec structure.
329: hr_utility.set_location(' p_status in convert_args:'||p_status, 10);
330: --
325: --
326: hr_utility.set_location('Entering:'||l_proc, 5);
327: --
328: -- Convert arguments into local l_rec structure.
329: hr_utility.set_location(' p_status in convert_args:'||p_status, 10);
330: --
331: l_rec.assessment_id := p_assessment_id;
332: l_rec.assessment_type_id := p_assessment_type_id;
333: l_rec.business_group_id := p_business_group_id;
367: l_rec.object_version_number := p_object_version_number;
368: --
369: -- Return the plsql record structure.
370: --
371: hr_utility.set_location(' l_rec.status in convert_args:'||l_rec.status, 10);
372: hr_utility.set_location(' p_status in convert_args:'||p_status, 10);
373: hr_utility.set_location(' Leaving:'||l_proc, 10);
374: Return(l_rec);
375: --
368: --
369: -- Return the plsql record structure.
370: --
371: hr_utility.set_location(' l_rec.status in convert_args:'||l_rec.status, 10);
372: hr_utility.set_location(' p_status in convert_args:'||p_status, 10);
373: hr_utility.set_location(' Leaving:'||l_proc, 10);
374: Return(l_rec);
375: --
376: End convert_args;
369: -- Return the plsql record structure.
370: --
371: hr_utility.set_location(' l_rec.status in convert_args:'||l_rec.status, 10);
372: hr_utility.set_location(' p_status in convert_args:'||p_status, 10);
373: hr_utility.set_location(' Leaving:'||l_proc, 10);
374: Return(l_rec);
375: --
376: End convert_args;
377: --