DBA Data[Home] [Help]

APPS.PA_RESOURCE_UTILS dependencies on FND_API

Line 61: x_return_status := FND_API.G_RET_STS_SUCCESS;

57: else
58: raise NO_DATA_FOUND;
59: end if;
60:
61: x_return_status := FND_API.G_RET_STS_SUCCESS;
62:
63: EXCEPTION
64: WHEN NO_DATA_FOUND THEN
65: x_return_status := FND_API.G_RET_STS_ERROR;

Line 65: x_return_status := FND_API.G_RET_STS_ERROR;

61: x_return_status := FND_API.G_RET_STS_SUCCESS;
62:
63: EXCEPTION
64: WHEN NO_DATA_FOUND THEN
65: x_return_status := FND_API.G_RET_STS_ERROR;
66: raise;
67: WHEN TOO_MANY_ROWS THEN
68: x_return_status := FND_API.G_RET_STS_ERROR;
69: raise;

Line 68: x_return_status := FND_API.G_RET_STS_ERROR;

64: WHEN NO_DATA_FOUND THEN
65: x_return_status := FND_API.G_RET_STS_ERROR;
66: raise;
67: WHEN TOO_MANY_ROWS THEN
68: x_return_status := FND_API.G_RET_STS_ERROR;
69: raise;
70: WHEN OTHERS THEN
71: x_return_status := FND_API.G_RET_STS_ERROR;
72: raise;

Line 71: x_return_status := FND_API.G_RET_STS_ERROR;

67: WHEN TOO_MANY_ROWS THEN
68: x_return_status := FND_API.G_RET_STS_ERROR;
69: raise;
70: WHEN OTHERS THEN
71: x_return_status := FND_API.G_RET_STS_ERROR;
72: raise;
73: END check_internal_or_external;
74:
75: --

Line 152: IF p_resource_id IS NOT NULL AND p_resource_id<>FND_API.G_MISS_NUM THEN

148: -- because we now handle external people
149: -----------------------------------------
150: IF l_resource_type_id = 101 THEN
151:
152: IF p_resource_id IS NOT NULL AND p_resource_id<>FND_API.G_MISS_NUM THEN
153:
154: IF p_check_id_flag = 'Y' THEN
155:
156: /* Start of Changes for Bug 6056112 */

Line 302: IF p_resource_id IS NOT NULL AND p_resource_id<>FND_API.G_MISS_NUM THEN

298:
299: ---------------------
300: -- For type HZ_PARTY
301: ---------------------
302: IF p_resource_id IS NOT NULL AND p_resource_id<>FND_API.G_MISS_NUM THEN
303:
304: SELECT party_id
305: INTO x_resource_id
306: FROM pa_party_resource_details_v hz

Line 330: x_return_status := FND_API.G_RET_STS_SUCCESS;

326: x_resource_type_id := 112;
327:
328: END IF; /* after checking the resource_type_id */
329:
330: x_return_status := FND_API.G_RET_STS_SUCCESS;
331:
332: EXCEPTION
333: WHEN NO_DATA_FOUND THEN
334: x_resource_id := NULL;

Line 335: x_return_status := FND_API.G_RET_STS_ERROR;

331:
332: EXCEPTION
333: WHEN NO_DATA_FOUND THEN
334: x_resource_id := NULL;
335: x_return_status := FND_API.G_RET_STS_ERROR;
336: x_error_message_code := 'PA_RESOURCE_INVALID_AMBIGUOUS';
337: WHEN TOO_MANY_ROWS THEN
338: x_resource_id := NULL;
339: x_return_status := FND_API.G_RET_STS_ERROR;

Line 339: x_return_status := FND_API.G_RET_STS_ERROR;

335: x_return_status := FND_API.G_RET_STS_ERROR;
336: x_error_message_code := 'PA_RESOURCE_INVALID_AMBIGUOUS';
337: WHEN TOO_MANY_ROWS THEN
338: x_resource_id := NULL;
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');

Line 346: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

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;
348:
349: END Check_ResourceName_Or_Id;
350:

Line 400: x_return_status := FND_API.G_RET_STS_SUCCESS;

