DBA Data[Home] [Help]

APPS.PA_PLANNING_RESOURCE_PVT dependencies on FND_API

Line 223: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE, -- Added for bug#4350589

219: p_incur_by_res_code IN VARCHAR2 DEFAULT NULL,
220: p_incur_by_res_type IN VARCHAR2 DEFAULT NULL,
221: --Added this new parameter for project specific res.
222: p_project_id IN NUMBER DEFAULT NULL,
223: p_init_msg_list IN VARCHAR2 DEFAULT FND_API.G_FALSE, -- Added for bug#4350589
224: p_expenditure_type_2 IN VARCHAR2 DEFAULT NULL, -- Added for Bug13535688 & 13546557 for CBS project
225: x_resource_list_member_id OUT NOCOPY NUMBER ,
226: x_record_version_number OUT NOCOPY NUMBER ,
227: x_return_status OUT NOCOPY VARCHAR2,

Line 359: x_return_status := FND_API.G_RET_STS_SUCCESS;

355: * and return, else continue with the validation.
356: * This If condn is only exec if the resource alias is not null.
357: *****************************************************/
358: x_msg_count := 0;
359: x_return_status := FND_API.G_RET_STS_SUCCESS;
360:
361: -- Added for bug#4350589, this procedure is directly getting called from AddSingleResourceVORowImpl
362: -- passing p_init_msg_list value explicitly 'T' and message stack will be intialized
363: -- for other flows the default value is 'F' and message stack wont be intialized

Line 365: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN

361: -- Added for bug#4350589, this procedure is directly getting called from AddSingleResourceVORowImpl
362: -- passing p_init_msg_list value explicitly 'T' and message stack will be intialized
363: -- for other flows the default value is 'F' and message stack wont be intialized
364:
365: IF FND_API.TO_BOOLEAN(nvl(p_init_msg_list,FND_API.G_TRUE)) THEN
366: FND_MSG_PUB.initialize;
367: END IF;
368:
369: -- bug#4350589 end

Line 396: x_return_status := FND_API.G_RET_STS_ERROR;

392:
393: IF pa_planning_resource_pvt.Check_pl_alias_unique(p_resource_list_id,
394: p_resource_alias,l_res_list_member_id,l_object_type,l_object_id) = 'N'
395: THEN
396: x_return_status := FND_API.G_RET_STS_ERROR;
397: x_msg_count := x_msg_count + 1;
398: x_error_msg_data := 'PA_RES_ALIAS_NOT_UNIQUE';
399: PA_UTILS.Add_Message ('PA', x_error_msg_data,
400: 'PLAN_RES', g_token);

Line 418: x_return_status := FND_API.G_RET_STS_ERROR;

414: THEN
415: OPEN get_class_details;
416: FETCH get_class_details INTO l_res_class_code;
417: IF get_class_details%NOTFOUND THEN
418: x_return_status := FND_API.G_RET_STS_ERROR;
419: x_msg_count := x_msg_count + 1;
420: x_error_msg_data := 'PA_RES_NO_CLASS_PROVIDED';
421: PA_UTILS.Add_Message ('PA', x_error_msg_data,
422: 'PLAN_RES', g_token);

Line 442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

438: FROM pa_resource_classes_b
439: WHERE resource_class_code = l_res_class_code;
440: EXCEPTION
441: WHEN OTHERS THEN
442: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
443: x_msg_count := x_msg_count + 1;
444: Return;
445: END;
446: ELSE

Line 470: x_return_status := FND_API.G_RET_STS_ERROR;

466: AND resource_class_id = p_resource_class_id;
467:
468: EXCEPTION
469: WHEN OTHERS THEN
470: x_return_status := FND_API.G_RET_STS_ERROR;
471: x_msg_count := x_msg_count + 1;
472: x_error_msg_data := 'PA_RES_CLASS_INVALID';
473: PA_UTILS.Add_Message ('PA', x_error_msg_data,
474: 'PLAN_RES', g_token);

Line 494: x_return_status := FND_API.G_RET_STS_ERROR;

490: IF p_res_format_id IS NOT NULL THEN
491: OPEN get_fmt_details;
492: FETCH get_fmt_details into l_fmt_details;
493: IF get_fmt_details%NOTFOUND THEN
494: x_return_status := FND_API.G_RET_STS_ERROR;
495: x_error_msg_data := 'PA_PLN_RL_FORMAT_BAD_FMT_ID';
496: PA_UTILS.Add_Message ('PA', x_error_msg_data,
497: 'PLAN_RES', g_token);
498: x_record_version_number := null;

Line 519: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

