DBA Data[Home] [Help]

APPS.PER_ASSIGNMENTS_F_PKG dependencies on PER_ASSIGNMENTS_F

Line 1: PACKAGE BODY PER_ASSIGNMENTS_F_PKG AS

1: PACKAGE BODY PER_ASSIGNMENTS_F_PKG AS
2: /* $Header: peasg01t.pkb 120.29.12010000.3 2008/09/29 05:42:27 ubhat ship $ */
3: -----------------------------------------------------------------------------
4: --
5: -- **** Standard ON-* procedures of base view. *****

Line 12: --g_package varchar2(21) := 'PER_ASSIGNMENTS_F_PKG.';

8: --
9: -- Standard Insert procedure
10: --
11: --bug no 6028006 starts here
12: --g_package varchar2(21) := 'PER_ASSIGNMENTS_F_PKG.';
13: g_package varchar2(22) := 'PER_ASSIGNMENTS_F_PKG.';
14: --bug no 6028006 ends here
15: g_debug boolean; -- debug flag
16: --

Line 13: g_package varchar2(22) := 'PER_ASSIGNMENTS_F_PKG.';

9: -- Standard Insert procedure
10: --
11: --bug no 6028006 starts here
12: --g_package varchar2(21) := 'PER_ASSIGNMENTS_F_PKG.';
13: g_package varchar2(22) := 'PER_ASSIGNMENTS_F_PKG.';
14: --bug no 6028006 ends here
15: g_debug boolean; -- debug flag
16: --
17: procedure insert_row(

Line 134: l_proc varchar2(200):= 'PER_ASSIGNMENTS_F_PKG.INSERT_ROW';

130: --
131: l_return_code number;
132: l_return_text varchar2(240);
133: l_session_date date;
134: l_proc varchar2(200):= 'PER_ASSIGNMENTS_F_PKG.INSERT_ROW';
135: --
136: /*
137: --WWBUG 2130950 Begin hrwf synchronization --tpapired
138: l_asg_rec per_all_assignments_f%rowtype;

Line 163: from per_assignments_f

159: select per_assignments_s.nextval
160: from sys.dual;
161: cursor c2 is
162: select rowid
163: from per_assignments_f
164: where assignment_id = P_ASSIGNMENT_ID
165: and effective_start_date = P_EFFECTIVE_START_DATE
166: and effective_end_date = P_EFFECTIVE_END_DATE;
167: begin

Line 187: insert into per_assignments_f (

183: ,p_assignment_type => p_assignment_type -- 6356978
184: );
185: /*-- End change for the bug 5854568 ----*/
186: begin
187: insert into per_assignments_f (
188: assignment_id,
189: effective_start_date,
190: effective_end_date,
191: business_group_id,

Line 439: 'PER_ASSIGNMENTS_F1_PKG.INSERT_ROW');

435: if ac1%notfound then
436: close ac1;
437: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
438: fnd_message.set_token('PROCEDURE',
439: 'PER_ASSIGNMENTS_F1_PKG.INSERT_ROW');
440: fnd_message.set_token('STEP', '0');
441: fnd_message.raise_error;
442: end if;
443: close ac1;

Line 558: delete from per_assignments_f a

554: -- Standard delete procedure
555: --
556: procedure delete_row(p_row_id varchar2) is
557: begin
558: delete from per_assignments_f a
559: where a.rowid = chartorowid(P_ROW_ID);
560: end delete_row;
561: -----------------------------------------------------------------------------
562: --

Line 679: from per_assignments_f a

675: ) is
676: --
677: cursor ASS_CUR is
678: select *
679: from per_assignments_f a
680: where a.rowid = chartorowid(P_ROW_ID)
681: FOR UPDATE OF ASSIGNMENT_ID NOWAIT;
682: --
683: ass_rec ASS_CUR%rowtype;

Line 695: 'PER_ASSIGNMENTS_F_PKG.LOCK_ROW');

691: if ASS_CUR%notfound then
692: close ASS_CUR;
693: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
694: fnd_message.set_token('PROCEDURE',
695: 'PER_ASSIGNMENTS_F_PKG.LOCK_ROW');
696: fnd_message.set_token('STEP', '1');
697: fnd_message.raise_error;
698: end if;
699: close ASS_CUR;

Line 1237: from per_assignments_f pav,

1233: cursor perav1(c_row_id rowid) is
1234: select pav.organization_id,
1235: pbg.legislation_code,
1236: pav.location_id
1237: from per_assignments_f pav,
1238: per_business_groups pbg
1239: where c_row_id = pav.rowid
1240: and pav.business_group_id = pbg.business_group_id;
1241: --

Line 1245: from PER_ASSIGNMENTS_F paf

