15: --
16: l_proc varchar2(72) := g_package||'return_api_dml_status';
17: --
18: Begin
19: hr_utility.set_location('Entering:'||l_proc, 5);
20: --
21: Return (nvl(g_api_dml, false));
22: --
23: hr_utility.set_location(' Leaving:'||l_proc, 10);
19: hr_utility.set_location('Entering:'||l_proc, 5);
20: --
21: Return (nvl(g_api_dml, false));
22: --
23: hr_utility.set_location(' Leaving:'||l_proc, 10);
24: End return_api_dml_status;
25: --
26: -- ----------------------------------------------------------------------------
27: -- |---------------------------< constraint_error >---------------------------|
31: --
32: l_proc varchar2(72) := g_package||'constraint_error';
33: --
34: Begin
35: hr_utility.set_location('Entering:'||l_proc, 5);
36: --
37: If (p_constraint_name = 'OTA_EVENT_ASSOCIATIONS_PK') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
34: Begin
35: hr_utility.set_location('Entering:'||l_proc, 5);
36: --
37: If (p_constraint_name = 'OTA_EVENT_ASSOCIATIONS_PK') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','5');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'OTA_EVENT_ASSOCIATIONS_UK2') Then
35: hr_utility.set_location('Entering:'||l_proc, 5);
36: --
37: If (p_constraint_name = 'OTA_EVENT_ASSOCIATIONS_PK') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','5');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'OTA_EVENT_ASSOCIATIONS_UK2') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
36: --
37: If (p_constraint_name = 'OTA_EVENT_ASSOCIATIONS_PK') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','5');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'OTA_EVENT_ASSOCIATIONS_UK2') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
37: If (p_constraint_name = 'OTA_EVENT_ASSOCIATIONS_PK') Then
38: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','5');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'OTA_EVENT_ASSOCIATIONS_UK2') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','10');
39: hr_utility.set_message_token('PROCEDURE', l_proc);
40: hr_utility.set_message_token('STEP','5');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'OTA_EVENT_ASSOCIATIONS_UK2') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','10');
46: hr_utility.raise_error;
47: Elsif (p_constraint_name = 'OTA_TEA_CHECK_KEYS') then
40: hr_utility.set_message_token('STEP','5');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'OTA_EVENT_ASSOCIATIONS_UK2') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','10');
46: hr_utility.raise_error;
47: Elsif (p_constraint_name = 'OTA_TEA_CHECK_KEYS') then
48: fnd_message.set_name('OTA','OTA_13528_TEA_INVALID_KEY');
41: hr_utility.raise_error;
42: ElsIf (p_constraint_name = 'OTA_EVENT_ASSOCIATIONS_UK2') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','10');
46: hr_utility.raise_error;
47: Elsif (p_constraint_name = 'OTA_TEA_CHECK_KEYS') then
48: fnd_message.set_name('OTA','OTA_13528_TEA_INVALID_KEY');
49: fnd_message.raise_error;
42: ElsIf (p_constraint_name = 'OTA_EVENT_ASSOCIATIONS_UK2') Then
43: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
44: hr_utility.set_message_token('PROCEDURE', l_proc);
45: hr_utility.set_message_token('STEP','10');
46: hr_utility.raise_error;
47: Elsif (p_constraint_name = 'OTA_TEA_CHECK_KEYS') then
48: fnd_message.set_name('OTA','OTA_13528_TEA_INVALID_KEY');
49: fnd_message.raise_error;
50: Else
47: Elsif (p_constraint_name = 'OTA_TEA_CHECK_KEYS') then
48: fnd_message.set_name('OTA','OTA_13528_TEA_INVALID_KEY');
49: fnd_message.raise_error;
50: Else
51: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
52: hr_utility.set_message_token('PROCEDURE', l_proc);
53: hr_utility.set_message_token('STEP','15');
54: hr_utility.raise_error;
55: End If;
48: fnd_message.set_name('OTA','OTA_13528_TEA_INVALID_KEY');
49: fnd_message.raise_error;
50: Else
51: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
52: hr_utility.set_message_token('PROCEDURE', l_proc);
53: hr_utility.set_message_token('STEP','15');
54: hr_utility.raise_error;
55: End If;
56: --
49: fnd_message.raise_error;
50: Else
51: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
52: hr_utility.set_message_token('PROCEDURE', l_proc);
53: hr_utility.set_message_token('STEP','15');
54: hr_utility.raise_error;
55: End If;
56: --
57: hr_utility.set_location(' Leaving:'||l_proc, 10);
50: Else
51: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
52: hr_utility.set_message_token('PROCEDURE', l_proc);
53: hr_utility.set_message_token('STEP','15');
54: hr_utility.raise_error;
55: End If;
56: --
57: hr_utility.set_location(' Leaving:'||l_proc, 10);
58: End constraint_error;
53: hr_utility.set_message_token('STEP','15');
54: hr_utility.raise_error;
55: End If;
56: --
57: hr_utility.set_location(' Leaving:'||l_proc, 10);
58: End constraint_error;
59: --
60: -- ----------------------------------------------------------------------------
61: -- |-----------------------------< api_updating >-----------------------------|
104: l_proc varchar2(72) := g_package||'api_updating';
105: l_fct_ret boolean;
106: --
107: Begin
108: hr_utility.set_location('Entering:'||l_proc, 5);
109: --
110: If (
111: p_event_association_id is null
112: ) Then
118: Else
119: If (
120: p_event_association_id = g_old_rec.event_association_id
121: ) Then
122: hr_utility.set_location(l_proc, 10);
123: --
124: -- The g_old_rec is current therefore we must
125: -- set the returning function to true
126: --
135: Close C_Sel1;
136: --
137: -- The primary key is invalid therefore we must error
138: --
139: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
140: hr_utility.raise_error;
141: End If;
142: Close C_Sel1;
143: --
136: --
137: -- The primary key is invalid therefore we must error
138: --
139: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
140: hr_utility.raise_error;
141: End If;
142: Close C_Sel1;
143: --
144: hr_utility.set_location(l_proc, 15);
140: hr_utility.raise_error;
141: End If;
142: Close C_Sel1;
143: --
144: hr_utility.set_location(l_proc, 15);
145: l_fct_ret := true;
146: End If;
147: End If;
148: hr_utility.set_location(' Leaving:'||l_proc, 20);
144: hr_utility.set_location(l_proc, 15);
145: l_fct_ret := true;
146: End If;
147: End If;
148: hr_utility.set_location(' Leaving:'||l_proc, 20);
149: Return (l_fct_ret);
150: --
151: End api_updating;
152: --
207: --
208: l_proc varchar2(72) := g_package||'lck';
209: --
210: Begin
211: hr_utility.set_location('Entering:'||l_proc, 5);
212: --
213: -- Add any mandatory argument checking here:
214: -- Example:
215: -- hr_api.mandatory_arg_error
216: -- (p_api_name => l_proc,
217: -- p_argument => 'object_version_number',
218: -- p_argument_value => p_object_version_number);
219: --
220: hr_utility.trace('Event Association ID is '||to_char(p_event_association_id));
221: Open C_Sel1;
222: Fetch C_Sel1 Into g_old_rec;
223: If C_Sel1%notfound then
224: Close C_Sel1;
224: Close C_Sel1;
225: --
226: -- The primary key is invalid therefore we must error
227: --
228: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
229: hr_utility.raise_error;
230: End If;
231: Close C_Sel1;
232: --
225: --
226: -- The primary key is invalid therefore we must error
227: --
228: hr_utility.set_message(801, 'HR_7220_INVALID_PRIMARY_KEY');
229: hr_utility.raise_error;
230: End If;
231: Close C_Sel1;
232: --
233: if p_booking_id is not null then
236: ,p_object_version_number => p_tdb_object_version_number
237: );
238: end if;
239: --
240: hr_utility.set_location(' Leaving:'||l_proc, 10);
241: --
242: -- We need to trap the ORA LOCK exception
243: --
244: Exception
246: --
247: -- The object is locked therefore we need to supply a meaningful
248: -- error message.
249: --
250: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
251: hr_utility.set_message_token('TABLE_NAME', 'ota_event_associations');
252: hr_utility.raise_error;
253: End lck;
254: --
247: -- The object is locked therefore we need to supply a meaningful
248: -- error message.
249: --
250: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
251: hr_utility.set_message_token('TABLE_NAME', 'ota_event_associations');
252: hr_utility.raise_error;
253: End lck;
254: --
255: -- ----------------------------------------------------------------------------
248: -- error message.
249: --
250: hr_utility.set_message(801, 'HR_7165_OBJECT_LOCKED');
251: hr_utility.set_message_token('TABLE_NAME', 'ota_event_associations');
252: hr_utility.raise_error;
253: End lck;
254: --
255: -- ----------------------------------------------------------------------------
256: -- |-----------------------------< convert_args >-----------------------------|
292: l_proc varchar2(72) := g_package||'convert_args';
293: --
294: Begin
295: --
296: hr_utility.set_location('Entering:'||l_proc, 5);
297: --
298: -- Convert arguments into local l_rec structure.
299: --
300: l_rec.event_association_id := p_event_association_id;
327: l_rec.tea_information20 := p_tea_information20;
328: --
329: -- Return the plsql record structure.
330: --
331: hr_utility.set_location(' Leaving:'||l_proc, 10);
332: Return(l_rec);
333: --
334: End convert_args;
335: --