53: -- ----------------------------------------------------------------------------
54: Procedure update_dml(p_rec in out nocopy ff_arc_shd.g_rec_type) is
55: --
56: l_proc varchar2(72) := g_package||'update_dml';
57: l_last_update_date ff_archive_items.last_update_date%TYPE;
58: l_last_updated_by ff_archive_items.last_updated_by%TYPE;
59: l_last_update_login ff_archive_items.last_update_login%TYPE;
60: --
61: Begin
54: Procedure update_dml(p_rec in out nocopy ff_arc_shd.g_rec_type) is
55: --
56: l_proc varchar2(72) := g_package||'update_dml';
57: l_last_update_date ff_archive_items.last_update_date%TYPE;
58: l_last_updated_by ff_archive_items.last_updated_by%TYPE;
59: l_last_update_login ff_archive_items.last_update_login%TYPE;
60: --
61: Begin
62: hr_utility.set_location('Entering:'||l_proc, 5);
55: --
56: l_proc varchar2(72) := g_package||'update_dml';
57: l_last_update_date ff_archive_items.last_update_date%TYPE;
58: l_last_updated_by ff_archive_items.last_updated_by%TYPE;
59: l_last_update_login ff_archive_items.last_update_login%TYPE;
60: --
61: Begin
62: hr_utility.set_location('Entering:'||l_proc, 5);
63: --
72: l_last_update_date := sysdate;
73: l_last_updated_by := fnd_global.user_id;
74: l_last_update_login := fnd_global.login_id;
75: --
76: -- Update the ff_archive_items Row
77: --
78: update ff_archive_items
79: set
80: archive_item_id = p_rec.archive_item_id,
74: l_last_update_login := fnd_global.login_id;
75: --
76: -- Update the ff_archive_items Row
77: --
78: update ff_archive_items
79: set
80: archive_item_id = p_rec.archive_item_id,
81: value = p_rec.value,
82: last_update_date = l_last_update_date,