14:
15: Procedure Single_Action_SF52(p_sf52_data in out nocopy ghr_pa_requests%rowtype,
16: p_process_type in varchar2 default 'CURRENT',
17: p_capped_other_pay in number default null);
18: Procedure Dual_Action_SF52(p_sf52_data in out nocopy ghr_pa_requests%rowtype,
19: p_process_type in varchar2 default 'CURRENT');
20:
21: procedure create_ghr_errorlog(
22: p_program_name in ghr_process_log.program_name%type,
38: );
39: */
40:
41: --6850492
42: procedure Dual_Cancel_sf52(p_sf52_data in out nocopy ghr_pa_requests%rowtype
43: ,p_first_noa_code in varchar2
44: ,p_second_noa_code in varchar2
45: ,p_pa_request_id in number
46: ,p_ovn in number
95: l_proc varchar2(30):='process_sf52';
96: l_sf52_data ghr_pa_requests%rowtype;
97:
98: --6850492
99: l_dual_cancel varchar2(1);
100: l_dual_first_noa_code ghr_pa_requests.first_noa_code%type;
101: l_dual_second_noa_code ghr_pa_requests.second_noa_code%type;
102: l_dual_pa_request_id ghr_pa_requests.pa_request_id%type;
103: l_dual_ovn ghr_pa_requests.object_version_number%type;
96: l_sf52_data ghr_pa_requests%rowtype;
97:
98: --6850492
99: l_dual_cancel varchar2(1);
100: l_dual_first_noa_code ghr_pa_requests.first_noa_code%type;
101: l_dual_second_noa_code ghr_pa_requests.second_noa_code%type;
102: l_dual_pa_request_id ghr_pa_requests.pa_request_id%type;
103: l_dual_ovn ghr_pa_requests.object_version_number%type;
104: l_dual_first_noa_id ghr_pa_requests.first_noa_id%type;
97:
98: --6850492
99: l_dual_cancel varchar2(1);
100: l_dual_first_noa_code ghr_pa_requests.first_noa_code%type;
101: l_dual_second_noa_code ghr_pa_requests.second_noa_code%type;
102: l_dual_pa_request_id ghr_pa_requests.pa_request_id%type;
103: l_dual_ovn ghr_pa_requests.object_version_number%type;
104: l_dual_first_noa_id ghr_pa_requests.first_noa_id%type;
105: l_dual_second_noa_id ghr_pa_requests.second_noa_id%type;
98: --6850492
99: l_dual_cancel varchar2(1);
100: l_dual_first_noa_code ghr_pa_requests.first_noa_code%type;
101: l_dual_second_noa_code ghr_pa_requests.second_noa_code%type;
102: l_dual_pa_request_id ghr_pa_requests.pa_request_id%type;
103: l_dual_ovn ghr_pa_requests.object_version_number%type;
104: l_dual_first_noa_id ghr_pa_requests.first_noa_id%type;
105: l_dual_second_noa_id ghr_pa_requests.second_noa_id%type;
106: l_dual_row_id varchar2(100);
99: l_dual_cancel varchar2(1);
100: l_dual_first_noa_code ghr_pa_requests.first_noa_code%type;
101: l_dual_second_noa_code ghr_pa_requests.second_noa_code%type;
102: l_dual_pa_request_id ghr_pa_requests.pa_request_id%type;
103: l_dual_ovn ghr_pa_requests.object_version_number%type;
104: l_dual_first_noa_id ghr_pa_requests.first_noa_id%type;
105: l_dual_second_noa_id ghr_pa_requests.second_noa_id%type;
106: l_dual_row_id varchar2(100);
107: --6850492 /*Base Action is dual action*/
100: l_dual_first_noa_code ghr_pa_requests.first_noa_code%type;
101: l_dual_second_noa_code ghr_pa_requests.second_noa_code%type;
102: l_dual_pa_request_id ghr_pa_requests.pa_request_id%type;
103: l_dual_ovn ghr_pa_requests.object_version_number%type;
104: l_dual_first_noa_id ghr_pa_requests.first_noa_id%type;
105: l_dual_second_noa_id ghr_pa_requests.second_noa_id%type;
106: l_dual_row_id varchar2(100);
107: --6850492 /*Base Action is dual action*/
108:
101: l_dual_second_noa_code ghr_pa_requests.second_noa_code%type;
102: l_dual_pa_request_id ghr_pa_requests.pa_request_id%type;
103: l_dual_ovn ghr_pa_requests.object_version_number%type;
104: l_dual_first_noa_id ghr_pa_requests.first_noa_id%type;
105: l_dual_second_noa_id ghr_pa_requests.second_noa_id%type;
106: l_dual_row_id varchar2(100);
107: --6850492 /*Base Action is dual action*/
108:
109: Cursor Chk_Dual_Cancel
102: l_dual_pa_request_id ghr_pa_requests.pa_request_id%type;
103: l_dual_ovn ghr_pa_requests.object_version_number%type;
104: l_dual_first_noa_id ghr_pa_requests.first_noa_id%type;
105: l_dual_second_noa_id ghr_pa_requests.second_noa_id%type;
106: l_dual_row_id varchar2(100);
107: --6850492 /*Base Action is dual action*/
108:
109: Cursor Chk_Dual_Cancel
110: is
103: l_dual_ovn ghr_pa_requests.object_version_number%type;
104: l_dual_first_noa_id ghr_pa_requests.first_noa_id%type;
105: l_dual_second_noa_id ghr_pa_requests.second_noa_id%type;
106: l_dual_row_id varchar2(100);
107: --6850492 /*Base Action is dual action*/
108:
109: Cursor Chk_Dual_Cancel
110: is
111: select rowid,pa_request_id,first_noa_code,second_noa_code,
105: l_dual_second_noa_id ghr_pa_requests.second_noa_id%type;
106: l_dual_row_id varchar2(100);
107: --6850492 /*Base Action is dual action*/
108:
109: Cursor Chk_Dual_Cancel
110: is
111: select rowid,pa_request_id,first_noa_code,second_noa_code,
112: object_version_number,first_noa_id,second_noa_id
113: from ghr_pa_requests
115: and first_noa_code not in ('001','002')
116: and second_noa_code is not null
117: and pa_notification_id is not null;
118: -- Bug # 8283074 removed the below validation as the
119: -- concept of breaking dual relationship is removed
120: /*and not exists (select 1
121: from ghr_pa_requests
122: where nvl(rpa_type,'-1') <> 'DUAL'
123: and mass_action_id is null
118: -- Bug # 8283074 removed the below validation as the
119: -- concept of breaking dual relationship is removed
120: /*and not exists (select 1
121: from ghr_pa_requests
122: where nvl(rpa_type,'-1') <> 'DUAL'
123: and mass_action_id is null
124: and first_noa_code in ('002')
125: and pa_notification_id is not null
126: start with pa_request_id = p_sf52_data.altered_pa_request_id
151: hr_utility.set_message(8301 , 'GHR_38031_FIRST_LAC_NOT_EXIST');
152: hr_utility.raise_error;
153: end if;
154: --6850492
155: l_dual_cancel := 'N';
156: for Chk_Dual_Cancel_Rec in Chk_Dual_Cancel
157: loop
158: l_dual_cancel :='Y';
159: l_dual_first_noa_code := Chk_Dual_Cancel_Rec.first_noa_code;
152: hr_utility.raise_error;
153: end if;
154: --6850492
155: l_dual_cancel := 'N';
156: for Chk_Dual_Cancel_Rec in Chk_Dual_Cancel
157: loop
158: l_dual_cancel :='Y';
159: l_dual_first_noa_code := Chk_Dual_Cancel_Rec.first_noa_code;
160: l_dual_second_noa_code := Chk_Dual_Cancel_Rec.second_noa_code;
154: --6850492
155: l_dual_cancel := 'N';
156: for Chk_Dual_Cancel_Rec in Chk_Dual_Cancel
157: loop
158: l_dual_cancel :='Y';
159: l_dual_first_noa_code := Chk_Dual_Cancel_Rec.first_noa_code;
160: l_dual_second_noa_code := Chk_Dual_Cancel_Rec.second_noa_code;
161: l_dual_pa_request_id := Chk_Dual_Cancel_Rec.pa_request_id;
162: l_dual_ovn := Chk_Dual_Cancel_Rec.object_version_number;
155: l_dual_cancel := 'N';
156: for Chk_Dual_Cancel_Rec in Chk_Dual_Cancel
157: loop
158: l_dual_cancel :='Y';
159: l_dual_first_noa_code := Chk_Dual_Cancel_Rec.first_noa_code;
160: l_dual_second_noa_code := Chk_Dual_Cancel_Rec.second_noa_code;
161: l_dual_pa_request_id := Chk_Dual_Cancel_Rec.pa_request_id;
162: l_dual_ovn := Chk_Dual_Cancel_Rec.object_version_number;
163: l_dual_first_noa_id := Chk_Dual_Cancel_Rec.first_noa_id;
156: for Chk_Dual_Cancel_Rec in Chk_Dual_Cancel
157: loop
158: l_dual_cancel :='Y';
159: l_dual_first_noa_code := Chk_Dual_Cancel_Rec.first_noa_code;
160: l_dual_second_noa_code := Chk_Dual_Cancel_Rec.second_noa_code;
161: l_dual_pa_request_id := Chk_Dual_Cancel_Rec.pa_request_id;
162: l_dual_ovn := Chk_Dual_Cancel_Rec.object_version_number;
163: l_dual_first_noa_id := Chk_Dual_Cancel_Rec.first_noa_id;
164: l_dual_second_noa_id := Chk_Dual_Cancel_Rec.second_noa_id;
157: loop
158: l_dual_cancel :='Y';
159: l_dual_first_noa_code := Chk_Dual_Cancel_Rec.first_noa_code;
160: l_dual_second_noa_code := Chk_Dual_Cancel_Rec.second_noa_code;
161: l_dual_pa_request_id := Chk_Dual_Cancel_Rec.pa_request_id;
162: l_dual_ovn := Chk_Dual_Cancel_Rec.object_version_number;
163: l_dual_first_noa_id := Chk_Dual_Cancel_Rec.first_noa_id;
164: l_dual_second_noa_id := Chk_Dual_Cancel_Rec.second_noa_id;
165: l_dual_row_id := Chk_Dual_Cancel_Rec.rowid;
158: l_dual_cancel :='Y';
159: l_dual_first_noa_code := Chk_Dual_Cancel_Rec.first_noa_code;
160: l_dual_second_noa_code := Chk_Dual_Cancel_Rec.second_noa_code;
161: l_dual_pa_request_id := Chk_Dual_Cancel_Rec.pa_request_id;
162: l_dual_ovn := Chk_Dual_Cancel_Rec.object_version_number;
163: l_dual_first_noa_id := Chk_Dual_Cancel_Rec.first_noa_id;
164: l_dual_second_noa_id := Chk_Dual_Cancel_Rec.second_noa_id;
165: l_dual_row_id := Chk_Dual_Cancel_Rec.rowid;
166: end loop;
159: l_dual_first_noa_code := Chk_Dual_Cancel_Rec.first_noa_code;
160: l_dual_second_noa_code := Chk_Dual_Cancel_Rec.second_noa_code;
161: l_dual_pa_request_id := Chk_Dual_Cancel_Rec.pa_request_id;
162: l_dual_ovn := Chk_Dual_Cancel_Rec.object_version_number;
163: l_dual_first_noa_id := Chk_Dual_Cancel_Rec.first_noa_id;
164: l_dual_second_noa_id := Chk_Dual_Cancel_Rec.second_noa_id;
165: l_dual_row_id := Chk_Dual_Cancel_Rec.rowid;
166: end loop;
167: If l_dual_cancel = 'N' then
160: l_dual_second_noa_code := Chk_Dual_Cancel_Rec.second_noa_code;
161: l_dual_pa_request_id := Chk_Dual_Cancel_Rec.pa_request_id;
162: l_dual_ovn := Chk_Dual_Cancel_Rec.object_version_number;
163: l_dual_first_noa_id := Chk_Dual_Cancel_Rec.first_noa_id;
164: l_dual_second_noa_id := Chk_Dual_Cancel_Rec.second_noa_id;
165: l_dual_row_id := Chk_Dual_Cancel_Rec.rowid;
166: end loop;
167: If l_dual_cancel = 'N' then
168: ghr_corr_canc_sf52.cancel_routine(p_sf52_data);
161: l_dual_pa_request_id := Chk_Dual_Cancel_Rec.pa_request_id;
162: l_dual_ovn := Chk_Dual_Cancel_Rec.object_version_number;
163: l_dual_first_noa_id := Chk_Dual_Cancel_Rec.first_noa_id;
164: l_dual_second_noa_id := Chk_Dual_Cancel_Rec.second_noa_id;
165: l_dual_row_id := Chk_Dual_Cancel_Rec.rowid;
166: end loop;
167: If l_dual_cancel = 'N' then
168: ghr_corr_canc_sf52.cancel_routine(p_sf52_data);
169: elsif l_dual_cancel = 'Y' then
163: l_dual_first_noa_id := Chk_Dual_Cancel_Rec.first_noa_id;
164: l_dual_second_noa_id := Chk_Dual_Cancel_Rec.second_noa_id;
165: l_dual_row_id := Chk_Dual_Cancel_Rec.rowid;
166: end loop;
167: If l_dual_cancel = 'N' then
168: ghr_corr_canc_sf52.cancel_routine(p_sf52_data);
169: elsif l_dual_cancel = 'Y' then
170: Dual_Cancel_sf52(p_sf52_data => p_sf52_data
171: ,p_first_noa_code => l_dual_first_noa_code
165: l_dual_row_id := Chk_Dual_Cancel_Rec.rowid;
166: end loop;
167: If l_dual_cancel = 'N' then
168: ghr_corr_canc_sf52.cancel_routine(p_sf52_data);
169: elsif l_dual_cancel = 'Y' then
170: Dual_Cancel_sf52(p_sf52_data => p_sf52_data
171: ,p_first_noa_code => l_dual_first_noa_code
172: ,p_second_noa_code => l_dual_second_noa_code
173: ,p_pa_request_id => l_dual_pa_request_id
166: end loop;
167: If l_dual_cancel = 'N' then
168: ghr_corr_canc_sf52.cancel_routine(p_sf52_data);
169: elsif l_dual_cancel = 'Y' then
170: Dual_Cancel_sf52(p_sf52_data => p_sf52_data
171: ,p_first_noa_code => l_dual_first_noa_code
172: ,p_second_noa_code => l_dual_second_noa_code
173: ,p_pa_request_id => l_dual_pa_request_id
174: ,p_ovn => l_dual_ovn
167: If l_dual_cancel = 'N' then
168: ghr_corr_canc_sf52.cancel_routine(p_sf52_data);
169: elsif l_dual_cancel = 'Y' then
170: Dual_Cancel_sf52(p_sf52_data => p_sf52_data
171: ,p_first_noa_code => l_dual_first_noa_code
172: ,p_second_noa_code => l_dual_second_noa_code
173: ,p_pa_request_id => l_dual_pa_request_id
174: ,p_ovn => l_dual_ovn
175: ,p_first_noa_id => l_dual_first_noa_id
168: ghr_corr_canc_sf52.cancel_routine(p_sf52_data);
169: elsif l_dual_cancel = 'Y' then
170: Dual_Cancel_sf52(p_sf52_data => p_sf52_data
171: ,p_first_noa_code => l_dual_first_noa_code
172: ,p_second_noa_code => l_dual_second_noa_code
173: ,p_pa_request_id => l_dual_pa_request_id
174: ,p_ovn => l_dual_ovn
175: ,p_first_noa_id => l_dual_first_noa_id
176: ,p_second_noa_id => l_dual_second_noa_id
169: elsif l_dual_cancel = 'Y' then
170: Dual_Cancel_sf52(p_sf52_data => p_sf52_data
171: ,p_first_noa_code => l_dual_first_noa_code
172: ,p_second_noa_code => l_dual_second_noa_code
173: ,p_pa_request_id => l_dual_pa_request_id
174: ,p_ovn => l_dual_ovn
175: ,p_first_noa_id => l_dual_first_noa_id
176: ,p_second_noa_id => l_dual_second_noa_id
177: ,p_row_id => l_dual_row_id);
170: Dual_Cancel_sf52(p_sf52_data => p_sf52_data
171: ,p_first_noa_code => l_dual_first_noa_code
172: ,p_second_noa_code => l_dual_second_noa_code
173: ,p_pa_request_id => l_dual_pa_request_id
174: ,p_ovn => l_dual_ovn
175: ,p_first_noa_id => l_dual_first_noa_id
176: ,p_second_noa_id => l_dual_second_noa_id
177: ,p_row_id => l_dual_row_id);
178: end if;
171: ,p_first_noa_code => l_dual_first_noa_code
172: ,p_second_noa_code => l_dual_second_noa_code
173: ,p_pa_request_id => l_dual_pa_request_id
174: ,p_ovn => l_dual_ovn
175: ,p_first_noa_id => l_dual_first_noa_id
176: ,p_second_noa_id => l_dual_second_noa_id
177: ,p_row_id => l_dual_row_id);
178: end if;
179: --6850492
172: ,p_second_noa_code => l_dual_second_noa_code
173: ,p_pa_request_id => l_dual_pa_request_id
174: ,p_ovn => l_dual_ovn
175: ,p_first_noa_id => l_dual_first_noa_id
176: ,p_second_noa_id => l_dual_second_noa_id
177: ,p_row_id => l_dual_row_id);
178: end if;
179: --6850492
180:
173: ,p_pa_request_id => l_dual_pa_request_id
174: ,p_ovn => l_dual_ovn
175: ,p_first_noa_id => l_dual_first_noa_id
176: ,p_second_noa_id => l_dual_second_noa_id
177: ,p_row_id => l_dual_row_id);
178: end if;
179: --6850492
180:
181:
185: p_process_type => p_process_type,
186: p_capped_other_pay => p_capped_other_pay);
187: elsif p_sf52_data.first_noa_code is not null and
188: p_sf52_data.second_noa_code is not null then
189: -- dual Action
190: --added for 8267598
191: ghr_process_sf52.reinit_dual_var;
192: dual_action_sf52 ( p_sf52_data,
193: p_process_type => p_process_type);
187: elsif p_sf52_data.first_noa_code is not null and
188: p_sf52_data.second_noa_code is not null then
189: -- dual Action
190: --added for 8267598
191: ghr_process_sf52.reinit_dual_var;
192: dual_action_sf52 ( p_sf52_data,
193: p_process_type => p_process_type);
194: --added for 8267598
195: ghr_process_sf52.reinit_dual_var;
188: p_sf52_data.second_noa_code is not null then
189: -- dual Action
190: --added for 8267598
191: ghr_process_sf52.reinit_dual_var;
192: dual_action_sf52 ( p_sf52_data,
193: p_process_type => p_process_type);
194: --added for 8267598
195: ghr_process_sf52.reinit_dual_var;
196: elsif p_sf52_data.first_noa_code is not null and
191: ghr_process_sf52.reinit_dual_var;
192: dual_action_sf52 ( p_sf52_data,
193: p_process_type => p_process_type);
194: --added for 8267598
195: ghr_process_sf52.reinit_dual_var;
196: elsif p_sf52_data.first_noa_code is not null and
197: p_sf52_data.second_noa_code is null then
198: -- Single action
199: hr_utility.set_location('Bef call single action Payment Option ' || p_sf52_data.pa_incentive_payment_option, 20);
390: RAISE;
391:
392: End Single_Action_SF52;
393:
394: -- |--------------------------< dual_action_sf52>-----------------------------|
395: -- Description:
396: -- This procedure handles the case of a dual action.
397: -- Pre-Requisities:
398: -- None.
392: End Single_Action_SF52;
393:
394: -- |--------------------------< dual_action_sf52>-----------------------------|
395: -- Description:
396: -- This procedure handles the case of a dual action.
397: -- Pre-Requisities:
398: -- None.
399: -- In Parameters:
400: -- p_sf52_data -> ghr_pa_requests record of the sf52.
407: -- Access Status:
408: -- Internal Development Use Only.
409: -- ---------------------------------------------------------------------------
410:
411: Procedure Dual_Action_SF52( p_sf52_data in out nocopy ghr_pa_requests%rowtype,
412: p_process_type in varchar2 default 'CURRENT') is
413:
414: l_today date:=sysdate;
415: l_sf52_data ghr_pa_requests%rowtype;
418: l_agency_ei_data ghr_pa_request_extra_info%rowtype;
419: l_shadow_data ghr_pa_request_shadow%rowtype;
420: l_session_var ghr_history_api.g_session_var_type;
421: l_result varchar2(30);
422: l_proc varchar2(30):='dual_action_sf52';
423: l_new_assignment_id per_all_assignments_f.assignment_id%type;
424: l_capped_other_pay number;
425:
426: Begin
438: l_session_var.person_id := p_sf52_data.person_id;
439: l_session_var.program_name := 'sf50';
440: l_session_var.assignment_id := p_sf52_data.employee_assignment_id;
441: ghr_history_api.set_g_session_var(l_session_var);
442: ghr_process_sf52.g_dual_action_yn := 'Y';
443: ghr_process_sf52.g_dual_first_noac := p_sf52_data.first_noa_code;
444: ghr_process_sf52.g_dual_second_noac := p_sf52_data.second_noa_code;
445:
446: l_sf52_data := p_sf52_data;
439: l_session_var.program_name := 'sf50';
440: l_session_var.assignment_id := p_sf52_data.employee_assignment_id;
441: ghr_history_api.set_g_session_var(l_session_var);
442: ghr_process_sf52.g_dual_action_yn := 'Y';
443: ghr_process_sf52.g_dual_first_noac := p_sf52_data.first_noa_code;
444: ghr_process_sf52.g_dual_second_noac := p_sf52_data.second_noa_code;
445:
446: l_sf52_data := p_sf52_data;
447:
440: l_session_var.assignment_id := p_sf52_data.employee_assignment_id;
441: ghr_history_api.set_g_session_var(l_session_var);
442: ghr_process_sf52.g_dual_action_yn := 'Y';
443: ghr_process_sf52.g_dual_first_noac := p_sf52_data.first_noa_code;
444: ghr_process_sf52.g_dual_second_noac := p_sf52_data.second_noa_code;
445:
446: l_sf52_data := p_sf52_data;
447:
448: refresh_req_shadow (
472: l_sf52_data_save := l_sf52_data;
473:
474: --8753859 Modified to not to call assign_new_rg for return to duty as the latest position is considered
475: -- during the processing of first action itself. For Return to Duty the changes made for the
476: --second action of dual action will be considered in the first action itself so assign_new_rg is not call
477: -- for return to duty.
478:
479: if l_sf52_data.noa_family_code <> 'RETURN_TO_DUTY' then
480: assign_new_rg( p_action_num => 1,
482: else
483: null_2ndNoa_cols(l_sf52_data);
484: end if;
485: if (p_sf52_data.first_noa_code = '893') then --Bug# 8926400
486: -- In case of dual action we may want to derive from, to column values
487: -- Will be implemented once we have the business rules requirement.
488: -- generate_from_to_colm( l_sf52_data);
489: derive_to_columns(p_sf52_data => l_sf52_data);
490: end if;
500: p_agency_ei => TRUE,
501: p_sf52_ei_data => l_agency_ei_data,
502: p_result => l_result);
503: -- issue savepoint
504: savepoint dual_Action_sf52;
505: -- Check if atleast the min. required items exist in the pa_request
506: ghr_sf52_validn_pkg.prelim_req_chk_for_update_hr
507: (p_pa_request_rec => p_sf52_data
508: );
574: p_capped_other_pay => l_capped_other_pay);
575:
576: hr_utility.set_location( l_proc , 60);
577: if l_session_var.date_effective > l_today then
578: rollback to dual_action_sf52;
579: else
580: hr_utility.set_location( l_proc , 60);
581: ghr_sf52_post_update.Post_sf52_process(
582: p_pa_request_id => p_sf52_data.pa_request_id,
715: -- |--------------------------< assign_new_rg>--------------------------------|
716: -- Description:
717: -- This procedure nulls out or populates the unneeded columns in p_pa_req according to the
718: -- following two criteria:
719: -- 1) If this the second or first action of a dual action.
720: -- 2) Which fields are in pa_data_fields for this noa.
721: -- If p_action_num is 2 (We are building this from the second noa of a dual action),
722: -- then copy all second noa columns to the first noa columns and null out
723: -- the second noa columns.
717: -- This procedure nulls out or populates the unneeded columns in p_pa_req according to the
718: -- following two criteria:
719: -- 1) If this the second or first action of a dual action.
720: -- 2) Which fields are in pa_data_fields for this noa.
721: -- If p_action_num is 2 (We are building this from the second noa of a dual action),
722: -- then copy all second noa columns to the first noa columns and null out
723: -- the second noa columns.
724: -- Then, for each of the fields, copy them to the pa_request record we are building
725: -- according to the criteria listed in the function (Some fields are copied regardless
761: CONNECT BY pa_request_id = prior altered_pa_request_id
762: START WITH pa_request_id = cp_pa_request_id)
763: AND ghrpah_1.nature_of_action_id = cp_noa_id;
764:
765: CURSOR get_dual_family( p_first_noa_id in ghr_dual_actions.first_noa_id%type,
766: p_second_noa_id in ghr_dual_actions.second_noa_id%type) IS
767: SELECT noa_family_code
768: FROM ghr_dual_actions
769: WHERE first_noa_id = p_first_noa_id
762: START WITH pa_request_id = cp_pa_request_id)
763: AND ghrpah_1.nature_of_action_id = cp_noa_id;
764:
765: CURSOR get_dual_family( p_first_noa_id in ghr_dual_actions.first_noa_id%type,
766: p_second_noa_id in ghr_dual_actions.second_noa_id%type) IS
767: SELECT noa_family_code
768: FROM ghr_dual_actions
769: WHERE first_noa_id = p_first_noa_id
770: AND second_noa_id = p_second_noa_id;
764:
765: CURSOR get_dual_family( p_first_noa_id in ghr_dual_actions.first_noa_id%type,
766: p_second_noa_id in ghr_dual_actions.second_noa_id%type) IS
767: SELECT noa_family_code
768: FROM ghr_dual_actions
769: WHERE first_noa_id = p_first_noa_id
770: AND second_noa_id = p_second_noa_id;
771: CURSOR get_dual_action( p_noa_family_code in ghr_dual_actions.noa_family_code%type,
772: p_form_field_name in ghr_dual_actions.noa_family_code%type) IS
767: SELECT noa_family_code
768: FROM ghr_dual_actions
769: WHERE first_noa_id = p_first_noa_id
770: AND second_noa_id = p_second_noa_id;
771: CURSOR get_dual_action( p_noa_family_code in ghr_dual_actions.noa_family_code%type,
772: p_form_field_name in ghr_dual_actions.noa_family_code%type) IS
773: SELECT *
774: FROM ghr_dual_proc_methods
775: WHERE LOWER(noa_family_code) = LOWER(p_noa_family_code)
768: FROM ghr_dual_actions
769: WHERE first_noa_id = p_first_noa_id
770: AND second_noa_id = p_second_noa_id;
771: CURSOR get_dual_action( p_noa_family_code in ghr_dual_actions.noa_family_code%type,
772: p_form_field_name in ghr_dual_actions.noa_family_code%type) IS
773: SELECT *
774: FROM ghr_dual_proc_methods
775: WHERE LOWER(noa_family_code) = LOWER(p_noa_family_code)
776: AND LOWER(form_field_name) = LOWER(p_form_field_name);
770: AND second_noa_id = p_second_noa_id;
771: CURSOR get_dual_action( p_noa_family_code in ghr_dual_actions.noa_family_code%type,
772: p_form_field_name in ghr_dual_actions.noa_family_code%type) IS
773: SELECT *
774: FROM ghr_dual_proc_methods
775: WHERE LOWER(noa_family_code) = LOWER(p_noa_family_code)
776: AND LOWER(form_field_name) = LOWER(p_form_field_name);
777: TYPE fld_names_typ is TABLE of fields_type
778: INDEX BY BINARY_INTEGER;
787: l_non_from_pa_req ghr_pa_requests%rowtype;
788: l_correction boolean:= null;
789: l_pa_req_ref ghr_pa_requests%rowtype;
790: l_pa_req_ref2 ghr_pa_requests%rowtype;
791: l_noa_family_code ghr_dual_actions.noa_family_code%type := null;
792: tmp_varchar varchar2(150);
793:
794: l_proc varchar2(30):='assign_new_rg';
795:
1598: l_count2 number :=0;
1599: l_from_to varchar2(1) ;
1600: l_field_name varchar2(150);
1601: l_to_field_name varchar2(150);
1602: l_dual_actions ghr_dual_proc_methods%rowtype;
1603: l_session_var ghr_history_api.g_session_var_type;
1604: l_pa_history_id ghr_pa_history.pa_history_id%type;
1605: l_to_field varchar2(2000);
1606: l_proc varchar2(30):='copy_to_new_rg_shared';
1675: else
1676: -- non-WGI first action.
1677: -- here's the handling for the new table:
1678: if (l_noa_family_code is null) then
1679: open get_dual_family( p_first_noa_id => p_pa_req.first_noa_id,
1680: p_second_noa_id => p_pa_req.second_noa_id);
1681: fetch get_dual_family into l_noa_family_code;
1682: close get_dual_family;
1683: end if;
1677: -- here's the handling for the new table:
1678: if (l_noa_family_code is null) then
1679: open get_dual_family( p_first_noa_id => p_pa_req.first_noa_id,
1680: p_second_noa_id => p_pa_req.second_noa_id);
1681: fetch get_dual_family into l_noa_family_code;
1682: close get_dual_family;
1683: end if;
1684: if (LOWER(SUBSTR(p_field_name,0,3)) = 'to_') then
1685: open get_dual_action( p_noa_family_code => l_noa_family_code,
1678: if (l_noa_family_code is null) then
1679: open get_dual_family( p_first_noa_id => p_pa_req.first_noa_id,
1680: p_second_noa_id => p_pa_req.second_noa_id);
1681: fetch get_dual_family into l_noa_family_code;
1682: close get_dual_family;
1683: end if;
1684: if (LOWER(SUBSTR(p_field_name,0,3)) = 'to_') then
1685: open get_dual_action( p_noa_family_code => l_noa_family_code,
1686: p_form_field_name => 'TO_INFO');
1681: fetch get_dual_family into l_noa_family_code;
1682: close get_dual_family;
1683: end if;
1684: if (LOWER(SUBSTR(p_field_name,0,3)) = 'to_') then
1685: open get_dual_action( p_noa_family_code => l_noa_family_code,
1686: p_form_field_name => 'TO_INFO');
1687: fetch get_dual_action into l_dual_actions;
1688: if (LOWER(l_dual_actions.first_noa_proc_method) = 'uf') then
1689: -- copy corresponding 'from' value into 'to' value
1683: end if;
1684: if (LOWER(SUBSTR(p_field_name,0,3)) = 'to_') then
1685: open get_dual_action( p_noa_family_code => l_noa_family_code,
1686: p_form_field_name => 'TO_INFO');
1687: fetch get_dual_action into l_dual_actions;
1688: if (LOWER(l_dual_actions.first_noa_proc_method) = 'uf') then
1689: -- copy corresponding 'from' value into 'to' value
1690: -- Right now, all the calls wil have null in p_fld_nm_copy_from
1691: -- or if p_field_name is 'TO_...' and p_fld_nm_copy_from has a value
1684: if (LOWER(SUBSTR(p_field_name,0,3)) = 'to_') then
1685: open get_dual_action( p_noa_family_code => l_noa_family_code,
1686: p_form_field_name => 'TO_INFO');
1687: fetch get_dual_action into l_dual_actions;
1688: if (LOWER(l_dual_actions.first_noa_proc_method) = 'uf') then
1689: -- copy corresponding 'from' value into 'to' value
1690: -- Right now, all the calls wil have null in p_fld_nm_copy_from
1691: -- or if p_field_name is 'TO_...' and p_fld_nm_copy_from has a value
1692: -- then it will also be 'TO_....'
1693: l_field_name := nvl(p_fld_nm_copy_from, p_field_name);
1694: l_to_field_name := REPLACE(l_field_name, 'TO_','FROM_');
1695: p_to_field := get_field_info( p_field_name => l_to_field_name,
1696: p_sf52_data => p_pa_req);
1697: elsif (LOWER(l_dual_actions.first_noa_proc_method) = 'ue') then
1698: NULL;
1699: else
1700: close get_dual_action;
1701: hr_utility.set_message(8301, 'GHR_38414_UNSUPPORTED_ACT_TYP');
1696: p_sf52_data => p_pa_req);
1697: elsif (LOWER(l_dual_actions.first_noa_proc_method) = 'ue') then
1698: NULL;
1699: else
1700: close get_dual_action;
1701: hr_utility.set_message(8301, 'GHR_38414_UNSUPPORTED_ACT_TYP');
1702: hr_utility.set_message_token('ACTION_TYPE', l_dual_actions.first_noa_proc_method);
1703: hr_utility.raise_error;
1704: end if;
1698: NULL;
1699: else
1700: close get_dual_action;
1701: hr_utility.set_message(8301, 'GHR_38414_UNSUPPORTED_ACT_TYP');
1702: hr_utility.set_message_token('ACTION_TYPE', l_dual_actions.first_noa_proc_method);
1703: hr_utility.raise_error;
1704: end if;
1705: close get_dual_action;
1706: else
1701: hr_utility.set_message(8301, 'GHR_38414_UNSUPPORTED_ACT_TYP');
1702: hr_utility.set_message_token('ACTION_TYPE', l_dual_actions.first_noa_proc_method);
1703: hr_utility.raise_error;
1704: end if;
1705: close get_dual_action;
1706: else
1707: open get_dual_action( p_noa_family_code => l_noa_family_code,
1708: p_form_field_name => p_field_name);
1709: fetch get_dual_action into l_dual_actions;
1703: hr_utility.raise_error;
1704: end if;
1705: close get_dual_action;
1706: else
1707: open get_dual_action( p_noa_family_code => l_noa_family_code,
1708: p_form_field_name => p_field_name);
1709: fetch get_dual_action into l_dual_actions;
1710: if (LOWER(l_dual_actions.first_noa_proc_method) = 'rp') then
1711: if (not l_refresh_called) then
1705: close get_dual_action;
1706: else
1707: open get_dual_action( p_noa_family_code => l_noa_family_code,
1708: p_form_field_name => p_field_name);
1709: fetch get_dual_action into l_dual_actions;
1710: if (LOWER(l_dual_actions.first_noa_proc_method) = 'rp') then
1711: if (not l_refresh_called) then
1712:
1713: l_pa_req_ref.from_position_id := l_pa_req.from_position_id;
1706: else
1707: open get_dual_action( p_noa_family_code => l_noa_family_code,
1708: p_form_field_name => p_field_name);
1709: fetch get_dual_action into l_dual_actions;
1710: if (LOWER(l_dual_actions.first_noa_proc_method) = 'rp') then
1711: if (not l_refresh_called) then
1712:
1713: l_pa_req_ref.from_position_id := l_pa_req.from_position_id;
1714: -- if this is a return_to_duty first action, then set to_position = from_position
1734: l_refresh_called := TRUE;
1735: end if;
1736: p_to_field := get_field_info( p_field_name => nvl(p_fld_nm_copy_from,p_field_name),
1737: p_sf52_data => l_pa_req_ref);
1738: elsif (LOWER(l_dual_actions.first_noa_proc_method) = 'ue') then
1739: -- do nothing, pass it along as is.
1740: null;
1741: else
1742: -- unsupported type. Throw error.
1739: -- do nothing, pass it along as is.
1740: null;
1741: else
1742: -- unsupported type. Throw error.
1743: close get_dual_action;
1744: hr_utility.set_message(8301, 'GHR_38498_UNSUPPORTED_ACT_TYP');
1745: hr_utility.set_message_token('ACTION_TYPE', l_dual_actions.first_noa_proc_method);
1746: hr_utility.raise_error;
1747: end if;
1741: else
1742: -- unsupported type. Throw error.
1743: close get_dual_action;
1744: hr_utility.set_message(8301, 'GHR_38498_UNSUPPORTED_ACT_TYP');
1745: hr_utility.set_message_token('ACTION_TYPE', l_dual_actions.first_noa_proc_method);
1746: hr_utility.raise_error;
1747: end if;
1748: close get_dual_action;
1749: end if;
1744: hr_utility.set_message(8301, 'GHR_38498_UNSUPPORTED_ACT_TYP');
1745: hr_utility.set_message_token('ACTION_TYPE', l_dual_actions.first_noa_proc_method);
1746: hr_utility.raise_error;
1747: end if;
1748: close get_dual_action;
1749: end if;
1750: end if;
1751: elsif (l_fld_names_tab1(l_count1).process_method_code = 'AP' and
1752: l_fld_names_tab2(l_count2).process_method_code = 'AP') or
1810: -- this covers the case where the user can enter data for both actions.
1811: -- i.e. - APUE/UE first action with a APUE/UE second action.
1812: if (p_pa_req.first_noa_code = '893') then--Bug# 8926400
1813: -- this is a WGI first action, and requires special handling of UE/APUE-UE/APUE cases.
1814: -- when processing the second action of a dual action with WGI as the first action,
1815: -- we will always pass the field along as is. The reasons for this are as follows:
1816: -- 1) If the form field is a to field, then it is automatically associated with the second action.
1817: -- 2) Non-to field information, is also passed along as is. The requirement specifies that
1818: -- all information on the form is associated with the second action. The only exception to this
1822: else
1823: -- non-WGI first action
1824: -- Here's the functionality to access the new table:
1825: if (l_noa_family_code is null) then
1826: open get_dual_family( p_first_noa_id => p_pa_req.first_noa_id,
1827: p_second_noa_id => p_pa_req.second_noa_id);
1828: fetch get_dual_family into l_noa_family_code;
1829: close get_dual_family;
1830: end if;
1824: -- Here's the functionality to access the new table:
1825: if (l_noa_family_code is null) then
1826: open get_dual_family( p_first_noa_id => p_pa_req.first_noa_id,
1827: p_second_noa_id => p_pa_req.second_noa_id);
1828: fetch get_dual_family into l_noa_family_code;
1829: close get_dual_family;
1830: end if;
1831: if (LOWER(SUBSTR(p_field_name,0,3)) = 'to_') then
1832: open get_dual_action( p_noa_family_code => l_noa_family_code,
1825: if (l_noa_family_code is null) then
1826: open get_dual_family( p_first_noa_id => p_pa_req.first_noa_id,
1827: p_second_noa_id => p_pa_req.second_noa_id);
1828: fetch get_dual_family into l_noa_family_code;
1829: close get_dual_family;
1830: end if;
1831: if (LOWER(SUBSTR(p_field_name,0,3)) = 'to_') then
1832: open get_dual_action( p_noa_family_code => l_noa_family_code,
1833: p_form_field_name => 'TO_INFO');
1828: fetch get_dual_family into l_noa_family_code;
1829: close get_dual_family;
1830: end if;
1831: if (LOWER(SUBSTR(p_field_name,0,3)) = 'to_') then
1832: open get_dual_action( p_noa_family_code => l_noa_family_code,
1833: p_form_field_name => 'TO_INFO');
1834: fetch get_dual_action into l_dual_actions;
1835: if (LOWER(l_dual_actions.second_noa_proc_method) = 'ue') then
1836: -- do nothing, pass it along as is.
1830: end if;
1831: if (LOWER(SUBSTR(p_field_name,0,3)) = 'to_') then
1832: open get_dual_action( p_noa_family_code => l_noa_family_code,
1833: p_form_field_name => 'TO_INFO');
1834: fetch get_dual_action into l_dual_actions;
1835: if (LOWER(l_dual_actions.second_noa_proc_method) = 'ue') then
1836: -- do nothing, pass it along as is.
1837: null;
1838: else
1831: if (LOWER(SUBSTR(p_field_name,0,3)) = 'to_') then
1832: open get_dual_action( p_noa_family_code => l_noa_family_code,
1833: p_form_field_name => 'TO_INFO');
1834: fetch get_dual_action into l_dual_actions;
1835: if (LOWER(l_dual_actions.second_noa_proc_method) = 'ue') then
1836: -- do nothing, pass it along as is.
1837: null;
1838: else
1839: close get_dual_action;
1835: if (LOWER(l_dual_actions.second_noa_proc_method) = 'ue') then
1836: -- do nothing, pass it along as is.
1837: null;
1838: else
1839: close get_dual_action;
1840: hr_utility.set_message(8301, 'GHR_38418_UNSUPPORTED_ACT_TYP');
1841: hr_utility.set_message_token('ACTION_TYPE', l_dual_actions.second_noa_proc_method);
1842: hr_utility.raise_error;
1843: end if;
1837: null;
1838: else
1839: close get_dual_action;
1840: hr_utility.set_message(8301, 'GHR_38418_UNSUPPORTED_ACT_TYP');
1841: hr_utility.set_message_token('ACTION_TYPE', l_dual_actions.second_noa_proc_method);
1842: hr_utility.raise_error;
1843: end if;
1844: close get_dual_action;
1845: else
1840: hr_utility.set_message(8301, 'GHR_38418_UNSUPPORTED_ACT_TYP');
1841: hr_utility.set_message_token('ACTION_TYPE', l_dual_actions.second_noa_proc_method);
1842: hr_utility.raise_error;
1843: end if;
1844: close get_dual_action;
1845: else
1846: open get_dual_action( p_noa_family_code => l_noa_family_code,
1847: p_form_field_name => p_field_name);
1848: fetch get_dual_action into l_dual_actions;
1842: hr_utility.raise_error;
1843: end if;
1844: close get_dual_action;
1845: else
1846: open get_dual_action( p_noa_family_code => l_noa_family_code,
1847: p_form_field_name => p_field_name);
1848: fetch get_dual_action into l_dual_actions;
1849: if (LOWER(l_dual_actions.second_noa_proc_method) = 'ue' ) then
1850: -- do nothing, pass it along as is.
1844: close get_dual_action;
1845: else
1846: open get_dual_action( p_noa_family_code => l_noa_family_code,
1847: p_form_field_name => p_field_name);
1848: fetch get_dual_action into l_dual_actions;
1849: if (LOWER(l_dual_actions.second_noa_proc_method) = 'ue' ) then
1850: -- do nothing, pass it along as is.
1851: null;
1852: else
1845: else
1846: open get_dual_action( p_noa_family_code => l_noa_family_code,
1847: p_form_field_name => p_field_name);
1848: fetch get_dual_action into l_dual_actions;
1849: if (LOWER(l_dual_actions.second_noa_proc_method) = 'ue' ) then
1850: -- do nothing, pass it along as is.
1851: null;
1852: else
1853: -- unsupported type. Throw error.
1850: -- do nothing, pass it along as is.
1851: null;
1852: else
1853: -- unsupported type. Throw error.
1854: close get_dual_action;
1855: hr_utility.set_message(8301, 'GHR_38418_UNSUPPORTED_ACT_TYP');
1856: hr_utility.set_message_token('ACTION_TYPE', l_dual_actions.second_noa_proc_method);
1857: hr_utility.raise_error;
1858: end if;
1852: else
1853: -- unsupported type. Throw error.
1854: close get_dual_action;
1855: hr_utility.set_message(8301, 'GHR_38418_UNSUPPORTED_ACT_TYP');
1856: hr_utility.set_message_token('ACTION_TYPE', l_dual_actions.second_noa_proc_method);
1857: hr_utility.raise_error;
1858: end if;
1859: close get_dual_action;
1860: end if;
1855: hr_utility.set_message(8301, 'GHR_38418_UNSUPPORTED_ACT_TYP');
1856: hr_utility.set_message_token('ACTION_TYPE', l_dual_actions.second_noa_proc_method);
1857: hr_utility.raise_error;
1858: end if;
1859: close get_dual_action;
1860: end if;
1861: end if;
1862: elsif ((l_fld_names_tab1(l_count1).process_method_code = 'UE' or
1863: l_fld_names_tab1(l_count1).process_method_code = 'APUE' or
1863: l_fld_names_tab1(l_count1).process_method_code = 'APUE' or
1864: l_fld_names_tab1(l_count1).process_method_code = 'AP' ) and
1865: (l_fld_names_tab2(l_count2).process_method_code = 'AP')) then
1866: if ((LOWER(SUBSTR(p_field_name, 0, 5))) = 'from_') then
1867: -- if this is a separation/separation incentive dual
1868: -- action, then take the from info from the first action as
1869: -- the from info for the second action. This is necessary because
1870: -- the separation first action has no to info.
1871: if ( (p_pa_req.first_noa_code in ('302','303','304','312','317') and --Bug# 8926400
1882: fetch get_root_pa_hist_id into l_pa_history_id;
1883: close get_root_pa_hist_id;
1884:
1885: -- if this cursor returned a null, then this means that this if the first time this
1886: -- dual action is being processed. i.e. - this is not a correction of the dual action.
1887: if l_pa_history_id is not null and p_pa_req.first_noa_code in ('002') then
1888: -- successfully found the root. Call refresh with this pa_history_id.
1889: l_correction := true;
1890: ghr_history_api.get_g_session_var(l_session_var);
1944: cp_noa_id => p_pa_req.second_noa_id);
1945: fetch get_root_pa_hist_id into l_pa_history_id;
1946: close get_root_pa_hist_id;
1947: -- if this cursor returned a null, then this means that this if the first time this
1948: -- dual action is being processed. i.e. - this is not a correction of the dual action.
1949: if l_pa_history_id is not null then
1950: -- successfully found the root. Call refresh with this pa_history_id.
1951: l_correction := true;
1952: ghr_history_api.get_g_session_var(l_session_var);
2338:
2339: -- copy_to_new_rg(p_action_num,'CUSTOM_PAY_CALC_FLAG',p_pa_req.custom_pay_calc_flag,l_pa_req.custom_pay_calc_flag);
2340: if (p_action_num = 2) then
2341: hr_utility.set_location('Correcting second action'|| l_proc, 10);
2342: -- if we are correcting the second action of a dual action, then copy all second noa columns into
2343: -- corresponding first noa columns
2344: copy_2ndNoa_to_1stNoa(l_pa_req);
2345: end if;
2346: -- null out second noa columns
2366: -- {Start Of Comments}
2367: --
2368: -- Description:
2369: -- Copies second noa columns to first noa columns. This is needed to facilitate
2370: -- the design of always processing both actions of a dual action as if
2371: -- each is the first action (i.e. - we pass it to update to database as if
2372: -- it is the first action, regardless of whether or not it is the first or second
2373: -- action).
2374: --
2722: ***********/
2723:
2724:
2725: Cursor cur_sessionid is
2726: select userenv('sessionid') sesid from dual;
2727:
2728: l_sid number;
2729: ----
2730: ---- Inserted a new procedure sub_proc_futr_sf52.
3645: and p_effective_date between pos.effective_start_date
3646: and pos.effective_end_date;
3647: -- FWFA Changes Commented the input_pay_rate_determinant.
3648: -- FWFA Changes Bug#4444609 Added input_pay_rate_determinant field in the cursor
3649: -- 6850492 Added NVL While refreshing the column for Dual Action,p_sf52_data.pa_request_id is null consider session variable
3650: Cursor get_noa_info IS
3651: select
3652: noa_family_code, first_noa_code, first_noa_id,
3653: second_noa_code, second_noa_id
3708: FROM ghr_pa_requests par1
3709: start with pa_request_id = c_pa_request_id
3710: connect by pa_request_id = prior altered_pa_request_id);
3711:
3712: -- 8303159 Dual Actions
3713: cursor get_740_prd
3714: is
3715: select pay_rate_determinant
3716: from ghr_pa_requests
3731: FROM ghr_pa_requests par1
3732: start with pa_request_id = l_session_var.altered_pa_request_id
3733: connect by pa_request_id = prior altered_pa_request_id)
3734: and second_noa_id =l_session_var.noa_id_correct;
3735: -- 8303159 Dual Actions
3736:
3737: --Begin Bug# 14047036, 13587903
3738: Cursor get_prd_pm(p_noa_id in number) is
3739: select fpm.process_method_code
4149: l_orig_pa_request_id := l_orig_rec.pa_request_id;
4150: l_orig_pa_notification_id := l_orig_rec.pa_notification_id;
4151: l_orig_person_id := l_orig_rec.person_id;
4152: l_orig_effective_date := l_orig_rec.effective_date;
4153: --Bug # 8303159 added for dual actions
4154: l_orig_first_noa := l_orig_rec.first_noa_code;
4155: l_orig_second_noa := l_orig_rec.second_noa_code;
4156: END LOOP;
4157: --BUG #7216635 added the parameter p_noa_id_correct
4167: p_retro_second_noa => l_retro_second_noa);
4168: hr_utility.set_location('Retro 1st NOA ' || l_retro_first_noa ,15);
4169: hr_utility.set_location('Retro 2nd NOA ' || l_retro_second_noa ,15);
4170:
4171: -- 8303159 For dual actions with 740 combination if first noa code is 740 need to
4172: -- consider it is as retro NOA
4173: IF l_session_var.altered_pa_request_id is not null and l_orig_second_noa is not null
4174: and l_orig_first_noa = '740' then
4175: for rec_chk_corr in chk_sec_corr
4213: --6850492
4214: hr_utility.set_location('l_prd1'||l_prd1,10);
4215: hr_utility.set_location('l_step_or_rate1'||l_step_or_rate1,12);
4216:
4217: -- Added to compare step or rate with '00' for dual actions
4218: IF l_step_or_rate1 IS NOT NULL AND
4219: l_step_or_rate1 <> nvl(p_sf52_data.to_step_or_rate,hr_api.g_varchar2) AND
4220: p_sf52_data.to_step_or_rate <> '00' then
4221: p_sf52_data.to_step_or_rate := l_step_or_rate1;
4220: p_sf52_data.to_step_or_rate <> '00' then
4221: p_sf52_data.to_step_or_rate := l_step_or_rate1;
4222: END IF;
4223:
4224: --For Dual combination with Return to Duty PRD need to be considered prior to root sf50
4225: IF (p_sf52_data.pay_rate_determinant IS NULL) THEN
4226: p_sf52_data.pay_rate_determinant := l_prd1;
4227: END IF;
4228: -- end if
4254: hr_utility.set_location('After call to to_data PRD ' || p_sf52_data.pay_rate_determinant ,15);
4255:
4256:
4257: --Added 855 for bug 3617311
4258: --6850492 added 713 to compare for dual actions as 713 can be performed as a second action
4259: --Bug# 7690029 added NVL to l_second_noa_code
4260: IF ( l_first_noa_code <> '713' and NVL(l_second_noa_code,'$$$') <> '713' AND l_first_noa_code <> '855'
4261: AND NVL(l_second_noa_code,'$$$') <> '855' ) THEN
4262: p_sf52_data.to_grade_id := l_grade_id;
4858: hr_utility.set_location('Entering:'|| l_proc, 5);
4859:
4860: -- populate the local table with the form_field_names for this noa.
4861: if (p_2nd_noa_id is not null) then
4862: hr_utility.set_location( l_proc || 'dual action', 7);
4863: FOR curflds_rec in cur_flds2(p_1st_noa_id, p_2nd_noa_id) LOOP
4864: l_column_count := l_column_count + 1;
4865: p_fld_names_tab(l_column_count) := curflds_rec;
4866: END LOOP;
5149: -- {Start Of Comments}
5150: --
5151: -- Description:
5152: -- This procedure derives the to column values for the given ghr_pa_request
5153: -- record. This is meant to be called for the first action in a dual action where
5154: -- the first action is a WGI.
5155: --
5156: -- Pre-Requisities:
5157: -- None.
5350: p_sf52_data.to_locality_adj := l_locality_adj;
5351: p_sf52_data.to_adj_basic_pay := l_adj_basic_pay;
5352: p_sf52_data.to_total_salary := l_total_salary;
5353:
5354: -- don't bother with other pay stuff since this never gets used for dual actions where
5355: -- WGI is the first action (that is the only time this procedure will have been called).
5356: /*
5357: -- Be careful with setting 'other' pay if it is 'NE'
5358: IF get_other_pay_amount_pm <> 'NE' THEN
5472: l_sf52_refresh_data.effective_date := p_sf52_data.effective_date;
5473: l_sf52_refresh_data.employee_assignment_id := p_sf52_data.employee_assignment_id;
5474: l_sf52_refresh_data.first_noa_code := p_sf52_data.first_noa_code;
5475: l_sf52_refresh_data.second_noa_code := p_sf52_data.second_noa_code;
5476: --6850492 added 713 to compare for dual actions as 713 can be performed as a second action
5477: IF p_sf52_data.first_noa_code = '713' or p_sf52_data.second_noa_code = '713' THEN
5478: l_sf52_refresh_data.to_grade_id := p_sf52_data.to_grade_id;
5479: l_sf52_refresh_data.to_grade_or_level := p_sf52_data.to_grade_or_level;
5480: l_sf52_refresh_data.to_pay_plan := p_sf52_data.to_pay_plan;
6896:
6897: END print_sf52;
6898:
6899: --6850492
6900: procedure Dual_Cancel_sf52(p_sf52_data in out nocopy ghr_pa_requests%rowtype
6901: ,p_first_noa_code in varchar2
6902: ,p_second_noa_code in varchar2
6903: ,p_pa_request_id in number
6904: ,p_ovn in number
6906: ,p_second_noa_id in number
6907: ,p_row_id in varchar2) is
6908:
6909: l_which_noa varchar2(1);
6910: l_dual_noa_id ghr_pa_requests.first_noa_id%type;
6911: l_pa_request_id ghr_pa_requests.pa_request_id%type;
6912: l_sf52_dual_sec_rec ghr_pa_requests%rowtype;
6913: l_sf52_dual_first_rec ghr_pa_requests%rowtype;
6914: l_ovn ghr_pa_requests.object_version_number%type;
6908:
6909: l_which_noa varchar2(1);
6910: l_dual_noa_id ghr_pa_requests.first_noa_id%type;
6911: l_pa_request_id ghr_pa_requests.pa_request_id%type;
6912: l_sf52_dual_sec_rec ghr_pa_requests%rowtype;
6913: l_sf52_dual_first_rec ghr_pa_requests%rowtype;
6914: l_ovn ghr_pa_requests.object_version_number%type;
6915: l_pa_remark_id ghr_pa_remarks.pa_remark_id%type;
6916: l_object_version_number ghr_pa_remarks.object_version_number%type;
6909: l_which_noa varchar2(1);
6910: l_dual_noa_id ghr_pa_requests.first_noa_id%type;
6911: l_pa_request_id ghr_pa_requests.pa_request_id%type;
6912: l_sf52_dual_sec_rec ghr_pa_requests%rowtype;
6913: l_sf52_dual_first_rec ghr_pa_requests%rowtype;
6914: l_ovn ghr_pa_requests.object_version_number%type;
6915: l_pa_remark_id ghr_pa_remarks.pa_remark_id%type;
6916: l_object_version_number ghr_pa_remarks.object_version_number%type;
6917: --8737212
6917: --8737212
6918: l_u_pa_routing_history_id ghr_pa_routing_history.pa_routing_history_id%TYPE;
6919: l_u_prh_object_version_number ghr_pa_routing_history.object_version_number%TYPE;
6920:
6921: cursor c_dual_cancel
6922: is
6923: select *
6924: from ghr_pa_requests
6925: where pa_request_id = l_pa_request_id;
6924: from ghr_pa_requests
6925: where pa_request_id = l_pa_request_id;
6926:
6927:
6928: cursor c_dual_first
6929: is
6930: select *
6931: from ghr_pa_requests
6932: where pa_request_id = p_sf52_data.pa_request_id;
6957: is
6958: SELECT prh.pa_routing_history_id,
6959: prh.object_version_number
6960: FROM ghr_pa_routing_history prh
6961: WHERE prh.pa_request_id = l_sf52_dual_sec_rec.pa_request_id
6962: ORDER by prh.pa_routing_history_id desc;
6963:
6964: cursor c_first_routing_det
6965: is
6973:
6974: BEGIN
6975: if p_sf52_data.second_noa_code = p_first_noa_code then
6976: l_which_noa := 2;
6977: l_dual_noa_id := p_second_noa_id;
6978: elsif p_sf52_data.second_noa_code = p_second_noa_code then
6979: l_which_noa := 1;
6980: l_dual_noa_id := p_first_noa_id;
6981: end if;
6976: l_which_noa := 2;
6977: l_dual_noa_id := p_second_noa_id;
6978: elsif p_sf52_data.second_noa_code = p_second_noa_code then
6979: l_which_noa := 1;
6980: l_dual_noa_id := p_first_noa_id;
6981: end if;
6982: l_ovn := p_ovn;
6983: hr_utility.set_location('l_ovn'||l_ovn,1);
6984: l_pa_request_id := ghr_approved_pa_requests.ghr_cancel_sf52(
6983: hr_utility.set_location('l_ovn'||l_ovn,1);
6984: l_pa_request_id := ghr_approved_pa_requests.ghr_cancel_sf52(
6985: p_pa_request_id => p_pa_request_id
6986: , p_par_object_version_number => l_ovn
6987: , p_noa_id => l_dual_noa_id
6988: , p_which_noa => l_which_noa
6989: , p_row_id => p_row_id
6990: , p_username => fnd_profile.value('USERNAME')
6991: , p_which_action => 'ORIGINAL'
6991: , p_which_action => 'ORIGINAL'
6992: , p_cancel_legal_authority => null
6993: );
6994:
6995: if c_dual_cancel%isopen then
6996: close c_dual_cancel;
6997: end if;
6998:
6999: open c_dual_cancel;
6992: , p_cancel_legal_authority => null
6993: );
6994:
6995: if c_dual_cancel%isopen then
6996: close c_dual_cancel;
6997: end if;
6998:
6999: open c_dual_cancel;
7000: fetch c_dual_cancel into l_sf52_dual_sec_rec;
6995: if c_dual_cancel%isopen then
6996: close c_dual_cancel;
6997: end if;
6998:
6999: open c_dual_cancel;
7000: fetch c_dual_cancel into l_sf52_dual_sec_rec;
7001: close c_dual_cancel;
7002:
7003: -- population of remarks 8272695
6996: close c_dual_cancel;
6997: end if;
6998:
6999: open c_dual_cancel;
7000: fetch c_dual_cancel into l_sf52_dual_sec_rec;
7001: close c_dual_cancel;
7002:
7003: -- population of remarks 8272695
7004: for rec_remarks in c_get_remarks
6997: end if;
6998:
6999: open c_dual_cancel;
7000: fetch c_dual_cancel into l_sf52_dual_sec_rec;
7001: close c_dual_cancel;
7002:
7003: -- population of remarks 8272695
7004: for rec_remarks in c_get_remarks
7005: loop
7019: );
7020: end loop;
7021: --8272695
7022: --lac codes
7023: l_sf52_dual_sec_rec.first_action_la_code1 := p_sf52_data.first_action_la_code1;
7024: l_sf52_dual_sec_rec.first_action_la_code2 := p_sf52_data.first_action_la_code2;
7025: l_sf52_dual_sec_rec.first_action_la_desc1 := p_sf52_data.first_action_la_desc1;
7026: l_sf52_dual_sec_rec.first_action_la_desc2 := p_sf52_data.first_action_la_desc2;
7027:
7020: end loop;
7021: --8272695
7022: --lac codes
7023: l_sf52_dual_sec_rec.first_action_la_code1 := p_sf52_data.first_action_la_code1;
7024: l_sf52_dual_sec_rec.first_action_la_code2 := p_sf52_data.first_action_la_code2;
7025: l_sf52_dual_sec_rec.first_action_la_desc1 := p_sf52_data.first_action_la_desc1;
7026: l_sf52_dual_sec_rec.first_action_la_desc2 := p_sf52_data.first_action_la_desc2;
7027:
7028: -- 8737212 Updating Routing History
7021: --8272695
7022: --lac codes
7023: l_sf52_dual_sec_rec.first_action_la_code1 := p_sf52_data.first_action_la_code1;
7024: l_sf52_dual_sec_rec.first_action_la_code2 := p_sf52_data.first_action_la_code2;
7025: l_sf52_dual_sec_rec.first_action_la_desc1 := p_sf52_data.first_action_la_desc1;
7026: l_sf52_dual_sec_rec.first_action_la_desc2 := p_sf52_data.first_action_la_desc2;
7027:
7028: -- 8737212 Updating Routing History
7029: for cur_routing_history_id in C_routing_history_id loop
7022: --lac codes
7023: l_sf52_dual_sec_rec.first_action_la_code1 := p_sf52_data.first_action_la_code1;
7024: l_sf52_dual_sec_rec.first_action_la_code2 := p_sf52_data.first_action_la_code2;
7025: l_sf52_dual_sec_rec.first_action_la_desc1 := p_sf52_data.first_action_la_desc1;
7026: l_sf52_dual_sec_rec.first_action_la_desc2 := p_sf52_data.first_action_la_desc2;
7027:
7028: -- 8737212 Updating Routing History
7029: for cur_routing_history_id in C_routing_history_id loop
7030: l_u_pa_routing_history_id := cur_routing_history_id.pa_routing_history_id;
7051: p_user_name_emp_last_name => rec_hist_det.user_name_emp_last_name,
7052: p_user_name_emp_middle_names => rec_hist_det.user_name_emp_middle_names,
7053: p_notepad => rec_hist_det.notepad,
7054: p_action_taken => rec_hist_det.action_taken,
7055: p_noa_family_code => l_sf52_dual_sec_rec.noa_family_code,
7056: p_nature_of_action_id => l_sf52_dual_sec_rec.first_noa_id,
7057: p_second_nature_of_action_id => l_sf52_dual_sec_rec.second_noa_id,
7058: p_approval_status => rec_hist_det.approval_status,
7059: p_object_version_number => l_u_prh_object_version_number
7052: p_user_name_emp_middle_names => rec_hist_det.user_name_emp_middle_names,
7053: p_notepad => rec_hist_det.notepad,
7054: p_action_taken => rec_hist_det.action_taken,
7055: p_noa_family_code => l_sf52_dual_sec_rec.noa_family_code,
7056: p_nature_of_action_id => l_sf52_dual_sec_rec.first_noa_id,
7057: p_second_nature_of_action_id => l_sf52_dual_sec_rec.second_noa_id,
7058: p_approval_status => rec_hist_det.approval_status,
7059: p_object_version_number => l_u_prh_object_version_number
7060: -- p_validate => p_validate
7053: p_notepad => rec_hist_det.notepad,
7054: p_action_taken => rec_hist_det.action_taken,
7055: p_noa_family_code => l_sf52_dual_sec_rec.noa_family_code,
7056: p_nature_of_action_id => l_sf52_dual_sec_rec.first_noa_id,
7057: p_second_nature_of_action_id => l_sf52_dual_sec_rec.second_noa_id,
7058: p_approval_status => rec_hist_det.approval_status,
7059: p_object_version_number => l_u_prh_object_version_number
7060: -- p_validate => p_validate
7061: );
7066:
7067: if p_sf52_data.second_noa_code = p_second_noa_code then
7068: hr_utility.set_location('before first process',1000);
7069: ghr_corr_canc_sf52.cancel_routine(p_sf52_data);
7070: hr_utility.set_location('before sec process'||l_sf52_dual_sec_rec.first_noa_id,1001);
7071: hr_utility.set_location('before sec process'||l_sf52_dual_sec_rec.second_noa_id,1002);
7072: ghr_corr_canc_sf52.cancel_routine(l_sf52_dual_sec_rec);
7073: elsif p_sf52_data.second_noa_code = p_first_noa_code then
7074: ghr_corr_canc_sf52.cancel_routine(l_sf52_dual_sec_rec);
7067: if p_sf52_data.second_noa_code = p_second_noa_code then
7068: hr_utility.set_location('before first process',1000);
7069: ghr_corr_canc_sf52.cancel_routine(p_sf52_data);
7070: hr_utility.set_location('before sec process'||l_sf52_dual_sec_rec.first_noa_id,1001);
7071: hr_utility.set_location('before sec process'||l_sf52_dual_sec_rec.second_noa_id,1002);
7072: ghr_corr_canc_sf52.cancel_routine(l_sf52_dual_sec_rec);
7073: elsif p_sf52_data.second_noa_code = p_first_noa_code then
7074: ghr_corr_canc_sf52.cancel_routine(l_sf52_dual_sec_rec);
7075: ghr_corr_canc_sf52.cancel_routine(p_sf52_data);
7068: hr_utility.set_location('before first process',1000);
7069: ghr_corr_canc_sf52.cancel_routine(p_sf52_data);
7070: hr_utility.set_location('before sec process'||l_sf52_dual_sec_rec.first_noa_id,1001);
7071: hr_utility.set_location('before sec process'||l_sf52_dual_sec_rec.second_noa_id,1002);
7072: ghr_corr_canc_sf52.cancel_routine(l_sf52_dual_sec_rec);
7073: elsif p_sf52_data.second_noa_code = p_first_noa_code then
7074: ghr_corr_canc_sf52.cancel_routine(l_sf52_dual_sec_rec);
7075: ghr_corr_canc_sf52.cancel_routine(p_sf52_data);
7076: end if;
7070: hr_utility.set_location('before sec process'||l_sf52_dual_sec_rec.first_noa_id,1001);
7071: hr_utility.set_location('before sec process'||l_sf52_dual_sec_rec.second_noa_id,1002);
7072: ghr_corr_canc_sf52.cancel_routine(l_sf52_dual_sec_rec);
7073: elsif p_sf52_data.second_noa_code = p_first_noa_code then
7074: ghr_corr_canc_sf52.cancel_routine(l_sf52_dual_sec_rec);
7075: ghr_corr_canc_sf52.cancel_routine(p_sf52_data);
7076: end if;
7077:
7078: if c_dual_first%isopen then
7074: ghr_corr_canc_sf52.cancel_routine(l_sf52_dual_sec_rec);
7075: ghr_corr_canc_sf52.cancel_routine(p_sf52_data);
7076: end if;
7077:
7078: if c_dual_first%isopen then
7079: close c_dual_first;
7080: end if;
7081:
7082: open c_dual_first;
7075: ghr_corr_canc_sf52.cancel_routine(p_sf52_data);
7076: end if;
7077:
7078: if c_dual_first%isopen then
7079: close c_dual_first;
7080: end if;
7081:
7082: open c_dual_first;
7083: fetch c_dual_first into l_sf52_dual_first_rec;
7078: if c_dual_first%isopen then
7079: close c_dual_first;
7080: end if;
7081:
7082: open c_dual_first;
7083: fetch c_dual_first into l_sf52_dual_first_rec;
7084: close c_dual_first;
7085:
7086: ghr_history_api.reinit_g_session_var;
7079: close c_dual_first;
7080: end if;
7081:
7082: open c_dual_first;
7083: fetch c_dual_first into l_sf52_dual_first_rec;
7084: close c_dual_first;
7085:
7086: ghr_history_api.reinit_g_session_var;
7087:
7080: end if;
7081:
7082: open c_dual_first;
7083: fetch c_dual_first into l_sf52_dual_first_rec;
7084: close c_dual_first;
7085:
7086: ghr_history_api.reinit_g_session_var;
7087:
7088: hr_utility.set_location('l_sf52_dual_sec_rec.from_position_id'||l_sf52_dual_sec_rec.from_position_id,10);
7084: close c_dual_first;
7085:
7086: ghr_history_api.reinit_g_session_var;
7087:
7088: hr_utility.set_location('l_sf52_dual_sec_rec.from_position_id'||l_sf52_dual_sec_rec.from_position_id,10);
7089: hr_utility.set_location('l_sf52_dual_sec_rec.to_position_id'||l_sf52_dual_sec_rec.to_position_id,11);
7090: ghr_sf52_post_update.get_notification_details
7091: (p_pa_request_id => l_sf52_dual_sec_rec.pa_request_id,
7092: p_effective_date => l_sf52_dual_sec_rec.effective_date,
7085:
7086: ghr_history_api.reinit_g_session_var;
7087:
7088: hr_utility.set_location('l_sf52_dual_sec_rec.from_position_id'||l_sf52_dual_sec_rec.from_position_id,10);
7089: hr_utility.set_location('l_sf52_dual_sec_rec.to_position_id'||l_sf52_dual_sec_rec.to_position_id,11);
7090: ghr_sf52_post_update.get_notification_details
7091: (p_pa_request_id => l_sf52_dual_sec_rec.pa_request_id,
7092: p_effective_date => l_sf52_dual_sec_rec.effective_date,
7093: -- p_object_version_number => p_imm_pa_request_rec.object_version_number,
7087:
7088: hr_utility.set_location('l_sf52_dual_sec_rec.from_position_id'||l_sf52_dual_sec_rec.from_position_id,10);
7089: hr_utility.set_location('l_sf52_dual_sec_rec.to_position_id'||l_sf52_dual_sec_rec.to_position_id,11);
7090: ghr_sf52_post_update.get_notification_details
7091: (p_pa_request_id => l_sf52_dual_sec_rec.pa_request_id,
7092: p_effective_date => l_sf52_dual_sec_rec.effective_date,
7093: -- p_object_version_number => p_imm_pa_request_rec.object_version_number,
7094: p_from_position_id => l_sf52_dual_sec_rec.from_position_id,
7095: p_to_position_id => l_sf52_dual_sec_rec.to_position_id,
7088: hr_utility.set_location('l_sf52_dual_sec_rec.from_position_id'||l_sf52_dual_sec_rec.from_position_id,10);
7089: hr_utility.set_location('l_sf52_dual_sec_rec.to_position_id'||l_sf52_dual_sec_rec.to_position_id,11);
7090: ghr_sf52_post_update.get_notification_details
7091: (p_pa_request_id => l_sf52_dual_sec_rec.pa_request_id,
7092: p_effective_date => l_sf52_dual_sec_rec.effective_date,
7093: -- p_object_version_number => p_imm_pa_request_rec.object_version_number,
7094: p_from_position_id => l_sf52_dual_sec_rec.from_position_id,
7095: p_to_position_id => l_sf52_dual_sec_rec.to_position_id,
7096: p_agency_code => l_sf52_dual_sec_rec.agency_code,
7090: ghr_sf52_post_update.get_notification_details
7091: (p_pa_request_id => l_sf52_dual_sec_rec.pa_request_id,
7092: p_effective_date => l_sf52_dual_sec_rec.effective_date,
7093: -- p_object_version_number => p_imm_pa_request_rec.object_version_number,
7094: p_from_position_id => l_sf52_dual_sec_rec.from_position_id,
7095: p_to_position_id => l_sf52_dual_sec_rec.to_position_id,
7096: p_agency_code => l_sf52_dual_sec_rec.agency_code,
7097: p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code,
7098: p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc,
7091: (p_pa_request_id => l_sf52_dual_sec_rec.pa_request_id,
7092: p_effective_date => l_sf52_dual_sec_rec.effective_date,
7093: -- p_object_version_number => p_imm_pa_request_rec.object_version_number,
7094: p_from_position_id => l_sf52_dual_sec_rec.from_position_id,
7095: p_to_position_id => l_sf52_dual_sec_rec.to_position_id,
7096: p_agency_code => l_sf52_dual_sec_rec.agency_code,
7097: p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code,
7098: p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc,
7099: p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol,
7092: p_effective_date => l_sf52_dual_sec_rec.effective_date,
7093: -- p_object_version_number => p_imm_pa_request_rec.object_version_number,
7094: p_from_position_id => l_sf52_dual_sec_rec.from_position_id,
7095: p_to_position_id => l_sf52_dual_sec_rec.to_position_id,
7096: p_agency_code => l_sf52_dual_sec_rec.agency_code,
7097: p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code,
7098: p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc,
7099: p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol,
7100: p_personnel_office_id => l_sf52_dual_sec_rec.personnel_office_id,
7093: -- p_object_version_number => p_imm_pa_request_rec.object_version_number,
7094: p_from_position_id => l_sf52_dual_sec_rec.from_position_id,
7095: p_to_position_id => l_sf52_dual_sec_rec.to_position_id,
7096: p_agency_code => l_sf52_dual_sec_rec.agency_code,
7097: p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code,
7098: p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc,
7099: p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol,
7100: p_personnel_office_id => l_sf52_dual_sec_rec.personnel_office_id,
7101: p_employee_dept_or_agency => l_sf52_dual_sec_rec.employee_dept_or_agency,
7094: p_from_position_id => l_sf52_dual_sec_rec.from_position_id,
7095: p_to_position_id => l_sf52_dual_sec_rec.to_position_id,
7096: p_agency_code => l_sf52_dual_sec_rec.agency_code,
7097: p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code,
7098: p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc,
7099: p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol,
7100: p_personnel_office_id => l_sf52_dual_sec_rec.personnel_office_id,
7101: p_employee_dept_or_agency => l_sf52_dual_sec_rec.employee_dept_or_agency,
7102: p_to_office_symbol => l_sf52_dual_sec_rec.to_office_symbol
7095: p_to_position_id => l_sf52_dual_sec_rec.to_position_id,
7096: p_agency_code => l_sf52_dual_sec_rec.agency_code,
7097: p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code,
7098: p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc,
7099: p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol,
7100: p_personnel_office_id => l_sf52_dual_sec_rec.personnel_office_id,
7101: p_employee_dept_or_agency => l_sf52_dual_sec_rec.employee_dept_or_agency,
7102: p_to_office_symbol => l_sf52_dual_sec_rec.to_office_symbol
7103: );
7096: p_agency_code => l_sf52_dual_sec_rec.agency_code,
7097: p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code,
7098: p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc,
7099: p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol,
7100: p_personnel_office_id => l_sf52_dual_sec_rec.personnel_office_id,
7101: p_employee_dept_or_agency => l_sf52_dual_sec_rec.employee_dept_or_agency,
7102: p_to_office_symbol => l_sf52_dual_sec_rec.to_office_symbol
7103: );
7104:
7097: p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code,
7098: p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc,
7099: p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol,
7100: p_personnel_office_id => l_sf52_dual_sec_rec.personnel_office_id,
7101: p_employee_dept_or_agency => l_sf52_dual_sec_rec.employee_dept_or_agency,
7102: p_to_office_symbol => l_sf52_dual_sec_rec.to_office_symbol
7103: );
7104:
7105: for c_get_ovn in get_ovn(p_pa_request_id => l_sf52_dual_sec_rec.pa_request_id)
7098: p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc,
7099: p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol,
7100: p_personnel_office_id => l_sf52_dual_sec_rec.personnel_office_id,
7101: p_employee_dept_or_agency => l_sf52_dual_sec_rec.employee_dept_or_agency,
7102: p_to_office_symbol => l_sf52_dual_sec_rec.to_office_symbol
7103: );
7104:
7105: for c_get_ovn in get_ovn(p_pa_request_id => l_sf52_dual_sec_rec.pa_request_id)
7106: loop
7101: p_employee_dept_or_agency => l_sf52_dual_sec_rec.employee_dept_or_agency,
7102: p_to_office_symbol => l_sf52_dual_sec_rec.to_office_symbol
7103: );
7104:
7105: for c_get_ovn in get_ovn(p_pa_request_id => l_sf52_dual_sec_rec.pa_request_id)
7106: loop
7107: l_sf52_dual_sec_rec.object_version_number := c_get_ovn.object_version_number;
7108: end loop;
7109:
7103: );
7104:
7105: for c_get_ovn in get_ovn(p_pa_request_id => l_sf52_dual_sec_rec.pa_request_id)
7106: loop
7107: l_sf52_dual_sec_rec.object_version_number := c_get_ovn.object_version_number;
7108: end loop;
7109:
7110: ghr_par_upd.upd(p_pa_request_id => l_sf52_dual_sec_rec.pa_request_id
7111: ,p_object_version_number => l_sf52_dual_sec_rec.object_version_number
7106: loop
7107: l_sf52_dual_sec_rec.object_version_number := c_get_ovn.object_version_number;
7108: end loop;
7109:
7110: ghr_par_upd.upd(p_pa_request_id => l_sf52_dual_sec_rec.pa_request_id
7111: ,p_object_version_number => l_sf52_dual_sec_rec.object_version_number
7112: ,p_from_position_id => l_sf52_dual_sec_rec.from_position_id
7113: ,p_to_position_id => l_sf52_dual_sec_rec.to_position_id
7114: ,p_agency_code => l_sf52_dual_sec_rec.agency_code
7107: l_sf52_dual_sec_rec.object_version_number := c_get_ovn.object_version_number;
7108: end loop;
7109:
7110: ghr_par_upd.upd(p_pa_request_id => l_sf52_dual_sec_rec.pa_request_id
7111: ,p_object_version_number => l_sf52_dual_sec_rec.object_version_number
7112: ,p_from_position_id => l_sf52_dual_sec_rec.from_position_id
7113: ,p_to_position_id => l_sf52_dual_sec_rec.to_position_id
7114: ,p_agency_code => l_sf52_dual_sec_rec.agency_code
7115: ,p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code
7108: end loop;
7109:
7110: ghr_par_upd.upd(p_pa_request_id => l_sf52_dual_sec_rec.pa_request_id
7111: ,p_object_version_number => l_sf52_dual_sec_rec.object_version_number
7112: ,p_from_position_id => l_sf52_dual_sec_rec.from_position_id
7113: ,p_to_position_id => l_sf52_dual_sec_rec.to_position_id
7114: ,p_agency_code => l_sf52_dual_sec_rec.agency_code
7115: ,p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code
7116: ,p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc
7109:
7110: ghr_par_upd.upd(p_pa_request_id => l_sf52_dual_sec_rec.pa_request_id
7111: ,p_object_version_number => l_sf52_dual_sec_rec.object_version_number
7112: ,p_from_position_id => l_sf52_dual_sec_rec.from_position_id
7113: ,p_to_position_id => l_sf52_dual_sec_rec.to_position_id
7114: ,p_agency_code => l_sf52_dual_sec_rec.agency_code
7115: ,p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code
7116: ,p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc
7117: ,p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol
7110: ghr_par_upd.upd(p_pa_request_id => l_sf52_dual_sec_rec.pa_request_id
7111: ,p_object_version_number => l_sf52_dual_sec_rec.object_version_number
7112: ,p_from_position_id => l_sf52_dual_sec_rec.from_position_id
7113: ,p_to_position_id => l_sf52_dual_sec_rec.to_position_id
7114: ,p_agency_code => l_sf52_dual_sec_rec.agency_code
7115: ,p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code
7116: ,p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc
7117: ,p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol
7118: ,p_personnel_office_id => l_sf52_dual_sec_rec.personnel_office_id
7111: ,p_object_version_number => l_sf52_dual_sec_rec.object_version_number
7112: ,p_from_position_id => l_sf52_dual_sec_rec.from_position_id
7113: ,p_to_position_id => l_sf52_dual_sec_rec.to_position_id
7114: ,p_agency_code => l_sf52_dual_sec_rec.agency_code
7115: ,p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code
7116: ,p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc
7117: ,p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol
7118: ,p_personnel_office_id => l_sf52_dual_sec_rec.personnel_office_id
7119: ,p_employee_dept_or_agency => l_sf52_dual_sec_rec.employee_dept_or_agency
7112: ,p_from_position_id => l_sf52_dual_sec_rec.from_position_id
7113: ,p_to_position_id => l_sf52_dual_sec_rec.to_position_id
7114: ,p_agency_code => l_sf52_dual_sec_rec.agency_code
7115: ,p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code
7116: ,p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc
7117: ,p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol
7118: ,p_personnel_office_id => l_sf52_dual_sec_rec.personnel_office_id
7119: ,p_employee_dept_or_agency => l_sf52_dual_sec_rec.employee_dept_or_agency
7120: ,p_to_office_symbol => l_sf52_dual_sec_rec.to_office_symbol
7113: ,p_to_position_id => l_sf52_dual_sec_rec.to_position_id
7114: ,p_agency_code => l_sf52_dual_sec_rec.agency_code
7115: ,p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code
7116: ,p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc
7117: ,p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol
7118: ,p_personnel_office_id => l_sf52_dual_sec_rec.personnel_office_id
7119: ,p_employee_dept_or_agency => l_sf52_dual_sec_rec.employee_dept_or_agency
7120: ,p_to_office_symbol => l_sf52_dual_sec_rec.to_office_symbol
7121: ,p_first_action_la_code1 => l_sf52_dual_sec_rec.first_action_la_code1
7114: ,p_agency_code => l_sf52_dual_sec_rec.agency_code
7115: ,p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code
7116: ,p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc
7117: ,p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol
7118: ,p_personnel_office_id => l_sf52_dual_sec_rec.personnel_office_id
7119: ,p_employee_dept_or_agency => l_sf52_dual_sec_rec.employee_dept_or_agency
7120: ,p_to_office_symbol => l_sf52_dual_sec_rec.to_office_symbol
7121: ,p_first_action_la_code1 => l_sf52_dual_sec_rec.first_action_la_code1
7122: ,p_first_action_la_desc1 => l_sf52_dual_sec_rec.first_action_la_desc1
7115: ,p_from_agency_code => l_sf52_dual_sec_rec.from_agency_code
7116: ,p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc
7117: ,p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol
7118: ,p_personnel_office_id => l_sf52_dual_sec_rec.personnel_office_id
7119: ,p_employee_dept_or_agency => l_sf52_dual_sec_rec.employee_dept_or_agency
7120: ,p_to_office_symbol => l_sf52_dual_sec_rec.to_office_symbol
7121: ,p_first_action_la_code1 => l_sf52_dual_sec_rec.first_action_la_code1
7122: ,p_first_action_la_desc1 => l_sf52_dual_sec_rec.first_action_la_desc1
7123: ,p_first_action_la_code2 => l_sf52_dual_sec_rec.first_action_la_code2
7116: ,p_from_agency_desc => l_sf52_dual_sec_rec.from_agency_desc
7117: ,p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol
7118: ,p_personnel_office_id => l_sf52_dual_sec_rec.personnel_office_id
7119: ,p_employee_dept_or_agency => l_sf52_dual_sec_rec.employee_dept_or_agency
7120: ,p_to_office_symbol => l_sf52_dual_sec_rec.to_office_symbol
7121: ,p_first_action_la_code1 => l_sf52_dual_sec_rec.first_action_la_code1
7122: ,p_first_action_la_desc1 => l_sf52_dual_sec_rec.first_action_la_desc1
7123: ,p_first_action_la_code2 => l_sf52_dual_sec_rec.first_action_la_code2
7124: ,p_first_action_la_desc2 => l_sf52_dual_sec_rec.first_action_la_desc2
7117: ,p_from_office_symbol => l_sf52_dual_sec_rec.from_office_symbol
7118: ,p_personnel_office_id => l_sf52_dual_sec_rec.personnel_office_id
7119: ,p_employee_dept_or_agency => l_sf52_dual_sec_rec.employee_dept_or_agency
7120: ,p_to_office_symbol => l_sf52_dual_sec_rec.to_office_symbol
7121: ,p_first_action_la_code1 => l_sf52_dual_sec_rec.first_action_la_code1
7122: ,p_first_action_la_desc1 => l_sf52_dual_sec_rec.first_action_la_desc1
7123: ,p_first_action_la_code2 => l_sf52_dual_sec_rec.first_action_la_code2
7124: ,p_first_action_la_desc2 => l_sf52_dual_sec_rec.first_action_la_desc2
7125: ,p_approval_date => l_sf52_dual_first_rec.approval_date
7118: ,p_personnel_office_id => l_sf52_dual_sec_rec.personnel_office_id
7119: ,p_employee_dept_or_agency => l_sf52_dual_sec_rec.employee_dept_or_agency
7120: ,p_to_office_symbol => l_sf52_dual_sec_rec.to_office_symbol
7121: ,p_first_action_la_code1 => l_sf52_dual_sec_rec.first_action_la_code1
7122: ,p_first_action_la_desc1 => l_sf52_dual_sec_rec.first_action_la_desc1
7123: ,p_first_action_la_code2 => l_sf52_dual_sec_rec.first_action_la_code2
7124: ,p_first_action_la_desc2 => l_sf52_dual_sec_rec.first_action_la_desc2
7125: ,p_approval_date => l_sf52_dual_first_rec.approval_date
7126: ,p_approving_official_work_titl => l_sf52_dual_first_rec.approving_official_work_title
7119: ,p_employee_dept_or_agency => l_sf52_dual_sec_rec.employee_dept_or_agency
7120: ,p_to_office_symbol => l_sf52_dual_sec_rec.to_office_symbol
7121: ,p_first_action_la_code1 => l_sf52_dual_sec_rec.first_action_la_code1
7122: ,p_first_action_la_desc1 => l_sf52_dual_sec_rec.first_action_la_desc1
7123: ,p_first_action_la_code2 => l_sf52_dual_sec_rec.first_action_la_code2
7124: ,p_first_action_la_desc2 => l_sf52_dual_sec_rec.first_action_la_desc2
7125: ,p_approval_date => l_sf52_dual_first_rec.approval_date
7126: ,p_approving_official_work_titl => l_sf52_dual_first_rec.approving_official_work_title
7127: ,p_approving_official_full_name => l_sf52_dual_first_rec.approving_official_full_name
7120: ,p_to_office_symbol => l_sf52_dual_sec_rec.to_office_symbol
7121: ,p_first_action_la_code1 => l_sf52_dual_sec_rec.first_action_la_code1
7122: ,p_first_action_la_desc1 => l_sf52_dual_sec_rec.first_action_la_desc1
7123: ,p_first_action_la_code2 => l_sf52_dual_sec_rec.first_action_la_code2
7124: ,p_first_action_la_desc2 => l_sf52_dual_sec_rec.first_action_la_desc2
7125: ,p_approval_date => l_sf52_dual_first_rec.approval_date
7126: ,p_approving_official_work_titl => l_sf52_dual_first_rec.approving_official_work_title
7127: ,p_approving_official_full_name => l_sf52_dual_first_rec.approving_official_full_name
7128: ,p_sf50_approval_date => l_sf52_dual_first_rec.sf50_approval_date
7121: ,p_first_action_la_code1 => l_sf52_dual_sec_rec.first_action_la_code1
7122: ,p_first_action_la_desc1 => l_sf52_dual_sec_rec.first_action_la_desc1
7123: ,p_first_action_la_code2 => l_sf52_dual_sec_rec.first_action_la_code2
7124: ,p_first_action_la_desc2 => l_sf52_dual_sec_rec.first_action_la_desc2
7125: ,p_approval_date => l_sf52_dual_first_rec.approval_date
7126: ,p_approving_official_work_titl => l_sf52_dual_first_rec.approving_official_work_title
7127: ,p_approving_official_full_name => l_sf52_dual_first_rec.approving_official_full_name
7128: ,p_sf50_approval_date => l_sf52_dual_first_rec.sf50_approval_date
7129: ,p_sf50_approving_ofcl_full_nam => l_sf52_dual_first_rec.sf50_approving_ofcl_full_name
7122: ,p_first_action_la_desc1 => l_sf52_dual_sec_rec.first_action_la_desc1
7123: ,p_first_action_la_code2 => l_sf52_dual_sec_rec.first_action_la_code2
7124: ,p_first_action_la_desc2 => l_sf52_dual_sec_rec.first_action_la_desc2
7125: ,p_approval_date => l_sf52_dual_first_rec.approval_date
7126: ,p_approving_official_work_titl => l_sf52_dual_first_rec.approving_official_work_title
7127: ,p_approving_official_full_name => l_sf52_dual_first_rec.approving_official_full_name
7128: ,p_sf50_approval_date => l_sf52_dual_first_rec.sf50_approval_date
7129: ,p_sf50_approving_ofcl_full_nam => l_sf52_dual_first_rec.sf50_approving_ofcl_full_name
7130: ,p_sf50_approving_ofcl_work_tit => l_sf52_dual_first_rec.sf50_approving_ofcl_work_title
7123: ,p_first_action_la_code2 => l_sf52_dual_sec_rec.first_action_la_code2
7124: ,p_first_action_la_desc2 => l_sf52_dual_sec_rec.first_action_la_desc2
7125: ,p_approval_date => l_sf52_dual_first_rec.approval_date
7126: ,p_approving_official_work_titl => l_sf52_dual_first_rec.approving_official_work_title
7127: ,p_approving_official_full_name => l_sf52_dual_first_rec.approving_official_full_name
7128: ,p_sf50_approval_date => l_sf52_dual_first_rec.sf50_approval_date
7129: ,p_sf50_approving_ofcl_full_nam => l_sf52_dual_first_rec.sf50_approving_ofcl_full_name
7130: ,p_sf50_approving_ofcl_work_tit => l_sf52_dual_first_rec.sf50_approving_ofcl_work_title
7131: );
7124: ,p_first_action_la_desc2 => l_sf52_dual_sec_rec.first_action_la_desc2
7125: ,p_approval_date => l_sf52_dual_first_rec.approval_date
7126: ,p_approving_official_work_titl => l_sf52_dual_first_rec.approving_official_work_title
7127: ,p_approving_official_full_name => l_sf52_dual_first_rec.approving_official_full_name
7128: ,p_sf50_approval_date => l_sf52_dual_first_rec.sf50_approval_date
7129: ,p_sf50_approving_ofcl_full_nam => l_sf52_dual_first_rec.sf50_approving_ofcl_full_name
7130: ,p_sf50_approving_ofcl_work_tit => l_sf52_dual_first_rec.sf50_approving_ofcl_work_title
7131: );
7132: /*For dual cancellation also Maintaining RPA_TYPE and Mass action id rpa_type will be DUAL and mass action id will
7125: ,p_approval_date => l_sf52_dual_first_rec.approval_date
7126: ,p_approving_official_work_titl => l_sf52_dual_first_rec.approving_official_work_title
7127: ,p_approving_official_full_name => l_sf52_dual_first_rec.approving_official_full_name
7128: ,p_sf50_approval_date => l_sf52_dual_first_rec.sf50_approval_date
7129: ,p_sf50_approving_ofcl_full_nam => l_sf52_dual_first_rec.sf50_approving_ofcl_full_name
7130: ,p_sf50_approving_ofcl_work_tit => l_sf52_dual_first_rec.sf50_approving_ofcl_work_title
7131: );
7132: /*For dual cancellation also Maintaining RPA_TYPE and Mass action id rpa_type will be DUAL and mass action id will
7133: be referring other dual cancellation record*/
7126: ,p_approving_official_work_titl => l_sf52_dual_first_rec.approving_official_work_title
7127: ,p_approving_official_full_name => l_sf52_dual_first_rec.approving_official_full_name
7128: ,p_sf50_approval_date => l_sf52_dual_first_rec.sf50_approval_date
7129: ,p_sf50_approving_ofcl_full_nam => l_sf52_dual_first_rec.sf50_approving_ofcl_full_name
7130: ,p_sf50_approving_ofcl_work_tit => l_sf52_dual_first_rec.sf50_approving_ofcl_work_title
7131: );
7132: /*For dual cancellation also Maintaining RPA_TYPE and Mass action id rpa_type will be DUAL and mass action id will
7133: be referring other dual cancellation record*/
7134: GHR_APPROVED_PA_REQUESTS.Update_Dual_Id(p_parent_pa_request_id => p_pa_request_id,
7128: ,p_sf50_approval_date => l_sf52_dual_first_rec.sf50_approval_date
7129: ,p_sf50_approving_ofcl_full_nam => l_sf52_dual_first_rec.sf50_approving_ofcl_full_name
7130: ,p_sf50_approving_ofcl_work_tit => l_sf52_dual_first_rec.sf50_approving_ofcl_work_title
7131: );
7132: /*For dual cancellation also Maintaining RPA_TYPE and Mass action id rpa_type will be DUAL and mass action id will
7133: be referring other dual cancellation record*/
7134: GHR_APPROVED_PA_REQUESTS.Update_Dual_Id(p_parent_pa_request_id => p_pa_request_id,
7135: p_first_dual_action_id => p_sf52_data.pa_request_id,
7136: p_second_dual_action_id => l_pa_request_id);
7129: ,p_sf50_approving_ofcl_full_nam => l_sf52_dual_first_rec.sf50_approving_ofcl_full_name
7130: ,p_sf50_approving_ofcl_work_tit => l_sf52_dual_first_rec.sf50_approving_ofcl_work_title
7131: );
7132: /*For dual cancellation also Maintaining RPA_TYPE and Mass action id rpa_type will be DUAL and mass action id will
7133: be referring other dual cancellation record*/
7134: GHR_APPROVED_PA_REQUESTS.Update_Dual_Id(p_parent_pa_request_id => p_pa_request_id,
7135: p_first_dual_action_id => p_sf52_data.pa_request_id,
7136: p_second_dual_action_id => l_pa_request_id);
7137:
7130: ,p_sf50_approving_ofcl_work_tit => l_sf52_dual_first_rec.sf50_approving_ofcl_work_title
7131: );
7132: /*For dual cancellation also Maintaining RPA_TYPE and Mass action id rpa_type will be DUAL and mass action id will
7133: be referring other dual cancellation record*/
7134: GHR_APPROVED_PA_REQUESTS.Update_Dual_Id(p_parent_pa_request_id => p_pa_request_id,
7135: p_first_dual_action_id => p_sf52_data.pa_request_id,
7136: p_second_dual_action_id => l_pa_request_id);
7137:
7138:
7131: );
7132: /*For dual cancellation also Maintaining RPA_TYPE and Mass action id rpa_type will be DUAL and mass action id will
7133: be referring other dual cancellation record*/
7134: GHR_APPROVED_PA_REQUESTS.Update_Dual_Id(p_parent_pa_request_id => p_pa_request_id,
7135: p_first_dual_action_id => p_sf52_data.pa_request_id,
7136: p_second_dual_action_id => l_pa_request_id);
7137:
7138:
7139: END Dual_Cancel_sf52;
7132: /*For dual cancellation also Maintaining RPA_TYPE and Mass action id rpa_type will be DUAL and mass action id will
7133: be referring other dual cancellation record*/
7134: GHR_APPROVED_PA_REQUESTS.Update_Dual_Id(p_parent_pa_request_id => p_pa_request_id,
7135: p_first_dual_action_id => p_sf52_data.pa_request_id,
7136: p_second_dual_action_id => l_pa_request_id);
7137:
7138:
7139: END Dual_Cancel_sf52;
7140: --6850492
7135: p_first_dual_action_id => p_sf52_data.pa_request_id,
7136: p_second_dual_action_id => l_pa_request_id);
7137:
7138:
7139: END Dual_Cancel_sf52;
7140: --6850492
7141:
7142: --8267598
7143: procedure reinit_dual_var is
7139: END Dual_Cancel_sf52;
7140: --6850492
7141:
7142: --8267598
7143: procedure reinit_dual_var is
7144: begin
7145: g_dual_prior_ws := null;
7146: --8264475
7147: g_dual_first_noac := null;
7141:
7142: --8267598
7143: procedure reinit_dual_var is
7144: begin
7145: g_dual_prior_ws := null;
7146: --8264475
7147: g_dual_first_noac := null;
7148: g_dual_second_noac := null;
7149: g_dual_action_yn := 'N';
7143: procedure reinit_dual_var is
7144: begin
7145: g_dual_prior_ws := null;
7146: --8264475
7147: g_dual_first_noac := null;
7148: g_dual_second_noac := null;
7149: g_dual_action_yn := 'N';
7150: g_dual_prior_prd := NULL; --8268353
7151: --8264475
7144: begin
7145: g_dual_prior_ws := null;
7146: --8264475
7147: g_dual_first_noac := null;
7148: g_dual_second_noac := null;
7149: g_dual_action_yn := 'N';
7150: g_dual_prior_prd := NULL; --8268353
7151: --8264475
7152:
7145: g_dual_prior_ws := null;
7146: --8264475
7147: g_dual_first_noac := null;
7148: g_dual_second_noac := null;
7149: g_dual_action_yn := 'N';
7150: g_dual_prior_prd := NULL; --8268353
7151: --8264475
7152:
7153: end;
7146: --8264475
7147: g_dual_first_noac := null;
7148: g_dual_second_noac := null;
7149: g_dual_action_yn := 'N';
7150: g_dual_prior_prd := NULL; --8268353
7151: --8264475
7152:
7153: end;
7154: --8267598