DBA Data[Home] [Help]

APPS.PA_PROJECT_STRUCTURE_UTILS dependencies on FND_API

Line 70: x_return_status := FND_API.G_RET_STS_ERROR;

66: fetch get_lock_user into l_dummy;
67: if get_lock_user%NOTFOUND then
68: --the structure version is locked by another user.
69: close get_lock_user;
70: x_return_status := FND_API.G_RET_STS_ERROR;
71: x_error_message_code := 'PA_PS_STRUC_VER_LOCKED';
72: return;
73: end if;
74: close get_lock_user;

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

79: --for Advanced Structure changes
80: --
81: -- If (Check_Struc_Ver_Published(p_project_id, p_structure_version_id) = 'Y') THEN
82: --version is published. Error.
83: -- x_return_status := FND_API.G_RET_STS_ERROR;
84: -- x_error_message_code := 'PA_PS_DEL_PUB_STRUC_ERR';
85: -- return;
86: -- END IF;
87:

Line 98: x_return_status := FND_API.G_RET_STS_ERROR;

94: fetch get_link into l_dummy;
95: if get_link%FOUND then
96: --a link exists
97: close get_link;
98: x_return_status := FND_API.G_RET_STS_ERROR;
99: x_error_message_code := 'PA_PS_LINK_EXISTS';
100: return;
101: end if;
102: close get_link;

Line 107: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

103:
104:
105: EXCEPTION
106: WHEN OTHERS THEN
107: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
108:
109: -- 4537865 RESET OUT PARAMS
110: x_error_message_code := SQLERRM ;
111:

Line 297: x_return_status := FND_API.G_RET_STS_ERROR;

293:
294: BEGIN
295:
296: if (p_project_id IS NULL or p_structure_type is NULL) then
297: x_return_status := FND_API.G_RET_STS_ERROR;
298: x_error_message_code := 'PA_PS_INPUT_NOT_SPECIFIC';
299: return;
300: end if;
301:

Line 307: x_return_status := FND_API.G_RET_STS_SUCCESS;

303: fetch c1 into l_dummy;
304: if c1%notfound THEN
305: close c1;
306: -- selected structure type does not exist
307: x_return_status := FND_API.G_RET_STS_SUCCESS;
308: else
309: close c1;
310: -- selected structure type exists
311: x_return_status := FND_API.G_RET_STS_ERROR;

Line 311: x_return_status := FND_API.G_RET_STS_ERROR;

307: x_return_status := FND_API.G_RET_STS_SUCCESS;
308: else
309: close c1;
310: -- selected structure type exists
311: x_return_status := FND_API.G_RET_STS_ERROR;
312: x_error_message_code := 'PA_PS_STRUC_TYPE_EXISTS';
313: end if;
314: EXCEPTION
315: when others then

Line 316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

312: x_error_message_code := 'PA_PS_STRUC_TYPE_EXISTS';
313: end if;
314: EXCEPTION
315: when others then
316: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
317: -- 4537865 RESET OUT PARAMS
318: x_error_message_code := SQLERRM ;
319:
320: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',

Line 633: x_return_status:= FND_API.G_RET_STS_SUCCESS;

629:
630: l_posA := instr(l_name, ' - ', -1, 1);
631: if (l_posA = 0) then
632: x_structure_version_name := substrb(l_name||' - 1',0,240); -- 4537865 replaced substr usage with substrb
633: x_return_status:= FND_API.G_RET_STS_SUCCESS;
634: return;
635: end if;
636: if (l_posA > 0) then
637: --check if this is a number

Line 650: x_return_status:= FND_API.G_RET_STS_SUCCESS;

646:
647: if new_name_valid%NOTFOUND then
648: --name is valid
649: x_structure_version_name := l_new_name;
650: x_return_status:= FND_API.G_RET_STS_SUCCESS;
651: close new_name_valid;
652: EXIT;
653: end if;
654: close new_name_valid;

Line 671: x_return_status:= FND_API.G_RET_STS_SUCCESS;

667:
668: if new_name_valid%NOTFOUND then
669: --name is valid
670: x_structure_version_name := l_new_name;
671: x_return_status:= FND_API.G_RET_STS_SUCCESS;
672: close new_name_valid;
673: EXIT;
674: end if;
675: close new_name_valid;

Line 683: x_return_status := FND_API.G_RET_STS_ERROR;