396: x_jtf_resource_id := null ;
397:
398: END IF;
399:
400: x_return_status := FND_API.G_RET_STS_SUCCESS;
401:
402: EXCEPTION
403: WHEN NO_DATA_FOUND THEN
404: x_jtf_resource_id := null ;

Line 405: x_return_status := FND_API.G_RET_STS_SUCCESS;

401:
402: EXCEPTION
403: WHEN NO_DATA_FOUND THEN
404: x_jtf_resource_id := null ;
405: x_return_status := FND_API.G_RET_STS_SUCCESS;
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

Line 406: --x_return_status := FND_API.G_RET_STS_ERROR;

402: EXCEPTION
403: WHEN NO_DATA_FOUND THEN
404: x_jtf_resource_id := null ;
405: x_return_status := FND_API.G_RET_STS_SUCCESS;
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');

Line 415: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

411: -- This sets the current program unit name in the
412: -- error stack. Helpful in Debugging
413:
414: X_JTF_RESOURCE_ID := NULL ; -- 4537865
415: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
416:
417: END Get_CRM_Res_id;
418:
419: PROCEDURE CHECK_CC_FOR_RESOURCE(

Line 450: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;

446: -- instances.
447:
448: IF PA_UTILS.pa_morg_implemented = 'N' THEN
449: X_CC_OK := 'Y';
450: X_RETURN_STATUS := FND_API.G_RET_STS_SUCCESS;
451: ELSE
452: /* Dependency against pa_projects_expend_v v115.14 */
453:
454: open get_org_id_from_resource;

Line 543: x_return_status := FND_API.G_RET_STS_ERROR;

539: WHEN NULL_INVALID_PARAMS THEN
540: /*
541: * When p_resource_id passed in is invalid.
542: */
543: x_return_status := FND_API.G_RET_STS_ERROR;
544: x_error_message_code := 'PA_RS_OU_DATE_NULL';
545: WHEN OTHERS THEN
546: X_CC_OK := NULL ; -- 4537865
547: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

Line 547: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

543: x_return_status := FND_API.G_RET_STS_ERROR;
544: x_error_message_code := 'PA_RS_OU_DATE_NULL';
545: WHEN OTHERS THEN
546: X_CC_OK := NULL ; -- 4537865
547: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
548: x_error_message_code := NULL;
549: RAISE ; -- 4537865
550: END CHECK_CC_FOR_RESOURCE;
551:

Line 591: x_return_status := FND_API.G_RET_STS_SUCCESS;

587: and l_date between res.resource_effective_start_date and res.resource_effective_end_date);
588:
589: BEGIN
590:
591: x_return_status := FND_API.G_RET_STS_SUCCESS;
592:
593: l_future_resource := is_future_resource( p_resource_id);
594:
595: IF l_future_resource = 'Y' THEN

Line 611: x_return_status := FND_API.G_RET_STS_SUCCESS;

607: x_valid := 'Y';
608: else
609: x_valid := 'N';
610: end if;
611: x_return_status := FND_API.G_RET_STS_SUCCESS;
612:
613: EXCEPTION
614: WHEN NO_DATA_FOUND THEN
615: x_return_status := FND_API.G_RET_STS_ERROR;

Line 615: x_return_status := FND_API.G_RET_STS_ERROR;

