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 >----------------------------------|
102:
103: l_proc varchar2(72) := g_package||'lck';
104: --
105: Begin
106: hr_utility.set_location('Entering:'||l_proc, 5);
107: --
108: hr_api.mandatory_arg_error
109: (p_api_name => l_proc,
110: p_argument => 'agreement_id',
116: Close C_Sel1;
117: --
118: -- The primary key is invalid therefore we must error
119: --
120: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
121: hr_utility.raise_error;
122: End If;
123: Close C_Sel1;
124: --
117: --
118: -- The primary key is invalid therefore we must error
119: --
120: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
121: hr_utility.raise_error;
122: End If;
123: Close C_Sel1;
124: --
125: hr_utility.set_location(' Leaving:'||l_proc, 10);
121: hr_utility.raise_error;
122: End If;
123: Close C_Sel1;
124: --
125: hr_utility.set_location(' Leaving:'||l_proc, 10);
126: --
127: -- We need to trap the ORA LOCK exception
128: --
129: Exception
131: --
132: -- The object is locked therefore we need to supply a meaningful
133: -- error message.
134: --
135: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
136: hr_utility.set_message_token('TABLE_NAME', 'per_za_learnership_agreements');
137: hr_utility.raise_error;
138: End lck;
139: --
132: -- The object is locked therefore we need to supply a meaningful
133: -- error message.
134: --
135: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
136: hr_utility.set_message_token('TABLE_NAME', 'per_za_learnership_agreements');
137: hr_utility.raise_error;
138: End lck;
139: --
140: -- ----------------------------------------------------------------------------
133: -- error message.
134: --
135: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
136: hr_utility.set_message_token('TABLE_NAME', 'per_za_learnership_agreements');
137: hr_utility.raise_error;
138: End lck;
139: --
140: -- ----------------------------------------------------------------------------
141: -- |-----------------------------< convert_args >-----------------------------|
164: l_proc varchar2(72) := g_package||'convert_args';
165: --
166: Begin
167: --
168: hr_utility.set_location('Entering:'||l_proc, 5);
169: --
170: -- Convert arguments into local l_rec structure.
171: --
172: l_rec.agreement_id := p_agreement_id;
187:
188: --
189: -- Return the plsql record structure.
190: --
191: hr_utility.set_location(' Leaving:'||l_proc, 10);
192: Return(l_rec);
193: --
194: End convert_args;
195: --