63: --
64: l_proc varchar2(72) := g_package||'dt_update_dml';
65: --
66: Begin
67: hr_utility.set_location('Entering:'||l_proc, 5);
68: --
69: If (p_datetrack_mode = 'CORRECTION') then
70: hr_utility.set_location(l_proc, 10);
71: --
66: Begin
67: hr_utility.set_location('Entering:'||l_proc, 5);
68: --
69: If (p_datetrack_mode = 'CORRECTION') then
70: hr_utility.set_location(l_proc, 10);
71: --
72: -- Because we are updating a row we must get the next object
73: -- version number.
74: --
176: p_rec.effective_start_date := p_validation_start_date;
177: p_rec.effective_end_date := p_validation_end_date;
178: End If;
179: --
180: hr_utility.set_location(' Leaving:'||l_proc, 15);
181: Exception
182: When hr_api.check_integrity_violated Then
183: -- A check constraint has been violated
184: pay_cty_shd.g_api_dml := false; -- Unset the api dml status
234: --
235: l_proc varchar2(72) := g_package||'update_dml';
236: --
237: Begin
238: hr_utility.set_location('Entering:'||l_proc, 5);
239: --
240: dt_update_dml(p_rec => p_rec,
241: p_effective_date => p_effective_date,
242: p_datetrack_mode => p_datetrack_mode,
242: p_datetrack_mode => p_datetrack_mode,
243: p_validation_start_date => p_validation_start_date,
244: p_validation_end_date => p_validation_end_date);
245: --
246: hr_utility.set_location(' Leaving:'||l_proc, 10);
247: End update_dml;
248: --
249: -- ----------------------------------------------------------------------------
250: -- |----------------------------< dt_pre_update >-----------------------------|
299: l_proc varchar2(72) := g_package||'dt_pre_update';
300: l_dummy_version_number number;
301: --
302: Begin
303: hr_utility.set_location('Entering:'||l_proc, 5);
304: If (p_datetrack_mode <> 'CORRECTION') then
305: hr_utility.set_location(l_proc, 10);
306: --
307: -- Update the current effective end date
301: --
302: Begin
303: hr_utility.set_location('Entering:'||l_proc, 5);
304: If (p_datetrack_mode <> 'CORRECTION') then
305: hr_utility.set_location(l_proc, 10);
306: --
307: -- Update the current effective end date
308: --
309: pay_cty_shd.upd_effective_end_date
314: p_validation_end_date => p_validation_end_date,
315: p_object_version_number => l_dummy_version_number);
316: --
317: If (p_datetrack_mode = 'UPDATE_OVERRIDE') then
318: hr_utility.set_location(l_proc, 15);
319: --
320: -- As the datetrack mode is 'UPDATE_OVERRIDE' then we must
321: -- delete any future rows
322: --
326: p_datetrack_mode => p_datetrack_mode,
327: p_validation_start_date => p_validation_start_date,
328: p_validation_end_date => p_validation_end_date);
329: End If;
330: hr_utility.set_location(l_proc, 20);
331: --
332: -- We must now insert the updated row
333: --
334: pay_cty_ins.insert_dml
337: p_datetrack_mode => p_datetrack_mode,
338: p_validation_start_date => p_validation_start_date,
339: p_validation_end_date => p_validation_end_date);
340: End If;
341: hr_utility.set_location(' Leaving:'||l_proc, 20);
342: End dt_pre_update;
343: --
344: -- ----------------------------------------------------------------------------
345: -- |------------------------------< pre_update >------------------------------|
383: --
384: l_proc varchar2(72) := g_package||'pre_update';
385: --
386: Begin
387: hr_utility.set_location('Entering:'||l_proc, 5);
388: --
389: --
390: --
391: dt_pre_update
394: p_datetrack_mode => p_datetrack_mode,
395: p_validation_start_date => p_validation_start_date,
396: p_validation_end_date => p_validation_end_date);
397: --
398: hr_utility.set_location(' Leaving:'||l_proc, 10);
399: End pre_update;
400: --
401: -- ----------------------------------------------------------------------------
402: -- |-----------------------------< post_update >------------------------------|
439: --
440: l_proc varchar2(72) := g_package||'post_update';
441: --
442: Begin
443: hr_utility.set_location('Entering:'||l_proc, 5);
444: --
445: --
446: -- Start of API User Hook for post_update.
447: --
505: --
506: -- End of API User Hook for post_update.
507: --
508: --
509: hr_utility.set_location(' Leaving:'||l_proc, 10);
510: End post_update;
511: --
512: -- ----------------------------------------------------------------------------
513: -- |-----------------------------< convert_defs >-----------------------------|
557: l_proc varchar2(72) := g_package||'convert_defs';
558: --
559: Begin
560: --
561: hr_utility.set_location('Entering:'||l_proc, 5);
562: --
563: -- We must now examine each argument value in the
564: -- p_rec plsql record structure
565: -- to see if a system default is being used. If a system default
882: pay_cty_shd.g_old_rec.cty_information30;
883: End If;
884:
885: --
886: hr_utility.set_location(' Leaving:'||l_proc, 10);
887: --
888: End convert_defs;
889: --
890: -- ----------------------------------------------------------------------------
901: l_validation_start_date date;
902: l_validation_end_date date;
903: --
904: Begin
905: hr_utility.set_location('Entering:'||l_proc, 5);
906: --
907: -- Ensure that the DateTrack update mode is valid
908: --
909: dt_api.validate_dt_upd_mode(p_datetrack_mode => p_datetrack_mode);
1049: l_rec pay_cty_shd.g_rec_type;
1050: l_proc varchar2(72) := g_package||'upd';
1051: --
1052: Begin
1053: hr_utility.set_location('Entering:'||l_proc, 5);
1054: --
1055: -- Call conversion function to turn arguments into the
1056: -- l_rec structure.
1057: --
1152: p_effective_start_date := l_rec.effective_start_date;
1153: p_effective_end_date := l_rec.effective_end_date;
1154: --
1155: --
1156: hr_utility.set_location(' Leaving:'||l_proc, 10);
1157: End upd;
1158: --
1159: --
1160: end pay_cty_upd;