611: x_return_status := FND_API.G_RET_STS_SUCCESS;
612:
613: EXCEPTION
614: WHEN NO_DATA_FOUND THEN
615: x_return_status := FND_API.G_RET_STS_ERROR;
616: x_error_message_code := 'PA_RES_NOT_EXPORG';
617: WHEN OTHERS THEN
618: --PA_Error_Utils.Set_Error_Stack
619: -- (`pa_job_utils.check_resource_belongs_exporg');

Line 624: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

620: -- This sets the current program unit name in the
621: -- error stack. Helpful in Debugging
622:
623: x_valid := NULL ; -- 4537865
624: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
625: x_error_message_code := NULL;
626:
627: END CHECK_RES_BELONGS_EXPORG;
628:

Line 909: IF l_return_status <> fnd_api.g_ret_sts_success

905: ,x_msg_count => l_msg_count
906: ,x_msg_data => l_msg_data
907: );
908:
909: IF l_return_status <> fnd_api.g_ret_sts_success
910: THEN
911: x_return_status := l_return_status;
912: return;
913: END IF;

Line 945: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

941: COMMIT;
942: --4537865
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));

Line 996: p_commit => FND_API.G_TRUE

992: --Call API to delete INSTANCE record.
993:
994: pa_security_pvt.revoke_role
995: (
996: p_commit => FND_API.G_TRUE
997: ,p_debug_mode => NULL
998: ,p_project_role_id => NULL
999: ,p_menu_name => p_role_name
1000: ,p_object_name => 'ORGANIZATION'

Line 1034: p_commit => FND_API.G_TRUE

1030:
1031: -- Delete the INSTANCE_SET record.
1032: l_set_id := pa_security_pvt.get_instance_set_id(l_set_name);
1033: pa_security_pvt.revoke_role(
1034: p_commit => FND_API.G_TRUE
1035: ,p_debug_mode => NULL
1036: ,p_project_role_id => NULL
1037: ,p_menu_name => p_role_name
1038: ,p_object_name => l_object_name

Line 1058: x_return_status := Fnd_Api.G_RET_STS_UNEXP_ERROR;

1054: COMMIT;
1055: --4537865
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));

Line 1291: x_return_status := FND_API.G_RET_STS_SUCCESS;

1287: AND trunc(NVL(fg.end_date, SYSDATE+1));
1288:
1289: BEGIN
1290:
1291: x_return_status := FND_API.G_RET_STS_SUCCESS;
1292:
1293: -- Validate the PersonId
1294:
1295: BEGIN

Line 1370: -- x_return_status := FND_API.G_RET_STS_ERROR;

1366: --dbms_output.put_line(P_primarycontactid||P_primarycontactName);
1367:
1368: EXCEPTION
1369: WHEN NO_DATA_FOUND THEN
1370: -- x_return_status := FND_API.G_RET_STS_ERROR;
1371: -- x_error_message_code := 'PA_RESOURCE_NO_PRIMARY_CONTACT';
1372: -- NULL; Commented NULL for 4537865
1373:
1374: P_PrimaryContactId := NULL ; -- 4537865

Line 1402: -- x_return_status := FND_API.G_RET_STS_ERROR;

1398: -- Bug 4684198 - remove nvl on effective_end_date - col is not null
1399:
1400: EXCEPTION
1401: WHEN NO_DATA_FOUND THEN
1402: -- x_return_status := FND_API.G_RET_STS_ERROR;
1403: -- x_error_message_code := 'PA_RESOURCE_NO_ANALYST';
1404: NULL;
1405: WHEN OTHERS THEN
1406: NULL;

Line 1417: x_return_status := FND_API.G_RET_STS_ERROR;

1413: -- if no rows found for the roleid,orgid,objid for a
1414: -- person then raie exception to avoid no data found in
1415: -- out paraemter plsql tables - P_ResourceIdTab.
1416: IF P_ResourceIdTab(1) IS NULL and P_PrimaryContactId is NULL then
1417: x_return_status := FND_API.G_RET_STS_ERROR;
1418: x_error_message_code := 'PA_RESOURCE_NO_APPROVAL';
1419: END IF;
1420: EXCEPTION
1421:

Line 1426: x_return_status := FND_API.G_RET_STS_ERROR;

1422:
1423: WHEN PersonException then
1424: P_PrimaryContactId := NULL ; --4537865
1425: P_PrimaryContactName := NULL ; --4537865
1426: x_return_status := FND_API.G_RET_STS_ERROR;
1427: x_error_message_code := 'PA_RESOURCE_INVALID_PERSON';
1428:
1429: WHEN NO_DATA_FOUND THEN
1430:

Line 1434: x_return_status := FND_API.G_RET_STS_ERROR;

1430:
1431: P_PrimaryContactId := NULL ; --4537865
1432: P_PrimaryContactName := NULL ; --4537865
1433:
1434: x_return_status := FND_API.G_RET_STS_ERROR;
1435: x_error_message_code := 'PA_RESOURCE_INVALID_PERSON';
1436:
1437:
1438: WHEN OTHERS THEN -- will also handle missing role

Line 1441: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

1437:
1438: WHEN OTHERS THEN -- will also handle missing role
1439: P_PrimaryContactId := NULL ; --4537865
1440: P_PrimaryContactName := NULL ; --4537865
1441: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
1442: --dbms_output.put_line('missing role exception');
1443: raise;
1444:
1445: end get_resource_analyst ;

Line 1473: x_return_status := FND_API.G_RET_STS_SUCCESS;

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:
1476: SELECT distinct pep.person_id -- changes for 11.5.10 security
1477: -- to_number(substr(fg.grantee_key,instr(fg.grantee_key,':')+1))

Line 1505: -- x_return_status := FND_API.G_RET_STS_ERROR;

1501: EXCEPTION
1502: WHEN NO_DATA_FOUND THEN
1503: -- as discussed with Mr.Ramesh,this is not a business rule violation
1504: -- so commented
1505: -- x_return_status := FND_API.G_RET_STS_ERROR;
1506: -- x_error_message_code := 'PA_RESOURCE_NO_ANALYST';
1507:
1508: x_PrimaryContactId := NULL; -- 4537865
1509: x_PrimaryContactName := NULL ; -- 4537865

Line 1539: x_return_status := FND_API.G_RET_STS_SUCCESS;

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
1542: --Manager check is still as of sysdate
1543: SELECT assn.supervisor_id,pep.full_name

Line 1561: -- x_return_status := FND_API.G_RET_STS_ERROR;

1557: EXCEPTION
1558: WHEN NO_DATA_FOUND THEN
1559: -- as discussed with Mr.Ramesh,this is not a business rule violation
1560: -- so commented
1561: -- x_return_status := FND_API.G_RET_STS_ERROR;
1562: -- x_error_message_code := 'PA_RESOURCE_NO_MANAGER';
1563:
1564: x_ManagerId := NULL ; -- 4537865
1565: x_ManagerName := NULL ; -- 4537865

Line 1615: x_return_status := FND_API.G_RET_STS_SUCCESS;

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
1618: -- where assignment type is primary type.
1619: -- may raise exception if the person is not on current assnment

Line 1637: -- x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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
1640: x_orgid := NULL ;
1641:

Line 1664: x_return_status := FND_API.G_RET_STS_SUCCESS;

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
1667: -- may raise too many rows exception
1668: SELECT Person_id

Line 1714: x_return_status := FND_API.G_RET_STS_ERROR;

1710: EXCEPTION
1711: WHEN NO_DATA_FOUND THEN
1712: x_PersonId := NULL ; --4537865
1713: x_error_message_code := 'PA_RESOURCE_INVALID_RESOURCE';
1714: x_return_status := FND_API.G_RET_STS_ERROR;
1715:
1716: WHEN PersonException then
1717: x_PersonId := NULL ; -- 4537865
1718: x_error_message_code := 'PA_RESOURCE_INVALID_PERSON';

Line 1719: x_return_status := FND_API.G_RET_STS_ERROR;

1715:
1716: WHEN PersonException then
1717: x_PersonId := NULL ; -- 4537865
1718: x_error_message_code := 'PA_RESOURCE_INVALID_PERSON';
1719: x_return_status := FND_API.G_RET_STS_ERROR;
1720:
1721:
1722: WHEN OTHERS THEN
1723: -- set the exception message and stack

Line 1727: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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:
1730: END get_person_id;
1731:

Line 1743: x_return_status := FND_API.G_RET_STS_SUCCESS;

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:
1746: -- pick the Object id for the organization (seeded data)
1747: SELECT distinct object_id

Line 1808: x_return_status := FND_API.G_RET_STS_SUCCESS;

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:
1810: IF p_assignment_id IS NULL THEN
1811: l_start_date := sysdate;
1812: ELSE

Line 1832: IF v_return_status = FND_API.G_RET_STS_ERROR THEN

1828: ,v_personid
1829: ,v_error_message_code
1830: ,v_return_status);
1831: --check for return status if error found then add it to stack
1832: IF v_return_status = FND_API.G_RET_STS_ERROR THEN
1833: PA_UTILS.add_message(p_app_short_name => 'PA',
1834: p_msg_name => v_error_message_code);
1835: END IF;
1836:

Line 1843: IF v_return_status = FND_API.G_RET_STS_ERROR THEN

1839: ,l_start_date
1840: ,v_orgid
1841: ,v_error_message_code
1842: ,v_return_status);
1843: IF v_return_status = FND_API.G_RET_STS_ERROR THEN
1844: PA_UTILS.add_message(p_app_short_name => 'PA',
1845: p_msg_name => v_error_message_code);
1846: END IF;
1847:

Line 1856: IF v_return_status = FND_API.G_RET_STS_ERROR THEN

1852: ,v_error_message_code
1853: ,v_return_status);
1854:
1855:
1856: IF v_return_status = FND_API.G_RET_STS_ERROR THEN
1857: PA_UTILS.add_message(p_app_short_name => 'PA',
1858: p_msg_name => v_error_message_code);
1859: END IF;
1860:

Line 1874: IF v_return_status = FND_API.G_RET_STS_ERROR THEN

1870: ,x_PrimaryContactName
1871: ,v_return_status
1872: ,v_error_message_code );
1873:
1874: IF v_return_status = FND_API.G_RET_STS_ERROR THEN
1875: PA_UTILS.add_message(p_app_short_name => 'PA',
1876: p_msg_name => v_error_message_code);
1877: END IF;
1878:

Line 1887: IF v_return_status = FND_API.G_RET_STS_ERROR THEN

1883: ,x_ManagerId
1884: ,x_ManagerName
1885: ,v_error_message_code
1886: ,v_return_status);
1887: IF v_return_status = FND_API.G_RET_STS_ERROR THEN
1888: PA_UTILS.add_message(p_app_short_name => 'PA',
1889: p_msg_name => v_error_message_code);
1890: END IF;
1891:

Line 1897: x_return_status := FND_API.G_RET_STS_ERROR;

1893: -- then pass the error messages.
1894: IF (x_ManagerId is NULL and x_primarycontactid is NULL) then
1895: PA_UTILS.add_message(p_app_short_name => 'PA',
1896: p_msg_name => 'PA_RESOURCE_NO_APPROVAL');
1897: x_return_status := FND_API.G_RET_STS_ERROR;
1898:
1899: END IF;
1900:
1901: v_msg_count := FND_MSG_PUB.count_msg;

Line 1906: p_encoded => FND_API.G_TRUE

1902:
1903: -- if num of message is one then pass it to out parameter x_msg_data
1904: IF v_msg_count = 1 and (x_ManagerId is NULL and x_primarycontactid is NULL) then
1905: PA_INTERFACE_UTILS_PUB.get_messages(
1906: p_encoded => FND_API.G_TRUE
1907: ,p_msg_index => 1
1908: ,p_msg_count => v_msg_count
1909: ,p_data => v_msg_data
1910: ,p_msg_index_out => v_msg_index_out);

Line 1935: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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;
1938:
1939:

Line 2450: x_return_status := FND_API.G_RET_STS_SUCCESS;

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
2453:
2454: /* changed the select statement to be based on per_all_people_f and added

Line 2477: x_return_status := FND_API.G_RET_STS_ERROR;

2473:
2474: EXCEPTION
2475: WHEN NO_DATA_FOUND THEN
2476: x_person_name := null;
2477: x_return_status := FND_API.G_RET_STS_ERROR;
2478:
2479: WHEN OTHERS THEN
2480:
2481: -- RESET OUT PARAM 4537865

Line 2487: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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:
2490: END get_person_name;
2491:

Line 2515: x_return_status := FND_API.G_RET_STS_SUCCESS;

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
2518:
2519: SELECT address_line_1,

Line 2554: x_return_status := FND_API.G_RET_STS_ERROR;

2550: x_address_line_3 := null;
2551: x_town_or_city := null;
2552: x_postal_code := null;
2553: x_country := null;
2554: x_return_status := FND_API.G_RET_STS_ERROR;
2555:
2556: WHEN OTHERS THEN
2557: -- RESET OUT PARAMS 4537865
2558: x_address_line_1 := null;

Line 2568: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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:
2571: END get_location_details;
2572:

Line 2592: x_return_status := FND_API.G_RET_STS_SUCCESS;

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
2595: -- split into two separate selects - one for OU and one
2596: -- for Calendar

Line 2643: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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:
2646: END get_org_defaults;
2647:

Line 2671: x_return_status := FND_API.G_RET_STS_SUCCESS;

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';
2674: IF p_organization_id IS NOT NULL then
2675:

Line 2705: x_return_status := FND_API.G_RET_STS_ERROR;

2701:
2702: EXCEPTION
2703: WHEN NO_DATA_FOUND THEN
2704: x_valid := 'N';
2705: x_return_status := FND_API.G_RET_STS_ERROR;
2706:
2707: WHEN OTHERS THEN
2708:
2709: -- RESET OUT PARAMS : 4537865

Line 2716: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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:
2719: END check_exp_org;
2720:

Line 2743: x_return_status := FND_API.G_RET_STS_SUCCESS;

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';
2746: IF p_person_id IS NOT NULL then
2747:

Line 2770: x_return_status := FND_API.G_RET_STS_ERROR;

2766:
2767: EXCEPTION
2768: WHEN NO_DATA_FOUND THEN
2769: x_valid := 'N';
2770: x_return_status := FND_API.G_RET_STS_ERROR;
2771:
2772: WHEN OTHERS THEN
2773: --4537865 RESET OUT PARAMS
2774: x_valid := 'N';

Line 2779: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

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:
2782: END check_res_exists;
2783:

Line 3671: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

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:
3674: END validate_person;
3675:

Line 4202: x_return_status := FND_API.G_RET_STS_SUCCESS;

4198: --dbms_output.put_line('mgr id M - id not null ' || x_manager_id);
4199: END IF;
4200: END IF;
4201:
4202: x_return_status := FND_API.G_RET_STS_SUCCESS;
4203: x_msg_count := FND_MSG_PUB.Count_Msg;
4204:
4205: EXCEPTION
4206: WHEN NO_DATA_FOUND THEN

Line 4208: x_return_status := FND_API.G_RET_STS_ERROR;

4204:
4205: EXCEPTION
4206: WHEN NO_DATA_FOUND THEN
4207: x_manager_id := NULL;
4208: x_return_status := FND_API.G_RET_STS_ERROR;
4209: x_error_message_code := 'PA_RES_INVALID_MGR_HIER';
4210: x_msg_count := FND_MSG_PUB.Count_Msg;
4211:
4212: WHEN TOO_MANY_ROWS THEN

Line 4214: x_return_status := FND_API.G_RET_STS_ERROR;

4210: x_msg_count := FND_MSG_PUB.Count_Msg;
4211:
4212: WHEN TOO_MANY_ROWS THEN
4213: x_manager_id := NULL;
4214: x_return_status := FND_API.G_RET_STS_ERROR;
4215: x_error_message_code := 'PA_MULTIPLE_RESOURCE';
4216: x_msg_count := FND_MSG_PUB.Count_Msg;
4217:
4218: WHEN OTHERS THEN

Line 4219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;

4215: x_error_message_code := 'PA_MULTIPLE_RESOURCE';
4216: x_msg_count := FND_MSG_PUB.Count_Msg;
4217:
4218: WHEN OTHERS THEN
4219: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR ;
4220: x_manager_id := NULL;
4221: x_msg_count := FND_MSG_PUB.Count_Msg;
4222:
4223: END Check_ManagerName_Or_Id;

Line 4320: v_return_status := FND_API.G_RET_STS_SUCCESS;

4316:
4317: BEGIN
4318:
4319: -- initialize the return status to success
4320: v_return_status := FND_API.G_RET_STS_SUCCESS;
4321:
4322: --Bug 4473484
4323: IF p_start_date IS NULL THEN
4324: l_start_date := sysdate;

Line 4349: IF v_return_status = FND_API.G_RET_STS_ERROR THEN

4345: ,v_personid
4346: ,v_error_message_code
4347: ,v_return_status);
4348: --check for return status if error found then add it to stack
4349: IF v_return_status = FND_API.G_RET_STS_ERROR THEN
4350: PA_UTILS.add_message(p_app_short_name => 'PA',
4351: p_msg_name => v_error_message_code);
4352: END IF;
4353:

Line 4368: IF v_return_status = FND_API.G_RET_STS_ERROR THEN

4364: ,x_ManagerId
4365: ,x_ManagerName
4366: ,v_error_message_code
4367: ,v_return_status);
4368: IF v_return_status = FND_API.G_RET_STS_ERROR THEN
4369: PA_UTILS.add_message(p_app_short_name => 'PA',
4370: p_msg_name => v_error_message_code);
4371: END IF;
4372: IF x_ManagerId IS NULL THEN

Line 4589: x_return_status := FND_API.G_RET_STS_SUCCESS;

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) ;
4592:
4593: IF (l_term_type = 'I') THEN

Line 4693: x_return_status := FND_API.G_RET_STS_ERROR;

4689:
4690:
4691: EXCEPTION
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');

Line 4700: (p_encoded => FND_API.G_TRUE,

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,
4701: p_msg_index => 1,
4702: p_msg_count => x_msg_count,
4703: p_msg_data => x_msg_data,
4704: p_data => x_msg_data,

Line 4734: x_return_status := FND_API.G_RET_STS_SUCCESS;

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);
4737:
4738: IF NVL(l_resource_id,-999) <> -999 THEN

Line 4749: x_return_status := FND_API.G_RET_STS_ERROR;

4745: WHERE
4746: resource_id = l_resource_id;
4747:
4748: ELSIF NVL(l_resource_id,-999) = -999 THEN
4749: x_return_status := FND_API.G_RET_STS_ERROR;
4750:
4751: END IF ; --IF l_resource_id <> -999
4752:
4753: -- reset the error stack

Line 4758: x_return_status := FND_API.G_RET_STS_ERROR;

4754: PA_DEBUG.reset_err_stack;
4755:
4756: EXCEPTION
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');

Line 4765: (p_encoded => FND_API.G_TRUE,

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,
4766: p_msg_index => 1,
4767: p_msg_count => x_msg_count,
4768: p_msg_data => x_msg_data,
4769: p_data => x_msg_data,

Line 4800: x_return_status := FND_API.G_RET_STS_SUCCESS;

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);
4803:
4804: IF NVL(l_resource_id,-999) <> -999 THEN

Line 4813: x_return_status := FND_API.G_RET_STS_ERROR;

4809: WHERE resource_id = l_resource_id;
4810:
4811: ELSIF NVL(l_resource_id,-999) = -999 THEN
4812:
4813: x_return_status := FND_API.G_RET_STS_ERROR;
4814: l_future_term_wf_flag := NULL ;
4815:
4816: END IF ;
4817:

Line 4826: x_return_status := FND_API.G_RET_STS_ERROR;

4822:
4823: EXCEPTION
4824: WHEN OTHERS THEN
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');

Line 4833: (p_encoded => FND_API.G_TRUE,

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,
4834: p_msg_index => 1,
4835: p_msg_count => x_msg_count,
4836: p_msg_data => x_msg_data,
4837: p_data => x_msg_data,

Line 4872: x_return_status := FND_API.G_RET_STS_SUCCESS;

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)
4875: INTO l_resource_person_type
4876: FROM pa_resources_denorm

Line 4924: x_return_status := FND_API.G_RET_STS_ERROR;

4920: PA_DEBUG.reset_err_stack;
4921:
4922: EXCEPTION
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');

Line 4931: (p_encoded => FND_API.G_TRUE,

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,
4932: p_msg_index => 1,
4933: p_msg_count => x_msg_count,
4934: p_msg_data => x_msg_data,
4935: p_data => x_msg_data,

Line 4966: x_return_status := FND_API.G_RET_STS_SUCCESS;

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:
4969: SELECT TRUNC (MAX (resource_effective_end_date))
4970: INTO l_max_res_denorm_end_date

Line 4992: x_return_status := FND_API.G_RET_STS_ERROR;

4988: PA_DEBUG.reset_err_stack;
4989:
4990: EXCEPTION
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');

Line 4999: (p_encoded => FND_API.G_TRUE,

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,
5000: p_msg_index => 1,
5001: p_msg_count => x_msg_count,
5002: p_msg_data => x_msg_data,
5003: p_data => x_msg_data,