DBA Data[Home] [Help]

APPS.PER_PEOPLE_V7_PKG dependencies on PER_PEOPLE_V7_PKG

Line 1: PACKAGE BODY PER_PEOPLE_V7_PKG as

1: PACKAGE BODY PER_PEOPLE_V7_PKG as
2: /* $Header: peper07t.pkb 120.2.12000000.6 2007/05/02 14:02:03 asgugupt noship $ */
3: --
4: --bug no 6028006 starts here
5: --g_package varchar2(18) := ' PER_PEOPLE_V7_PKG.';

Line 5: --g_package varchar2(18) := ' PER_PEOPLE_V7_PKG.';

1: PACKAGE BODY PER_PEOPLE_V7_PKG as
2: /* $Header: peper07t.pkb 120.2.12000000.6 2007/05/02 14:02:03 asgugupt noship $ */
3: --
4: --bug no 6028006 starts here
5: --g_package varchar2(18) := ' PER_PEOPLE_V7_PKG.';
6: g_package varchar2(18) := 'PER_PEOPLE_V7_PKG.';
7: --bug no 6028006 ends here
8: g_debug boolean; -- debug flag
9: --

Line 6: g_package varchar2(18) := 'PER_PEOPLE_V7_PKG.';

2: /* $Header: peper07t.pkb 120.2.12000000.6 2007/05/02 14:02:03 asgugupt noship $ */
3: --
4: --bug no 6028006 starts here
5: --g_package varchar2(18) := ' PER_PEOPLE_V7_PKG.';
6: g_package varchar2(18) := 'PER_PEOPLE_V7_PKG.';
7: --bug no 6028006 ends here
8: g_debug boolean; -- debug flag
9: --
10: PROCEDURE Update_Row(X_Rowid VARCHAR2,

Line 154: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',10);

150: l_person per_all_people_f%rowtype;
151: --
152: /* END OF WWBUG 1975359 */
153: BEGIN
154: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',10);
155: if X_Current_Application_Id = 810
156: then
157: per_people_v7_pkg.check_person_changes(X_person_id
158: ,X_hire_date

Line 157: per_people_v7_pkg.check_person_changes(X_person_id

153: BEGIN
154: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',10);
155: if X_Current_Application_Id = 810
156: then
157: per_people_v7_pkg.check_person_changes(X_person_id
158: ,X_hire_date
159: ,X_s_hire_Date
160: ,X_current_application_id );
161: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',20);

Line 161: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',20);

157: per_people_v7_pkg.check_person_changes(X_person_id
158: ,X_hire_date
159: ,X_s_hire_Date
160: ,X_current_application_id );
161: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',20);
162: end if;
163: if X_termination_date is not null
164: and X_S_termination_date is null
165: and X_current_employee_flag = 'Y'

Line 167: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',30);

163: if X_termination_date is not null
164: and X_S_termination_date is null
165: and X_current_employee_flag = 'Y'
166: then
167: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',30);
168: per_people_v7_pkg.check_person_changes(X_person_id
169: ,X_termination_date
170: ,X_Hire_date
171: ,X_current_application_id );

Line 168: per_people_v7_pkg.check_person_changes(X_person_id

164: and X_S_termination_date is null
165: and X_current_employee_flag = 'Y'
166: then
167: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',30);
168: per_people_v7_pkg.check_person_changes(X_person_id
169: ,X_termination_date
170: ,X_Hire_date
171: ,X_current_application_id );
172: X_effective_end_date := X_termination_date;

Line 176: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',40);

172: X_effective_end_date := X_termination_date;
173: elsif x_hire_date <> X_s_hire_date then
174: X_effective_start_date := X_hire_date;
175: X_start_date := X_hire_date;
176: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',40);
177: end if;
178: /* BEGIN OF WWBUG 1975359 */
179: open c1;
180: --

Line 185: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',50);

181: fetch c1 into l_party_id;
182: --
183: close c1;
184: /* END OF WWBUG 1975359 */
185: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',50);
186: UPDATE PER_PEOPLE_F
187: SET
188: person_id = X_Person_Id,
189: party_id = l_Party_Id,

Line 307: hr_utility.set_location('per_people_v7_pkg.update_row',55);

303: -- ,p_person_type_id => X_Person_Type_Id
304: -- ,p_datetrack_update_mode=> 'CORRECTION'
305: -- );
306: --
307: hr_utility.set_location('per_people_v7_pkg.update_row',55);
308: -- PTU : End of Changes
309:
310: /* BEGIN OF WWBUG 1975359 */
311: --

Line 316: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',60);

312: open c_person;
313: --
314: fetch c_person into l_person;
315: --
316: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',60);
317: close c_person;
318: --
319: per_hrtca_merge.update_tca_person(p_Rec => l_person);
320: --

Line 346: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',70);

342: -- phone B.P.
343: --
344: if (l_old_work_telephone is null and
345: x_work_telephone is not null) then
346: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',70);
347: hr_phone_api.create_phone
348: (p_date_from => x_start_date
349: ,p_date_to => null
350: ,p_phone_type => 'W1'

Line 364: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',80);

360: -- If old entry is not null and corrected entry is null then delete the phone.
361: --
362: elsif l_old_work_telephone is not null and x_work_telephone is null then
363: hr_phone_api.delete_phone(FALSE, l_phone_id, l_phn_object_version_number);
364: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',80);
365: --
366: -- If old and corrected entries are both not null then update the row with
367: -- no changes to start and to dates.
368: --

Line 370: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',90);

366: -- If old and corrected entries are both not null then update the row with
367: -- no changes to start and to dates.
368: --
369: elsif l_old_work_telephone is not null and x_work_telephone is not null then
370: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',90);
371: --
372: -- 115.22: only one row is maintained in per_phones.
373: -- when changing the phone, date_to should remain null. This keeps the
374: -- row "open" until the "end of time"

Line 377: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',95);

373: -- when changing the phone, date_to should remain null. This keeps the
374: -- row "open" until the "end of time"
375: if ( l_old_work_telephone <> x_work_telephone) then
376: -- Bug 5554383 : Added IF condition.
377: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',95);
378: hr_phone_api.update_phone
379: (p_phone_id => l_phone_id,
380: p_phone_number => x_work_telephone,
381: p_date_to => null, -- 1020074 x_termination_date,

Line 389: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',100);

385: end if;
386: --
387: -- End of logic for the update of the phones table
388: --
389: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',100);
390: --
391: if X_termination_date is not null
392: and X_S_termination_date is null
393: and X_current_employee_flag = 'Y'

Line 395: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',110);

391: if X_termination_date is not null
392: and X_S_termination_date is null
393: and X_current_employee_flag = 'Y'
394: then
395: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',110);
396: terminate_employment(X_period_of_service_id
397: ,X_person_id
398: ,X_Rowid
399: ,X_Business_group_id

Line 403: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',120);

399: ,X_Business_group_id
400: ,X_termination_date);
401: elsif X_hire_date <> X_s_hire_date
402: then
403: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',120);
404: update_employee_rows(X_period_of_service_id
405: ,X_person_id
406: ,X_hire_date
407: ,X_s_hire_date);

Line 409: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',130);

405: ,X_person_id
406: ,X_hire_date
407: ,X_s_hire_date);
408: end if;
409: hr_utility.set_location('Entering : per_people_v7_pkg.update_row',130);
410: END Update_Row;
411: --
412: PROCEDURE Delete_Row(X_Rowid VARCHAR2) IS
413: BEGIN

Line 433: c_proc_name varchar2(100) := 'PER_PEOPLE_V7_PKG.create_EX_EMP';

429: ,p_start_date DATE
430: ,p_end_date DATE)
431: IS
432: --
433: c_proc_name varchar2(100) := 'PER_PEOPLE_V7_PKG.create_EX_EMP';
434: --
435: cursor csr_ex_status is
436: select ppt.person_type_id
437: , pst.current_applicant_flag

Line 1699: hr_utility.set_location('Entering : per_people_v7_pkg.cancel termination',25);

1695: ----changes for bug 5857638 here
1696: -- fetch person into l_dummy_date;
1697: fetch person into l_person_record;
1698: if l_person_record.effective_end_date=X_s_termination_date then
1699: hr_utility.set_location('Entering : per_people_v7_pkg.cancel termination',25);
1700: l_EFFECTIVE_START_DATE :=l_person_record.EFFECTIVE_START_DATE;
1701: l_CURRENT_EMP_OR_APL_FLAG :=l_person_record.CURRENT_EMP_OR_APL_FLAG;
1702: l_CURRENT_EMPLOYEE_FLAG :=l_person_record.CURRENT_EMPLOYEE_FLAG;
1703: l_PERSON_TYPE_ID :=l_person_record.PERSON_TYPE_ID;

Line 2457: END PER_PEOPLE_V7_PKG;

2453: END IF;
2454:
2455:
2456: end check_person_changes;
2457: END PER_PEOPLE_V7_PKG;