515: IF l_fmt_details.res_type_enabled_flag = 'Y' THEN
516: OPEN get_res_type(l_fmt_details.res_type_id);
517: FETCH get_res_type INTO l_res_type;
518: IF get_res_type%NOTFOUND THEN
519: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
520: x_msg_count := x_msg_count + 1;
521: CLOSE get_res_type;
522: Return;
523: END IF;

Line 720: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

716: /********************************************************
717: * If the Validate package errors out then throw an error and
718: * Return.
719: ********************************************************/
720: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
721: RETURN;
722: END IF;
723:
724: /******************************************************

Line 766: x_return_status := FND_API.G_RET_STS_ERROR;

762: p_err_stage => l_err_stage,
763: p_err_stack => l_err_stack );
764:
765: IF l_err_code <> 0 THEN
766: x_return_status := FND_API.G_RET_STS_ERROR;
767: x_msg_count := x_msg_count + 1;
768: x_error_msg_data := l_err_stage;
769: pa_utils.add_message('PA', l_err_stage);
770: RETURN;

Line 789: x_return_status := FND_API.G_RET_STS_ERROR;

785: p_err_stage => l_err_stage,
786: p_err_stack => l_err_stack);
787:
788: IF l_err_code <> 0 THEN
789: x_return_status := FND_API.G_RET_STS_ERROR;
790: x_msg_count := x_msg_count + 1;
791: x_error_msg_data := l_err_stage;
792: pa_utils.add_message('PA', l_err_stage);
793: RETURN;

Line 830: x_return_status := FND_API.G_RET_STS_ERROR;

826: p_err_stage => l_err_stage,
827: p_err_stack => l_err_stack);
828:
829: IF l_err_code <> 0 THEN
830: x_return_status := FND_API.G_RET_STS_ERROR;
831: x_msg_count := x_msg_count + 1;
832: x_error_msg_data := l_err_stage;
833: pa_utils.add_message('PA', l_err_stage);
834: RETURN;

Line 910: x_return_status := FND_API.G_RET_STS_ERROR;

906: END IF;
907:
908: IF l_unique_res_list = 'Y' THEN
909: x_msg_count := x_msg_count + 1;
910: x_return_status := FND_API.G_RET_STS_ERROR;
911: x_error_msg_data := 'PA_NOT_UNIQUE_RES_LIST_MEMBER';
912: -- FND_MESSAGE.SET_TOKEN('PLAN_RES', g_token);
913: PA_UTILS.Add_Message ('PA', x_error_msg_data, 'PLAN_RES', g_token);
914: -- PA_UTILS.Add_Message ('PA', x_error_msg_data);

Line 1039: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1035: IF P_PA_DEBUG_MODE = 'Y' THEN
1036: pa_debug.write('Create_Planning_Resource: ' || g_module_name,'After calling pa_res_list_members_pkg.insert_row x_return_status '|| x_return_status ,1);
1037: pa_debug.write('Create_Planning_Resource: ' || g_module_name,'After calling pa_res_list_members_pkg.insert_row x_error_msg_data '|| x_error_msg_data ,1);
1038: END IF;
1039: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1040: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1041: x_msg_count := x_msg_count + 1;
1042: RETURN;
1043: END IF;

Line 1040: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1036: pa_debug.write('Create_Planning_Resource: ' || g_module_name,'After calling pa_res_list_members_pkg.insert_row x_return_status '|| x_return_status ,1);
1037: pa_debug.write('Create_Planning_Resource: ' || g_module_name,'After calling pa_res_list_members_pkg.insert_row x_error_msg_data '|| x_error_msg_data ,1);
1038: END IF;
1039: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1040: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1041: x_msg_count := x_msg_count + 1;
1042: RETURN;
1043: END IF;
1044:

Line 1125: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1121: X_Return_Status => l_return_status,
1122: X_Msg_Count => l_msg_count,
1123: X_Msg_Data => l_error_msg_data);
1124:
1125: IF l_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1126: -- PA_UTILS.Add_Message ('PA', l_error_msg_data);
1127: Return;
1128: END IF;
1129: /*****************************************************

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

1150: l_done := 'Y';
1151: END IF;
1152: l_num := l_num + 1;
1153: END LOOP;
1154: -- x_return_status := FND_API.G_RET_STS_ERROR;
1155: -- x_msg_count := x_msg_count + 1;
1156: -- x_error_msg_data := 'PA_RES_ALIAS_NOT_UNIQUE';
1157: -- PA_UTILS.Add_Message ('PA', x_error_msg_data);
1158: -- Return;

Line 1167: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1163: SET alias = l_resource_alias
1164: WHERE resource_list_member_id = l_res_list_member_id;
1165: EXCEPTION
1166: WHEN OTHERS THEN
1167: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1168: x_msg_count := x_msg_count + 1;
1169: Return;
1170: END;
1171:

Line 1264: x_return_status := FND_API.G_RET_STS_SUCCESS;

1260: END IF;
1261:
1262: FND_MSG_PUB.initialize;
1263: x_msg_count := 0;
1264: x_return_status := FND_API.G_RET_STS_SUCCESS;
1265: BEGIN
1266: SELECT object_type,object_id
1267: INTO l_object_type,l_object_id
1268: FROM pa_resource_list_members

Line 1272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1268: FROM pa_resource_list_members
1269: WHERE resource_list_member_id = p_resource_list_member_id;
1270: EXCEPTION
1271: WHEN OTHERS THEN
1272: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1273: x_msg_count := x_msg_count + 1;
1274: RETURN;
1275: END;
1276:

Line 1290: --IF (p_resource_alias IS NULL OR p_resource_alias = FND_API.G_MISS_CHAR) THEN

1286: --
1287: ----hr_utility.trace_on(NULL, 'RMALIAS');
1288: ----hr_utility.trace('start - before alias check');
1289: ----hr_utility.trace('p_resource_alias is : ' || p_resource_alias);
1290: --IF (p_resource_alias IS NULL OR p_resource_alias = FND_API.G_MISS_CHAR) THEN
1291:
1292: IF p_resource_alias IS NULL THEN
1293: ----hr_utility.trace('p_resource_alias is NULL - derive');
1294: -- Derive the default alias and use that.

Line 1306: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1302: X_Return_Status => x_return_status,
1303: X_Msg_Count => x_msg_count,
1304: X_Msg_Data => x_error_msg_data);
1305:
1306: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1307: -- PA_UTILS.Add_Message ('PA', x_error_msg_data);
1308: Return;
1309: END IF;
1310:

Line 1345: x_return_status := FND_API.G_RET_STS_ERROR;

1341: p_resource_list_member_id => p_resource_list_member_id,
1342: p_object_type => l_object_type,
1343: p_object_id => l_object_id) = 'N'
1344: THEN
1345: x_return_status := FND_API.G_RET_STS_ERROR;
1346: x_error_msg_data := 'PA_RES_ALIAS_NOT_UNIQUE';
1347: PA_UTILS.Add_Message ('PA', x_error_msg_data, 'PLAN_RES', g_token);
1348: Return;
1349: END IF;

Line 1363: x_return_status := FND_API.G_RET_STS_ERROR;

1359: p_resource_list_member_id => p_resource_list_member_id);
1360:
1361: -- --hr_utility.trace('l_allowed is : ' || l_allowed);
1362: IF l_allowed = 'N' THEN
1363: x_return_status := FND_API.G_RET_STS_ERROR;
1364: x_error_msg_data := 'PA_ENABLE_NOT_ALLOWED';
1365: PA_UTILS.Add_Message ('PA', x_error_msg_data, 'PLAN_RES', g_token);
1366: -- --hr_utility.trace('x_error_msg_data is : ' || x_error_msg_data);
1367: Return;

Line 1424: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1420:
1421:
1422: x_record_version_number := p_record_version_number;
1423:
1424: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1426: x_msg_count := x_msg_count + 1;
1427: RETURN;
1428: END IF;

Line 1425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1421:
1422: x_record_version_number := p_record_version_number;
1423:
1424: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1425: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1426: x_msg_count := x_msg_count + 1;
1427: RETURN;
1428: END IF;
1429:

Line 1461: x_return_status := FND_API.G_RET_STS_SUCCESS;

1457: g_token := g_token || PA_PLANNING_RESOURCE_UTILS.Get_Plan_Res_Combination(
1458: P_Resource_List_Member_Id => P_Resource_List_Member_Id);
1459: END IF;
1460:
1461: x_return_status := FND_API.G_RET_STS_SUCCESS;
1462: x_msg_count := 0;
1463:
1464: BEGIN
1465: SELECT resource_list_id, migration_code

Line 1507: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1503: 'pa_planning_resource_pvt.delete_planning_resource'
1504: ,p_procedure_name => PA_DEBUG.G_Err_Stack);
1505: l_msg_count := l_msg_count + 1;
1506: x_msg_count := l_msg_count;
1507: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1508: END;
1509:
1510: IF l_exist_res_list = 'N' THEN
1511:

Line 2093: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

2089: WHEN l_exception THEN
2090: FND_MSG_PUB.add_exc_msg
2091: ( p_pkg_name => 'Pa_Planning_Resource_Pvt'
2092: ,p_procedure_name => 'Copy_Planning_Resources');
2093: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
2094: END Copy_Planning_Resources;
2095:
2096: /******************************/
2097: