DBA Data[Home] [Help]

APPS.PER_ZA_ASS_SHD dependencies on HR_UTILITY

Line 18: hr_utility.set_location('Entering:'||l_proc, 5);

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);

Line 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 >---------------------------|

Line 34: hr_utility.set_location('Entering:'||l_proc, 5);

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;

Line 37: hr_utility.set_message(801, 'HR_51850_ass_ATT_ID_FK');

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;

Line 38: 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

Line 40: hr_utility.set_message(801, 'HR_51851_ass_QUAL_TYPE_ID_FK');

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;

Line 41: 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

Line 43: hr_utility.set_message(801, 'HR_51852_ass_BUS_GRP_ID_FK');

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;

Line 44: 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

Line 46: hr_utility.set_message(801,'HR_51847_ass_REC_EXISTS');

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;

Line 47: 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

Line 49: hr_utility.set_message(801, 'HR_51853_ass_DATE_INV');

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;

Line 50: 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

Line 52: hr_utility.set_message(801, 'HR_51854_ass_QUAL_ID_PK');

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);

Line 53: hr_utility.raise_error;

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);

Line 55: hr_utility.set_message(801, 'HR_7877_API_INVALID_CONSTRAINT');

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;

Line 56: hr_utility.set_message_token('PROCEDURE', l_proc);

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: --

Line 57: hr_utility.set_message_token('CONSTRAINT_NAME', p_constraint_name);

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);

Line 58: 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);
62: End constraint_error;

Line 61: hr_utility.set_location(' Leaving:'||l_proc, 10);

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: -- |---------------------------------< lck >----------------------------------|
65: -- ----------------------------------------------------------------------------

Line 106: hr_utility.set_location('Entering:'||l_proc, 5);

102:
103: l_proc varchar2(72) := g_package||'lck';
104: --
105: Begin
106: hr_utility.set_location('Entering:'||l_proc, 5);
107: --
108: -- Add any mandatory argument checking here:
109: -- Example:
110: -- hr_api.mandatory_arg_error

Line 126: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');

122: Close C_Sel1;
123: --
124: -- The primary key is invalid therefore we must error
125: --
126: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
127: hr_utility.raise_error;
128: End If;
129: Close C_Sel1;
130: --

Line 127: hr_utility.raise_error;

123: --
124: -- The primary key is invalid therefore we must error
125: --
126: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
127: hr_utility.raise_error;
128: End If;
129: Close C_Sel1;
130: --
131: hr_utility.set_location(' Leaving:'||l_proc, 10);

Line 131: hr_utility.set_location(' Leaving:'||l_proc, 10);

127: hr_utility.raise_error;
128: End If;
129: Close C_Sel1;
130: --
131: hr_utility.set_location(' Leaving:'||l_proc, 10);
132: --
133: -- We need to trap the ORA LOCK exception
134: --
135: Exception

Line 141: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');

137: --
138: -- The object is locked therefore we need to supply a meaningful
139: -- error message.
140: --
141: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
142: hr_utility.set_message_token('TABLE_NAME', 'per_za_assessments');
143: hr_utility.raise_error;
144: End lck;
145: --

Line 142: hr_utility.set_message_token('TABLE_NAME', 'per_za_assessments');

138: -- The object is locked therefore we need to supply a meaningful
139: -- error message.
140: --
141: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
142: hr_utility.set_message_token('TABLE_NAME', 'per_za_assessments');
143: hr_utility.raise_error;
144: End lck;
145: --
146: -- ----------------------------------------------------------------------------

Line 143: hr_utility.raise_error;

139: -- error message.
140: --
141: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
142: hr_utility.set_message_token('TABLE_NAME', 'per_za_assessments');
143: hr_utility.raise_error;
144: End lck;
145: --
146: -- ----------------------------------------------------------------------------
147: -- |-----------------------------< convert_args >-----------------------------|

Line 178: hr_utility.set_location('Entering:'||l_proc, 5);

174: l_proc varchar2(72) := g_package||'convert_args';
175: --
176: Begin
177: --
178: hr_utility.set_location('Entering:'||l_proc, 5);
179: --
180: -- Convert arguments into local l_rec structure.
181: --
182: l_rec.assessment_id := p_assessment_id;

Line 207: hr_utility.set_location(' Leaving:'||l_proc, 10);

203:
204: --
205: -- Return the plsql record structure.
206: --
207: hr_utility.set_location(' Leaving:'||l_proc, 10);
208: Return(l_rec);
209: --
210: End convert_args;
211: --

Line 223: hr_utility.set_location(' Entering:'||l_proc, 10);

219: l_proc varchar2(72) := g_package||'validate_record';
220: l_message varchar2(50);
221:
222: begin
223: hr_utility.set_location(' Entering:'||l_proc, 10);
224:
225: -- check that the date from is <= date to
226: if p_date_from is not null and p_date_to is not null and
227: p_date_from > p_date_to

