DBA Data[Home] [Help]

APPS.PA_CREATE_RESOURCE dependencies on FND_API

Line 653: p_err_stack := FND_API.G_RET_STS_SUCCESS;

649:
650: -- First clear the message stack if called from html.
651: IF p_migration_code IS NOT NULL THEN
652: FND_MSG_PUB.initialize;
653: p_err_stack := FND_API.G_RET_STS_SUCCESS;
654: END IF;
655:
656: IF p_migration_code IS NULL THEN -- Added by RM
657: OPEN c_res_list_csr;

Line 671: p_err_stage := FND_API.G_RET_STS_ERROR;

667: ELSE
668: IF (chk_plan_rl_unique(p_resource_list_name,
669: p_resource_list_id) = FALSE) THEN
670: p_err_code := p_err_code + 1;
671: p_err_stage := FND_API.G_RET_STS_ERROR;
672: p_err_stack := 'PA_RL_FOUND' ;
673: pa_utils.add_message(P_App_Short_Name => 'PA',
674: P_Msg_Name => 'PA_RL_FOUND');
675: RETURN;

Line 684: p_err_stage := FND_API.G_RET_STS_ERROR;

680: -- Validate Dates
681: -- Start Date is required -- ERROR MESSAGE NEEDS TO BE DONE
682: IF (p_start_date is NULL AND p_migration_code = 'N') THEN
683: p_err_code := p_err_code + 1;
684: p_err_stage := FND_API.G_RET_STS_ERROR;
685: p_err_stack := 'PA_IRS_START_NOT_NULL' ;
686: pa_utils.add_message(p_app_short_name => 'PA'
687: ,p_msg_name => 'PA_IRS_START_NOT_NULL');
688: RETURN;

Line 694: p_err_stage := FND_API.G_RET_STS_ERROR;

690:
691: IF (p_start_date IS NOT NULL and p_end_date IS NOT NULL
692: and p_start_date >= p_end_date) THEN
693: p_err_code := p_err_code + 1;
694: p_err_stage := FND_API.G_RET_STS_ERROR;
695: p_err_stack := 'PA_PR_INVALID_OR_DATES' ;
696: pa_utils.add_message(p_app_short_name => 'PA'
697: ,p_msg_name => 'PA_PR_INVALID_OR_DATES');
698: RETURN;

Line 760: IF p_err_stage = FND_API.G_RET_STS_ERROR THEN

756: p_check_id_flag => PA_STARTUP.G_Check_ID_Flag,
757: x_job_group_id => l_job_group_id,
758: x_return_status => p_err_stage,
759: x_error_message_code => p_err_stack);
760: IF p_err_stage = FND_API.G_RET_STS_ERROR THEN
761: p_err_code := p_err_code + 1;
762: PA_UTILS.Add_Message(p_app_short_name => 'PA'
763: ,p_msg_name => p_err_stack );
764: RETURN;

Line 940: IF p_err_stage <> FND_API.G_RET_STS_SUCCESS THEN

936: X_Return_Status => p_err_stage,
937: X_Msg_Count => p_err_code,
938: X_Msg_Data => p_err_stack);
939:
940: IF p_err_stage <> FND_API.G_RET_STS_SUCCESS THEN
941: RETURN;
942: END IF;
943: open csr_get_class_def(l_res_class_id);
944: fetch csr_get_class_def into l_spread_curve_id,

Line 1042: IF p_err_stage <> FND_API.G_RET_STS_SUCCESS THEN

1038: X_Return_Status => p_err_stage,
1039: X_Msg_Count => p_err_code,
1040: X_Msg_Data => p_err_stack);
1041:
1042: IF p_err_stage <> FND_API.G_RET_STS_SUCCESS THEN
1043: RETURN;
1044: END IF;
1045: open csr_get_class_def(l_res_class_id);
1046: fetch csr_get_class_def into l_spread_curve_id,

Line 1291: x_return_status := FND_API.G_RET_STS_SUCCESS;

1287: -- First clear the message stack.
1288: FND_MSG_PUB.initialize;
1289:
1290: x_msg_count := 0;
1291: x_return_status := FND_API.G_RET_STS_SUCCESS;
1292:
1293: -- Check Name uniqueness
1294:
1295: IF (chk_plan_rl_unique(p_resource_list_name,

Line 1299: x_return_status := FND_API.G_RET_STS_ERROR;

1295: IF (chk_plan_rl_unique(p_resource_list_name,
1296: p_resource_list_id) = FALSE) THEN
1297:
1298: x_msg_count := x_msg_count + 1;
1299: x_return_status := FND_API.G_RET_STS_ERROR;
1300: x_msg_data := 'PA_RL_FOUND' ;
1301: pa_utils.add_message(P_App_Short_Name => 'PA',
1302: P_Msg_Name => 'PA_RL_FOUND');
1303: RETURN;

Line 1310: x_return_status := FND_API.G_RET_STS_ERROR;

1306: -- Validate Dates
1307: -- Start Date is required -- ERROR MESSAGE NEEDS TO BE DONE
1308: IF p_start_date is NULL THEN
1309: x_msg_count := x_msg_count + 1;
1310: x_return_status := FND_API.G_RET_STS_ERROR;
1311: x_msg_data := 'PA_IRS_START_NOT_NULL' ;
1312: pa_utils.add_message(p_app_short_name => 'PA'
1313: ,p_msg_name => 'PA_IRS_START_NOT_NULL');
1314: RETURN;

Line 1320: x_return_status := FND_API.G_RET_STS_ERROR;

1316:
1317: IF (p_start_date IS NOT NULL and p_end_date IS NOT NULL
1318: and p_start_date >= p_end_date) THEN
1319: x_msg_count := x_msg_count + 1;
1320: x_return_status := FND_API.G_RET_STS_ERROR;
1321: x_msg_data := 'PA_PR_INVALID_OR_DATES' ;
1322: pa_utils.add_message(p_app_short_name => 'PA'
1323: ,p_msg_name => 'PA_PR_INVALID_OR_DATES');
1324: RETURN;

Line 1343: x_return_status := FND_API.G_RET_STS_ERROR;

1339: open chk_wp_change_allowed;
1340: fetch chk_wp_change_allowed into l_wp_type_count;
1341: IF chk_wp_change_allowed%FOUND THEN
1342: x_msg_count := x_msg_count + 1;
1343: x_return_status := FND_API.G_RET_STS_ERROR;
1344: x_msg_data := 'PA_WP_ENABLE_ERR';
1345: pa_utils.add_message(p_app_short_name => 'PA'
1346: ,p_msg_name => 'PA_WP_ENABLE_ERR');
1347: close chk_wp_change_allowed;

Line 1358: x_return_status := FND_API.G_RET_STS_ERROR;

1354: open chk_wp_disable;
1355: fetch chk_wp_disable into l_wp_disable;
1356: IF chk_wp_disable%FOUND THEN
1357: x_msg_count := x_msg_count + 1;
1358: x_return_status := FND_API.G_RET_STS_ERROR;
1359: x_msg_data := 'PA_WP_DISABLE_ERR';
1360: pa_utils.add_message(p_app_short_name => 'PA'
1361: ,p_msg_name => 'PA_WP_DISABLE_ERR');
1362: close chk_wp_disable;

Line 1378: x_return_status := FND_API.G_RET_STS_ERROR;

1374: open chk_ctrl_changed;
1375: fetch chk_ctrl_changed into l_ctrl_allowed;
1376: IF chk_ctrl_changed%FOUND THEN
1377: x_msg_count := x_msg_count + 1;
1378: x_return_status := FND_API.G_RET_STS_ERROR;
1379: x_msg_data := 'PA_CTRL_FLG_ERR';
1380: pa_utils.add_message(p_app_short_name => 'PA'
1381: ,p_msg_name => 'PA_CTRL_FLG_ERR');
1382: close chk_ctrl_changed;

Line 1394: x_return_status := FND_API.G_RET_STS_ERROR;

1390: If chk_migrated_list%NotFound Then
1391: Null;
1392: Else
1393: x_msg_count := x_msg_count + 1;
1394: x_return_status := FND_API.G_RET_STS_ERROR;
1395: x_msg_data := 'PA_CTRL_FLG_MIG_ERR';
1396: pa_utils.add_message(p_app_short_name => 'PA'
1397: ,p_msg_name => 'PA_CTRL_FLG_MIG_ERR');
1398: close chk_migrated_list;

Line 1421: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

1417: x_return_status => x_return_status,
1418: x_error_message_code => x_msg_data);
1419:
1420: --added fopr bug : 4537865
1421: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
1422: p_job_group_id := l_new_job_group_id;
1423: END IF;
1424: --added fopr bug : 4537865
1425:

Line 1426: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1422: p_job_group_id := l_new_job_group_id;
1423: END IF;
1424: --added fopr bug : 4537865
1425:
1426: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1427: x_msg_count := x_msg_count + 1;
1428: PA_UTILS.Add_Message(p_app_short_name => 'PA'
1429: ,p_msg_name => x_msg_data);
1430: RETURN;

Line 1444: (p_job_group_id = FND_API.G_MISS_NUM)) THEN

1440: -- hr_utility.trace('l_job_group_id is : ' || l_job_group_id);
1441: -- hr_utility.trace('p_job_group_id is : ' || p_job_group_id);
1442: IF (l_job_group_id IS NOT NULL) AND
1443: ((l_job_group_id <> p_job_group_id) OR (p_job_group_id IS NULL) OR
1444: (p_job_group_id = FND_API.G_MISS_NUM)) THEN
1445: open chk_job_group_allow;
1446: fetch chk_job_group_allow into l_job_allowed;
1447: -- hr_utility.trace('l_job_allowed is : ' || l_job_allowed);
1448: IF chk_job_group_allow%FOUND THEN

Line 1450: x_return_status := FND_API.G_RET_STS_ERROR;

1446: fetch chk_job_group_allow into l_job_allowed;
1447: -- hr_utility.trace('l_job_allowed is : ' || l_job_allowed);
1448: IF chk_job_group_allow%FOUND THEN
1449: x_msg_count := x_msg_count + 1;
1450: x_return_status := FND_API.G_RET_STS_ERROR;
1451: x_msg_data := 'PA_JOB_GROUP_ERR';
1452: pa_utils.add_message(p_app_short_name => 'PA'
1453: ,p_msg_name => 'PA_JOB_GROUP_ERR');
1454: close chk_job_group_allow;

Line 1482: x_return_status := FND_API.G_RET_STS_ERROR;

1478: IF (SQL%NOTFOUND) THEN
1479: PA_UTILS.Add_message(p_app_short_name => 'PA'
1480: ,p_msg_name => 'PA_XC_RECORD_CHANGED');
1481: x_msg_count := x_msg_count + 1;
1482: x_return_status := FND_API.G_RET_STS_ERROR;
1483: x_msg_data := 'PA_XC_RECORD_CHANGED';
1484: RETURN;
1485: END IF;
1486:

Line 1522: IF X_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

1518: X_Return_Status => X_Return_Status,
1519: X_Msg_Count => X_Msg_Count,
1520: X_Msg_Data => X_Msg_Data);
1521:
1522: IF X_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
1523: RETURN;
1524: END IF;
1525: open csr_get_class_def(l_res_class_id);
1526: fetch csr_get_class_def into l_spread_curve_id,

Line 1609: IF X_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN

1605: X_Return_Status => X_Return_Status,
1606: X_Msg_Count => X_Msg_Count,
1607: X_Msg_Data => X_Msg_Data);
1608:
1609: IF X_Return_Status <> FND_API.G_RET_STS_SUCCESS THEN
1610: RETURN;
1611: END IF;
1612: open csr_get_class_def(l_res_class_id);
1613: fetch csr_get_class_def into l_spread_curve_id,

Line 3908: x_return_status := FND_API.G_RET_STS_SUCCESS;

3904:
3905: BEGIN
3906:
3907: x_msg_count := 0;
3908: x_return_status := FND_API.G_RET_STS_SUCCESS;
3909:
3910: -- Check for Planning Resource List used anywhere
3911:
3912: l_err_code := 0;

Line 3921: x_return_status := FND_API.G_RET_STS_ERROR;

3917: l_err_code,
3918: x_msg_data);
3919: IF l_err_code <> 0 THEN
3920: x_msg_count := x_msg_count + 1;
3921: x_return_status := FND_API.G_RET_STS_ERROR;
3922: pa_utils.add_message('PA', x_msg_data);
3923: RETURN;
3924: --FND_MESSAGE.SET_NAME('PA', x_msg_data);
3925: --FND_MSG_PUB.ADD;

Line 3946: x_return_status := FND_API.G_RET_STS_ERROR;

3942:
3943: IF l_err_code <> 0 THEN
3944: IF FND_MSG_PUB.Check_Msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3945: x_msg_count := x_msg_count + 1;
3946: x_return_status := FND_API.G_RET_STS_ERROR;
3947: FND_MESSAGE.SET_NAME('PA',x_msg_data);
3948: FND_MSG_PUB.ADD;
3949: END IF;
3950: RAISE FND_API.G_EXC_ERROR;

Line 3950: RAISE FND_API.G_EXC_ERROR;

3946: x_return_status := FND_API.G_RET_STS_ERROR;
3947: FND_MESSAGE.SET_NAME('PA',x_msg_data);
3948: FND_MSG_PUB.ADD;
3949: END IF;
3950: RAISE FND_API.G_EXC_ERROR;
3951: END IF;
3952: END LOOP;
3953: */
3954:

Line 4094: x_return_status := FND_API.G_RET_STS_SUCCESS;

4090: l_exist_record Varchar2(30);
4091: l_central_control Varchar2(30);
4092: l_error_msg_data Varchar2(30);
4093: BEGIN
4094: x_return_status := FND_API.G_RET_STS_SUCCESS;
4095: x_msg_count := 0;
4096: x_error_msg_data := NULL;
4097: /*********************************************
4098: * The below select would check if the resource

Line 4108: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

4104: * If the Project ID is passed in as NULL then Raise an
4105: * Unexpected error and Return.
4106: ***************************************************/
4107: IF p_project_id IS NULL THEN
4108: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
4109: x_msg_count := x_msg_count + 1;
4110: x_error_msg_data := Null;
4111: Fnd_Msg_Pub.Add_Exc_Msg(
4112: P_Pkg_Name => 'PA_CREATE_RESOURCE',

Line 4126: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

4122: FROM pa_resource_lists_all_bg
4123: where resource_list_id = p_resource_list_id;
4124: EXCEPTION
4125: WHEN OTHERS THEN
4126: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
4127: x_msg_count := x_msg_count + 1;
4128: x_error_msg_data := Null;
4129: Fnd_Msg_Pub.Add_Exc_Msg(
4130: P_Pkg_Name => 'PA_CREATE_RESOURCE',

Line 4137: x_return_status := FND_API.G_RET_STS_SUCCESS;

4133: Return;
4134: END;
4135:
4136: IF l_central_control = 'Y' THEN
4137: x_return_status := FND_API.G_RET_STS_SUCCESS;
4138: RETURN;
4139: END IF;
4140:
4141: /******************************************************

Line 4164: x_return_status := FND_API.G_RET_STS_SUCCESS;

4160: l_exist_record := 'Y';
4161: END;
4162:
4163: IF l_exist_record = 'Y' THEN
4164: x_return_status := FND_API.G_RET_STS_SUCCESS;
4165: RETURN;
4166: END IF;
4167: /******************************************************
4168: * Copying into the Pa_Resource_list_members table based

Line 4349: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

4345: and a.enabled_flag <> 'N';
4346:
4347: EXCEPTION
4348: WHEN OTHERS THEN
4349: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
4350: x_msg_count := x_msg_count + 1;
4351: x_error_msg_data := Null;
4352: Fnd_Msg_Pub.Add_Exc_Msg(
4353: P_Pkg_Name => 'PA_CREATE_RESOURCE',

Line 4397: P_Commit IN Varchar2 Default Fnd_Api.G_False,

4393: -- p_use_for_wp_flag VARCHAR2 No The value will contain the use for workplan flag
4394:
4395:
4396: PROCEDURE COPY_RESOURCE_LIST(
4397: P_Commit IN Varchar2 Default Fnd_Api.G_False,
4398: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
4399: P_API_Version_Number IN Number,
4400: p_parent_resource_list_id IN PA_RESOURCE_LISTS_ALL_BG.resource_list_id%TYPE,
4401: p_name IN PA_RESOURCE_LISTS_ALL_BG.name%TYPE,

Line 4398: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,

4394:
4395:
4396: PROCEDURE COPY_RESOURCE_LIST(
4397: P_Commit IN Varchar2 Default Fnd_Api.G_False,
4398: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
4399: P_API_Version_Number IN Number,
4400: p_parent_resource_list_id IN PA_RESOURCE_LISTS_ALL_BG.resource_list_id%TYPE,
4401: p_name IN PA_RESOURCE_LISTS_ALL_BG.name%TYPE,
4402: p_description IN PA_RESOURCE_LISTS_ALL_BG.description%TYPE,

Line 4443: If Not Fnd_Api.Compatible_API_Call (

4439:
4440: -- hr_utility.trace_on(NULL, 'RMCOPY');
4441: -- hr_utility.trace('start');
4442: --Check for API compatibility
4443: If Not Fnd_Api.Compatible_API_Call (
4444: l_Api_Version,
4445: P_Api_Version_Number,
4446: l_Api_Name,
4447: 'PA_CREATE_RESOURCE') Then

Line 4449: Raise Fnd_Api.G_Exc_Unexpected_Error;

4445: P_Api_Version_Number,
4446: l_Api_Name,
4447: 'PA_CREATE_RESOURCE') Then
4448:
4449: Raise Fnd_Api.G_Exc_Unexpected_Error;
4450:
4451: End If;
4452:
4453:

Line 4455: If Fnd_Api.To_Boolean(nvl(P_Init_Msg_List,Fnd_Api.G_True)) Then

4451: End If;
4452:
4453:
4454: --Initialize the message stack if not initialized
4455: If Fnd_Api.To_Boolean(nvl(P_Init_Msg_List,Fnd_Api.G_True)) Then
4456:
4457: Fnd_Msg_Pub.Initialize;
4458:
4459: End If;

Line 4464: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

4460:
4461: --Initialize error handling variables
4462: X_Msg_Count := 0;
4463: X_Msg_Data := Null;
4464: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
4465:
4466: -- hr_utility.trace('Initialize');
4467:
4468: --Check for the uniquness of resource list names

Line 4471: x_return_status := FND_API.G_RET_STS_ERROR;

4467:
4468: --Check for the uniquness of resource list names
4469: IF(chk_plan_rl_unique(p_name,
4470: l_resource_list_id) = FALSE) THEN
4471: x_return_status := FND_API.G_RET_STS_ERROR;
4472: pa_utils.add_message(P_App_Short_Name => 'PA',
4473: P_Msg_Name => 'PA_RL_FOUND');
4474: l_msg_count := FND_MSG_PUB.count_msg;
4475: IF l_msg_count = 1 THEN

Line 4477: (p_encoded => FND_API.G_TRUE,

4473: P_Msg_Name => 'PA_RL_FOUND');
4474: l_msg_count := FND_MSG_PUB.count_msg;
4475: IF l_msg_count = 1 THEN
4476: PA_INTERFACE_UTILS_PUB.get_messages
4477: (p_encoded => FND_API.G_TRUE,
4478: p_msg_index => 1,
4479: p_msg_count => l_msg_count,
4480: p_msg_data => l_msg_data,
4481: p_data => l_data,

Line 4501: x_return_status := FND_API.G_RET_STS_ERROR;

4497: -- Validate Dates
4498: -- Start Date is required
4499: -- hr_utility.trace('Validate Dates');
4500: IF (p_start_date_active is NULL) THEN
4501: x_return_status := FND_API.G_RET_STS_ERROR;
4502: pa_utils.add_message(p_app_short_name => 'PA'
4503: ,p_msg_name => 'PA_IRS_START_NOT_NULL');
4504:
4505: l_msg_count := FND_MSG_PUB.count_msg;

Line 4508: (p_encoded => FND_API.G_TRUE,

4504:
4505: l_msg_count := FND_MSG_PUB.count_msg;
4506: IF l_msg_count = 1 THEN
4507: PA_INTERFACE_UTILS_PUB.get_messages
4508: (p_encoded => FND_API.G_TRUE,
4509: p_msg_index => 1,
4510: p_msg_count => l_msg_count,
4511: p_msg_data => l_msg_data,
4512: p_data => l_data,

Line 4530: x_return_status := FND_API.G_RET_STS_ERROR;

4526: --Validation:Start date cannot be greater than end date
4527: IF (p_start_date_active IS NOT NULL and p_end_date_active IS NOT NULL
4528: and p_start_date_active >= p_end_date_active) THEN
4529:
4530: x_return_status := FND_API.G_RET_STS_ERROR;
4531:
4532: pa_utils.add_message(p_app_short_name => 'PA'
4533: ,p_msg_name => 'PA_PR_INVALID_OR_DATES');
4534:

Line 4538: (p_encoded => FND_API.G_TRUE,

4534:
4535: l_msg_count := FND_MSG_PUB.count_msg;
4536: IF l_msg_count = 1 THEN
4537: PA_INTERFACE_UTILS_PUB.get_messages
4538: (p_encoded => FND_API.G_TRUE,
4539: p_msg_index => 1,
4540: p_msg_count => l_msg_count,
4541: p_msg_data => l_msg_data,
4542: p_data => l_data,

Line 4916: IF Fnd_Api.To_Boolean(Nvl(P_Commit,Fnd_Api.G_False)) Then

4912: */
4913:
4914: -- hr_utility.trace('after copy members insert');
4915:
4916: IF Fnd_Api.To_Boolean(Nvl(P_Commit,Fnd_Api.G_False)) Then
4917:
4918: Commit;
4919:
4920: END IF;

Line 4967: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

4963: l_resource_list_id pa_resource_list_members.resource_list_id%TYPE;
4964: l_control_flag Varchar2(1);
4965:
4966: BEGIN
4967: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
4968: /*************************************
4969: * Open Cursor and fetch values
4970: * ************************************/
4971: OPEN c_get_resource_list;

Line 4987: -- X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

4983: * Desc - If no resource list found in the source project, then
4984: * just close the cursor and return. No UNEXP error needs
4985: * to be raised.
4986: ***********************************************************/
4987: -- X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
4988: Close c_get_resource_list;
4989: Return;
4990: END IF;
4991: EXIT WHEN c_get_resource_list%NOTFOUND;

Line 5004: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

5000: FROM pa_resource_lists_all_bg
5001: WHERE resource_list_id = l_resource_list_id;
5002: EXCEPTION
5003: WHEN OTHERS THEN
5004: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
5005: Close c_get_resource_list;
5006: Return;
5007: END;
5008: /******************************************