679:
680: EXCEPTION
681: WHEN NO_DATA_FOUND THEN
682:
683: x_return_status := FND_API.G_RET_STS_ERROR;
684: x_error_message_code := 'PA_PS_STRUC_VER_NAME_GEN_ERR';
685: -- 4537865 RESET OUT PARAMS
686: x_structure_version_name := NULL ;
687:

Line 689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

685: -- 4537865 RESET OUT PARAMS
686: x_structure_version_name := NULL ;
687:
688: WHEN OTHERS THEN
689: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
690:
691: -- 4537865 RESET OUT PARAMS
692: x_structure_version_name := NULL ;
693: x_error_message_code := SQLERRM ;

Line 766: x_return_status := FND_API.G_RET_STS_SUCCESS;

762: and pevs.proj_element_id = pe.proj_element_id
763: and pevs.name = p_structure_version_name;
764: END IF;
765:
766: x_return_status := FND_API.G_RET_STS_SUCCESS;
767: EXCEPTION
768: WHEN no_data_found THEN
769: x_return_status:= FND_API.G_RET_STS_ERROR;
770: x_error_message_code:= 'PA_PS_INVAL_STRUC_VER_NAME';

Line 769: x_return_status:= FND_API.G_RET_STS_ERROR;

765:
766: x_return_status := FND_API.G_RET_STS_SUCCESS;
767: EXCEPTION
768: WHEN no_data_found THEN
769: x_return_status:= FND_API.G_RET_STS_ERROR;
770: x_error_message_code:= 'PA_PS_INVAL_STRUC_VER_NAME';
771:
772: -- 4537865 RESET OUT PARAMS
773: x_structure_version_id := NULL ;

Line 776: x_return_status:= FND_API.G_RET_STS_ERROR;

772: -- 4537865 RESET OUT PARAMS
773: x_structure_version_id := NULL ;
774:
775: WHEN too_many_rows THEN
776: x_return_status:= FND_API.G_RET_STS_ERROR;
777: x_error_message_code:= 'PA_PS_STRUC_V_NAME_NOT_UNIQUE';
778:
779: -- 4537865 RESET OUT PARAMS
780: x_structure_version_id := NULL ;

Line 782: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;

778:
779: -- 4537865 RESET OUT PARAMS
780: x_structure_version_id := NULL ;
781: WHEN OTHERS THEN
782: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
783:
784: -- 4537865 RESET OUT PARAMS
785: x_structure_version_id := NULL ;
786: x_error_message_code := SQLERRM ;

Line 841: x_return_status := FND_API.G_RET_STS_SUCCESS;

837: where project_id = p_project_id
838: and object_type = 'PA_STRUCTURES'
839: and name = p_structure_name;
840: END IF;
841: x_return_status := FND_API.G_RET_STS_SUCCESS;
842: EXCEPTION
843: WHEN no_data_found THEN
844: x_return_status:= FND_API.G_RET_STS_ERROR;
845: x_error_message_code:= 'PA_PS_INVALID_STRUCT_NAME';

Line 844: x_return_status:= FND_API.G_RET_STS_ERROR;

840: END IF;
841: x_return_status := FND_API.G_RET_STS_SUCCESS;
842: EXCEPTION
843: WHEN no_data_found THEN
844: x_return_status:= FND_API.G_RET_STS_ERROR;
845: x_error_message_code:= 'PA_PS_INVALID_STRUCT_NAME';
846:
847: -- 4537865 RESET OUT PARAM
848: x_structure_id := NULL ;

Line 850: x_return_status:= FND_API.G_RET_STS_ERROR;

846:
847: -- 4537865 RESET OUT PARAM
848: x_structure_id := NULL ;
849: WHEN too_many_rows THEN
850: x_return_status:= FND_API.G_RET_STS_ERROR;
851: x_error_message_code:= 'PA_PS_STRUC_NAME_NOT_UNIQUE';
852:
853: -- 4537865 RESET OUT PARAM
854: x_structure_id := NULL ;

Line 856: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;

852:
853: -- 4537865 RESET OUT PARAM
854: x_structure_id := NULL ;
855: WHEN OTHERS THEN
856: x_return_status:= FND_API.G_RET_STS_UNEXP_ERROR;
857:
858: -- 4537865 RESET OUT PARAM
859: x_structure_id := NULL ;
860: x_error_message_code := SQLERRM ;

Line 935: = FND_API.G_TRUE) THEN