Line 229: hr_utility.set_location(' Entering:'||l_proc, 20);

225: -- check that the date from is <= date to
226: if p_date_from is not null and p_date_to is not null and
227: p_date_from > p_date_to
228: then
229: hr_utility.set_location(' Entering:'||l_proc, 20);
230: l_message := fnd_message.get_string('PAY','PER_74516_DATE_FROM_DATE_TO');
231: fnd_message.set_encoded(l_message);
232: -- l_message := substr(l_message, 1, 30);
233: hr_utility.set_message(801, 'PER_74516_DATE_FROM_DATE_TO');

Line 233: hr_utility.set_message(801, 'PER_74516_DATE_FROM_DATE_TO');

229: hr_utility.set_location(' Entering:'||l_proc, 20);
230: l_message := fnd_message.get_string('PAY','PER_74516_DATE_FROM_DATE_TO');
231: fnd_message.set_encoded(l_message);
232: -- l_message := substr(l_message, 1, 30);
233: hr_utility.set_message(801, 'PER_74516_DATE_FROM_DATE_TO');
234: -- hr_utility.set_message(801,l_message);
235: hr_utility.raise_error;
236: end if;
237:

Line 234: -- hr_utility.set_message(801,l_message);

230: l_message := fnd_message.get_string('PAY','PER_74516_DATE_FROM_DATE_TO');
231: fnd_message.set_encoded(l_message);
232: -- l_message := substr(l_message, 1, 30);
233: hr_utility.set_message(801, 'PER_74516_DATE_FROM_DATE_TO');
234: -- hr_utility.set_message(801,l_message);
235: hr_utility.raise_error;
236: end if;
237:
238: -- check that the date from <= date of assessment

Line 235: hr_utility.raise_error;

231: fnd_message.set_encoded(l_message);
232: -- l_message := substr(l_message, 1, 30);
233: hr_utility.set_message(801, 'PER_74516_DATE_FROM_DATE_TO');
234: -- hr_utility.set_message(801,l_message);
235: hr_utility.raise_error;
236: end if;
237:
238: -- check that the date from <= date of assessment
239: if p_date_from is not null and p_date_of_assessment is not null and

Line 242: hr_utility.set_location(' Entering:'||l_proc, 30);

238: -- check that the date from <= date of assessment
239: if p_date_from is not null and p_date_of_assessment is not null and
240: p_date_from > p_date_of_assessment
241: then
242: hr_utility.set_location(' Entering:'||l_proc, 30);
243: l_message := fnd_message.get_string('PAY','PER_74517_DATE_FROM_DATE_ASS');
244: hr_utility.set_message(801,l_message);
245: hr_utility.raise_error;
246: end if;

Line 244: hr_utility.set_message(801,l_message);

240: p_date_from > p_date_of_assessment
241: then
242: hr_utility.set_location(' Entering:'||l_proc, 30);
243: l_message := fnd_message.get_string('PAY','PER_74517_DATE_FROM_DATE_ASS');
244: hr_utility.set_message(801,l_message);
245: hr_utility.raise_error;
246: end if;
247:
248: -- check that the date of assessment <= date to

Line 245: hr_utility.raise_error;

241: then
242: hr_utility.set_location(' Entering:'||l_proc, 30);
243: l_message := fnd_message.get_string('PAY','PER_74517_DATE_FROM_DATE_ASS');
244: hr_utility.set_message(801,l_message);
245: hr_utility.raise_error;
246: end if;
247:
248: -- check that the date of assessment <= date to
249: if p_date_of_assessment is not null and p_date_to is not null and

Line 252: hr_utility.set_location(' Entering:'||l_proc, 40);

248: -- check that the date of assessment <= date to
249: if p_date_of_assessment is not null and p_date_to is not null and
250: p_date_of_assessment > p_date_to
251: then
252: hr_utility.set_location(' Entering:'||l_proc, 40);
253: l_message := fnd_message.get_string('PAY','PER_74518_DATE_ASS_DATE_TO');
254: hr_utility.set_message(801,l_message);
255: hr_utility.raise_error;
256: end if;

Line 254: hr_utility.set_message(801,l_message);

250: p_date_of_assessment > p_date_to
251: then
252: hr_utility.set_location(' Entering:'||l_proc, 40);
253: l_message := fnd_message.get_string('PAY','PER_74518_DATE_ASS_DATE_TO');
254: hr_utility.set_message(801,l_message);
255: hr_utility.raise_error;
256: end if;
257:
258: -- check that the certification date >= date of assessment

Line 255: hr_utility.raise_error;

251: then
252: hr_utility.set_location(' Entering:'||l_proc, 40);
253: l_message := fnd_message.get_string('PAY','PER_74518_DATE_ASS_DATE_TO');
254: hr_utility.set_message(801,l_message);
255: hr_utility.raise_error;
256: end if;
257:
258: -- check that the certification date >= date of assessment
259: if p_certification_date is not null and p_date_of_assessment is not null and

Line 262: hr_utility.set_location(' Entering:'||l_proc, 50);

258: -- check that the certification date >= date of assessment
259: if p_certification_date is not null and p_date_of_assessment is not null and
260: p_certification_date < p_date_of_assessment
261: then
262: hr_utility.set_location(' Entering:'||l_proc, 50);
263: l_message := fnd_message.get_string('PAY','PER_74519_DATE_CERT_DATE_ASS');
264: hr_utility.set_message(801,l_message);
265: hr_utility.raise_error;
266: end if;

Line 264: hr_utility.set_message(801,l_message);

260: p_certification_date < p_date_of_assessment
261: then
262: hr_utility.set_location(' Entering:'||l_proc, 50);
263: l_message := fnd_message.get_string('PAY','PER_74519_DATE_CERT_DATE_ASS');
264: hr_utility.set_message(801,l_message);
265: hr_utility.raise_error;
266: end if;
267:
268: -- check that the date of accreditation <= certification date

Line 265: hr_utility.raise_error;

261: then
262: hr_utility.set_location(' Entering:'||l_proc, 50);
263: l_message := fnd_message.get_string('PAY','PER_74519_DATE_CERT_DATE_ASS');
264: hr_utility.set_message(801,l_message);
265: hr_utility.raise_error;
266: end if;
267:
268: -- check that the date of accreditation <= certification date
269: if p_date_of_accreditation is not null and p_certification_date is not null and

Line 272: hr_utility.set_location(' Entering:'||l_proc, 60);

268: -- check that the date of accreditation <= certification date
269: if p_date_of_accreditation is not null and p_certification_date is not null and
270: p_date_of_accreditation < p_certification_date
271: then
272: hr_utility.set_location(' Entering:'||l_proc, 60);
273: l_message := fnd_message.get_string('PAY','PER_74520_DATE_ACCR_DATE_CERT');
274: hr_utility.set_message(801,l_message);
275: hr_utility.raise_error;
276: end if;

Line 274: hr_utility.set_message(801,l_message);

270: p_date_of_accreditation < p_certification_date
271: then
272: hr_utility.set_location(' Entering:'||l_proc, 60);
273: l_message := fnd_message.get_string('PAY','PER_74520_DATE_ACCR_DATE_CERT');
274: hr_utility.set_message(801,l_message);
275: hr_utility.raise_error;
276: end if;
277:
278: -- check that the certification date < certification date

Line 275: hr_utility.raise_error;

271: then
272: hr_utility.set_location(' Entering:'||l_proc, 60);
273: l_message := fnd_message.get_string('PAY','PER_74520_DATE_ACCR_DATE_CERT');
274: hr_utility.set_message(801,l_message);
275: hr_utility.raise_error;
276: end if;
277:
278: -- check that the certification date < certification date
279: if p_certification_expiry_date is not null and p_certification_date is not null and

Line 282: hr_utility.set_location(' Entering:'||l_proc, 70);

278: -- check that the certification date < certification date
279: if p_certification_expiry_date is not null and p_certification_date is not null and
280: p_certification_expiry_date >= p_certification_date
281: then
282: hr_utility.set_location(' Entering:'||l_proc, 70);
283: l_message := fnd_message.get_string('PAY','PER_74521_EXP_DATE_CERT_DATE');
284: hr_utility.set_message(801,l_message);
285: hr_utility.raise_error;
286: end if;

Line 284: hr_utility.set_message(801,l_message);

280: p_certification_expiry_date >= p_certification_date
281: then
282: hr_utility.set_location(' Entering:'||l_proc, 70);
283: l_message := fnd_message.get_string('PAY','PER_74521_EXP_DATE_CERT_DATE');
284: hr_utility.set_message(801,l_message);
285: hr_utility.raise_error;
286: end if;
287:
288: hr_utility.set_location(' Leaving:'||l_proc, 80);

Line 285: hr_utility.raise_error;

281: then
282: hr_utility.set_location(' Entering:'||l_proc, 70);
283: l_message := fnd_message.get_string('PAY','PER_74521_EXP_DATE_CERT_DATE');
284: hr_utility.set_message(801,l_message);
285: hr_utility.raise_error;
286: end if;
287:
288: hr_utility.set_location(' Leaving:'||l_proc, 80);
289: end validate_record;

Line 288: hr_utility.set_location(' Leaving:'||l_proc, 80);

284: hr_utility.set_message(801,l_message);
285: hr_utility.raise_error;
286: end if;
287:
288: hr_utility.set_location(' Leaving:'||l_proc, 80);
289: end validate_record;
290:
291: end per_za_ass_shd;