[Home] [Help]
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 = 'BEN_ELIG_PRBTN_PERD_PRTE_F_FK1') Then
37: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
38: fnd_message.set_token('PROCEDURE', l_proc);
49: fnd_message.set_token('CONSTRAINT_NAME', p_constraint_name);
50: fnd_message.raise_error;
51: End If;
52: --
53: hr_utility.set_location(' Leaving:'||l_proc, 10);
54: End constraint_error;
55: --
56: -- ----------------------------------------------------------------------------
57: -- |-----------------------------< api_updating >-----------------------------|
118: l_proc varchar2(72) := g_package||'api_updating';
119: l_fct_ret boolean;
120: --
121: Begin
122: hr_utility.set_location('Entering:'||l_proc, 5);
123: --
124: If (p_effective_date is null or
125: p_ELIG_PRBTN_PERD_PRTE_id is null or
126: p_object_version_number is null) Then
131: l_fct_ret := false;
132: Else
133: If (p_ELIG_PRBTN_PERD_PRTE_id = g_old_rec.ELIG_PRBTN_PERD_PRTE_id and
134: p_object_version_number = g_old_rec.object_version_number) Then
135: hr_utility.set_location(l_proc, 10);
136: --
137: -- The g_old_rec is current therefore we must
138: -- set the returning function to true
139: --
156: If (p_object_version_number <> g_old_rec.object_version_number) Then
157: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
158: fnd_message.raise_error;
159: End If;
160: hr_utility.set_location(l_proc, 15);
161: l_fct_ret := true;
162: End If;
163: End If;
164: hr_utility.set_location(' Leaving:'||l_proc, 20);
160: hr_utility.set_location(l_proc, 15);
161: l_fct_ret := true;
162: End If;
163: End If;
164: hr_utility.set_location(' Leaving:'||l_proc, 20);
165: Return (l_fct_ret);
166: --
167: End api_updating;
168: --
182: --
183: --
184: --
185: Begin
186: hr_utility.set_location('Entering:'||l_proc, 5);
187: --
188: --
189: -- Call the corresponding datetrack api
190: --
197: p_delete => p_delete,
198: p_future_change => p_future_change,
199: p_delete_next_change => p_delete_next_change);
200: --
201: hr_utility.set_location(' Leaving:'||l_proc, 10);
202: End find_dt_del_modes;
203: --
204: -- ----------------------------------------------------------------------------
205: -- |--------------------------< find_dt_upd_modes >---------------------------|
214: --
215: l_proc varchar2(72) := g_package||'find_dt_upd_modes';
216: --
217: Begin
218: hr_utility.set_location('Entering:'||l_proc, 5);
219: --
220: -- Call the corresponding datetrack api
221: --
222: dt_api.find_dt_upd_modes
228: p_update => p_update,
229: p_update_override => p_update_override,
230: p_update_change_insert => p_update_change_insert);
231: --
232: hr_utility.set_location(' Leaving:'||l_proc, 10);
233: End find_dt_upd_modes;
234: --
235: -- ----------------------------------------------------------------------------
236: -- |------------------------< upd_effective_end_date >------------------------|
246: l_proc varchar2(72) := g_package||'upd_effective_end_date';
247: l_object_version_number number;
248: --
249: Begin
250: hr_utility.set_location('Entering:'||l_proc, 5);
251: --
252: -- Because we are updating a row we must get the next object
253: -- version number.
254: --
257: (p_base_table_name => 'ben_ELIG_PRBTN_PERD_PRTE_f',
258: p_base_key_column => 'ELIG_PRBTN_PERD_PRTE_id',
259: p_base_key_value => p_base_key_value);
260: --
261: hr_utility.set_location(l_proc, 10);
262: g_api_dml := true; -- Set the api dml status
263: --
264: -- Update the specified datetrack row setting the effective
265: -- end date to the specified new effective end date.
272: between t.effective_start_date and t.effective_end_date;
273: --
274: g_api_dml := false; -- Unset the api dml status
275: p_object_version_number := l_object_version_number;
276: hr_utility.set_location(' Leaving:'||l_proc, 15);
277: --
278: Exception
279: When Others Then
280: g_api_dml := false; -- Unset the api dml status
354: --
355: --
356: --
357: Begin
358: hr_utility.set_location('Entering:'||l_proc, 5);
359: --
360: -- Ensure that all the mandatory arguments are not null
361: --
362: hr_api.mandatory_arg_error(p_api_name => l_proc,
395: If (p_object_version_number <> g_old_rec.object_version_number) Then
396: fnd_message.set_name('PAY', 'HR_7155_OBJECT_INVALID');
397: fnd_message.raise_error;
398: End If;
399: hr_utility.set_location(l_proc, 15);
400: --
401: --
402: -- Validate the datetrack mode mode getting the validation start
403: -- and end dates for the specified datetrack operation.
428: --
429: p_validation_start_date := l_validation_start_date;
430: p_validation_end_date := l_validation_end_date;
431: --
432: hr_utility.set_location(' Leaving:'||l_proc, 30);
433: --
434: -- We need to trap the ORA LOCK exception
435: --
436: Exception
506: l_proc varchar2(72) := g_package||'convert_args';
507: --
508: Begin
509: --
510: hr_utility.set_location('Entering:'||l_proc, 5);
511: --
512: -- Convert arguments into local l_rec structure.
513: --
514: l_rec.ELIG_PRBTN_PERD_PRTE_id := p_ELIG_PRBTN_PERD_PRTE_id;
556: l_rec.criteria_weight := p_criteria_weight;
557: --
558: -- Return the plsql record structure.
559: --
560: hr_utility.set_location(' Leaving:'||l_proc, 10);
561: Return(l_rec);
562: --
563: End convert_args;
564: --