931: /*
932: IF (PA_SECURITY_PVT.check_user_privilege('PA_UNLOCK_ANY_STRUCTURE'
933: ,NULL
934: ,to_number(NULL))
935: = FND_API.G_TRUE) THEN
936: --current user is super user. can edit
937: return 'Y';
938: END IF;
939: */

Line 1703: raise FND_API.G_EXC_ERROR;

1699: CLOSE get_latest_pub_ver;
1700:
1701: x_msg_count := FND_MSG_PUB.count_msg;
1702: IF (x_msg_count > 0) THEN
1703: raise FND_API.G_EXC_ERROR;
1704: END IF;
1705:
1706: x_return_status := FND_API.G_RET_STS_SUCCESS;
1707: EXCEPTION

Line 1706: x_return_status := FND_API.G_RET_STS_SUCCESS;

1702: IF (x_msg_count > 0) THEN
1703: raise FND_API.G_EXC_ERROR;
1704: END IF;
1705:
1706: x_return_status := FND_API.G_RET_STS_SUCCESS;
1707: EXCEPTION
1708: WHEN FND_API.G_EXC_ERROR THEN
1709: x_return_status := FND_API.G_RET_STS_ERROR;
1710: WHEN OTHERS THEN

Line 1708: WHEN FND_API.G_EXC_ERROR THEN

1704: END IF;
1705:
1706: x_return_status := FND_API.G_RET_STS_SUCCESS;
1707: EXCEPTION
1708: WHEN FND_API.G_EXC_ERROR THEN
1709: x_return_status := FND_API.G_RET_STS_ERROR;
1710: WHEN OTHERS THEN
1711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1712: --4537865

Line 1709: x_return_status := FND_API.G_RET_STS_ERROR;

1705:
1706: x_return_status := FND_API.G_RET_STS_SUCCESS;
1707: EXCEPTION
1708: WHEN FND_API.G_EXC_ERROR THEN
1709: x_return_status := FND_API.G_RET_STS_ERROR;
1710: WHEN OTHERS THEN
1711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1712: --4537865
1713: x_msg_count := 1;

Line 1711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1707: EXCEPTION
1708: WHEN FND_API.G_EXC_ERROR THEN
1709: x_return_status := FND_API.G_RET_STS_ERROR;
1710: WHEN OTHERS THEN
1711: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1712: --4537865
1713: x_msg_count := 1;
1714: x_msg_data := SQLERRM ;
1715:

Line 2936: raise FND_API.G_EXC_ERROR;

2932: CLOSE c1;
2933:
2934: x_msg_count := FND_MSG_PUB.count_msg;
2935: IF (x_msg_count > 0) THEN
2936: raise FND_API.G_EXC_ERROR;
2937: END IF;
2938:
2939: x_return_status := FND_API.G_RET_STS_SUCCESS;
2940: EXCEPTION

Line 2939: x_return_status := FND_API.G_RET_STS_SUCCESS;

2935: IF (x_msg_count > 0) THEN
2936: raise FND_API.G_EXC_ERROR;
2937: END IF;
2938:
2939: x_return_status := FND_API.G_RET_STS_SUCCESS;
2940: EXCEPTION
2941: WHEN FND_API.G_EXC_ERROR THEN
2942: x_return_status := FND_API.G_RET_STS_ERROR;
2943: x_msg_count := FND_MSG_PUB.count_msg; -- 4537865

Line 2941: WHEN FND_API.G_EXC_ERROR THEN

2937: END IF;
2938:
2939: x_return_status := FND_API.G_RET_STS_SUCCESS;
2940: EXCEPTION
2941: WHEN FND_API.G_EXC_ERROR THEN
2942: x_return_status := FND_API.G_RET_STS_ERROR;
2943: x_msg_count := FND_MSG_PUB.count_msg; -- 4537865
2944: x_msg_data := l_message_text ; -- 4537865
2945:

Line 2942: x_return_status := FND_API.G_RET_STS_ERROR;

2938:
2939: x_return_status := FND_API.G_RET_STS_SUCCESS;
2940: EXCEPTION
2941: WHEN FND_API.G_EXC_ERROR THEN
2942: x_return_status := FND_API.G_RET_STS_ERROR;
2943: x_msg_count := FND_MSG_PUB.count_msg; -- 4537865
2944: x_msg_data := l_message_text ; -- 4537865
2945:
2946: WHEN OTHERS THEN

Line 2947: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

