[Home] [Help]
1: Package Body hr_change_start_date_api as
2: /* $Header: pehirapi.pkb 120.28.12020000.5 2013/03/07 08:40:15 bklingam ship $ */
3: --
4: -- Package Variables
5: --
2: /* $Header: pehirapi.pkb 120.28.12020000.5 2013/03/07 08:40:15 bklingam ship $ */
3: --
4: -- Package Variables
5: --
6: g_package varchar2(33) := 'hr_change_start_date_api.';
7: --
8: -- ----------------------------------------------------------------------------
9: -- |--------------------------< check_not_supervisor >------------------------|
10: -- ----------------------------------------------------------------------------
1312: end loop pds_loop;
1313: if pds%rowcount <>1 then
1314: close pds;
1315: hr_utility.set_message('801','HR_6153_ALL_PROCEDURE_FAIL');
1316: hr_utility.set_message_token('PROCEDURE','hr_change_start_date_api.update_period');
1317: hr_utility.set_message_token('STEP','1');
1318: hr_utility.raise_error;
1319: else
1320: close pds;
1333: end loop pdp_loop;
1334: if pdp%rowcount <>1 then
1335: close pdp;
1336: hr_utility.set_message('801','HR_6153_ALL_PROCEDURE_FAIL');
1337: hr_utility.set_message_token('PROCEDURE','hr_change_start_date_api.update_period');
1338: hr_utility.set_message_token('STEP','2');
1339: hr_utility.raise_error;
1340: else
1341: close pdp;
1521: fetch csr_get_bg into l_business_group_id;
1522: if csr_get_bg%NOTFOUND then
1523: close csr_get_bg;
1524: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1525: hr_utility.set_message_token('PROCEDURE', 'hr_change_start_date_api.update_tax');
1526: hr_utility.set_message_token('STEP', '1');
1527: hr_utility.raise_error;
1528: end if;
1529: close csr_get_bg;
1849: fetch csr_get_bg into l_business_group_id;
1850: if csr_get_bg%NOTFOUND then
1851: close csr_get_bg;
1852: hr_utility.set_message(801, 'HR_6153_ALL_PROCEDURE_FAIL');
1853: hr_utility.set_message_token('PROCEDURE', 'hr_change_start_date_api.update_tax');
1854: hr_utility.set_message_token('STEP', '1');
1855: hr_utility.raise_error;
1856: end if;
1857: close csr_get_bg;
2098: ,p_old_start_date in date
2099: ,p_new_start_date in date) IS
2100: --
2101: l_dummy varchar2(1);
2102: l_proc varchar2(72):='hr_change_start_date_api.check_grade_ladder';
2103: --
2104: CURSOR csr_asg_records IS
2105: SELECT GRADE_LADDER_PGM_ID
2106: FROM per_all_assignments_f
3159: hr_utility.set_location(' Leaving:'||l_proc, 700);
3160: raise;
3161: end update_start_date;
3162: --
3163: end hr_change_start_date_api;