[Home] [Help]
63: Procedure correct_perana_row( p_perana_data in out nocopy per_person_analyses%rowtype);
64:
65: Procedure Correct_posnei_row (p_posnei_data in out nocopy per_position_extra_info%rowtype);
66:
67: Procedure Correct_posn_row (p_posn_data in out nocopy hr_all_positions_f%rowtype);
68:
69: Procedure Correct_asgnei_row (
70: p_asgnei_data in out nocopy per_assignment_extra_info%rowtype);
71:
1406: Procedure Cascade_posn (
1407: p_post_record in ghr_pa_history%rowtype) is
1408:
1409: l_hist_posn_data ghr_pa_history%rowtype;
1410: l_posn_data hr_all_positions_f%rowtype;
1411: l_result_code varchar2(30);
1412: l_proc varchar2(30):='Cascade_posn';
1413:
1414: Begin
1447: -- ---------------------------------------------------------------------------
1448: -- {Start Of Comments}
1449: --
1450: -- Description:
1451: -- This procedure cascades data changes in hr_all_positions_f core application table. If the
1452: -- current action made changes to hr_all_positions_f and there were changes following it, this procedure
1453: -- will correctly 'cascade' those changes to all following records. This procedure can
1454: -- be called in either 'retroactive' (p_post_record values will be cascaded) or 'cancel'
1455: -- (p_pre_record values will be cascaded) mode.
1448: -- {Start Of Comments}
1449: --
1450: -- Description:
1451: -- This procedure cascades data changes in hr_all_positions_f core application table. If the
1452: -- current action made changes to hr_all_positions_f and there were changes following it, this procedure
1453: -- will correctly 'cascade' those changes to all following records. This procedure can
1454: -- be called in either 'retroactive' (p_post_record values will be cascaded) or 'cancel'
1455: -- (p_pre_record values will be cascaded) mode.
1456: --
1490: p_hist_data_as_of_date in ghr_pa_history%rowtype
1491: ) is
1492:
1493: l_true_false ghr_history_cascade.condition_rg_type;
1494: l_posn_data hr_all_positions_f%rowtype;
1495: l_hist_posn_data ghr_pa_history%rowtype;
1496: l_stop Boolean;
1497: l_proc varchar2(30):='Cascade_posn';
1498:
1498:
1499: -- this cursor is meant to retrieve all following records in per_assignments_f table.
1500: Cursor c_posn( c_date_Effective in date, c_posn_id in number) is
1501: Select *
1502: from hr_all_positions_f
1503: where effective_start_date >= c_date_effective and
1504: position_id = c_posn_id;
1505:
1506: Begin
2545: --
2546: -- {End Of Comments}
2547: -- ---------------------------------------------------------------------------
2548: -- Procedure Correct_posn_row will update the Per_positions row in correct mode
2549: Procedure Correct_posn_row (p_posn_data in out nocopy hr_all_positions_f%rowtype) is
2550:
2551: -- this cursor gets the object_version_number from core table, so the core
2552: -- table can be updated.
2553: cursor c_posn_getovn( cp_position_id number
2553: cursor c_posn_getovn( cp_position_id number
2554: ,cp_eff_st_dt date
2555: ,cp_eff_end_dt date) is
2556: select object_version_number
2557: from hr_all_positions_f
2558: where position_id = cp_position_id
2559: and effective_start_date = cp_eff_st_dt;
2560:
2561: l_posn_data hr_all_positions_f%rowtype;
2557: from hr_all_positions_f
2558: where position_id = cp_position_id
2559: and effective_start_date = cp_eff_st_dt;
2560:
2561: l_posn_data hr_all_positions_f%rowtype;
2562: l_position_data_rec ghr_sf52_pos_update.position_data_rec_type;
2563: l_proc varchar2(30):='Correct_posn_Row';
2564: l_datetrack_mode varchar2(30):=hr_api.g_correction;
2565: l_date2 hr_all_positions_f.effective_start_date%type;
2561: l_posn_data hr_all_positions_f%rowtype;
2562: l_position_data_rec ghr_sf52_pos_update.position_data_rec_type;
2563: l_proc varchar2(30):='Correct_posn_Row';
2564: l_datetrack_mode varchar2(30):=hr_api.g_correction;
2565: l_date2 hr_all_positions_f.effective_start_date%type;
2566:
2567: Begin
2568: hr_utility.set_location( 'Entering : ' || l_proc, 10);
2569: --Initialise Local Variables