2943: x_msg_count := FND_MSG_PUB.count_msg; -- 4537865
2944: x_msg_data := l_message_text ; -- 4537865
2945:
2946: WHEN OTHERS THEN
2947: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
2948: x_msg_count := 1; -- 4537865
2949: x_msg_data := SQLERRM ; -- 4537865
2950: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
2951: p_procedure_name => 'Check_txn_on_summary_tasks',

Line 3029: -- raise FND_API.G_EXC_ERROR;

3025: FETCH c3 into l_system_status_code;
3026: IF (c3%FOUND) THEN
3027: --inconsistent statuses. Error
3028: -- x_error_message_code := 'PA_PS_PUB_TK_STATS_ERR';
3029: -- raise FND_API.G_EXC_ERROR;
3030: OPEN get_task_name_num(l_proj_element_id);
3031: FETCH get_task_name_num into l_task_name, l_task_number;
3032: CLOSE get_task_name_num;
3033: PA_UTILS.ADD_MESSAGE('PA', 'PA_PS_PUB_TK_STATS_ERR',

Line 3045: raise FND_API.G_EXC_ERROR;

3041: CLOSE c1;
3042:
3043: x_msg_count := FND_MSG_PUB.count_msg;
3044: IF (x_msg_count > 0) THEN
3045: raise FND_API.G_EXC_ERROR;
3046: END IF;
3047:
3048: x_return_status := FND_API.G_RET_STS_SUCCESS;
3049:

Line 3048: x_return_status := FND_API.G_RET_STS_SUCCESS;

3044: IF (x_msg_count > 0) THEN
3045: raise FND_API.G_EXC_ERROR;
3046: END IF;
3047:
3048: x_return_status := FND_API.G_RET_STS_SUCCESS;
3049:
3050: EXCEPTION
3051: WHEN FND_API.G_EXC_ERROR THEN
3052: x_return_status := FND_API.G_RET_STS_ERROR;

Line 3051: WHEN FND_API.G_EXC_ERROR THEN

3047:
3048: x_return_status := FND_API.G_RET_STS_SUCCESS;
3049:
3050: EXCEPTION
3051: WHEN FND_API.G_EXC_ERROR THEN
3052: x_return_status := FND_API.G_RET_STS_ERROR;
3053: x_msg_count := FND_MSG_PUB.count_msg; -- 4537865
3054: x_msg_data := 'PA_PS_PUB_TK_STATS_ERR'; -- 4537865
3055:

Line 3052: x_return_status := FND_API.G_RET_STS_ERROR;

3048: x_return_status := FND_API.G_RET_STS_SUCCESS;
3049:
3050: EXCEPTION
3051: WHEN FND_API.G_EXC_ERROR THEN
3052: x_return_status := FND_API.G_RET_STS_ERROR;
3053: x_msg_count := FND_MSG_PUB.count_msg; -- 4537865
3054: x_msg_data := 'PA_PS_PUB_TK_STATS_ERR'; -- 4537865
3055:
3056: WHEN OTHERS THEN

Line 3057: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3053: x_msg_count := FND_MSG_PUB.count_msg; -- 4537865
3054: x_msg_data := 'PA_PS_PUB_TK_STATS_ERR'; -- 4537865
3055:
3056: WHEN OTHERS THEN
3057: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3058: x_msg_count := 1; -- 4537865
3059: x_msg_data := SQLERRM ; -- 4537865
3060: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_STRUCTURE_UTILS',
3061: p_procedure_name => 'Check_tasks_statuses_valid',

Line 3191: = FND_API.G_TRUE) THEN

3187: --added for bug 3071008
3188: IF (PA_SECURITY_PVT.check_user_privilege('PA_UNLOCK_ANY_STRUCTURE'
3189: ,NULL
3190: ,to_number(NULL))
3191: = FND_API.G_TRUE) THEN
3192: return 'Y';
3193: END IF;
3194: --end bug 3071008
3195: return 'N';

Line 3228: = FND_API.G_TRUE) THEN

3224: --added for bug 3071008
3225: IF (PA_SECURITY_PVT.check_user_privilege('PA_UNLOCK_ANY_STRUCTURE'
3226: ,NULL
3227: ,to_number(NULL))
3228: = FND_API.G_TRUE) THEN
3229: return 'Y';
3230: END IF;
3231: --end bug 3071008
3232: return 'N';

Line 3562: x_return_status := FND_API.G_RET_STS_SUCCESS;

