DBA Data[Home] [Help]

APPS.PA_CREATE_RESOURCE dependencies on FND_API

Line 641: p_err_stack := FND_API.G_RET_STS_SUCCESS;

637:
638: -- First clear the message stack if called from html.
639: IF p_migration_code IS NOT NULL THEN
640: FND_MSG_PUB.initialize;
641: p_err_stack := FND_API.G_RET_STS_SUCCESS;
642: END IF;
643:
644: IF p_migration_code IS NULL THEN -- Added by RM
645: OPEN c_res_list_csr;

Line 659: p_err_stage := FND_API.G_RET_STS_ERROR;

655: ELSE
656: IF (chk_plan_rl_unique(p_resource_list_name,
657: p_resource_list_id) = FALSE) THEN
658: p_err_code := p_err_code + 1;
659: p_err_stage := FND_API.G_RET_STS_ERROR;
660: p_err_stack := 'PA_RL_FOUND' ;
661: pa_utils.add_message(P_App_Short_Name => 'PA',
662: P_Msg_Name => 'PA_RL_FOUND');
663: RETURN;

Line 672: p_err_stage := FND_API.G_RET_STS_ERROR;

668: -- Validate Dates
669: -- Start Date is required -- ERROR MESSAGE NEEDS TO BE DONE
670: IF (p_start_date is NULL AND p_migration_code = 'N') THEN
671: p_err_code := p_err_code + 1;
672: p_err_stage := FND_API.G_RET_STS_ERROR;
673: p_err_stack := 'PA_IRS_START_NOT_NULL' ;
674: pa_utils.add_message(p_app_short_name => 'PA'
675: ,p_msg_name => 'PA_IRS_START_NOT_NULL');
676: RETURN;

Line 682: p_err_stage := FND_API.G_RET_STS_ERROR;

678:
679: IF (p_start_date IS NOT NULL and p_end_date IS NOT NULL
680: and p_start_date >= p_end_date) THEN
681: p_err_code := p_err_code + 1;
682: p_err_stage := FND_API.G_RET_STS_ERROR;
683: p_err_stack := 'PA_PR_INVALID_OR_DATES' ;
684: pa_utils.add_message(p_app_short_name => 'PA'
685: ,p_msg_name => 'PA_PR_INVALID_OR_DATES');
686: RETURN;

Line 748: IF p_err_stage = FND_API.G_RET_STS_ERROR THEN

744: p_check_id_flag => PA_STARTUP.G_Check_ID_Flag,
745: x_job_group_id => l_job_group_id,
746: x_return_status => p_err_stage,
747: x_error_message_code => p_err_stack);
748: IF p_err_stage = FND_API.G_RET_STS_ERROR THEN
749: p_err_code := p_err_code + 1;
750: PA_UTILS.Add_Message(p_app_short_name => 'PA'
751: ,p_msg_name => p_err_stack );
752: RETURN;

Line 922: IF p_err_stage <> FND_API.G_RET_STS_SUCCESS THEN

918: X_Return_Status => p_err_stage,
919: X_Msg_Count => p_err_code,
920: X_Msg_Data => p_err_stack);
921:
922: IF p_err_stage <> FND_API.G_RET_STS_SUCCESS THEN
923: RETURN;
924: END IF;
925: open csr_get_class_def(l_res_class_id);
926: fetch csr_get_class_def into l_spread_curve_id,

Line 1131: x_return_status := FND_API.G_RET_STS_SUCCESS;

1127: -- First clear the message stack.
1128: FND_MSG_PUB.initialize;
1129:
1130: x_msg_count := 0;
1131: x_return_status := FND_API.G_RET_STS_SUCCESS;
1132:
1133: -- Check Name uniqueness
1134:
1135: IF (chk_plan_rl_unique(p_resource_list_name,

Line 1139: x_return_status := FND_API.G_RET_STS_ERROR;

1135: IF (chk_plan_rl_unique(p_resource_list_name,
1136: p_resource_list_id) = FALSE) THEN
1137:
1138: x_msg_count := x_msg_count + 1;
1139: x_return_status := FND_API.G_RET_STS_ERROR;
1140: x_msg_data := 'PA_RL_FOUND' ;
1141: pa_utils.add_message(P_App_Short_Name => 'PA',
1142: P_Msg_Name => 'PA_RL_FOUND');
1143: RETURN;

Line 1150: x_return_status := FND_API.G_RET_STS_ERROR;

1146: -- Validate Dates
1147: -- Start Date is required -- ERROR MESSAGE NEEDS TO BE DONE
1148: IF p_start_date is NULL THEN
1149: x_msg_count := x_msg_count + 1;
1150: x_return_status := FND_API.G_RET_STS_ERROR;
1151: x_msg_data := 'PA_IRS_START_NOT_NULL' ;
1152: pa_utils.add_message(p_app_short_name => 'PA'
1153: ,p_msg_name => 'PA_IRS_START_NOT_NULL');
1154: RETURN;

Line 1160: x_return_status := FND_API.G_RET_STS_ERROR;

1156:
1157: IF (p_start_date IS NOT NULL and p_end_date IS NOT NULL
1158: and p_start_date >= p_end_date) THEN
1159: x_msg_count := x_msg_count + 1;
1160: x_return_status := FND_API.G_RET_STS_ERROR;
1161: x_msg_data := 'PA_PR_INVALID_OR_DATES' ;
1162: pa_utils.add_message(p_app_short_name => 'PA'
1163: ,p_msg_name => 'PA_PR_INVALID_OR_DATES');
1164: RETURN;

Line 1183: x_return_status := FND_API.G_RET_STS_ERROR;

1179: open chk_wp_change_allowed;
1180: fetch chk_wp_change_allowed into l_wp_type_count;
1181: IF chk_wp_change_allowed%FOUND THEN
1182: x_msg_count := x_msg_count + 1;
1183: x_return_status := FND_API.G_RET_STS_ERROR;
1184: x_msg_data := 'PA_WP_ENABLE_ERR';
1185: pa_utils.add_message(p_app_short_name => 'PA'
1186: ,p_msg_name => 'PA_WP_ENABLE_ERR');
1187: close chk_wp_change_allowed;

Line 1198: x_return_status := FND_API.G_RET_STS_ERROR;

1194: open chk_wp_disable;
1195: fetch chk_wp_disable into l_wp_disable;
1196: IF chk_wp_disable%FOUND THEN
1197: x_msg_count := x_msg_count + 1;
1198: x_return_status := FND_API.G_RET_STS_ERROR;
1199: x_msg_data := 'PA_WP_DISABLE_ERR';
1200: pa_utils.add_message(p_app_short_name => 'PA'
1201: ,p_msg_name => 'PA_WP_DISABLE_ERR');
1202: close chk_wp_disable;

Line 1218: x_return_status := FND_API.G_RET_STS_ERROR;

1214: open chk_ctrl_changed;
1215: fetch chk_ctrl_changed into l_ctrl_allowed;
1216: IF chk_ctrl_changed%FOUND THEN
1217: x_msg_count := x_msg_count + 1;
1218: x_return_status := FND_API.G_RET_STS_ERROR;
1219: x_msg_data := 'PA_CTRL_FLG_ERR';
1220: pa_utils.add_message(p_app_short_name => 'PA'
1221: ,p_msg_name => 'PA_CTRL_FLG_ERR');
1222: close chk_ctrl_changed;

Line 1234: x_return_status := FND_API.G_RET_STS_ERROR;

1230: If chk_migrated_list%NotFound Then
1231: Null;
1232: Else
1233: x_msg_count := x_msg_count + 1;
1234: x_return_status := FND_API.G_RET_STS_ERROR;
1235: x_msg_data := 'PA_CTRL_FLG_MIG_ERR';
1236: pa_utils.add_message(p_app_short_name => 'PA'
1237: ,p_msg_name => 'PA_CTRL_FLG_MIG_ERR');
1238: close chk_migrated_list;

Line 1261: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

1257: x_return_status => x_return_status,
1258: x_error_message_code => x_msg_data);
1259:
1260: --added fopr bug : 4537865
1261: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
1262: p_job_group_id := l_new_job_group_id;
1263: END IF;
1264: --added fopr bug : 4537865
1265:

Line 1266: IF x_return_status = FND_API.G_RET_STS_ERROR THEN

1262: p_job_group_id := l_new_job_group_id;
1263: END IF;
1264: --added fopr bug : 4537865
1265:
1266: IF x_return_status = FND_API.G_RET_STS_ERROR THEN
1267: x_msg_count := x_msg_count + 1;
1268: PA_UTILS.Add_Message(p_app_short_name => 'PA'
1269: ,p_msg_name => x_msg_data);
1270: RETURN;

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

1280: -- hr_utility.trace('l_job_group_id is : ' || l_job_group_id);
1281: -- hr_utility.trace('p_job_group_id is : ' || p_job_group_id);
1282: IF (l_job_group_id IS NOT NULL) AND
1283: ((l_job_group_id <> p_job_group_id) OR (p_job_group_id IS NULL) OR
1284: (p_job_group_id = FND_API.G_MISS_NUM)) THEN
1285: open chk_job_group_allow;
1286: fetch chk_job_group_allow into l_job_allowed;
1287: -- hr_utility.trace('l_job_allowed is : ' || l_job_allowed);
1288: IF chk_job_group_allow%FOUND THEN

Line 1290: x_return_status := FND_API.G_RET_STS_ERROR;

1286: fetch chk_job_group_allow into l_job_allowed;
1287: -- hr_utility.trace('l_job_allowed is : ' || l_job_allowed);
1288: IF chk_job_group_allow%FOUND THEN
1289: x_msg_count := x_msg_count + 1;
1290: x_return_status := FND_API.G_RET_STS_ERROR;
1291: x_msg_data := 'PA_JOB_GROUP_ERR';
1292: pa_utils.add_message(p_app_short_name => 'PA'
1293: ,p_msg_name => 'PA_JOB_GROUP_ERR');
1294: close chk_job_group_allow;

Line 1320: x_return_status := FND_API.G_RET_STS_ERROR;

1316: IF (SQL%NOTFOUND) THEN
1317: PA_UTILS.Add_message(p_app_short_name => 'PA'
1318: ,p_msg_name => 'PA_XC_RECORD_CHANGED');
1319: x_msg_count := x_msg_count + 1;
1320: x_return_status := FND_API.G_RET_STS_ERROR;
1321: x_msg_data := 'PA_XC_RECORD_CHANGED';
1322: RETURN;
1323: END IF;
1324:

Line 3559: x_return_status := FND_API.G_RET_STS_SUCCESS;

3555:
3556: BEGIN
3557:
3558: x_msg_count := 0;
3559: x_return_status := FND_API.G_RET_STS_SUCCESS;
3560:
3561: -- Check for Planning Resource List used anywhere
3562:
3563: l_err_code := 0;

Line 3572: x_return_status := FND_API.G_RET_STS_ERROR;

3568: l_err_code,
3569: x_msg_data);
3570: IF l_err_code <> 0 THEN
3571: x_msg_count := x_msg_count + 1;
3572: x_return_status := FND_API.G_RET_STS_ERROR;
3573: pa_utils.add_message('PA', x_msg_data);
3574: RETURN;
3575: --FND_MESSAGE.SET_NAME('PA', x_msg_data);
3576: --FND_MSG_PUB.ADD;

Line 3597: x_return_status := FND_API.G_RET_STS_ERROR;

3593:
3594: IF l_err_code <> 0 THEN
3595: IF FND_MSG_PUB.Check_Msg_level(FND_MSG_PUB.G_MSG_LVL_ERROR) THEN
3596: x_msg_count := x_msg_count + 1;
3597: x_return_status := FND_API.G_RET_STS_ERROR;
3598: FND_MESSAGE.SET_NAME('PA',x_msg_data);
3599: FND_MSG_PUB.ADD;
3600: END IF;
3601: RAISE FND_API.G_EXC_ERROR;

Line 3601: RAISE FND_API.G_EXC_ERROR;

3597: x_return_status := FND_API.G_RET_STS_ERROR;
3598: FND_MESSAGE.SET_NAME('PA',x_msg_data);
3599: FND_MSG_PUB.ADD;
3600: END IF;
3601: RAISE FND_API.G_EXC_ERROR;
3602: END IF;
3603: END LOOP;
3604: */
3605:

Line 3745: x_return_status := FND_API.G_RET_STS_SUCCESS;

3741: l_exist_record Varchar2(30);
3742: l_central_control Varchar2(30);
3743: l_error_msg_data Varchar2(30);
3744: BEGIN
3745: x_return_status := FND_API.G_RET_STS_SUCCESS;
3746: x_msg_count := 0;
3747: x_error_msg_data := NULL;
3748: /*********************************************
3749: * The below select would check if the resource

Line 3759: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

3755: * If the Project ID is passed in as NULL then Raise an
3756: * Unexpected error and Return.
3757: ***************************************************/
3758: IF p_project_id IS NULL THEN
3759: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
3760: x_msg_count := x_msg_count + 1;
3761: x_error_msg_data := Null;
3762: Fnd_Msg_Pub.Add_Exc_Msg(
3763: P_Pkg_Name => 'PA_CREATE_RESOURCE',

Line 3777: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

3773: FROM pa_resource_lists_all_bg
3774: where resource_list_id = p_resource_list_id;
3775: EXCEPTION
3776: WHEN OTHERS THEN
3777: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
3778: x_msg_count := x_msg_count + 1;
3779: x_error_msg_data := Null;
3780: Fnd_Msg_Pub.Add_Exc_Msg(
3781: P_Pkg_Name => 'PA_CREATE_RESOURCE',

Line 3788: x_return_status := FND_API.G_RET_STS_SUCCESS;

3784: Return;
3785: END;
3786:
3787: IF l_central_control = 'Y' THEN
3788: x_return_status := FND_API.G_RET_STS_SUCCESS;
3789: RETURN;
3790: END IF;
3791:
3792: /******************************************************

Line 3815: x_return_status := FND_API.G_RET_STS_SUCCESS;

3811: l_exist_record := 'Y';
3812: END;
3813:
3814: IF l_exist_record = 'Y' THEN
3815: x_return_status := FND_API.G_RET_STS_SUCCESS;
3816: RETURN;
3817: END IF;
3818: /******************************************************
3819: * Copying into the Pa_Resource_list_members table based

Line 3998: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

3994: and a.enabled_flag <> 'N';
3995:
3996: EXCEPTION
3997: WHEN OTHERS THEN
3998: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
3999: x_msg_count := x_msg_count + 1;
4000: x_error_msg_data := Null;
4001: Fnd_Msg_Pub.Add_Exc_Msg(
4002: P_Pkg_Name => 'PA_CREATE_RESOURCE',

Line 4046: P_Commit IN Varchar2 Default Fnd_Api.G_False,

4042: -- p_use_for_wp_flag VARCHAR2 No The value will contain the use for workplan flag
4043:
4044:
4045: PROCEDURE COPY_RESOURCE_LIST(
4046: P_Commit IN Varchar2 Default Fnd_Api.G_False,
4047: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
4048: P_API_Version_Number IN Number,
4049: p_parent_resource_list_id IN PA_RESOURCE_LISTS_ALL_BG.resource_list_id%TYPE,
4050: p_name IN PA_RESOURCE_LISTS_ALL_BG.name%TYPE,

Line 4047: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,

4043:
4044:
4045: PROCEDURE COPY_RESOURCE_LIST(
4046: P_Commit IN Varchar2 Default Fnd_Api.G_False,
4047: P_Init_Msg_List IN Varchar2 Default Fnd_Api.G_True,
4048: P_API_Version_Number IN Number,
4049: p_parent_resource_list_id IN PA_RESOURCE_LISTS_ALL_BG.resource_list_id%TYPE,
4050: p_name IN PA_RESOURCE_LISTS_ALL_BG.name%TYPE,
4051: p_description IN PA_RESOURCE_LISTS_ALL_BG.description%TYPE,

Line 4091: If Not Fnd_Api.Compatible_API_Call (

4087:
4088: -- hr_utility.trace_on(NULL, 'RMCOPY');
4089: -- hr_utility.trace('start');
4090: --Check for API compatibility
4091: If Not Fnd_Api.Compatible_API_Call (
4092: l_Api_Version,
4093: P_Api_Version_Number,
4094: l_Api_Name,
4095: 'PA_CREATE_RESOURCE') Then

Line 4097: Raise Fnd_Api.G_Exc_Unexpected_Error;

4093: P_Api_Version_Number,
4094: l_Api_Name,
4095: 'PA_CREATE_RESOURCE') Then
4096:
4097: Raise Fnd_Api.G_Exc_Unexpected_Error;
4098:
4099: End If;
4100:
4101:

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

4099: End If;
4100:
4101:
4102: --Initialize the message stack if not initialized
4103: If Fnd_Api.To_Boolean(nvl(P_Init_Msg_List,Fnd_Api.G_True)) Then
4104:
4105: Fnd_Msg_Pub.Initialize;
4106:
4107: End If;

Line 4112: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

4108:
4109: --Initialize error handling variables
4110: X_Msg_Count := 0;
4111: X_Msg_Data := Null;
4112: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
4113:
4114: -- hr_utility.trace('Initialize');
4115:
4116: --Check for the uniquness of resource list names

Line 4119: x_return_status := FND_API.G_RET_STS_ERROR;

4115:
4116: --Check for the uniquness of resource list names
4117: IF(chk_plan_rl_unique(p_name,
4118: l_resource_list_id) = FALSE) THEN
4119: x_return_status := FND_API.G_RET_STS_ERROR;
4120: pa_utils.add_message(P_App_Short_Name => 'PA',
4121: P_Msg_Name => 'PA_RL_FOUND');
4122: l_msg_count := FND_MSG_PUB.count_msg;
4123: IF l_msg_count = 1 THEN

Line 4125: (p_encoded => FND_API.G_TRUE,

4121: P_Msg_Name => 'PA_RL_FOUND');
4122: l_msg_count := FND_MSG_PUB.count_msg;
4123: IF l_msg_count = 1 THEN
4124: PA_INTERFACE_UTILS_PUB.get_messages
4125: (p_encoded => FND_API.G_TRUE,
4126: p_msg_index => 1,
4127: p_msg_count => l_msg_count,
4128: p_msg_data => l_msg_data,
4129: p_data => l_data,

Line 4149: x_return_status := FND_API.G_RET_STS_ERROR;

4145: -- Validate Dates
4146: -- Start Date is required
4147: -- hr_utility.trace('Validate Dates');
4148: IF (p_start_date_active is NULL) THEN
4149: x_return_status := FND_API.G_RET_STS_ERROR;
4150: pa_utils.add_message(p_app_short_name => 'PA'
4151: ,p_msg_name => 'PA_IRS_START_NOT_NULL');
4152:
4153: l_msg_count := FND_MSG_PUB.count_msg;

Line 4156: (p_encoded => FND_API.G_TRUE,

4152:
4153: l_msg_count := FND_MSG_PUB.count_msg;
4154: IF l_msg_count = 1 THEN
4155: PA_INTERFACE_UTILS_PUB.get_messages
4156: (p_encoded => FND_API.G_TRUE,
4157: p_msg_index => 1,
4158: p_msg_count => l_msg_count,
4159: p_msg_data => l_msg_data,
4160: p_data => l_data,

Line 4178: x_return_status := FND_API.G_RET_STS_ERROR;

4174: --Validation:Start date cannot be greater than end date
4175: IF (p_start_date_active IS NOT NULL and p_end_date_active IS NOT NULL
4176: and p_start_date_active >= p_end_date_active) THEN
4177:
4178: x_return_status := FND_API.G_RET_STS_ERROR;
4179:
4180: pa_utils.add_message(p_app_short_name => 'PA'
4181: ,p_msg_name => 'PA_PR_INVALID_OR_DATES');
4182:

Line 4186: (p_encoded => FND_API.G_TRUE,

4182:
4183: l_msg_count := FND_MSG_PUB.count_msg;
4184: IF l_msg_count = 1 THEN
4185: PA_INTERFACE_UTILS_PUB.get_messages
4186: (p_encoded => FND_API.G_TRUE,
4187: p_msg_index => 1,
4188: p_msg_count => l_msg_count,
4189: p_msg_data => l_msg_data,
4190: p_data => l_data,

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

4557: */
4558:
4559: -- hr_utility.trace('after copy members insert');
4560:
4561: IF Fnd_Api.To_Boolean(Nvl(P_Commit,Fnd_Api.G_False)) Then
4562:
4563: Commit;
4564:
4565: END IF;

Line 4612: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;

4608: l_resource_list_id pa_resource_list_members.resource_list_id%TYPE;
4609: l_control_flag Varchar2(1);
4610:
4611: BEGIN
4612: X_Return_Status := Fnd_Api.G_Ret_Sts_Success;
4613: /*************************************
4614: * Open Cursor and fetch values
4615: * ************************************/
4616: OPEN c_get_resource_list;

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

4628: * Desc - If no resource list found in the source project, then
4629: * just close the cursor and return. No UNEXP error needs
4630: * to be raised.
4631: ***********************************************************/
4632: -- X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
4633: Close c_get_resource_list;
4634: Return;
4635: END IF;
4636: EXIT WHEN c_get_resource_list%NOTFOUND;

Line 4649: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;

4645: FROM pa_resource_lists_all_bg
4646: WHERE resource_list_id = l_resource_list_id;
4647: EXCEPTION
4648: WHEN OTHERS THEN
4649: X_Return_Status := Fnd_Api.G_Ret_Sts_UnExp_Error;
4650: Close c_get_resource_list;
4651: Return;
4652: END;
4653: /******************************************