65: l_proc varchar2(72) := g_package||'dt_update_dml';
66: l_status_of_dml boolean;
67: --
68: Begin
69: hr_utility.set_location('Entering:'||l_proc, 5);
70: --
71: If (p_datetrack_mode = hr_api.g_correction) then
72: --
73: hr_utility.set_location(l_proc, 10);
69: hr_utility.set_location('Entering:'||l_proc, 5);
70: --
71: If (p_datetrack_mode = hr_api.g_correction) then
72: --
73: hr_utility.set_location(l_proc, 10);
74: hr_utility.trace('In CORRECTION , p_effective_date : '||to_char(p_effective_date));
75: --
76: -- Because we are updating a row we must get the next object
77: -- version number.
70: --
71: If (p_datetrack_mode = hr_api.g_correction) then
72: --
73: hr_utility.set_location(l_proc, 10);
74: hr_utility.trace('In CORRECTION , p_effective_date : '||to_char(p_effective_date));
75: --
76: -- Because we are updating a row we must get the next object
77: -- version number.
78: --
182: p_rec.effective_end_date := p_validation_end_date;
183: --
184: if (l_status_of_dml) then
185: --
186: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
187: hr_utility.set_message_token('PROCEDURE',
188: 'pay_payrolls_f_pkg.update_row');
189: hr_utility.set_message_token('STEP','1');
190: hr_utility.raise_error;
183: --
184: if (l_status_of_dml) then
185: --
186: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
187: hr_utility.set_message_token('PROCEDURE',
188: 'pay_payrolls_f_pkg.update_row');
189: hr_utility.set_message_token('STEP','1');
190: hr_utility.raise_error;
191: --
185: --
186: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
187: hr_utility.set_message_token('PROCEDURE',
188: 'pay_payrolls_f_pkg.update_row');
189: hr_utility.set_message_token('STEP','1');
190: hr_utility.raise_error;
191: --
192: End if;
193: --
186: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
187: hr_utility.set_message_token('PROCEDURE',
188: 'pay_payrolls_f_pkg.update_row');
189: hr_utility.set_message_token('STEP','1');
190: hr_utility.raise_error;
191: --
192: End if;
193: --
194: End If;
192: End if;
193: --
194: End If;
195: --
196: hr_utility.set_location(' Leaving:'||l_proc, 15);
197: Exception
198: When hr_api.check_integrity_violated Then
199: -- A check constraint has been violated
200: pay_pay_shd.g_api_dml := false; -- Unset the api dml status
251: --
252: l_proc varchar2(72) := g_package||'update_dml';
253: --
254: Begin
255: hr_utility.set_location('Entering:'||l_proc, 5);
256: --
257: pay_pay_upd.dt_update_dml
258: (p_rec => p_rec
259: ,p_effective_date => p_effective_date
261: ,p_validation_start_date => p_validation_start_date
262: ,p_validation_end_date => p_validation_end_date
263: );
264: --
265: hr_utility.set_location(' Leaving:'||l_proc, 10);
266: End update_dml;
267: --
268: -- ----------------------------------------------------------------------------
269: -- |----------------------------< dt_pre_update >-----------------------------|
319: l_proc varchar2(72) := g_package||'dt_pre_update';
320: l_dummy_version_number number;
321: --
322: Begin
323: hr_utility.set_location('Entering:'||l_proc, 5);
324: If (p_datetrack_mode <> hr_api.g_correction) then
325: --
326: -- Update the current effective end date
327: --
358: ,p_validation_start_date => p_validation_start_date
359: ,p_validation_end_date => p_validation_end_date
360: );
361: End If;
362: hr_utility.set_location(' Leaving:'||l_proc, 20);
363:
364: Exception
365: When Others Then
366: pay_pay_shd.g_api_dml := false; -- Unset the api dml status
410: --
411: l_proc varchar2(72) := g_package||'pre_update';
412: --
413: Begin
414: hr_utility.set_location('Entering:'||l_proc, 5);
415: --
416: --
417: -- Insert the comment text if comments exist
418: --
459: ,p_validation_start_date => p_validation_start_date
460: ,p_validation_end_date => p_validation_end_date
461: );
462: --
463: hr_utility.set_location(' Leaving:'||l_proc, 10);
464: End pre_update;
465: --
466: -- ----------------------------------------------------------------------------
467: -- |----------------------------< post_update >-------------------------------|
505: --
506: l_proc varchar2(72) := g_package||'post_update';
507: --
508: Begin
509: hr_utility.set_location('Entering:'||l_proc, 5);
510: begin
511: --
512:
513:
729: ,p_hook_type => 'AU');
730: --
731: end;
732: --
733: hr_utility.set_location(' Leaving:'||l_proc, 10);
734: --
735: End post_update;
736: --
737: -- ----------------------------------------------------------------------------
1280: l_validation_end_date date;
1281: l_rec pay_pay_shd.g_rec_type := p_rec;
1282: --
1283: Begin
1284: hr_utility.set_location('Entering:'||l_proc, 5);
1285: --
1286: -- Ensure that the DateTrack update mode is valid
1287: --
1288: dt_api.validate_dt_upd_mode(p_datetrack_mode => p_datetrack_mode);
1461: l_rec pay_pay_shd.g_rec_type;
1462: l_proc varchar2(72) := g_package||'upd';
1463: --
1464: Begin
1465: hr_utility.set_location('Entering:'||l_proc, 5);
1466: --
1467: -- Call conversion function to turn arguments into the
1468: -- l_rec structure.
1469: --
1570: p_effective_start_date := l_rec.effective_start_date;
1571: p_effective_end_date := l_rec.effective_end_date;
1572: p_comment_id := l_rec.comment_id;
1573: --
1574: hr_utility.set_location(' Leaving:'||l_proc, 10);
1575: End upd;
1576: --
1577: end pay_pay_upd;