3558:
3559: BEGIN
3560:
3561: x_msg_count := 0;
3562: x_return_status := FND_API.G_RET_STS_SUCCESS;
3563: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
3564:
3565: IF l_debug_mode = 'Y' THEN
3566: pa_debug.set_curr_function( p_function => 'GET_CONC_REQUEST_DETAILS',

Line 3616: x_return_status := FND_API.G_RET_STS_ERROR;

3612: EXCEPTION
3613:
3614: WHEN Invalid_Arg_Exc_WP THEN
3615:
3616: x_return_status := FND_API.G_RET_STS_ERROR;
3617: l_msg_count := FND_MSG_PUB.count_msg;
3618:
3619: -- 4537865 RESET OUT PARAMS
3620: x_request_id := NULL ;

Line 3630: (p_encoded => FND_API.G_TRUE

3626: END IF;
3627:
3628: IF l_msg_count = 1 and x_msg_data IS NULL THEN
3629: PA_INTERFACE_UTILS_PUB.get_messages
3630: (p_encoded => FND_API.G_TRUE
3631: ,p_msg_index => 1
3632: ,p_msg_count => l_msg_count
3633: ,p_msg_data => l_msg_data
3634: ,p_data => l_data

Line 3649: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

3645: RETURN;
3646:
3647: WHEN others THEN
3648:
3649: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
3650: x_msg_count := 1;
3651: x_msg_data := SQLERRM;
3652:
3653: -- 4537865 RESET OUT PARAMS

Line 4503: l_return_status := FND_API.G_RET_STS_SUCCESS;

4499: l_return_status VARCHAR2(30) := NULL;
4500:
4501: BEGIN
4502:
4503: l_return_status := FND_API.G_RET_STS_SUCCESS;
4504:
4505: update pa_proj_elem_ver_structure
4506: set process_code = decode(p_calling_context, 'APPLY_PROGRESS', 'APP'
4507: , 'CONC_PUBLISH', 'PUP'

Line 4524: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4520:
4521: when others then
4522:
4523: -- Changed l_return_status to x_return_status : 4537865
4524: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4525:
4526: raise;
4527:
4528: END SET_PROCESS_CODE_IN_PROC;

Line 4543: l_return_status := FND_API.G_RET_STS_SUCCESS;

4539: l_return_status VARCHAR2(30) := NULL;
4540:
4541: BEGIN
4542:
4543: l_return_status := FND_API.G_RET_STS_SUCCESS;
4544:
4545: update pa_proj_elem_ver_structure
4546: set process_code = decode(p_calling_context, 'APPLY_PROGRESS', 'APE'
4547: , 'CONC_PUBLISH', 'PUE'

Line 4561: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

4557: EXCEPTION
4558:
4559: when others then
4560: -- 4537865 Changed l_return_status to x_return_status
4561: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
4562:
4563: raise;
4564:
4565: END SET_PROCESS_CODE_ERR;

Line 4584: l_return_status := FND_API.G_RET_STS_SUCCESS;

4580: l_return_status VARCHAR2(30) := NULL;
4581:
4582: BEGIN
4583:
4584: l_return_status := FND_API.G_RET_STS_SUCCESS;
4585: if p_process_code = 'PRE' then
4586: update pa_proj_elem_ver_structure
4587: set process_code = p_process_code
4588: , conc_request_id = p_conc_request_id

Line 4605: x_return_status := FND_API.G_RET_STS_ERROR;

4601:
4602: when others then
4603:
4604: -- Changed l_return_status to x_return_status for NOCOPY
4605: x_return_status := FND_API.G_RET_STS_ERROR;
4606:
4607: raise;
4608:
4609: END SET_PROCESS_CODE;

Line 4794: x_return_status := FND_API.G_RET_STS_SUCCESS;

4790:
4791: savepoint lock_unlock_wp_str;
4792:
4793: x_msg_count := 0;
4794: x_return_status := FND_API.G_RET_STS_SUCCESS;
4795: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
4796:
4797: if l_debug_mode = 'Y' THEN
4798: pa_debug.set_curr_function( p_function => 'lock_unlock_wp_str_autonomous');

Line 4827: , p_init_msg_list => FND_API.G_FALSE -- Added for bug 5130360

4823: pa_project_structure_pub1.update_structure_version_attr
4824: (p_pev_structure_id => l_rec_ppevs.pev_structure_id
4825: , p_locked_status_code => p_lock_status_code
4826: , p_structure_version_name => l_rec_ppevs.name
4827: , p_init_msg_list => FND_API.G_FALSE -- Added for bug 5130360
4828: , p_record_version_number => l_rec_ppevs.record_version_number
4829: , p_calling_module => p_calling_module
4830: , x_return_status => x_return_status
4831: , x_msg_count => x_msg_count

Line 4841: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then

4837:
4838:
4839: end if;
4840:
4841: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
4842: commit;
4843: else
4844: raise FND_API.G_EXC_ERROR;
4845: end if;

Line 4844: raise FND_API.G_EXC_ERROR;

4840:
4841: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
4842: commit;
4843: else
4844: raise FND_API.G_EXC_ERROR;
4845: end if;
4846:
4847: exception
4848:

Line 4849: when FND_API.G_EXC_ERROR then

4845: end if;
4846:
4847: exception
4848:
4849: when FND_API.G_EXC_ERROR then
4850: /*rollback to lock_unlock_wp_str; bug#6414944*/
4851: rollback; /*bug# 6414944*/
4852:
4853: when others then

Line 4891: x_return_status := FND_API.G_RET_STS_SUCCESS;

4887:
4888: savepoint lock_unlock_wp_str2;
4889:
4890: x_msg_count := 0;
4891: x_return_status := FND_API.G_RET_STS_SUCCESS;
4892: l_debug_mode := NVL(FND_PROFILE.value('PA_DEBUG_MODE'),'N');
4893:
4894: if l_debug_mode = 'Y' THEN
4895: pa_debug.set_curr_function( p_function => 'lock_unlock_wp_str');

Line 4924: , p_init_msg_list => FND_API.G_FALSE -- Added for bug 5130360

4920: pa_project_structure_pub1.update_structure_version_attr
4921: (p_pev_structure_id => l_rec_ppevs.pev_structure_id
4922: , p_locked_status_code => p_lock_status_code
4923: , p_structure_version_name => l_rec_ppevs.name
4924: , p_init_msg_list => FND_API.G_FALSE -- Added for bug 5130360
4925: , p_record_version_number => l_rec_ppevs.record_version_number
4926: , p_calling_module => p_calling_module
4927: , x_return_status => x_return_status
4928: , x_msg_count => x_msg_count

Line 4938: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then

4934:
4935:
4936: end if;
4937:
4938: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
4939: --commit;
4940: null;
4941: else
4942: raise FND_API.G_EXC_ERROR;

Line 4942: raise FND_API.G_EXC_ERROR;

4938: if (x_return_status = FND_API.G_RET_STS_SUCCESS) then
4939: --commit;
4940: null;
4941: else
4942: raise FND_API.G_EXC_ERROR;
4943: end if;
4944:
4945: exception
4946:

Line 4947: when FND_API.G_EXC_ERROR then

4943: end if;
4944:
4945: exception
4946:
4947: when FND_API.G_EXC_ERROR then
4948: rollback to lock_unlock_wp_str2;
4949:
4950: when others then
4951: rollback to lock_unlock_wp_str2;

Line 5315: x_return_status := FND_API.G_RET_STS_SUCCESS;

5311: WHERE pt.task_id = c_proj_element_id;
5312:
5313: BEGIN
5314:
5315: x_return_status := FND_API.G_RET_STS_SUCCESS;
5316:
5317: OPEN get_structure_id;
5318: FETCH get_structure_id INTO l_structure_id;
5319: CLOSE get_structure_id;

Line 5368: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

5364: x_msg_count => l_msg_count,
5365: x_msg_data => l_msg_data
5366: );
5367:
5368: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5369: RAISE FND_API.G_EXC_ERROR;
5370: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5371: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5372: END IF;

Line 5369: RAISE FND_API.G_EXC_ERROR;

5365: x_msg_data => l_msg_data
5366: );
5367:
5368: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5369: RAISE FND_API.G_EXC_ERROR;
5370: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5371: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5372: END IF;
5373:

Line 5370: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

5366: );
5367:
5368: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5369: RAISE FND_API.G_EXC_ERROR;
5370: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5371: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5372: END IF;
5373:
5374: ELSIF (NVL(l_old_task_finish_date, sysdate) <> NVL(l_task_finish_date, sysdate)) THEN

Line 5371: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5367:
5368: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5369: RAISE FND_API.G_EXC_ERROR;
5370: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5371: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5372: END IF;
5373:
5374: ELSIF (NVL(l_old_task_finish_date, sysdate) <> NVL(l_task_finish_date, sysdate)) THEN
5375:

Line 5385: IF l_return_status = FND_API.G_RET_STS_ERROR THEN

5381: x_msg_count => l_msg_count,
5382: x_msg_data => l_msg_data
5383: );
5384:
5385: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5386: RAISE FND_API.G_EXC_ERROR;
5387: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5388: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5389: END IF;

Line 5386: RAISE FND_API.G_EXC_ERROR;

5382: x_msg_data => l_msg_data
5383: );
5384:
5385: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5386: RAISE FND_API.G_EXC_ERROR;
5387: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5388: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5389: END IF;
5390:

Line 5387: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN

5383: );
5384:
5385: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5386: RAISE FND_API.G_EXC_ERROR;
5387: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5388: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5389: END IF;
5390:
5391: END IF;

Line 5388: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;

5384:
5385: IF l_return_status = FND_API.G_RET_STS_ERROR THEN
5386: RAISE FND_API.G_EXC_ERROR;
5387: ELSIF l_return_status = FND_API.G_RET_STS_UNEXP_ERROR THEN
5388: RAISE FND_API.G_EXC_UNEXPECTED_ERROR;
5389: END IF;
5390:
5391: END IF;
5392:

Line 5397: WHEN FND_API.G_EXC_ERROR THEN

5393: END IF; -- PA_PROJ_ELEMENTS_UTILS.IS_LOWEST_PROJ_TASK
5394: END LOOP; -- get_tasks
5395:
5396: EXCEPTION
5397: WHEN FND_API.G_EXC_ERROR THEN
5398: x_return_status := FND_API.G_RET_STS_ERROR;
5399: x_msg_count := FND_MSG_PUB.count_msg;
5400:
5401: IF x_msg_count > 0 THEN

Line 5398: x_return_status := FND_API.G_RET_STS_ERROR;

5394: END LOOP; -- get_tasks
5395:
5396: EXCEPTION
5397: WHEN FND_API.G_EXC_ERROR THEN
5398: x_return_status := FND_API.G_RET_STS_ERROR;
5399: x_msg_count := FND_MSG_PUB.count_msg;
5400:
5401: IF x_msg_count > 0 THEN
5402: PA_INTERFACE_UTILS_PUB.get_messages (

Line 5403: p_encoded => FND_API.G_FALSE

5399: x_msg_count := FND_MSG_PUB.count_msg;
5400:
5401: IF x_msg_count > 0 THEN
5402: PA_INTERFACE_UTILS_PUB.get_messages (
5403: p_encoded => FND_API.G_FALSE
5404: , p_msg_index => 1
5405: , p_msg_count => x_msg_count
5406: , p_msg_data => x_msg_data
5407: , p_data => x_msg_data

Line 5411: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

5407: , p_data => x_msg_data
5408: , p_msg_index_out => l_msg_index_out);
5409: END IF;
5410:
5411: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5412: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5413: x_msg_count := FND_MSG_PUB.count_msg;
5414:
5415: IF x_msg_count > 0 THEN

Line 5412: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5408: , p_msg_index_out => l_msg_index_out);
5409: END IF;
5410:
5411: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
5412: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5413: x_msg_count := FND_MSG_PUB.count_msg;
5414:
5415: IF x_msg_count > 0 THEN
5416: PA_INTERFACE_UTILS_PUB.get_messages (

Line 5417: p_encoded => FND_API.G_FALSE

5413: x_msg_count := FND_MSG_PUB.count_msg;
5414:
5415: IF x_msg_count > 0 THEN
5416: PA_INTERFACE_UTILS_PUB.get_messages (
5417: p_encoded => FND_API.G_FALSE
5418: , p_msg_index => 1
5419: , p_msg_count => x_msg_count
5420: , p_msg_data => x_msg_data
5421: , p_data => x_msg_data

Line 5426: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

5422: , p_msg_index_out => l_msg_index_out);
5423: END IF;
5424:
5425: WHEN OTHERS THEN
5426: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
5427: x_msg_count := 1;
5428: x_msg_data := SUBSTRB(SQLERRM, 1, 240);
5429: IF FND_MSG_PUB.check_msg_level(FND_MSG_PUB.G_MSG_LVL_UNEXP_ERROR) THEN
5430: FND_MSG_PUB.add_exc_msg (