1241: --
1242:
1243: cursor csr_chk_loc_change is
1244: select paf.location_id
1245: from PER_ASSIGNMENTS_F paf
1246: where paf.assignment_id = p_assignment_id
1247: and p_session_date between paf.effective_start_date
1248: and paf.effective_end_date;
1249:

Line 1289: --to per_assignments_f. This is because all secure users will be able to see

1285: begin
1286: --
1287: -- #294004 If the organization_id has been changed away from the default
1288: --business_group, an update to ins_per_list should be invoked, after the update
1289: --to per_assignments_f. This is because all secure users will be able to see
1290: --the person when assigned to the default business group and we want to
1291: --restrict access immediately the organization is entered, rather than waiting
1292: --for the next run of listgen.
1293: --

Line 1294: hr_utility.set_location('per_assignments_f_pkg.update_row',1);

1290: --the person when assigned to the default business group and we want to
1291: --restrict access immediately the organization is entered, rather than waiting
1292: --for the next run of listgen.
1293: --
1294: hr_utility.set_location('per_assignments_f_pkg.update_row',1);
1295: open csr_chk_loc_change;
1296: fetch csr_chk_loc_change into l_loc_id;
1297:
1298: if csr_chk_loc_change%NOTFOUND then

Line 1302: 'per_assignments_f_pkg.update_row');

1298: if csr_chk_loc_change%NOTFOUND then
1299: close csr_chk_loc_change;
1300: fnd_message.set_name(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1301: fnd_message.set_token('PROCEDURE',
1302: 'per_assignments_f_pkg.update_row');
1303: fnd_message.set_token('STEP','1');
1304: fnd_message.raise_error;
1305: else
1306: if l_loc_id <> p_location_id then

Line 1321: hr_utility.set_location('per_assignments_f_pkg.update_row',10);

1317: --
1318: if p_pay_basis_id is null then
1319: open c_pay_proposals;
1320:
1321: hr_utility.set_location('per_assignments_f_pkg.update_row',10);
1322: fetch c_pay_proposals into l_change_date;
1323: if c_pay_proposals%FOUND then
1324: if l_change_date < p_session_date then
1325: fnd_message.set_name('PER','HR_289767_SALARY_BASIS_IS_NULL');

Line 1328: hr_utility.set_location('per_assignments_f_pkg.update_row',20);

1324: if l_change_date < p_session_date then
1325: fnd_message.set_name('PER','HR_289767_SALARY_BASIS_IS_NULL');
1326: fnd_message.raise_error;
1327: end if;
1328: hr_utility.set_location('per_assignments_f_pkg.update_row',20);
1329: end if;
1330: hr_utility.set_location('per_assignments_f_pkg.update_row',30);
1331: end if;
1332:

Line 1330: hr_utility.set_location('per_assignments_f_pkg.update_row',30);

1326: fnd_message.raise_error;
1327: end if;
1328: hr_utility.set_location('per_assignments_f_pkg.update_row',20);
1329: end if;
1330: hr_utility.set_location('per_assignments_f_pkg.update_row',30);
1331: end if;
1332:
1333: -- End Bug 2365872
1334: **/

Line 1346: 'PER_ASSIGNMENTS_F1_PKG.UPDATE_ROW');

1342: if perav1%notfound then
1343: close perav1;
1344: fnd_message.set_name('PAY', 'HR_6153_ALL_PROCEDURE_FAIL');
1345: fnd_message.set_token('PROCEDURE',
1346: 'PER_ASSIGNMENTS_F1_PKG.UPDATE_ROW');
1347: fnd_message.set_token('STEP', '1');
1348: fnd_message.raise_error;
1349: end if;
1350: close perav1;

Line 1438: from per_assignments_f

1434: --
1435: hr_utility.set_location(g_package || l_proc, 40);
1436: -- Retrieve Previous assignment_status_id
1437: select assignment_status_type_id into l_previous_asg_status
1438: from per_assignments_f
1439: where rowid = chartorowid(P_ROW_ID);
1440:
1441: hr_utility.set_location(g_package || l_proc, 45);
1442:

Line 1455: update per_assignments_f a

1451: , p_object_version_number => l_asg_status_ovn);
1452: end if;
1453:
1454: hr_utility.set_location(g_package || l_proc, 50);
1455: update per_assignments_f a
1456: set a.assignment_id = P_ASSIGNMENT_ID,
1457: a.effective_start_date = P_EFFECTIVE_START_DATE,
1458: a.effective_end_date = P_EFFECTIVE_END_DATE,
1459: a.business_group_id = P_BUSINESS_GROUP_ID,

Line 1699: END PER_ASSIGNMENTS_F_PKG;

1695: -- **** End of standard ON-* checks. ****
1696: --
1697: -----------------------------------------------------------------------------
1698: --
1699: END PER_ASSIGNMENTS_F_PKG;