DBA Data[Home] [Help]

APPS.PA_RESOURCE_UTILS dependencies on PA_RESOURCE_UTILS

Line 1: PACKAGE BODY pa_resource_utils AS

1: PACKAGE BODY pa_resource_utils AS
2: -- $Header: PARSUTLB.pls 120.23.12010000.6 2008/12/08 07:46:31 kjai ship $
3: --
4: -- PROCEDURE
5: -- check_internal_or_external

Line 132: SELECT pa_resource_utils.get_resource_id(p_resource_id)

128:
129: END IF;
130:
131: /* Start of Changes for Bug 6056112 */
132: SELECT pa_resource_utils.get_resource_id(p_resource_id)
133: INTO l_pa_resource_id
134: FROM dual;
135:
136: IF (l_pa_resource_id <> -999) THEN

Line 343: -- (`pa_resource_utils.check_resourcename_or_id');

339: x_return_status := FND_API.G_RET_STS_ERROR;
340: x_error_message_code := 'PA_MULTIPLE_RESOURCE';
341: WHEN OTHERS THEN
342: --PA_Error_Utils.Set_Error_Stack
343: -- (`pa_resource_utils.check_resourcename_or_id');
344: -- This sets the current program unit name in the
345: -- error stack. Helpful in Debugging
346: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
347: x_resource_id := NULL;

Line 410: -- (`pa_resource_utils.check_resourcename_or_id');

406: --x_return_status := FND_API.G_RET_STS_ERROR;
407: --x_error_message_code := 'PA_CRM_RES_NULL';
408: WHEN OTHERS THEN
409: --PA_Error_Utils.Set_Error_Stack
410: -- (`pa_resource_utils.check_resourcename_or_id');
411: -- This sets the current program unit name in the
412: -- error stack. Helpful in Debugging
413:
414: X_JTF_RESOURCE_ID := NULL ; -- 4537865

Line 787: ( p_pkg_name => 'pa_resource_utils'

783: x_frcst_prim_ctct_flag := 'N';
784:
785: -- Populate the Error Message
786: Fnd_Msg_Pub.add_exc_msg
787: ( p_pkg_name => 'pa_resource_utils'
788: , p_procedure_name => 'populate_role_flags'
789: , p_error_text => SUBSTRB(SQLERRM,1,100));
790:
791: -- Raise the Error

Line 947: ( p_pkg_name => 'pa_resource_utils'

943: EXCEPTION
944: WHEN OTHERS THEN
945: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
946: Fnd_Msg_Pub.add_exc_msg
947: ( p_pkg_name => 'pa_resource_utils'
948: , p_procedure_name => 'insert_grant'
949: , p_error_text => SUBSTRB(SQLERRM,1,100));
950: RAISE;
951: END insert_grant;

Line 1060: ( p_pkg_name => 'pa_resource_utils'

1056: EXCEPTION
1057: WHEN OTHERS THEN
1058: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;
1059: Fnd_Msg_Pub.add_exc_msg
1060: ( p_pkg_name => 'pa_resource_utils'
1061: , p_procedure_name => 'delete_grant'
1062: , p_error_text => SUBSTRB(SQLERRM,1,100));
1063: RAISE;
1064: END delete_grant;

Line 1471: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_prim_contact_id_name');

1467: BEGIN
1468:
1469:
1470: -- initialize the error stack
1471: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_prim_contact_id_name');
1472: -- initialize the return status to success
1473: x_return_status := FND_API.G_RET_STS_SUCCESS;
1474:
1475:

Line 1537: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_manager_id_name');

1533: x_return_status OUT NOCOPY VARCHAR2) --File.Sql.39 bug 4440895
1534: IS
1535: BEGIN
1536: -- initialize the error stack
1537: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_manager_id_name');
1538: -- initialize the return status to success
1539: x_return_status := FND_API.G_RET_STS_SUCCESS;
1540:
1541: --Modified code for future dated person

Line 1613: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_org_id');

1609: IS
1610: BEGIN
1611:
1612: -- initialize the error stack
1613: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_org_id');
1614: -- initialize the return status to success
1615: x_return_status := FND_API.G_RET_STS_SUCCESS;
1616:
1617: -- pick the Organization id for the Current Assignment

Line 1635: -- FND_MSG_PUB.add_exc_msg('PA_RESOURCE_UTILS.get_org_id'

1631:
1632: EXCEPTION
1633: WHEN OTHERS THEN
1634: -- set the exception message and stack
1635: -- FND_MSG_PUB.add_exc_msg('PA_RESOURCE_UTILS.get_org_id'
1636: -- ,PA_DEBUG.g_err_stack);
1637: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1638: -- raise;
1639: -- null; 4537865

Line 1662: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_person_id');

1658:
1659: BEGIN
1660:
1661: -- initialize the error stack
1662: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_person_id');
1663: -- initialize the return status to success
1664: x_return_status := FND_API.G_RET_STS_SUCCESS;
1665:
1666: IF P_resourceid is NOT NULL then

Line 1725: FND_MSG_PUB.add_exc_msg('PA_RESOURCE_UTILS.get_org_id'

1721:
1722: WHEN OTHERS THEN
1723: -- set the exception message and stack
1724: x_PersonId := NULL ; -- 4537865
1725: FND_MSG_PUB.add_exc_msg('PA_RESOURCE_UTILS.get_org_id'
1726: ,PA_DEBUG.g_err_stack);
1727: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1728: raise;
1729:

Line 1741: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_object_id');

1737: IS
1738: BEGIN
1739:
1740: -- initialize the error stack
1741: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_object_id');
1742: -- initialize the return status to success
1743: x_return_status := FND_API.G_RET_STS_SUCCESS;
1744:
1745:

Line 1805: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_org_primary_contact');

1801: l_start_date DATE;
1802:
1803: BEGIN
1804: -- initialize the error stack
1805: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_org_primary_contact');
1806:
1807: -- initialize the return status to success
1808: x_return_status := FND_API.G_RET_STS_SUCCESS;
1809:

Line 1933: FND_MSG_PUB.add_exc_msg('PA_RESOURCE_UTILS.get_org_primary_contact'

1929: x_ManagerName := NULL ;
1930: x_return_Status := NULL ;
1931:
1932: -- set the exception message and stack
1933: FND_MSG_PUB.add_exc_msg('PA_RESOURCE_UTILS.get_org_primary_contact'
1934: ,PA_DEBUG.g_err_stack);
1935: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1936: -- dbms_output.put_line('missing');
1937: raise;

Line 2293: PA_RESOURCE_UTILS.G_PERIOD_DATE := l_date;

2289: ELSE
2290: l_date := p_end_date - 6;
2291: END IF;
2292:
2293: PA_RESOURCE_UTILS.G_PERIOD_DATE := l_date;
2294: EXCEPTION
2295: WHEN NO_DATA_FOUND THEN
2296: PA_RESOURCE_UTILS.G_PERIOD_DATE := sysdate - 50 * 365;
2297: WHEN OTHERS THEN

Line 2296: PA_RESOURCE_UTILS.G_PERIOD_DATE := sysdate - 50 * 365;

2292:
2293: PA_RESOURCE_UTILS.G_PERIOD_DATE := l_date;
2294: EXCEPTION
2295: WHEN NO_DATA_FOUND THEN
2296: PA_RESOURCE_UTILS.G_PERIOD_DATE := sysdate - 50 * 365;
2297: WHEN OTHERS THEN
2298: PA_RESOURCE_UTILS.G_PERIOD_DATE := sysdate - 50 * 365;
2299: END Set_Period_Date;
2300:

Line 2298: PA_RESOURCE_UTILS.G_PERIOD_DATE := sysdate - 50 * 365;

2294: EXCEPTION
2295: WHEN NO_DATA_FOUND THEN
2296: PA_RESOURCE_UTILS.G_PERIOD_DATE := sysdate - 50 * 365;
2297: WHEN OTHERS THEN
2298: PA_RESOURCE_UTILS.G_PERIOD_DATE := sysdate - 50 * 365;
2299: END Set_Period_Date;
2300:
2301: FUNCTION get_resource_manager_id(p_user_id IN NUMBER) RETURN NUMBER IS
2302: l_root_manager_id NUMBER;

Line 2380: PA_RESOURCE_UTILS.G_CURRENT_PROJECT_ID := NULL;

2376: l_proj_name_number varchar2(65);
2377: l_project_id NUMBER;
2378: BEGIN
2379: -- reset current_project_id before set it up again
2380: PA_RESOURCE_UTILS.G_CURRENT_PROJECT_ID := NULL;
2381:
2382: -- 4778041 : For performance , removed join of pa_resources_denorm
2383: SELECT proj.name || '(' || proj.segment1 || ')',
2384: proj.project_id

Line 2428: return PA_RESOURCE_UTILS.G_CURRENT_PROJECT_ID;

2424: FUNCTION Get_Current_Project_Id(p_resource_id IN NUMBER)
2425: RETURN NUMBER
2426: IS
2427: BEGIN
2428: return PA_RESOURCE_UTILS.G_CURRENT_PROJECT_ID;
2429:
2430: END Get_Current_Project_Id;
2431:
2432: -- PROCEDURE

Line 2448: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_person_name');

2444: IS
2445: BEGIN
2446:
2447: -- initialize the error stack
2448: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_person_name');
2449: -- initialize the return status to success
2450: x_return_status := FND_API.G_RET_STS_SUCCESS;
2451:
2452: IF p_person_id IS NOT NULL then

Line 2485: FND_MSG_PUB.add_exc_msg('PA_RESOURCE_UTILS.get_person_name'

2481: -- RESET OUT PARAM 4537865
2482: x_person_name := null;
2483:
2484: -- set the exception message and stack
2485: FND_MSG_PUB.add_exc_msg('PA_RESOURCE_UTILS.get_person_name'
2486: ,PA_DEBUG.g_err_stack);
2487: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2488: raise;
2489:

Line 2513: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_location_details');

2509: IS
2510: BEGIN
2511:
2512: -- initialize the error stack
2513: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_location_details');
2514: -- initialize the return status to success
2515: x_return_status := FND_API.G_RET_STS_SUCCESS;
2516:
2517: IF p_location_id IS NOT NULL then

Line 2566: FND_MSG_PUB.add_exc_msg('PA_RESOURCE_UTILS.get_location_details'

2562: x_postal_code := null;
2563: x_country := null;
2564:
2565: -- set the exception message and stack
2566: FND_MSG_PUB.add_exc_msg('PA_RESOURCE_UTILS.get_location_details'
2567: ,PA_DEBUG.g_err_stack);
2568: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2569: raise;
2570:

Line 2590: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_org_defaults');

2586: IS
2587: BEGIN
2588:
2589: -- initialize the error stack
2590: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_org_defaults');
2591: -- initialize the return status to success
2592: x_return_status := FND_API.G_RET_STS_SUCCESS;
2593:
2594: IF p_organization_id IS NOT NULL then

Line 2641: FND_MSG_PUB.add_exc_msg('PA_RESOURCE_UTILS.get_org_defaults'

2637: x_default_ou := null;
2638: x_default_cal_id := null;
2639:
2640: -- set the exception message and stack
2641: FND_MSG_PUB.add_exc_msg('PA_RESOURCE_UTILS.get_org_defaults'
2642: ,PA_DEBUG.g_err_stack);
2643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2644: raise;
2645:

Line 2669: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.check_exp_org');

2665: IS
2666: BEGIN
2667:
2668: -- initialize the error stack
2669: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.check_exp_org');
2670: -- initialize the return status to success
2671: x_return_status := FND_API.G_RET_STS_SUCCESS;
2672:
2673: x_valid := 'N';

Line 2714: FND_MSG_PUB.add_exc_msg('PA_RESOURCE_UTILS.check_exp_org'

2710:
2711: x_valid := 'N';
2712:
2713: -- set the exception message and stack
2714: FND_MSG_PUB.add_exc_msg('PA_RESOURCE_UTILS.check_exp_org'
2715: ,PA_DEBUG.g_err_stack);
2716: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2717: raise;
2718:

Line 2741: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.check_res_exists');

2737: IS
2738: BEGIN
2739:
2740: -- initialize the error stack
2741: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.check_res_exists');
2742: -- initialize the return status to success
2743: x_return_status := FND_API.G_RET_STS_SUCCESS;
2744:
2745: x_valid := 'N';

Line 2777: FND_MSG_PUB.add_exc_msg('PA_RESOURCE_UTILS.check_res_exists'

2773: --4537865 RESET OUT PARAMS
2774: x_valid := 'N';
2775:
2776: -- set the exception message and stack
2777: FND_MSG_PUB.add_exc_msg('PA_RESOURCE_UTILS.check_res_exists'
2778: ,PA_DEBUG.g_err_stack);
2779: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2780: raise;
2781:

Line 2796: RETURN PA_RESOURCE_UTILS.G_PRIMARY_CONTACT_NAME;

2792: IS
2793:
2794: BEGIN
2795:
2796: RETURN PA_RESOURCE_UTILS.G_PRIMARY_CONTACT_NAME;
2797:
2798: END get_org_prim_contact_name;
2799:
2800:

Line 2817: PA_RESOURCE_UTILS.G_PRIMARY_CONTACT_NAME:= NULL;

2813: l_primary_contact_id NUMBER;
2814: l_menu_id NUMBER; /* Bug# 2499051 */
2815: BEGIN
2816: -- reset primary_contact_id before set it up again
2817: PA_RESOURCE_UTILS.G_PRIMARY_CONTACT_NAME:= NULL;
2818:
2819: /* Bug# 2499051 */
2820: select pa_security_pvt.get_menu_id(p_prim_role_name)
2821: into l_menu_id

Line 2855: PA_RESOURCE_UTILS.G_PRIMARY_CONTACT_NAME := l_primary_contact_name;

2851: AND (pep.current_employee_flag = 'Y' OR pep.current_npw_flag = 'Y'); -- Added for bug 4938392
2852:
2853: -- set primary_contact_name to the global variable to get it later
2854: -- from the function 'Get_Org_Prim_Contact_Name'
2855: PA_RESOURCE_UTILS.G_PRIMARY_CONTACT_NAME := l_primary_contact_name;
2856:
2857: RETURN l_primary_contact_id;
2858:
2859: EXCEPTION

Line 3089: IF pa_resource_utils.is_future_resource ( p_resource_id ) = 'Y' THEN

3085: ---------------------------------------------------------------------
3086: --If Future resource use organization calendar, otherwise use resources
3087: --JTF calendar
3088: ----------------------------------------------------------------------
3089: IF pa_resource_utils.is_future_resource ( p_resource_id ) = 'Y' THEN
3090:
3091: --dbms_output.put_line('Future Resource');
3092:
3093: BEGIN

Line 3108: pa_resource_utils.get_org_defaults ( P_ORGANIZATION_ID => l_organization_id,

3104: END;
3105:
3106: --dbms_output.put_line('Resource Organization Id: ' || l_organization_id);
3107:
3108: pa_resource_utils.get_org_defaults ( P_ORGANIZATION_ID => l_organization_id,
3109: X_DEFAULT_OU => l_default_ou,
3110: X_DEFAULT_CAL_ID => l_calendar_id,
3111: X_RETURN_STATUS => l_return_status);
3112:

Line 3669: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_RESOURCE_UTILS.Validate_person'

3665: EXCEPTION
3666:
3667: WHEN OTHERS THEN
3668: -- Set the exception Message and the stack
3669: FND_MSG_PUB.add_exc_msg(p_pkg_name => 'PA_RESOURCE_UTILS.Validate_person'
3670: ,p_procedure_name => PA_DEBUG.G_Err_Stack );
3671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
3672: RAISE;
3673:

Line 3773: pa_resource_utils.allocate_unique(

3769: Return -99;
3770: END IF;
3771:
3772: /* Get lock handle for user lock */
3773: pa_resource_utils.allocate_unique(
3774: p_lock_name =>lock_name,
3775: p_lock_handle =>lockhndl);
3776:
3777: IF ( lockhndl IS NOT NULL ) then

Line 3827: pa_resource_utils.allocate_unique(

3823: Return -99;
3824: END IF;
3825:
3826: /* Get lock handle for user lock */
3827: pa_resource_utils.allocate_unique(
3828: p_lock_name =>lock_name,
3829: p_lock_handle =>lockhndl);
3830:
3831: IF ( lockhndl IS NOT NULL ) then

Line 4391: PA_RESOURCE_UTILS.G_HR_SUPERVISOR_NAME := x_ManagerName;

4387: END;
4388: END IF;
4389: END LOOP;
4390:
4391: PA_RESOURCE_UTILS.G_HR_SUPERVISOR_NAME := x_ManagerName;
4392: PA_RESOURCE_UTILS.G_HR_SUPERVISOR_ID := x_ManagerId;
4393: -- PA_RESOURCE_UTILS.G_ASSIGNMENT_ID := p_assignment_id; -- Bug 4473484
4394: PA_RESOURCE_UTILS.G_START_DATE := p_start_date; -- Bug 4473484
4395: PA_RESOURCE_UTILS.G_RESOURCE_ID := p_resource_id;

Line 4392: PA_RESOURCE_UTILS.G_HR_SUPERVISOR_ID := x_ManagerId;

4388: END IF;
4389: END LOOP;
4390:
4391: PA_RESOURCE_UTILS.G_HR_SUPERVISOR_NAME := x_ManagerName;
4392: PA_RESOURCE_UTILS.G_HR_SUPERVISOR_ID := x_ManagerId;
4393: -- PA_RESOURCE_UTILS.G_ASSIGNMENT_ID := p_assignment_id; -- Bug 4473484
4394: PA_RESOURCE_UTILS.G_START_DATE := p_start_date; -- Bug 4473484
4395: PA_RESOURCE_UTILS.G_RESOURCE_ID := p_resource_id;
4396:

Line 4393: -- PA_RESOURCE_UTILS.G_ASSIGNMENT_ID := p_assignment_id; -- Bug 4473484

4389: END LOOP;
4390:
4391: PA_RESOURCE_UTILS.G_HR_SUPERVISOR_NAME := x_ManagerName;
4392: PA_RESOURCE_UTILS.G_HR_SUPERVISOR_ID := x_ManagerId;
4393: -- PA_RESOURCE_UTILS.G_ASSIGNMENT_ID := p_assignment_id; -- Bug 4473484
4394: PA_RESOURCE_UTILS.G_START_DATE := p_start_date; -- Bug 4473484
4395: PA_RESOURCE_UTILS.G_RESOURCE_ID := p_resource_id;
4396:
4397: RETURN x_ManagerId;

Line 4394: PA_RESOURCE_UTILS.G_START_DATE := p_start_date; -- Bug 4473484

4390:
4391: PA_RESOURCE_UTILS.G_HR_SUPERVISOR_NAME := x_ManagerName;
4392: PA_RESOURCE_UTILS.G_HR_SUPERVISOR_ID := x_ManagerId;
4393: -- PA_RESOURCE_UTILS.G_ASSIGNMENT_ID := p_assignment_id; -- Bug 4473484
4394: PA_RESOURCE_UTILS.G_START_DATE := p_start_date; -- Bug 4473484
4395: PA_RESOURCE_UTILS.G_RESOURCE_ID := p_resource_id;
4396:
4397: RETURN x_ManagerId;
4398:

Line 4395: PA_RESOURCE_UTILS.G_RESOURCE_ID := p_resource_id;

4391: PA_RESOURCE_UTILS.G_HR_SUPERVISOR_NAME := x_ManagerName;
4392: PA_RESOURCE_UTILS.G_HR_SUPERVISOR_ID := x_ManagerId;
4393: -- PA_RESOURCE_UTILS.G_ASSIGNMENT_ID := p_assignment_id; -- Bug 4473484
4394: PA_RESOURCE_UTILS.G_START_DATE := p_start_date; -- Bug 4473484
4395: PA_RESOURCE_UTILS.G_RESOURCE_ID := p_resource_id;
4396:
4397: RETURN x_ManagerId;
4398:
4399: END get_hr_manager_id;

Line 4405: IF PA_RESOURCE_UTILS.G_RESOURCE_ID = p_resource_id and PA_RESOURCE_UTILS.G_START_DATE = p_start_date THEN -- Bug 4473484

4401: FUNCTION get_hr_manager_name(p_resource_id IN NUMBER,p_start_date IN DATE DEFAULT NULL) RETURN VARCHAR2 -- Bug 4473484
4402: IS
4403: l_supervisor NUMBER;
4404: BEGIN
4405: IF PA_RESOURCE_UTILS.G_RESOURCE_ID = p_resource_id and PA_RESOURCE_UTILS.G_START_DATE = p_start_date THEN -- Bug 4473484
4406: null;
4407: ELSE
4408: l_supervisor := get_hr_manager_id(p_resource_id => p_resource_id, p_start_date => p_start_date); -- Bug 4473484
4409: END IF;

Line 4410: RETURN PA_RESOURCE_UTILS.G_HR_SUPERVISOR_NAME;

4406: null;
4407: ELSE
4408: l_supervisor := get_hr_manager_id(p_resource_id => p_resource_id, p_start_date => p_start_date); -- Bug 4473484
4409: END IF;
4410: RETURN PA_RESOURCE_UTILS.G_HR_SUPERVISOR_NAME;
4411:
4412: END get_hr_manager_name;
4413:
4414: /*Bug 3737529: Code Addition ends*/

Line 4587: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.Init_FTE_Sync_WF');

4583:
4584: BEGIN
4585:
4586: -- initialize the error stack
4587: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.Init_FTE_Sync_WF');
4588: -- initialize the return status to success
4589: x_return_status := FND_API.G_RET_STS_SUCCESS;
4590:
4591: l_term_type := pa_resource_utils.get_term_type(p_person_id) ;

Line 4591: l_term_type := pa_resource_utils.get_term_type(p_person_id) ;

4587: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.Init_FTE_Sync_WF');
4588: -- initialize the return status to success
4589: x_return_status := FND_API.G_RET_STS_SUCCESS;
4590:
4591: l_term_type := pa_resource_utils.get_term_type(p_person_id) ;
4592:
4593: IF (l_term_type = 'I') THEN
4594:
4595: IF( p_person_id <> nvl(G_TERM_PERSON_ID, -999) ) THEN

Line 4599: pa_resource_utils.is_fte(p_person_id => G_TERM_PERSON_ID,

4595: IF( p_person_id <> nvl(G_TERM_PERSON_ID, -999) ) THEN
4596:
4597: G_TERM_PERSON_ID := p_person_id ;
4598:
4599: pa_resource_utils.is_fte(p_person_id => G_TERM_PERSON_ID,
4600: x_return_end_date => l_return_end_date,
4601: x_invol_term => l_invol_term ,
4602: x_wait_days => l_wait_days ,
4603: x_msg_data => x_msg_data,

Line 4628: pa_resource_utils.get_fte_flag(p_person_id => G_TERM_PERSON_ID,

4624: last_update_login = fnd_global.login_id
4625: WHERE person_id = G_TERM_PERSON_ID --l_person_id
4626: AND resource_effective_end_date = l_resource_effective_end_date;
4627:
4628: pa_resource_utils.get_fte_flag(p_person_id => G_TERM_PERSON_ID,
4629: x_future_term_wf_flag => l_future_term_wf_flag,
4630: x_msg_data => x_msg_data,
4631: x_msg_count => x_msg_count,
4632: x_return_status => x_return_status);

Line 4643: pa_resource_utils.set_fte_flag(p_person_id => G_TERM_PERSON_ID,

4639: x_msg_count => x_msg_count,
4640: x_msg_data => x_msg_data);
4641:
4642:
4643: pa_resource_utils.set_fte_flag(p_person_id => G_TERM_PERSON_ID,
4644: p_future_term_wf_flag => 'Y',
4645: x_msg_data => x_msg_data,
4646: x_msg_count => x_msg_count,
4647: x_return_status => x_return_status ) ;

Line 4660: pa_resource_utils.set_fte_flag(p_person_id => G_TERM_PERSON_ID,

4656: END IF ; --IF l_future_term_wf_flag IS NULL
4657:
4658: ELSE -- IF (G_FTE_FLAG = 'Y')
4659:
4660: pa_resource_utils.set_fte_flag(p_person_id => G_TERM_PERSON_ID,
4661: p_future_term_wf_flag => NULL,
4662: x_msg_data => x_msg_data,
4663: x_msg_count => x_msg_count,
4664: x_return_status => x_return_status) ;

Line 4676: pa_resource_utils.set_fte_flag(p_person_id => p_person_id,

4672:
4673: l_invol_term := 'N';
4674:
4675: /* Added for Bug 6056112 */
4676: pa_resource_utils.set_fte_flag(p_person_id => p_person_id,
4677: p_future_term_wf_flag => NULL,
4678: x_msg_data => x_msg_data,
4679: x_msg_count => x_msg_count,
4680: x_return_status => x_return_status) ;

Line 4696: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RESOURCE_UTILS',

4692: WHEN OTHERS THEN
4693: x_return_status := FND_API.G_RET_STS_ERROR;
4694: x_msg_count := 1;
4695: x_msg_data := substr(SQLERRM,1,240);
4696: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RESOURCE_UTILS',
4697: p_procedure_name => 'Init_FTE_sync_wf');
4698: If x_msg_count = 1 THEN
4699: pa_interface_utils_pub.get_messages
4700: (p_encoded => FND_API.G_TRUE,

Line 4732: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.set_fte_flag');

4728: l_msg_index_out NUMBER;
4729:
4730: BEGIN
4731: -- initialize the error stack
4732: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.set_fte_flag');
4733: -- initialize the return status to success
4734: x_return_status := FND_API.G_RET_STS_SUCCESS;
4735:
4736: l_resource_id := pa_resource_utils.get_resource_id(p_person_id);

Line 4736: l_resource_id := pa_resource_utils.get_resource_id(p_person_id);

4732: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.set_fte_flag');
4733: -- initialize the return status to success
4734: x_return_status := FND_API.G_RET_STS_SUCCESS;
4735:
4736: l_resource_id := pa_resource_utils.get_resource_id(p_person_id);
4737:
4738: IF NVL(l_resource_id,-999) <> -999 THEN
4739:
4740: UPDATE pa_resources

Line 4761: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RESOURCE_UTILS',

4757: WHEN OTHERS THEN
4758: x_return_status := FND_API.G_RET_STS_ERROR;
4759: x_msg_count := 1;
4760: x_msg_data := substr(SQLERRM,1,240);
4761: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RESOURCE_UTILS',
4762: p_procedure_name => 'set_fte_flag');
4763: If x_msg_count = 1 THEN
4764: pa_interface_utils_pub.get_messages
4765: (p_encoded => FND_API.G_TRUE,

Line 4798: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_fte_flag');

4794: l_msg_index_out NUMBER;
4795:
4796: BEGIN
4797: -- initialize the error stack
4798: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_fte_flag');
4799: -- initialize the return status to success
4800: x_return_status := FND_API.G_RET_STS_SUCCESS;
4801:
4802: l_resource_id := pa_resource_utils.get_resource_id(p_person_id);

Line 4802: l_resource_id := pa_resource_utils.get_resource_id(p_person_id);

4798: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_fte_flag');
4799: -- initialize the return status to success
4800: x_return_status := FND_API.G_RET_STS_SUCCESS;
4801:
4802: l_resource_id := pa_resource_utils.get_resource_id(p_person_id);
4803:
4804: IF NVL(l_resource_id,-999) <> -999 THEN
4805:
4806: SELECT pa_resources.future_term_wf_flag

Line 4829: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RESOURCE_UTILS',

4825: x_future_term_wf_flag := NULL;
4826: x_return_status := FND_API.G_RET_STS_ERROR;
4827: x_msg_count := 1;
4828: x_msg_data := substr(SQLERRM,1,240);
4829: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RESOURCE_UTILS',
4830: p_procedure_name => 'get_fte_flag');
4831: If x_msg_count = 1 THEN
4832: pa_interface_utils_pub.get_messages
4833: (p_encoded => FND_API.G_TRUE,

Line 4870: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.is_fte');

4866: l_msg_index_out NUMBER;
4867:
4868: BEGIN
4869: -- initialize the error stack
4870: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.is_fte');
4871: -- initialize the return status to success
4872: x_return_status := FND_API.G_RET_STS_SUCCESS;
4873:
4874: SELECT distinct(resource_person_type)

Line 4899: pa_resource_utils.get_valid_enddate(p_person_id => p_person_id,

4895: END IF ; --IF (l_system_person_type = 'EMP' )
4896:
4897: IF (l_end_date > trunc(sysdate)) THEN
4898:
4899: pa_resource_utils.get_valid_enddate(p_person_id => p_person_id,
4900: p_actual_term_date => l_end_date,
4901: x_valid_end_date => l_valid_end_date,
4902: x_msg_data => x_msg_data,
4903: x_msg_count => x_msg_count,

Line 4927: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RESOURCE_UTILS',

4923: WHEN OTHERS THEN
4924: x_return_status := FND_API.G_RET_STS_ERROR;
4925: x_msg_count := 1;
4926: x_msg_data := substr(SQLERRM,1,240);
4927: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RESOURCE_UTILS',
4928: p_procedure_name => 'is_fte');
4929: If x_msg_count = 1 THEN
4930: pa_interface_utils_pub.get_messages
4931: (p_encoded => FND_API.G_TRUE,

Line 4964: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_valid_enddate');

4960: l_msg_index_out NUMBER;
4961:
4962: BEGIN
4963: -- initialize the error stack
4964: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.get_valid_enddate');
4965: -- initialize the return status to success
4966: x_return_status := FND_API.G_RET_STS_SUCCESS;
4967:
4968:

Line 4995: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RESOURCE_UTILS',

4991: WHEN OTHERS THEN
4992: x_return_status := FND_API.G_RET_STS_ERROR;
4993: x_msg_count := 1;
4994: x_msg_data := substr(SQLERRM,1,240);
4995: FND_MSG_PUB.add_exc_msg( p_pkg_name => 'PA_RESOURCE_UTILS',
4996: p_procedure_name => 'get_valid_enddate');
4997: If x_msg_count = 1 THEN
4998: pa_interface_utils_pub.get_messages
4999: (p_encoded => FND_API.G_TRUE,

Line 5054: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.is_term_as_of_sys_date');

5050:
5051: BEGIN
5052: -- initialize the error stack
5053: --
5054: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.is_term_as_of_sys_date');
5055:
5056: IF (l_pa_debug_mode = 'Y') THEN
5057: pa_debug.write('PA_RESOURCE_UTILS',
5058: 'log: ' || 'in procedure is_term_as_of_sys_date', 3);

Line 5057: pa_debug.write('PA_RESOURCE_UTILS',

5053: --
5054: PA_DEBUG.init_err_stack('PA_RESOURCE_UTILS.is_term_as_of_sys_date');
5055:
5056: IF (l_pa_debug_mode = 'Y') THEN
5057: pa_debug.write('PA_RESOURCE_UTILS',
5058: 'log: ' || 'in procedure is_term_as_of_sys_date', 3);
5059: END IF;
5060:
5061:

Line 5070: pa_resource_utils.get_fte_flag(p_person_id => l_person_id,

5066: aname => 'PERSON_ID' );
5067:
5068: --get the future_term_wf_flag from pa_resources
5069: --
5070: pa_resource_utils.get_fte_flag(p_person_id => l_person_id,
5071: x_future_term_wf_flag => l_future_term_wf_flag,
5072: x_msg_data => l_msg_data,
5073: x_msg_count => l_msg_count,
5074: x_return_status => l_return_status);

Line 5077: pa_debug.write('PA_RESOURCE_UTILS',

5073: x_msg_count => l_msg_count,
5074: x_return_status => l_return_status);
5075:
5076: IF (l_pa_debug_mode = 'Y') THEN
5077: pa_debug.write('PA_RESOURCE_UTILS',
5078: 'log: ' || 'in procedure is_term_as_of_sys_date, l_future_term_wf_flag: '||l_future_term_wf_flag, 3);
5079: END IF ;
5080:
5081: OPEN c_act_term_date(l_person_id);

Line 5088: pa_debug.write('PA_RESOURCE_UTILS',

5084: IF c_act_term_date%NOTFOUND THEN
5085: CLOSE c_act_term_date;
5086: resultout := wf_engine.eng_completed||':'||'E';
5087: IF (l_pa_debug_mode = 'Y') THEN
5088: pa_debug.write('PA_RESOURCE_UTILS',
5089: 'log: ' || 'in procedure is_term_as_of_sys_date, no end date found', 3);
5090: END IF;
5091:
5092: ELSE --IF c_act_term_date%NOTFOUND

Line 5096: pa_debug.write('PA_RESOURCE_UTILS',

5092: ELSE --IF c_act_term_date%NOTFOUND
5093:
5094: CLOSE c_act_term_date;
5095: IF (l_pa_debug_mode = 'Y') THEN
5096: pa_debug.write('PA_RESOURCE_UTILS',
5097: 'log: ' || 'in procedure is_term_as_of_sys_date, l_end_date: '||l_end_date, 3);
5098: END IF;
5099:
5100:

Line 5110: pa_debug.write('PA_RESOURCE_UTILS',

5106:
5107: END IF ; --IF c_act_term_date%NOTFOUND
5108:
5109: IF (l_pa_debug_mode = 'Y') THEN
5110: pa_debug.write('PA_RESOURCE_UTILS',
5111: 'log: ' || 'in procedure is_term_as_of_sys_date, resultout: '||resultout, 3);
5112: END IF;
5113:
5114:

Line 5117: wf_core.context('pa_resource_utils',

5113:
5114:
5115: EXCEPTION
5116: WHEN OTHERS THEN
5117: wf_core.context('pa_resource_utils',
5118: 'is_term_as_of_sys_date',
5119: itemtype,
5120: itemkey,
5121: to_char(actid),

Line 5129: END pa_resource_utils ;

5125:
5126:
5127: END is_term_as_of_sys_date;
5128:
5129: END pa_resource_utils ;