[Home] [Help]
8: --
9:
10: --
11: TYPE pa_req_info is record (
12: pa_request_id ghr_pa_requests.pa_request_id%type,
13: object_version_number ghr_pa_requests.object_version_number%type,
14: status ghr_pa_requests.status%type,
15: row_id varchar2(20),
16: cancel_legal_authority ghr_pa_requests.first_action_la_code1%type
9:
10: --
11: TYPE pa_req_info is record (
12: pa_request_id ghr_pa_requests.pa_request_id%type,
13: object_version_number ghr_pa_requests.object_version_number%type,
14: status ghr_pa_requests.status%type,
15: row_id varchar2(20),
16: cancel_legal_authority ghr_pa_requests.first_action_la_code1%type
17: );
10: --
11: TYPE pa_req_info is record (
12: pa_request_id ghr_pa_requests.pa_request_id%type,
13: object_version_number ghr_pa_requests.object_version_number%type,
14: status ghr_pa_requests.status%type,
15: row_id varchar2(20),
16: cancel_legal_authority ghr_pa_requests.first_action_la_code1%type
17: );
18:
12: pa_request_id ghr_pa_requests.pa_request_id%type,
13: object_version_number ghr_pa_requests.object_version_number%type,
14: status ghr_pa_requests.status%type,
15: row_id varchar2(20),
16: cancel_legal_authority ghr_pa_requests.first_action_la_code1%type
17: );
18:
19: cursor c_get_sf52 (c_pa_request_id in number) is
20: select
18:
19: cursor c_get_sf52 (c_pa_request_id in number) is
20: select
21: *
22: from ghr_pa_requests
23: where pa_request_id = c_pa_request_id;
24:
25: --
26:
54: p_row_id in rowid);
55: Procedure delete_hist_row (
56: p_pa_history_id in ghr_pa_history.pa_history_id%type);
57: Procedure apply_correction(
58: p_sf52rec_correct in ghr_pa_requests%rowtype,
59: p_corr_pa_request_id in ghr_pa_requests.pa_request_id%type,
60: p_sf52rec in out nocopy ghr_pa_requests%rowtype ) ;
61: Procedure apply_noa_corrections(
62: p_sf52_data in ghr_pa_requests%rowtype,
55: Procedure delete_hist_row (
56: p_pa_history_id in ghr_pa_history.pa_history_id%type);
57: Procedure apply_correction(
58: p_sf52rec_correct in ghr_pa_requests%rowtype,
59: p_corr_pa_request_id in ghr_pa_requests.pa_request_id%type,
60: p_sf52rec in out nocopy ghr_pa_requests%rowtype ) ;
61: Procedure apply_noa_corrections(
62: p_sf52_data in ghr_pa_requests%rowtype,
63: p_sf52_data_result in out nocopy ghr_pa_requests%rowtype );
56: p_pa_history_id in ghr_pa_history.pa_history_id%type);
57: Procedure apply_correction(
58: p_sf52rec_correct in ghr_pa_requests%rowtype,
59: p_corr_pa_request_id in ghr_pa_requests.pa_request_id%type,
60: p_sf52rec in out nocopy ghr_pa_requests%rowtype ) ;
61: Procedure apply_noa_corrections(
62: p_sf52_data in ghr_pa_requests%rowtype,
63: p_sf52_data_result in out nocopy ghr_pa_requests%rowtype );
64: Procedure Undo_Mark_Cancel(
58: p_sf52rec_correct in ghr_pa_requests%rowtype,
59: p_corr_pa_request_id in ghr_pa_requests.pa_request_id%type,
60: p_sf52rec in out nocopy ghr_pa_requests%rowtype ) ;
61: Procedure apply_noa_corrections(
62: p_sf52_data in ghr_pa_requests%rowtype,
63: p_sf52_data_result in out nocopy ghr_pa_requests%rowtype );
64: Procedure Undo_Mark_Cancel(
65: p_sf52_data in ghr_pa_requests%rowtype);
66:
59: p_corr_pa_request_id in ghr_pa_requests.pa_request_id%type,
60: p_sf52rec in out nocopy ghr_pa_requests%rowtype ) ;
61: Procedure apply_noa_corrections(
62: p_sf52_data in ghr_pa_requests%rowtype,
63: p_sf52_data_result in out nocopy ghr_pa_requests%rowtype );
64: Procedure Undo_Mark_Cancel(
65: p_sf52_data in ghr_pa_requests%rowtype);
66:
67: Procedure what_to_do( p_datetrack_table in boolean,
61: Procedure apply_noa_corrections(
62: p_sf52_data in ghr_pa_requests%rowtype,
63: p_sf52_data_result in out nocopy ghr_pa_requests%rowtype );
64: Procedure Undo_Mark_Cancel(
65: p_sf52_data in ghr_pa_requests%rowtype);
66:
67: Procedure what_to_do( p_datetrack_table in boolean,
68: p_pre_record_exists in boolean,
69: p_interv_on_table in boolean,
74: p_cannot_cancel out nocopy boolean) ;
75:
76: Procedure convert_shadow_to_sf52 (
77: p_shadow in ghr_pa_request_shadow%rowtype,
78: p_sf52 out nocopy ghr_pa_requests%rowtype);
79:
80: Procedure IF_ZAP_ELE_ENT(
81: p_element_entry_id in number,
82: p_effective_start_date in date,
84: p_result out nocopy Boolean);
85:
86: -- VSM [Procedures for delete subsequent correction functionality]
87: Procedure Process_Cancel (
88: p_sf52_data in out nocopy ghr_pa_requests%rowtype);
89:
90: Procedure Cancel_subs_correction (
91: p_corr_sf52_detail in out nocopy pa_req_info,
92: p_which_noa in number);
99:
100: -- This procedure will get the other pay component values
101: -- at the time of intervening correction.
102: PROCEDURE get_sf52_to_othpays_for_ia
103: (p_sf52_ia_rec in out nocopy ghr_pa_requests%rowtype);
104: -- End of Bug#2521744
105:
106: Function get_sf52_ovn ( p_pa_request_id in number) return number;
107: --
121: -- Pre-Requisities:
122: -- None.
123: --
124: -- In Parameters:
125: -- p_sf52_data -> ghr_pa_requests record of the cancellation sf52.
126: --
127: -- Post Success:
128: -- The termination sf52 will have been cancelled.
129: --
138: --
139: -- {End Of Comments}
140: -- ---------------------------------------------------------------------------
141:
142: Procedure cancel_term_SF52 ( p_sf52_data in out nocopy ghr_pa_requests%rowtype) is
143:
144: -- this cursor gets the rowids from ghr_pa_history for the given pa_request_id.
145: cursor c_hist ( c_pa_request_id number,
146: c_noa_id number) is
252: --Bug# 6312144
253: l_imm_ipa_benefits_cont ghr_api.per_ipa_ben_cont_info_type;
254: l_imm_retirement_info ghr_api.per_retirement_info_type;
255:
256: l_sf52_data ghr_pa_requests%rowtype;
257: l_sf52_data_rec ghr_pa_requests%rowtype;
258: l_health_plan varchar2(30);
259: l_error_flag boolean;
260: l_return_status varchar2(30);
253: l_imm_ipa_benefits_cont ghr_api.per_ipa_ben_cont_info_type;
254: l_imm_retirement_info ghr_api.per_retirement_info_type;
255:
256: l_sf52_data ghr_pa_requests%rowtype;
257: l_sf52_data_rec ghr_pa_requests%rowtype;
258: l_health_plan varchar2(30);
259: l_error_flag boolean;
260: l_return_status varchar2(30);
261:
756: -- Pre-Requisities:
757: -- None.
758: --
759: -- In Parameters:
760: -- p_sf52_data -> ghr_pa_requests record of the cancellation sf52.
761: --
762: -- Post Success:
763: -- The appointment sf52 will have been cancelled.
764: --
773: --
774: -- {End Of Comments}
775: -- ---------------------------------------------------------------------------
776:
777: Procedure Cancel_Appt_SF52( p_sf52_data in out nocopy ghr_pa_requests%rowtype) is
778:
779: l_session_var ghr_history_api.g_session_var_type;
780: l_hist_post ghr_pa_history%rowtype;
781: l_business_group_id number;
848: l_imm_thrift_saving_plan ghr_api.thrift_saving_plan;
849: l_imm_retention_allow_review ghr_api.retention_allow_review_type;
850: l_imm_health_ben_pre_tax ghr_api.health_ben_pre_tax_type;
851: l_imm_per_race_ethnic_info ghr_api.per_race_ethnic_type; -- Bug 4724337 Race or National Origin changes
852: l_sf52_data ghr_pa_requests%rowtype;
853: l_sf52_data_rec ghr_pa_requests%rowtype;
854: l_health_plan varchar2(30);
855: l_error_flag boolean;
856: l_return_status varchar2(30);
849: l_imm_retention_allow_review ghr_api.retention_allow_review_type;
850: l_imm_health_ben_pre_tax ghr_api.health_ben_pre_tax_type;
851: l_imm_per_race_ethnic_info ghr_api.per_race_ethnic_type; -- Bug 4724337 Race or National Origin changes
852: l_sf52_data ghr_pa_requests%rowtype;
853: l_sf52_data_rec ghr_pa_requests%rowtype;
854: l_health_plan varchar2(30);
855: l_error_flag boolean;
856: l_return_status varchar2(30);
857: l_result varchar2(30);
902: c_eff_date date) is
903: select
904: par.rowid,
905: par.*
906: from ghr_pa_requests par
907: where person_id = c_person_id and
908: effective_date >= c_eff_date and
909: pa_notification_id is not null and
910: approval_date is not null
1387: -- Pre-Requisities:
1388: -- None.
1389: --
1390: -- In Parameters:
1391: -- p_sf52_data -> ghr_pa_requests record of the correction sf52.
1392: --
1393: -- Post Success:
1394: -- The correction sf52 will have been cancelled.
1395: --
1404: -- Internal Development Use Only.
1405: --
1406: -- {End Of Comments}
1407: -- ---------------------------------------------------------------------------
1408: Procedure Cancel_Correction_SF52 ( p_sf52_data in out nocopy ghr_pa_requests%rowtype) is
1409: l_proc varchar2(30):='Cancel_Correction_SF52';
1410: l_sf52_data ghr_pa_requests%rowtype;
1411: Begin
1412: hr_utility.set_location('entering : ' || l_proc, 10);
1406: -- {End Of Comments}
1407: -- ---------------------------------------------------------------------------
1408: Procedure Cancel_Correction_SF52 ( p_sf52_data in out nocopy ghr_pa_requests%rowtype) is
1409: l_proc varchar2(30):='Cancel_Correction_SF52';
1410: l_sf52_data ghr_pa_requests%rowtype;
1411: Begin
1412: hr_utility.set_location('entering : ' || l_proc, 10);
1413: l_sf52_data := p_sf52_data;
1414: Cancel_Other_Family_Sf52 (p_sf52_data);
1432: -- Pre-Requisities:
1433: -- None.
1434: --
1435: -- In Parameters:
1436: -- p_sf52_data -> ghr_pa_requests record of the correction sf52.
1437: -- Post Success:
1438: -- The cancellation will have been applied.
1439: --
1440: -- Post Failure:
1448: --
1449: -- {End Of Comments}
1450: -- ---------------------------------------------------------------------------
1451:
1452: PROCEDURE Cancel_Other_Family_Sf52 ( p_sf52_data in out nocopy ghr_pa_requests%rowtype) AS
1453: l_buf number;
1454: l_eff_date date;
1455: l_proc varchar2(72) := 'Cancel_Other_Family_Sf52' ;
1456: l_date_eff_rec pay_element_entry_values_f%rowtype;
1454: l_eff_date date;
1455: l_proc varchar2(72) := 'Cancel_Other_Family_Sf52' ;
1456: l_date_eff_rec pay_element_entry_values_f%rowtype;
1457: l_hist_dummy ghr_pa_history%rowtype;
1458: l_hist_rec ghr_pa_requests%rowtype;
1459: l_hist_address_rec ghr_pa_history%rowtype;
1460: l_hist_pre ghr_pa_history%rowtype;
1461: l_hist_data_as_of_date ghr_pa_history%rowtype;
1462: l_return_status varchar2(100);
1538: l_imm_thrift_saving_plan ghr_api.thrift_saving_plan;
1539: l_imm_retention_allow_review ghr_api.retention_allow_review_type;
1540: l_imm_health_ben_pre_tax ghr_api.health_ben_pre_tax_type;
1541: l_imm_per_race_ethnic_info ghr_api.per_race_ethnic_type; -- Bug 4724337 Race or National Origin changes
1542: l_sf52_data ghr_pa_requests%rowtype;
1543: l_sf52_data_rec ghr_pa_requests%rowtype;
1544: l_health_plan varchar2(30);
1545: l_error_flag boolean;
1546: l_pa_history_id number;
1539: l_imm_retention_allow_review ghr_api.retention_allow_review_type;
1540: l_imm_health_ben_pre_tax ghr_api.health_ben_pre_tax_type;
1541: l_imm_per_race_ethnic_info ghr_api.per_race_ethnic_type; -- Bug 4724337 Race or National Origin changes
1542: l_sf52_data ghr_pa_requests%rowtype;
1543: l_sf52_data_rec ghr_pa_requests%rowtype;
1544: l_health_plan varchar2(30);
1545: l_error_flag boolean;
1546: l_pa_history_id number;
1547: l_result boolean;
1560: -- note that this cursor orders by table name, this is due to the fact that we need to
1561: -- handle PAY_ELEMENT_ENTRY_VALUES_F history records before PAY_ELEMENT_ENTRIES_F history
1562: -- records due to the parent-child relationship of these two tables. Fetch_history routine
1563: -- for elements relies on the parent record in history being intact.
1564: cursor c_history_info (cp_pa_request_id in ghr_pa_requests.pa_request_id%type,
1565: cp_noa_id in ghr_pa_requests.first_noa_id%type) is
1566: SELECT *
1567: FROM GHR_PA_HISTORY
1568: WHERE pa_request_id = cp_pa_request_id
1561: -- handle PAY_ELEMENT_ENTRY_VALUES_F history records before PAY_ELEMENT_ENTRIES_F history
1562: -- records due to the parent-child relationship of these two tables. Fetch_history routine
1563: -- for elements relies on the parent record in history being intact.
1564: cursor c_history_info (cp_pa_request_id in ghr_pa_requests.pa_request_id%type,
1565: cp_noa_id in ghr_pa_requests.first_noa_id%type) is
1566: SELECT *
1567: FROM GHR_PA_HISTORY
1568: WHERE pa_request_id = cp_pa_request_id
1569: AND nature_of_action_id = cp_noa_id
1596:
1597: Cursor c_prior_noa_code is
1598: Select par.first_noa_code,
1599: par.first_noa_id
1600: from ghr_pa_requests par
1601: where par.pa_request_id = p_sf52_data.altered_pa_request_id;
1602:
1603: Cursor c_noa_family(p_noa_id in number) is
1604: Select fam.noa_family_code
2354: -- Pre-Requisities:
2355: -- None.
2356: --
2357: -- In Parameters:
2358: -- p_sf52_data -> ghr_pa_requests record of the correction sf52.
2359: -- Post Success:
2360: -- The correction will have been applied.
2361: --
2362: -- Post Failure:
2372: -- ---------------------------------------------------------------------------
2373:
2374: -- This is a sf52 wrapper procedure. It gets the sf52 and the sf52 extra info
2375: -- record and calls db_update procedures.
2376: Procedure correction_sf52( p_sf52_data in ghr_pa_requests%rowtype,
2377: p_process_type in varchar2 default 'CURRENT',
2378: p_capped_other_pay in number default null ) is
2379:
2380: l_sf52_data_result ghr_pa_requests%rowtype;
2376: Procedure correction_sf52( p_sf52_data in ghr_pa_requests%rowtype,
2377: p_process_type in varchar2 default 'CURRENT',
2378: p_capped_other_pay in number default null ) is
2379:
2380: l_sf52_data_result ghr_pa_requests%rowtype;
2381: l_sf52 ghr_pa_requests%rowtype;
2382: l_root_sf52 ghr_pa_requests%rowtype;
2383:
2384: l_pa_request_id number;
2377: p_process_type in varchar2 default 'CURRENT',
2378: p_capped_other_pay in number default null ) is
2379:
2380: l_sf52_data_result ghr_pa_requests%rowtype;
2381: l_sf52 ghr_pa_requests%rowtype;
2382: l_root_sf52 ghr_pa_requests%rowtype;
2383:
2384: l_pa_request_id number;
2385: l_today date :=sysdate;
2378: p_capped_other_pay in number default null ) is
2379:
2380: l_sf52_data_result ghr_pa_requests%rowtype;
2381: l_sf52 ghr_pa_requests%rowtype;
2382: l_root_sf52 ghr_pa_requests%rowtype;
2383:
2384: l_pa_request_id number;
2385: l_today date :=sysdate;
2386: l_session_var ghr_history_api.g_session_var_type;
2385: l_today date :=sysdate;
2386: l_session_var ghr_history_api.g_session_var_type;
2387: l_sf52_ei_data ghr_pa_request_extra_info%rowtype;
2388: l_agency_ei_data ghr_pa_request_extra_info%rowtype;
2389: l_sf52_data ghr_pa_requests%rowtype;
2390: l_sf52_data1 ghr_pa_requests%rowtype;
2391: l_shadow_data ghr_pa_request_shadow%rowtype;
2392: l_result varchar2(1000);
2393:
2386: l_session_var ghr_history_api.g_session_var_type;
2387: l_sf52_ei_data ghr_pa_request_extra_info%rowtype;
2388: l_agency_ei_data ghr_pa_request_extra_info%rowtype;
2389: l_sf52_data ghr_pa_requests%rowtype;
2390: l_sf52_data1 ghr_pa_requests%rowtype;
2391: l_shadow_data ghr_pa_request_shadow%rowtype;
2392: l_result varchar2(1000);
2393:
2394: -- this cursor gets the noa_family_code for noa_id (nature of action ID) passed.
2404: fams.update_hr_flag = 'Y';
2405:
2406: cursor c_get_root (c_pa_request_id in number) is
2407: select *
2408: from ghr_pa_requests
2409: connect by pa_request_id = prior altered_pa_request_id
2410: start with pa_request_id = c_pa_request_id
2411: order by level desc;
2412:
2423:
2424: l_proc varchar2(30):='correction_sf52';
2425: l_people_data per_all_people_f%rowtype;
2426:
2427: Procedure Refresh_Cascade_Name( p_sf52_rec in out nocopy ghr_pa_requests%rowtype,
2428: p_shadow_rec in out nocopy ghr_pa_request_shadow%rowtype) is
2429:
2430: l_result_code varchar2(30);
2431: l_people_data per_all_people_f%rowtype;
2438: from ghr_pa_history
2439: where pa_request_id = p_sf52_rec.altered_pa_request_id and
2440: nature_of_action_id = p_sf52_rec.second_noa_id;
2441:
2442: l_sf52_rec ghr_pa_requests%rowtype;
2443: l_shadow_rec ghr_pa_request_shadow%rowtype;
2444: Begin
2445:
2446: hr_utility.set_location( 'Entering ' || l_proc, 10);
2754: -- Pre-Requisities:
2755: -- None.
2756: --
2757: -- In Parameters:
2758: -- p_sf52_rec_correct -> the ghr_pa_requests record that we are
2759: -- copying from.
2760: -- p_corr_pa_request_id -> the pa_request_id of the correction
2761: -- that is currently being processed.
2762: -- p_sf52rec -> results of the applied correction are put
2780:
2781: -- This procedure copies the fields from the p_sf52rec_correct record to
2782: -- p_sf52rec record and puts te result in sf52rec_result.
2783: PROCEDURE apply_correction (
2784: p_sf52rec_correct in ghr_pa_requests%rowtype,
2785: p_corr_pa_request_id in ghr_pa_requests.pa_request_id%type,
2786: p_sf52rec in out nocopy ghr_pa_requests%rowtype ) is
2787:
2788: l_proc varchar2(30):='apply_correction';
2781: -- This procedure copies the fields from the p_sf52rec_correct record to
2782: -- p_sf52rec record and puts te result in sf52rec_result.
2783: PROCEDURE apply_correction (
2784: p_sf52rec_correct in ghr_pa_requests%rowtype,
2785: p_corr_pa_request_id in ghr_pa_requests.pa_request_id%type,
2786: p_sf52rec in out nocopy ghr_pa_requests%rowtype ) is
2787:
2788: l_proc varchar2(30):='apply_correction';
2789: l_sf52rec ghr_pa_requests%rowtype;
2782: -- p_sf52rec record and puts te result in sf52rec_result.
2783: PROCEDURE apply_correction (
2784: p_sf52rec_correct in ghr_pa_requests%rowtype,
2785: p_corr_pa_request_id in ghr_pa_requests.pa_request_id%type,
2786: p_sf52rec in out nocopy ghr_pa_requests%rowtype ) is
2787:
2788: l_proc varchar2(30):='apply_correction';
2789: l_sf52rec ghr_pa_requests%rowtype;
2790:
2785: p_corr_pa_request_id in ghr_pa_requests.pa_request_id%type,
2786: p_sf52rec in out nocopy ghr_pa_requests%rowtype ) is
2787:
2788: l_proc varchar2(30):='apply_correction';
2789: l_sf52rec ghr_pa_requests%rowtype;
2790:
2791: -- Begin Bug# 5014663
2792: l_asg_ei_data per_assignment_extra_info%rowtype;
2793: l_award_salary number;
3142: -- Pre-Requisities:
3143: -- None.
3144: --
3145: -- In Parameters:
3146: -- p_sf52_data -> the ghr_pa_requests record for the
3147: -- correction we are currently processing.
3148: -- p_sf52_data_result -> the ghr_pa_requests record that will hold the final
3149: -- corrected data for all corrections in the correction
3150: -- chain upon successful completion of this procedure.
3144: --
3145: -- In Parameters:
3146: -- p_sf52_data -> the ghr_pa_requests record for the
3147: -- correction we are currently processing.
3148: -- p_sf52_data_result -> the ghr_pa_requests record that will hold the final
3149: -- corrected data for all corrections in the correction
3150: -- chain upon successful completion of this procedure.
3151: -- Post Success:
3152: -- All the corrections in the correction chain will have been applied and the
3163: --
3164: -- {End Of Comments}
3165: -- ---------------------------------------------------------------------------
3166:
3167: Procedure apply_noa_corrections( p_sf52_data in ghr_pa_requests%rowtype,
3168: p_sf52_data_result in out nocopy ghr_pa_requests%rowtype ) is
3169:
3170: l_sf52_data_orig ghr_pa_requests%rowtype;
3171: l_sf52_data_step ghr_pa_requests%rowtype;
3164: -- {End Of Comments}
3165: -- ---------------------------------------------------------------------------
3166:
3167: Procedure apply_noa_corrections( p_sf52_data in ghr_pa_requests%rowtype,
3168: p_sf52_data_result in out nocopy ghr_pa_requests%rowtype ) is
3169:
3170: l_sf52_data_orig ghr_pa_requests%rowtype;
3171: l_sf52_data_step ghr_pa_requests%rowtype;
3172: l_sf52_ia_rec ghr_pa_requests%rowtype;
3166:
3167: Procedure apply_noa_corrections( p_sf52_data in ghr_pa_requests%rowtype,
3168: p_sf52_data_result in out nocopy ghr_pa_requests%rowtype ) is
3169:
3170: l_sf52_data_orig ghr_pa_requests%rowtype;
3171: l_sf52_data_step ghr_pa_requests%rowtype;
3172: l_sf52_ia_rec ghr_pa_requests%rowtype;
3173: l_sf52_dummy ghr_pa_requests%rowtype;
3174: l_sf52_cursor_step_indx number;
3167: Procedure apply_noa_corrections( p_sf52_data in ghr_pa_requests%rowtype,
3168: p_sf52_data_result in out nocopy ghr_pa_requests%rowtype ) is
3169:
3170: l_sf52_data_orig ghr_pa_requests%rowtype;
3171: l_sf52_data_step ghr_pa_requests%rowtype;
3172: l_sf52_ia_rec ghr_pa_requests%rowtype;
3173: l_sf52_dummy ghr_pa_requests%rowtype;
3174: l_sf52_cursor_step_indx number;
3175: l_session_var ghr_history_api.g_session_var_type;
3168: p_sf52_data_result in out nocopy ghr_pa_requests%rowtype ) is
3169:
3170: l_sf52_data_orig ghr_pa_requests%rowtype;
3171: l_sf52_data_step ghr_pa_requests%rowtype;
3172: l_sf52_ia_rec ghr_pa_requests%rowtype;
3173: l_sf52_dummy ghr_pa_requests%rowtype;
3174: l_sf52_cursor_step_indx number;
3175: l_session_var ghr_history_api.g_session_var_type;
3176: -- Bug#5435374 added l_session_var1.
3169:
3170: l_sf52_data_orig ghr_pa_requests%rowtype;
3171: l_sf52_data_step ghr_pa_requests%rowtype;
3172: l_sf52_ia_rec ghr_pa_requests%rowtype;
3173: l_sf52_dummy ghr_pa_requests%rowtype;
3174: l_sf52_cursor_step_indx number;
3175: l_session_var ghr_history_api.g_session_var_type;
3176: -- Bug#5435374 added l_session_var1.
3177: l_session_var1 ghr_history_api.g_session_var_type;
3175: l_session_var ghr_history_api.g_session_var_type;
3176: -- Bug#5435374 added l_session_var1.
3177: l_session_var1 ghr_history_api.g_session_var_type;
3178: l_capped_other_pay number := hr_api.g_number;
3179: l_retro_eff_date ghr_pa_requests.effective_date%type;
3180: l_retro_pa_request_id ghr_pa_requests.pa_request_id%type;
3181: l_retro_first_noa ghr_nature_of_actions.code%type;
3182: l_retro_second_noa ghr_nature_of_actions.code%type;
3183: l_sf52_data_result ghr_pa_requests%rowtype;
3176: -- Bug#5435374 added l_session_var1.
3177: l_session_var1 ghr_history_api.g_session_var_type;
3178: l_capped_other_pay number := hr_api.g_number;
3179: l_retro_eff_date ghr_pa_requests.effective_date%type;
3180: l_retro_pa_request_id ghr_pa_requests.pa_request_id%type;
3181: l_retro_first_noa ghr_nature_of_actions.code%type;
3182: l_retro_second_noa ghr_nature_of_actions.code%type;
3183: l_sf52_data_result ghr_pa_requests%rowtype;
3184: -- Bug#3543213 Created l_dummy variable
3179: l_retro_eff_date ghr_pa_requests.effective_date%type;
3180: l_retro_pa_request_id ghr_pa_requests.pa_request_id%type;
3181: l_retro_first_noa ghr_nature_of_actions.code%type;
3182: l_retro_second_noa ghr_nature_of_actions.code%type;
3183: l_sf52_data_result ghr_pa_requests%rowtype;
3184: -- Bug#3543213 Created l_dummy variable
3185: l_dummy VARCHAR2(30);
3186: -- this cursor selects all rows in the correction chain from ghr_pa_requests
3187: cursor l_sf52_cursor is
3182: l_retro_second_noa ghr_nature_of_actions.code%type;
3183: l_sf52_data_result ghr_pa_requests%rowtype;
3184: -- Bug#3543213 Created l_dummy variable
3185: l_dummy VARCHAR2(30);
3186: -- this cursor selects all rows in the correction chain from ghr_pa_requests
3187: cursor l_sf52_cursor is
3188: select *
3189: from ghr_pa_requests
3190: connect by prior altered_pa_request_id = pa_request_id
3185: l_dummy VARCHAR2(30);
3186: -- this cursor selects all rows in the correction chain from ghr_pa_requests
3187: cursor l_sf52_cursor is
3188: select *
3189: from ghr_pa_requests
3190: connect by prior altered_pa_request_id = pa_request_id
3191: start with pa_request_id = p_sf52_data.pa_request_id
3192: order by level desc;
3193:
3194: cursor c_orig_details_for_ia is
3195: select pa_request_id,pa_notification_id,person_id,
3196: effective_date,from_position_id,
3197: to_position_id
3198: from ghr_pa_requests
3199: where pa_request_id = p_sf52_data.altered_pa_request_id;
3200:
3201: cursor c_get_hist_id (c_pa_request_id in number) is
3202: select
3296: -- .47
3297: -- Bug#3543213 For PRD U,V and NOA 894(Pay Adjustment) get the PRD Value from assignment
3298: IF p_sf52_data_result.first_noa_code = '894' AND
3299: p_sf52_data_result.pay_rate_determinant IN ('U','V') THEN
3300: ghr_pa_requests_pkg.get_SF52_asg_ddf_details
3301: (p_assignment_id => p_sf52_data_result.employee_assignment_id
3302: ,p_date_effective => p_sf52_data_result.effective_date
3303: ,p_tenure => l_dummy
3304: ,p_annuitant_indicator => l_dummy
4779: -- Pre-Requisities:
4780: -- None.
4781: --
4782: -- In Parameters:
4783: -- p_sf52_data -> ghr_pa_requests row of the cancellation being processed.
4784: --
4785: -- Post Success:
4786: -- If this is a cancellation of correction, the parent sf52 will have been marked as
4787: -- available for cancellation/correction again.
4797: --
4798: -- {End Of Comments}
4799: -- ---------------------------------------------------------------------------
4800:
4801: Procedure Undo_Mark_Cancel ( p_sf52_data in ghr_pa_requests%rowtype) is
4802: cursor get_req (cp_pa_request_id number) is
4803: select
4804: pa_request_id,
4805: altered_pa_request_id,
4805: altered_pa_request_id,
4806: first_noa_id,
4807: second_noa_id,
4808: object_version_number ovn
4809: from ghr_pa_requests
4810: where pa_request_id = cp_pa_request_id;
4811: l_proc varchar2(30):='Undo_Mark_Cancel';
4812: l_sf52_data get_req%rowtype;
4813: Begin
4869: End Undo_Mark_Cancel;
4870:
4871: Procedure convert_shadow_to_sf52 (
4872: p_shadow in ghr_pa_request_shadow%rowtype,
4873: p_sf52 out nocopy ghr_pa_requests%rowtype) is
4874: l_sf52 ghr_pa_requests%rowtype;
4875: Begin
4876:
4877: l_sf52 := p_sf52;
4870:
4871: Procedure convert_shadow_to_sf52 (
4872: p_shadow in ghr_pa_request_shadow%rowtype,
4873: p_sf52 out nocopy ghr_pa_requests%rowtype) is
4874: l_sf52 ghr_pa_requests%rowtype;
4875: Begin
4876:
4877: l_sf52 := p_sf52;
4878: p_sf52.pa_request_id := p_shadow.pa_request_id ;
4931:
4932: End;
4933:
4934: Procedure convert_sf52_to_shadow (
4935: p_sf52 in ghr_pa_requests%rowtype,
4936: p_shadow out nocopy ghr_pa_request_shadow%rowtype
4937: ) is
4938:
4939: Begin
4996: End;
4997:
4998: Procedure build_corrected_sf52(p_pa_request_id in number,
4999: p_noa_code_correct in varchar2,
5000: p_sf52_data_result in out nocopy ghr_pa_requests%rowtype,
5001: p_called_from in varchar2 default null ) is
5002:
5003: l_sf52_data_orig ghr_pa_requests%rowtype;
5004: l_sf52_data_step ghr_pa_requests%rowtype;
4999: p_noa_code_correct in varchar2,
5000: p_sf52_data_result in out nocopy ghr_pa_requests%rowtype,
5001: p_called_from in varchar2 default null ) is
5002:
5003: l_sf52_data_orig ghr_pa_requests%rowtype;
5004: l_sf52_data_step ghr_pa_requests%rowtype;
5005: l_sf52_data_result_rec ghr_pa_requests%rowtype;
5006: l_sf52_dummy ghr_pa_requests%rowtype;
5007: l_sf52_cursor_step_indx number;
5000: p_sf52_data_result in out nocopy ghr_pa_requests%rowtype,
5001: p_called_from in varchar2 default null ) is
5002:
5003: l_sf52_data_orig ghr_pa_requests%rowtype;
5004: l_sf52_data_step ghr_pa_requests%rowtype;
5005: l_sf52_data_result_rec ghr_pa_requests%rowtype;
5006: l_sf52_dummy ghr_pa_requests%rowtype;
5007: l_sf52_cursor_step_indx number;
5008: l_capped_other_pay number := hr_api.g_number;
5001: p_called_from in varchar2 default null ) is
5002:
5003: l_sf52_data_orig ghr_pa_requests%rowtype;
5004: l_sf52_data_step ghr_pa_requests%rowtype;
5005: l_sf52_data_result_rec ghr_pa_requests%rowtype;
5006: l_sf52_dummy ghr_pa_requests%rowtype;
5007: l_sf52_cursor_step_indx number;
5008: l_capped_other_pay number := hr_api.g_number;
5009:
5002:
5003: l_sf52_data_orig ghr_pa_requests%rowtype;
5004: l_sf52_data_step ghr_pa_requests%rowtype;
5005: l_sf52_data_result_rec ghr_pa_requests%rowtype;
5006: l_sf52_dummy ghr_pa_requests%rowtype;
5007: l_sf52_cursor_step_indx number;
5008: l_capped_other_pay number := hr_api.g_number;
5009:
5010: -- this cursor selects all rows in the correction chain from ghr_pa_requests
5006: l_sf52_dummy ghr_pa_requests%rowtype;
5007: l_sf52_cursor_step_indx number;
5008: l_capped_other_pay number := hr_api.g_number;
5009:
5010: -- this cursor selects all rows in the correction chain from ghr_pa_requests
5011: cursor l_sf52_cursor is
5012: select *
5013: from ghr_pa_requests
5014: connect by prior altered_pa_request_id = pa_request_id
5009:
5010: -- this cursor selects all rows in the correction chain from ghr_pa_requests
5011: cursor l_sf52_cursor is
5012: select *
5013: from ghr_pa_requests
5014: connect by prior altered_pa_request_id = pa_request_id
5015: start with pa_request_id = p_pa_request_id
5016: order by level desc;
5017: l_shadow_data ghr_pa_request_shadow%rowtype;
5020: --Bug 2141522
5021: l_session_var ghr_history_api.g_session_var_type;
5022: -- Bug#5435374 added l_session_var1.
5023: l_session_var1 ghr_history_api.g_session_var_type;
5024: l_session_sf52_rec ghr_pa_requests%rowtype;
5025: cursor c_rpa is
5026: select *
5027: from ghr_pa_requests
5028: where pa_request_id = p_pa_request_id;
5023: l_session_var1 ghr_history_api.g_session_var_type;
5024: l_session_sf52_rec ghr_pa_requests%rowtype;
5025: cursor c_rpa is
5026: select *
5027: from ghr_pa_requests
5028: where pa_request_id = p_pa_request_id;
5029: --Bug 2141522
5030: cursor c_orig_details_for_ia is
5031: select pa_request_id,pa_notification_id,person_id,
5030: cursor c_orig_details_for_ia is
5031: select pa_request_id,pa_notification_id,person_id,
5032: effective_date,from_position_id,
5033: to_position_id
5034: from ghr_pa_requests
5035: where pa_request_id in (
5036: select altered_pa_request_id from
5037: ghr_pa_requests where pa_request_id = p_pa_request_id);
5038:
5033: to_position_id
5034: from ghr_pa_requests
5035: where pa_request_id in (
5036: select altered_pa_request_id from
5037: ghr_pa_requests where pa_request_id = p_pa_request_id);
5038:
5039: -- Bug#5435374
5040: l_pos_ei_grade_data per_position_extra_info%rowtype;
5041:
5047: where grd.grade_id = grd_id
5048: and grd.grade_definition_id = gdf.grade_definition_id;
5049:
5050: l_retro_eff_date date;
5051: l_retro_pa_request_id ghr_pa_requests.pa_request_id%type;
5052: l_retro_first_noa ghr_nature_of_actions.code%type;
5053: l_retro_second_noa ghr_nature_of_actions.code%type;
5054: l_sf52_ia_rec ghr_pa_requests%rowtype;
5055:
5050: l_retro_eff_date date;
5051: l_retro_pa_request_id ghr_pa_requests.pa_request_id%type;
5052: l_retro_first_noa ghr_nature_of_actions.code%type;
5053: l_retro_second_noa ghr_nature_of_actions.code%type;
5054: l_sf52_ia_rec ghr_pa_requests%rowtype;
5055:
5056:
5057: begin
5058: hr_utility.set_location('Entering:'|| l_proc, 5);
5215: p_sf52rec => p_sf52_data_result );
5216:
5217: if (l_sf52_data_step.first_noa_code = '352') then
5218: p_sf52_data_result.to_position_org_line1 :=
5219: ghr_pa_requests_pkg2.get_agency_code_to(
5220: p_pa_request_id => l_sf52_data_step.pa_request_id,
5221: p_noa_id => l_sf52_data_step.first_noa_id);
5222: -- Bug#2681726 In case of Realignment print all the Position Org Lines.
5223: elsif (l_sf52_data_step.first_noa_code = '790' ) then
5220: p_pa_request_id => l_sf52_data_step.pa_request_id,
5221: p_noa_id => l_sf52_data_step.first_noa_id);
5222: -- Bug#2681726 In case of Realignment print all the Position Org Lines.
5223: elsif (l_sf52_data_step.first_noa_code = '790' ) then
5224: ghr_pa_requests_pkg.get_rei_org_lines(
5225: p_pa_request_id => p_sf52_data_result.pa_request_id,
5226: p_organization_id => p_sf52_data_result.to_organization_id,
5227: p_position_org_line1 => p_sf52_data_result.to_position_org_line1,
5228: p_position_org_line2 => p_sf52_data_result.to_position_org_line2,
5327: Procedure populate_corrected_sf52(p_pa_request_id in number,
5328: p_noa_code_correct in varchar2)
5329: is
5330: l_session_var ghr_history_api.g_session_var_type;
5331: l_sf52_data ghr_pa_requests%ROWTYPE;
5332:
5333:
5334: FUNCTION get_record_category(p_sf52_record IN ghr_pa_requests%ROWTYPE)
5335: RETURN NUMBER IS
5330: l_session_var ghr_history_api.g_session_var_type;
5331: l_sf52_data ghr_pa_requests%ROWTYPE;
5332:
5333:
5334: FUNCTION get_record_category(p_sf52_record IN ghr_pa_requests%ROWTYPE)
5335: RETURN NUMBER IS
5336: CURSOR c_noa_fam_code(c_noa_id NUMBER) is
5337: select fam.noa_family_code family_code
5338: from ghr_noa_families fam
5476: END IF;
5477: END get_record_category;
5478:
5479: BEGIN
5480: -- Get the CORRECTION RPA record from ghr_pa_requests table.
5481: SELECT *
5482: INTO l_sf52_data
5483: FROM ghr_pa_requests
5484: WHERE pa_request_id = p_pa_request_id;
5479: BEGIN
5480: -- Get the CORRECTION RPA record from ghr_pa_requests table.
5481: SELECT *
5482: INTO l_sf52_data
5483: FROM ghr_pa_requests
5484: WHERE pa_request_id = p_pa_request_id;
5485: -- Check the record's category..
5486: -- If record belongs to category 1 or 2 then call build_corrected_sf52 with NPA parameter.
5487: -- BUG#3958914 Added the OR Conidtions
5593: /* cursor get_root_min_hist_id (cp_pa_history_id in number) is
5594: select min(pa_history_id)
5595: from ghr_pa_history
5596: where pa_request_id = (select min(pa_request_id)
5597: from ghr_pa_requests
5598: start with pa_request_id = (select pa_request_id -- Bug# 1253981
5599: from ghr_pa_history
5600: where pa_history_id = cp_pa_history_id)
5601: connect by prior altered_pa_request_id = pa_request_id)
5634: (select min(pa_history_id)
5635: from ghr_pa_history
5636: where pa_request_id =
5637: (select min(pa_request_id)
5638: from ghr_pa_requests
5639: connect by prior altered_pa_request_id = pa_request_id
5640: start with pa_request_id = pah.pa_request_id))));
5641:
5642: l_ele c_get_ele_ent%rowtype;
5696:
5697: End IF_ZAP_ELE_ENT;
5698:
5699: -- VSM
5700: Procedure Cancel_Routine (p_sf52_data in out nocopy ghr_pa_requests%rowtype) is
5701:
5702: l_proc varchar2(30):='cancel_routine';
5703: l_sf52_data_rec ghr_pa_requests%rowtype;
5704:
5699: -- VSM
5700: Procedure Cancel_Routine (p_sf52_data in out nocopy ghr_pa_requests%rowtype) is
5701:
5702: l_proc varchar2(30):='cancel_routine';
5703: l_sf52_data_rec ghr_pa_requests%rowtype;
5704:
5705: --
5706:
5707: -- This cursor would fetch active chain of subsequent corrections.
5711: pa_request_id
5712: ,object_version_number
5713: ,status
5714: ,rowid row_id
5715: from ghr_pa_requests
5716: where (level = 1 or ( level > 1 and
5717: nvl(second_noa_cancel_or_correct, '@#$') <> ghr_history_api.g_cancel)) and
5718: first_noa_code <> '001' and
5719: nvl(status, '@!#') <> 'CANCELED'
5725: TYPE array_pa_req is table of pa_req_info index by binary_integer;
5726: l_subsequent_pa_req array_pa_req;
5727: l_count number:=0;
5728: l_rev_count number;
5729: l_noa_id ghr_pa_requests.first_noa_id%type;
5730: l_sf52_canc ghr_pa_requests%rowtype;
5731: l_sf52 ghr_pa_requests%rowtype;
5732: l_canc_pa_request_id ghr_pa_requests.pa_request_id%type;
5733: l_username varchar2(30):=fnd_global.user_name;
5726: l_subsequent_pa_req array_pa_req;
5727: l_count number:=0;
5728: l_rev_count number;
5729: l_noa_id ghr_pa_requests.first_noa_id%type;
5730: l_sf52_canc ghr_pa_requests%rowtype;
5731: l_sf52 ghr_pa_requests%rowtype;
5732: l_canc_pa_request_id ghr_pa_requests.pa_request_id%type;
5733: l_username varchar2(30):=fnd_global.user_name;
5734: l_null_sf52 ghr_pa_requests%rowtype;
5727: l_count number:=0;
5728: l_rev_count number;
5729: l_noa_id ghr_pa_requests.first_noa_id%type;
5730: l_sf52_canc ghr_pa_requests%rowtype;
5731: l_sf52 ghr_pa_requests%rowtype;
5732: l_canc_pa_request_id ghr_pa_requests.pa_request_id%type;
5733: l_username varchar2(30):=fnd_global.user_name;
5734: l_null_sf52 ghr_pa_requests%rowtype;
5735: l_ovn number;
5728: l_rev_count number;
5729: l_noa_id ghr_pa_requests.first_noa_id%type;
5730: l_sf52_canc ghr_pa_requests%rowtype;
5731: l_sf52 ghr_pa_requests%rowtype;
5732: l_canc_pa_request_id ghr_pa_requests.pa_request_id%type;
5733: l_username varchar2(30):=fnd_global.user_name;
5734: l_null_sf52 ghr_pa_requests%rowtype;
5735: l_ovn number;
5736: l_which_noa number;
5730: l_sf52_canc ghr_pa_requests%rowtype;
5731: l_sf52 ghr_pa_requests%rowtype;
5732: l_canc_pa_request_id ghr_pa_requests.pa_request_id%type;
5733: l_username varchar2(30):=fnd_global.user_name;
5734: l_null_sf52 ghr_pa_requests%rowtype;
5735: l_ovn number;
5736: l_which_noa number;
5737: --
5738: Begin
5861:
5862: End Cancel_routine;
5863:
5864: Procedure Process_Cancel (
5865: p_sf52_data in out nocopy ghr_pa_requests%rowtype) is
5866:
5867: l_noa_family_code varchar2(30);
5868: l_proc varchar2(30):='Process_Cancel';
5869: l_prev_sf52_data ghr_pa_requests%rowtype;
5865: p_sf52_data in out nocopy ghr_pa_requests%rowtype) is
5866:
5867: l_noa_family_code varchar2(30);
5868: l_proc varchar2(30):='Process_Cancel';
5869: l_prev_sf52_data ghr_pa_requests%rowtype;
5870: l_sf52_data ghr_pa_requests%rowtype;
5871:
5872: l_posn_eff_start_date date;
5873: l_posn_eff_end_date date;
5866:
5867: l_noa_family_code varchar2(30);
5868: l_proc varchar2(30):='Process_Cancel';
5869: l_prev_sf52_data ghr_pa_requests%rowtype;
5870: l_sf52_data ghr_pa_requests%rowtype;
5871:
5872: l_posn_eff_start_date date;
5873: l_posn_eff_end_date date;
5874: l_prior_posn_ovn number;
5877: -- Cursor to fetch noa_codes for given pa_request_id
5878: cursor c_sf52 (c_pa_request_id in number) is
5879: select
5880: *
5881: from ghr_pa_requests
5882: where pa_request_id = c_pa_request_id;
5883:
5884: -- cursor to fetch noa_family_code for the given noa_id.
5885: cursor c_fam (c_noa_id in number) is
5931: Cursor c_chk_pa_request(p_person_id in number
5932: ,p_effective_date in date)
5933: is
5934: select 1
5935: from ghr_pa_requests par
5936: where person_id = p_person_id
5937: and effective_date <= p_effective_date
5938: and first_noa_code not in ('100')
5939: and pa_notification_id is not null
5937: and effective_date <= p_effective_date
5938: and first_noa_code not in ('100')
5939: and pa_notification_id is not null
5940: and not exists (select 1
5941: from ghr_pa_requests b
5942: where person_id = p_person_id
5943: and altered_pa_request_id = par.pa_request_id
5944: and first_noa_code = '001'
5945: and second_noa_code = par.first_noa_code);
6196: l_canc_pa_request_id number;
6197: l_noa_id number;
6198: l_username varchar2(30);
6199: l_dummy_number number;
6200: l_sf52_canc ghr_pa_requests%rowtype;
6201: l_corr_sf52_detail pa_req_info;
6202:
6203: cursor c_get_asg_id is
6204: select employee_assignment_id
6201: l_corr_sf52_detail pa_req_info;
6202:
6203: cursor c_get_asg_id is
6204: select employee_assignment_id
6205: from ghr_pa_requests
6206: where pa_request_id in
6207: ( select altered_pa_request_id from
6208: ghr_pa_requests where
6209: pa_request_id = p_corr_sf52_detail.pa_request_id);
6204: select employee_assignment_id
6205: from ghr_pa_requests
6206: where pa_request_id in
6207: ( select altered_pa_request_id from
6208: ghr_pa_requests where
6209: pa_request_id = p_corr_sf52_detail.pa_request_id);
6210: l_asg_id per_assignments_f.assignment_id%type;
6211:
6212:
6380:
6381: -- CURSOR to verify whether any future other pay action is existing or not.
6382: CURSOR c_future_other_pay_exists(p_assignment_id NUMBER,p_effective_date DATE) IS
6383: SELECT min(effective_date) effective_date
6384: FROM ghr_pa_requests
6385: where noa_family_code = 'OTHER_PAY'
6386: and pa_notification_id is not null
6387: and effective_date > p_effective_date
6388: and status = 'UPDATE_HR_COMPLETE'
6510:
6511: cursor c_get_sf52 (c_pa_request_id in number) is
6512: select
6513: object_version_number
6514: from ghr_pa_requests
6515: where pa_request_id = c_pa_request_id;
6516:
6517: l_ovn number;
6518: l_proc varchar2(30):='get_sf52_ovn';
6527: return l_ovn;
6528: End get_sf52_ovn;
6529:
6530: PROCEDURE get_sf52_to_details_for_ia
6531: (p_pa_request_id in ghr_pa_requests.pa_request_id%type,
6532: p_retro_eff_date in ghr_pa_requests.effective_date%type,
6533: p_sf52_ia_rec in out nocopy ghr_pa_requests%rowtype)
6534: IS
6535:
6528: End get_sf52_ovn;
6529:
6530: PROCEDURE get_sf52_to_details_for_ia
6531: (p_pa_request_id in ghr_pa_requests.pa_request_id%type,
6532: p_retro_eff_date in ghr_pa_requests.effective_date%type,
6533: p_sf52_ia_rec in out nocopy ghr_pa_requests%rowtype)
6534: IS
6535:
6536: CURSOR c_from_data IS
6529:
6530: PROCEDURE get_sf52_to_details_for_ia
6531: (p_pa_request_id in ghr_pa_requests.pa_request_id%type,
6532: p_retro_eff_date in ghr_pa_requests.effective_date%type,
6533: p_sf52_ia_rec in out nocopy ghr_pa_requests%rowtype)
6534: IS
6535:
6536: CURSOR c_from_data IS
6537: SELECT * FROM ghr_pa_requests
6533: p_sf52_ia_rec in out nocopy ghr_pa_requests%rowtype)
6534: IS
6535:
6536: CURSOR c_from_data IS
6537: SELECT * FROM ghr_pa_requests
6538: WHERE pa_request_id = p_pa_request_id;
6539:
6540: CURSOR c_grade_id(c_business_group_id per_grades.business_group_id%type,
6541: c_pay_plan per_grades.name%type,
6549: AND c_effective_date BETWEEN NVL(date_from,to_date('01/01/1951','dd/mm/yyyy')) AND NVL(date_to,to_date('31/12/4712','dd/mm/yyyy'));
6550:
6551: l_proc varchar2(30):='get_sf52_to_details_for_ia';
6552: l_dummy_varchar varchar2(30);
6553: l_sf52_ia_rec ghr_pa_requests%rowtype;
6554: l_business_group_id per_grades.business_group_id%type;
6555:
6556: BEGIN
6557: -- First assign the current From pos items to To pos items
6566: p_sf52_ia_rec.to_occ_code := c_sf52_data.from_occ_code;
6567: p_sf52_ia_rec.to_office_symbol := c_sf52_data.from_office_symbol;
6568: -- Bug#4696860 Added the following IF Condition.
6569: IF NOT (c_sf52_data.noa_family_code IN ('AWARD','GHR_INCENTIVE') OR
6570: ghr_pa_requests_pkg.GET_NOA_PM_FAMILY(c_sf52_data.second_noa_id) IN ('AWARD','GHR_INCENTIVE')) THEN
6571: p_sf52_ia_rec.to_pay_basis := c_sf52_data.from_pay_basis;
6572: p_sf52_ia_rec.to_total_salary := c_sf52_data.from_total_salary;
6573: p_sf52_ia_rec.to_other_pay_amount := c_sf52_data.from_other_pay_amount;
6574: p_sf52_ia_rec.to_adj_basic_pay := c_sf52_data.from_adj_basic_pay;
6607: p_sf52_ia_rec.from_position_org_line5 := c_sf52_data.from_position_org_line5;
6608: p_sf52_ia_rec.from_position_org_line6 := c_sf52_data.from_position_org_line6;
6609: END IF;
6610: -- Get position ddf data related to from_position_id
6611: ghr_pa_requests_pkg.get_SF52_pos_ddf_details
6612: (p_position_id => c_sf52_data.from_position_id
6613: ,p_date_effective => c_sf52_data.effective_date
6614: ,p_flsa_category => p_sf52_ia_rec.flsa_category
6615: ,p_bargaining_unit_status => p_sf52_ia_rec.bargaining_unit_status
6637: -- Bug#2521744
6638: -- This procedure will get the other pay component values
6639: -- at the time of intervening correction.
6640: PROCEDURE get_sf52_to_othpays_for_ia
6641: (p_sf52_ia_rec in out nocopy ghr_pa_requests%rowtype) IS
6642:
6643: CURSOR C_element_exists(p_element_name IN VARCHAR2,
6644: p_assignment_id IN number,
6645: p_effective_date IN DATE) IS
6661:
6662:
6663: l_proc varchar2(30):='get_sf52_to_othpays_for_ia';
6664: l_dummy_varchar varchar2(1);
6665: l_sf52_ia_rec ghr_pa_requests%rowtype;
6666: l_noa_id ghr_nature_of_actions.nature_of_action_id%type;
6667: l_noa_fam_code ghr_noa_families.noa_family_code%type;
6668:
6669: BEGIN