[Home] [Help]
1: Package Body per_cpl_upd as
2: /* $Header: pecplrhi.pkb 120.0.12000000.2 2007/05/30 12:19:15 arumukhe ship $ */
3: --
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
4: -- ----------------------------------------------------------------------------
5: -- | Private Global Definitions |
6: -- ----------------------------------------------------------------------------
7: --
8: g_package varchar2(33) := ' per_cpl_upd.'; -- Global package name
9: --
10: -- ----------------------------------------------------------------------------
11: -- |------------------------------< update_dml >------------------------------|
12: -- ----------------------------------------------------------------------------
343: hr_multi_message.end_validation_set;
344: --
345: -- Call the supporting pre-update operation
346: --
347: per_cpl_upd.pre_update(p_rec);
348: --
349: -- Update the row.
350: --
351: per_cpl_upd.update_dml(p_rec);
347: per_cpl_upd.pre_update(p_rec);
348: --
349: -- Update the row.
350: --
351: per_cpl_upd.update_dml(p_rec);
352: --
353: -- Call the supporting post-update operation
354: --
355: per_cpl_upd.post_update
351: per_cpl_upd.update_dml(p_rec);
352: --
353: -- Call the supporting post-update operation
354: --
355: per_cpl_upd.post_update
356: (p_effective_date
357: ,p_rec
358: );
359: --
398: -- Having converted the arguments into the
399: -- plsql record structure we call the corresponding record
400: -- business process.
401: --
402: per_cpl_upd.upd
403: (p_effective_date
404: ,l_rec
405: );
406: --
439: -- Update the translated values for every matching row
440: -- setting SOURCE_LANG to the specified language.
441: --
442: for l_lang in csr_upd_langs loop
443: per_cpl_upd.upd
444: (p_effective_date => p_effective_date
445: ,p_competence_id => p_competence_id
446: ,p_language => l_lang.language
447: ,p_source_lang => p_language_code
545: raise;
546: --
547: End upd_key_flex_meanings;
548: --
549: end per_cpl_upd;