[Home] [Help]
53: Procedure correct_people_row (
54: p_people_data in out nocopy per_all_people_f%rowtype);
55:
56: Procedure correct_asgn_row (
57: p_asgn_data in out nocopy per_all_assignments_f%rowtype);
58:
59: Procedure correct_peopleei_row ( p_peopleei_data in out nocopy per_people_extra_info%rowtype);
60:
61: Procedure correct_addresses_row( p_addr_data in out nocopy per_addresses%rowtype);
1028: p_hist_data_as_of_date in ghr_pa_history%rowtype
1029: ) is
1030:
1031: l_true_false ghr_history_cascade.condition_rg_type;
1032: l_asgn_data per_all_assignments_f%rowtype;
1033: l_hist_asgn_data ghr_pa_history%rowtype;
1034: l_stop Boolean;
1035: l_proc varchar2(30):='Cascade_asgn';
1036:
1036:
1037: -- this cursor is meant to retrieve all following records in per_assignments_f table.
1038: Cursor c_asgn( c_date_Effective in date, c_asgn_id in number) is
1039: Select *
1040: from per_all_assignments_f
1041: where effective_start_date >= c_date_effective and
1042: assignment_id = c_asgn_id;
1043:
1044: Begin
1975: --
1976: -- {End Of Comments}
1977: -- ---------------------------------------------------------------------------
1978: Procedure Correct_asgn_row (
1979: p_asgn_data in out nocopy per_all_assignments_f%rowtype) is
1980:
1981: -- this cursor gets the object_version_number from core table, so the core
1982: -- table can be updated.
1983: cursor c_asgn_getovn( cp_assignment_id number,
1983: cursor c_asgn_getovn( cp_assignment_id number,
1984: cp_eff_st_dt date
1985: ,cp_eff_end_dt date) is
1986: select object_version_number
1987: from per_all_assignments_f
1988: where assignment_id = cp_assignment_id
1989: and effective_start_date = cp_eff_st_dt;
1990:
1991: -- and effective_end_date = cp_eff_end_dt;
1989: and effective_start_date = cp_eff_st_dt;
1990:
1991: -- and effective_end_date = cp_eff_end_dt;
1992:
1993: l_asgn_data per_all_assignments_f%rowtype;
1994: l_payroll_id_updated boolean;
1995: l_other_manager_warning boolean;
1996: l_no_managers_warning boolean;
1997: l_hourly_salaried_warning boolean;