eTRM uses javascript that opens and focuses a separate window to display reports. Your browser does not appear to support javascript. This should not prevent you from using eTRM but it does mean the window focus feature will not work. Please check the contents of other windows on your desktop if you click on a link that does not appear to do anything.

APPS.PA_PROJECT_PARTIES_PVT dependencies on FND_API

Line 6: PROCEDURE CREATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,

2: /* $Header: PARPPUTB.pls 120.12.12010000.3 2008/11/30 08:49:36 jcgeorge ship $ */
3:
4: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:
6: PROCEDURE CREATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
7: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
9: p_debug_mode IN VARCHAR2 default 'N',
10: p_object_id IN NUMBER := FND_API.G_MISS_NUM,

Line 7: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,

3:
4: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:
6: PROCEDURE CREATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
7: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
9: p_debug_mode IN VARCHAR2 default 'N',
10: p_object_id IN NUMBER := FND_API.G_MISS_NUM,
11: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,

Line 8: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

4: P_DEBUG_MODE varchar2(1) := NVL(FND_PROFILE.value('PA_DEBUG_MODE'), 'N');
5:
6: PROCEDURE CREATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
7: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
9: p_debug_mode IN VARCHAR2 default 'N',
10: p_object_id IN NUMBER := FND_API.G_MISS_NUM,
11: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,
12: p_resource_type_id IN NUMBER := 101,

Line 10: p_object_id IN NUMBER := FND_API.G_MISS_NUM,

6: PROCEDURE CREATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
7: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
9: p_debug_mode IN VARCHAR2 default 'N',
10: p_object_id IN NUMBER := FND_API.G_MISS_NUM,
11: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,
12: p_resource_type_id IN NUMBER := 101,
13: p_project_role_id IN NUMBER,
14: p_resource_source_id IN NUMBER,

Line 11: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,

7: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
8: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
9: p_debug_mode IN VARCHAR2 default 'N',
10: p_object_id IN NUMBER := FND_API.G_MISS_NUM,
11: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,
12: p_resource_type_id IN NUMBER := 101,
13: p_project_role_id IN NUMBER,
14: p_resource_source_id IN NUMBER,
15: p_start_date_active IN DATE,

Line 18: p_project_id IN NUMBER := FND_API.G_MISS_NUM,

14: p_resource_source_id IN NUMBER,
15: p_start_date_active IN DATE,
16: p_scheduled_flag IN VARCHAR2 := 'N',
17: p_calling_module IN VARCHAR2,
18: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
19: p_project_end_date IN DATE,
20: p_mgr_validation_type IN VARCHAR2 := FND_API.G_MISS_CHAR,/*Added for bug 2111806*/
21: p_end_date_active IN OUT NOCOPY DATE, --File.Sql.39 bug 4440895
22: x_project_party_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895

Line 20: p_mgr_validation_type IN VARCHAR2 := FND_API.G_MISS_CHAR,/Added for bug 2111806/

16: p_scheduled_flag IN VARCHAR2 := 'N',
17: p_calling_module IN VARCHAR2,
18: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
19: p_project_end_date IN DATE,
20: p_mgr_validation_type IN VARCHAR2 := FND_API.G_MISS_CHAR,/*Added for bug 2111806*/
21: p_end_date_active IN OUT NOCOPY DATE, --File.Sql.39 bug 4440895
22: x_project_party_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
23: x_resource_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
24: x_assignment_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895

Line 65: if p_commit = FND_API.G_TRUE then

61:
62: l_is_valid_denorm VARCHAR2(1) := 'N';/* Added for bug 6077424 */
63:
64: BEGIN
65: if p_commit = FND_API.G_TRUE then
66: savepoint project_parties;
67: end if;
68: x_return_status := FND_API.G_RET_STS_SUCCESS;
69:

Line 68: x_return_status := FND_API.G_RET_STS_SUCCESS;

64: BEGIN
65: if p_commit = FND_API.G_TRUE then
66: savepoint project_parties;
67: end if;
68: x_return_status := FND_API.G_RET_STS_SUCCESS;
69:
70: if p_project_id = FND_API.G_MISS_NUM or p_project_id is null then
71: l_project_id := null;
72: else

Line 70: if p_project_id = FND_API.G_MISS_NUM or p_project_id is null then

66: savepoint project_parties;
67: end if;
68: x_return_status := FND_API.G_RET_STS_SUCCESS;
69:
70: if p_project_id = FND_API.G_MISS_NUM or p_project_id is null then
71: l_project_id := null;
72: else
73: l_project_id := p_project_id;
74: end if;

Line 109: If x_return_status = FND_API.G_RET_STS_SUCCESS and not(fnd_api.to_boolean(nvl(p_validate_only,FND_API.G_FALSE))) then

105:
106: --dbms_output.put_line('return :'||x_return_status);
107: --dbms_output.put_line('project_role_id :'||to_char(p_project_role_id));
108:
109: If x_return_status = FND_API.G_RET_STS_SUCCESS and not(fnd_api.to_boolean(nvl(p_validate_only,FND_API.G_FALSE))) then
110: --if pa_install.is_prm_licensed() = 'Y' then
111:
112: --MT: OrgRole changes
113: IF p_resource_type_id=101 THEN

Line 142: p_init_msg_list => fnd_api.g_false,

138: /* End of code added for bug 3234293 */
139:
140: pa_debug.G_err_stage := 'Calling create_resource';
141: pa_r_project_resources_pub.create_resource(p_api_version => 1.0,
142: p_init_msg_list => fnd_api.g_false,
143: p_commit => p_commit,
144: p_validate_only => p_validate_only,
145: p_person_id => p_resource_source_id,
146: p_internal => 'Y',

Line 157: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

153: x_msg_count => x_msg_count,
154: x_msg_data => x_msg_data,
155: x_resource_id => l_resource_id);
156: --Bug 5186830
157: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
158: RAISE FND_API.G_EXC_ERROR;
159: END IF;
160: /* Added for bug 3234293 - Added this else condition to get the resource id */
161: ELSE

Line 158: RAISE FND_API.G_EXC_ERROR;

154: x_msg_data => x_msg_data,
155: x_resource_id => l_resource_id);
156: --Bug 5186830
157: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
158: RAISE FND_API.G_EXC_ERROR;
159: END IF;
160: /* Added for bug 3234293 - Added this else condition to get the resource id */
161: ELSE
162:

Line 189: p_init_msg_list => fnd_api.g_false,

185: /* End of code added for bug 3234293 */
186:
187: pa_debug.G_err_stage := 'Calling create_resource';
188: pa_r_project_resources_pub.create_resource(p_api_version => 1.0,
189: p_init_msg_list => fnd_api.g_false,
190: p_commit => p_commit,
191: p_validate_only => p_validate_only,
192: p_party_id => p_resource_source_id,
193: p_internal => 'N',

Line 201: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

197: x_msg_count => x_msg_count,
198: x_msg_data => x_msg_data,
199: x_resource_id => l_resource_id);
200: --Bug 5186830
201: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
202: RAISE FND_API.G_EXC_ERROR;
203: END IF;
204: /* Added for bug 3234293 - Added this else condition to get the resource id */
205:

Line 202: RAISE FND_API.G_EXC_ERROR;

198: x_msg_data => x_msg_data,
199: x_resource_id => l_resource_id);
200: --Bug 5186830
201: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
202: RAISE FND_API.G_EXC_ERROR;
203: END IF;
204: /* Added for bug 3234293 - Added this else condition to get the resource id */
205:
206: ELSE

Line 220: if (x_return_status = FND_API.G_RET_STS_SUCCESS and p_scheduled_flag = 'Y') then

216:
217: END IF;
218: --MT: End OrgRole changes
219:
220: if (x_return_status = FND_API.G_RET_STS_SUCCESS and p_scheduled_flag = 'Y') then
221: pa_resource_utils.CHECK_RES_BELONGS_EXPORG(p_resource_id => l_resource_id,
222: x_valid => l_valid,
223: x_return_status => x_return_status,
224: x_error_message_code => l_error_msg_code);

Line 227: x_return_status := FND_API.G_RET_STS_ERROR;

223: x_return_status => x_return_status,
224: x_error_message_code => l_error_msg_code);
225: if (l_valid <> 'Y') then
226: -- check that the person is allowed to have schedule
227: x_return_status := FND_API.G_RET_STS_ERROR;
228: fnd_message.set_name('PA','PA_NO_SCHEDULABLE_PERSON');
229: fnd_msg_pub.add();
230: end if;
231:

Line 235: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

231:
232: -- if the res belongs to the expenditure org hierarchy, check if the res's
233: -- job is schedulable
234:
235: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
236: l_date :=pa_resource_utils.Get_Resource_Effective_Date(p_resource_id => l_resource_id);
237: l_job_schedulable := PA_HR_UPDATE_API.check_job_schedulable
238: ( p_person_id => p_resource_source_id
239: ,p_date => l_date );

Line 241: x_return_status := FND_API.G_RET_STS_ERROR;

237: l_job_schedulable := PA_HR_UPDATE_API.check_job_schedulable
238: ( p_person_id => p_resource_source_id
239: ,p_date => l_date );
240: IF l_job_schedulable <> 'Y' THEN
241: x_return_status := FND_API.G_RET_STS_ERROR;
242: fnd_message.set_name('PA','PA_NOT_SCHEDULABLE_JOB');
243: fnd_msg_pub.add();
244: END IF;
245: END IF;

Line 249: if x_call_overlap = 'N' and x_return_status = FND_API.G_RET_STS_SUCCESS then

245: END IF;
246: end if;
247:
248:
249: if x_call_overlap = 'N' and x_return_status = FND_API.G_RET_STS_SUCCESS then
250: -- call update api
251: if (p_debug_mode = 'Y') then
252: IF P_DEBUG_MODE = 'Y' THEN
253: pa_debug.debug('Create_project_party: Calling update_row.');

Line 292: elsif x_return_status = FND_API.G_RET_STS_SUCCESS then

288:
289: end if;
290: end if;
291:
292: elsif x_return_status = FND_API.G_RET_STS_SUCCESS then
293:
294: pa_security_pvt.grant_role(
295: p_project_role_id => p_project_role_id,
296: p_object_name => p_object_type,

Line 307: if x_return_status = FND_API.G_RET_STS_SUCCESS then

303: x_msg_count => x_msg_count,
304: x_msg_data => x_msg_data);
305: l_grant_id := null;
306:
307: if x_return_status = FND_API.G_RET_STS_SUCCESS then
308:
309: x_resource_id := l_resource_id;
310:
311: if (p_debug_mode = 'Y') then

Line 337: if x_return_status = FND_API.G_RET_STS_SUCCESS and x_assignment_action = 'CREATE' and p_calling_module = 'PROJECT_MEMBER' then

333: X_LAST_UPDATE_LOGIN => FND_GLOBAL.LOGIN_ID) ;
334: end if;
335: end if;
336:
337: if x_return_status = FND_API.G_RET_STS_SUCCESS and x_assignment_action = 'CREATE' and p_calling_module = 'PROJECT_MEMBER' then
338: -- call assignments api
339: -- l_assignment_rec.assignment_name := ;
340: l_assignment_rec.assignment_type := 'STAFFED_ASSIGNMENT';
341: l_assignment_rec.project_id := l_project_id;

Line 362: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

358:
359: end if;
360:
361: --Bug 5856712
362: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
363: RAISE FND_API.G_EXC_ERROR;
364: END IF;
365:
366:

Line 363: RAISE FND_API.G_EXC_ERROR;

359: end if;
360:
361: --Bug 5856712
362: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
363: RAISE FND_API.G_EXC_ERROR;
364: END IF;
365:
366:
367: /* Start of code for bug #2111806:

Line 394: x_return_status := FND_API.G_RET_STS_ERROR;

390: ,p_token2 => 'END_DATE'
391: ,p_value2 => l_end_no_mgr_date
392: );
393: END IF;
394: x_return_status := FND_API.G_RET_STS_ERROR;
395: RETURN;
396: END IF;
397:
398: /* Throw an error if there are no Project Managers assigned.

Line 407: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

403: ,x_return_status => x_return_status
404: ,x_msg_count => x_msg_count
405: ,x_msg_data => x_msg_data );
406:
407: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
408: x_return_status := FND_API.G_RET_STS_ERROR;
409: RETURN;
410: END IF;
411: END IF;

Line 408: x_return_status := FND_API.G_RET_STS_ERROR;

404: ,x_msg_count => x_msg_count
405: ,x_msg_data => x_msg_data );
406:
407: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
408: x_return_status := FND_API.G_RET_STS_ERROR;
409: RETURN;
410: END IF;
411: END IF;
412: END IF;

Line 415: if fnd_api.to_boolean(nvl(p_commit,FND_API.G_FALSE)) and x_return_status = FND_API.G_RET_STS_SUCCESS then

411: END IF;
412: END IF;
413: /* End of code for bug #2111806 */
414:
415: if fnd_api.to_boolean(nvl(p_commit,FND_API.G_FALSE)) and x_return_status = FND_API.G_RET_STS_SUCCESS then
416: if (p_debug_mode = 'Y') then
417: IF P_DEBUG_MODE = 'Y' THEN
418: pa_debug.debug('Create_project_party: Commiting data.');
419: END IF;

Line 431: WHEN FND_API.G_EXC_ERROR THEN

427: pa_debug.reset_err_stack;
428:
429: EXCEPTION
430: --Bug 5186830
431: WHEN FND_API.G_EXC_ERROR THEN
432:
433: l_msg_count := FND_MSG_PUB.count_msg;
434:
435: IF l_msg_count = 1 THEN

Line 437: (p_encoded => FND_API.G_TRUE

433: l_msg_count := FND_MSG_PUB.count_msg;
434:
435: IF l_msg_count = 1 THEN
436: PA_INTERFACE_UTILS_PUB.get_messages
437: (p_encoded => FND_API.G_TRUE
438: ,p_msg_index => 1
439: ,p_msg_count => l_msg_count
440: ,p_msg_data => l_msg_data
441: ,p_data => l_data

Line 448: x_return_status := FND_API.G_RET_STS_ERROR;

444: x_msg_count := l_msg_count;
445: ELSE
446: x_msg_count := l_msg_count;
447: END IF;
448: x_return_status := FND_API.G_RET_STS_ERROR;
449: pa_debug.reset_err_stack;
450:
451: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
452: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 451: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

447: END IF;
448: x_return_status := FND_API.G_RET_STS_ERROR;
449: pa_debug.reset_err_stack;
450:
451: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
452: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
453: fnd_message.set_name('PA','PA_UNEXPECTED_ERROR');
454: fnd_message.set_token('PKG_NAME','PA_PROJECT_PARTIES_PUB');
455: fnd_message.set_token('PROCEDURE_NAME','CREATE_PROJECT_PARTY');

Line 452: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

448: x_return_status := FND_API.G_RET_STS_ERROR;
449: pa_debug.reset_err_stack;
450:
451: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
452: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
453: fnd_message.set_name('PA','PA_UNEXPECTED_ERROR');
454: fnd_message.set_token('PKG_NAME','PA_PROJECT_PARTIES_PUB');
455: fnd_message.set_token('PROCEDURE_NAME','CREATE_PROJECT_PARTY');
456: fnd_msg_pub.add();

Line 462: if p_commit = FND_API.G_TRUE then

458: p_data => x_msg_data);
459: raise;
460:
461: WHEN OTHERS THEN
462: if p_commit = FND_API.G_TRUE then
463: rollback to project_parties;
464: end if;
465: x_return_status := fnd_api.g_ret_sts_unexp_error;
466: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_PARTIES_PUB',

Line 465: x_return_status := fnd_api.g_ret_sts_unexp_error;

461: WHEN OTHERS THEN
462: if p_commit = FND_API.G_TRUE then
463: rollback to project_parties;
464: end if;
465: x_return_status := fnd_api.g_ret_sts_unexp_error;
466: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_PARTIES_PUB',
467: p_procedure_name => pa_debug.G_err_stack,
468: p_error_text => SUBSTRB(SQLERRM,1,240));
469: raise;

Line 473: PROCEDURE UPDATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,

469: raise;
470:
471: END CREATE_PROJECT_PARTY;
472:
473: PROCEDURE UPDATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
474: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
475: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
476: p_debug_mode IN VARCHAR2 default 'N',
477: p_object_id IN NUMBER := FND_API.G_MISS_NUM,

Line 474: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,

470:
471: END CREATE_PROJECT_PARTY;
472:
473: PROCEDURE UPDATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
474: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
475: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
476: p_debug_mode IN VARCHAR2 default 'N',
477: p_object_id IN NUMBER := FND_API.G_MISS_NUM,
478: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,

Line 475: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

471: END CREATE_PROJECT_PARTY;
472:
473: PROCEDURE UPDATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
474: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
475: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
476: p_debug_mode IN VARCHAR2 default 'N',
477: p_object_id IN NUMBER := FND_API.G_MISS_NUM,
478: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,
479: p_project_role_id IN NUMBER,

Line 477: p_object_id IN NUMBER := FND_API.G_MISS_NUM,

473: PROCEDURE UPDATE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
474: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
475: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
476: p_debug_mode IN VARCHAR2 default 'N',
477: p_object_id IN NUMBER := FND_API.G_MISS_NUM,
478: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,
479: p_project_role_id IN NUMBER,
480: p_resource_type_id IN NUMBER := 101,
481: p_resource_source_id IN NUMBER,

Line 478: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,

474: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
475: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
476: p_debug_mode IN VARCHAR2 default 'N',
477: p_object_id IN NUMBER := FND_API.G_MISS_NUM,
478: p_object_type IN VARCHAR2 := FND_API.G_MISS_CHAR,
479: p_project_role_id IN NUMBER,
480: p_resource_type_id IN NUMBER := 101,
481: p_resource_source_id IN NUMBER,
482: p_resource_id IN NUMBER,

Line 485: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,

481: p_resource_source_id IN NUMBER,
482: p_resource_id IN NUMBER,
483: p_start_date_active IN DATE,
484: p_scheduled_flag IN VARCHAR2 := 'N',
485: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
486: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,
487: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
488: p_project_end_date IN DATE,
489: p_project_party_id IN NUMBER,

Line 486: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,

482: p_resource_id IN NUMBER,
483: p_start_date_active IN DATE,
484: p_scheduled_flag IN VARCHAR2 := 'N',
485: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
486: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,
487: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
488: p_project_end_date IN DATE,
489: p_project_party_id IN NUMBER,
490: p_assignment_id IN NUMBER,

Line 487: p_project_id IN NUMBER := FND_API.G_MISS_NUM,

483: p_start_date_active IN DATE,
484: p_scheduled_flag IN VARCHAR2 := 'N',
485: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
486: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,
487: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
488: p_project_end_date IN DATE,
489: p_project_party_id IN NUMBER,
490: p_assignment_id IN NUMBER,
491: p_assign_record_version_number IN NUMBER,

Line 492: p_mgr_validation_type IN VARCHAR2 := FND_API.G_MISS_CHAR,/Added for bug 2111806/

488: p_project_end_date IN DATE,
489: p_project_party_id IN NUMBER,
490: p_assignment_id IN NUMBER,
491: p_assign_record_version_number IN NUMBER,
492: p_mgr_validation_type IN VARCHAR2 := FND_API.G_MISS_CHAR,/*Added for bug 2111806*/
493: p_end_date_active IN OUT NOCOPY DATE, --File.Sql.39 bug 4440895
494: x_assignment_id OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
495: x_wf_type OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
496: x_wf_item_type OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895

Line 541: if p_commit = FND_API.G_TRUE then

537: ('ASGMT_APPRVL_REJECTED','ASGMT_APPRVL_CANCELED');*/
538: --l_staff_assn_exists_rec l_staff_assn_exists_csr%ROWTYPE;
539:
540: BEGIN
541: if p_commit = FND_API.G_TRUE then
542: savepoint project_parties;
543: end if;
544: x_return_status := FND_API.G_RET_STS_SUCCESS;
545: --dbms_output.put_line('role id '||to_char(p_project_role_id));

Line 544: x_return_status := FND_API.G_RET_STS_SUCCESS;

540: BEGIN
541: if p_commit = FND_API.G_TRUE then
542: savepoint project_parties;
543: end if;
544: x_return_status := FND_API.G_RET_STS_SUCCESS;
545: --dbms_output.put_line('role id '||to_char(p_project_role_id));
546: --dbms_output.put_line('resource source id '||to_char(p_resource_source_id));
547: --dbms_output.put_line('project party id '||to_char(p_project_party_id));
548: l_record_version_number := p_record_version_number;

Line 580: If x_return_status = FND_API.G_RET_STS_SUCCESS and not(fnd_api.to_boolean(nvl(p_validate_only,FND_API.G_FALSE))) then

576: x_return_status);
577: end if;
578:
579:
580: If x_return_status = FND_API.G_RET_STS_SUCCESS and not(fnd_api.to_boolean(nvl(p_validate_only,FND_API.G_FALSE))) then
581:
582: if x_assignment_action = 'CREATE' then
583: -- call assignments api
584:

Line 592: x_return_status := FND_API.G_RET_STS_ERROR;

588: x_return_status => x_return_status,
589: x_error_message_code => l_error_msg_code);
590: IF (l_valid <> 'Y') then
591: -- check that the person is allowed to have schedule
592: x_return_status := FND_API.G_RET_STS_ERROR;
593: fnd_message.set_name('PA','PA_NO_SCHEDULABLE_PERSON');
594: fnd_msg_pub.add();
595: END IF;
596:

Line 601: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN

597: -- if the res belongs to the expenditure org hierarchy, check if the res's
598: -- job is schedulable
599:
600:
601: IF x_return_status = FND_API.G_RET_STS_SUCCESS THEN
602: -- Added for bug 3149239
603: l_date :=pa_resource_utils.Get_Resource_Effective_Date(p_resource_id => p_resource_id);
604: l_job_schedulable := PA_HR_UPDATE_API.check_job_schedulable
605: ( p_person_id => p_resource_source_id

Line 609: x_return_status := FND_API.G_RET_STS_ERROR;

605: ( p_person_id => p_resource_source_id
606: ,p_date => l_date );
607:
608: IF l_job_schedulable <> 'Y' THEN
609: x_return_status := FND_API.G_RET_STS_ERROR;
610: fnd_message.set_name('PA','PA_NOT_SCHEDULABLE_JOB');
611: fnd_msg_pub.add();
612: END IF;
613: END IF;

Line 615: if x_return_status = FND_API.G_RET_STS_SUCCESS then

611: fnd_msg_pub.add();
612: END IF;
613: END IF;
614: END IF;
615: if x_return_status = FND_API.G_RET_STS_SUCCESS then
616:
617: l_assignment_rec.assignment_type := 'STAFFED_ASSIGNMENT';
618: l_assignment_rec.project_id := p_project_id;
619: l_assignment_rec.project_role_id := p_project_role_id;

Line 650: ,p_validate_only => FND_API.G_FALSE

646: ( p_assignment_id => p_assignment_id
647: ,p_assignment_type => 'STAFFED_ASSIGNMENT'
648: ,p_record_version_number => p_assign_record_version_number
649: ,p_commit => p_commit
650: ,p_validate_only => FND_API.G_FALSE
651: ,x_return_status => x_return_status
652: ,x_msg_count => x_msg_count
653: ,x_msg_data => x_msg_data);
654:

Line 670: -- ,p_mass_update_flag => FND_API.G_FLASE

666: THEN
667:
668: PA_SCHEDULE_PUB.update_schedule (
669: p_project_id => p_project_id
670: -- ,p_mass_update_flag => FND_API.G_FLASE
671: ,p_exception_type_code => 'CHANGE_DURATION'
672: ,p_record_version_number => l_staff_assn_exists_rec.record_version_number
673: ,p_assignment_id => l_staff_assn_exists_rec.assignment_id
674: ,p_change_start_date => p_start_date_active

Line 680: ,p_validate_only => FND_API.G_FALSE--'F'

676: ,p_assignment_status_code => l_staff_assn_exists_rec.status_code
677: ,p_non_working_day_flag => 'N'
678: ,p_called_by_proj_party => 'Y'
679: ,p_commit => p_commit
680: ,p_validate_only => FND_API.G_FALSE--'F'
681: ,x_return_status => x_return_status
682: ,x_msg_count => x_msg_count
683: ,x_msg_data => x_msg_data );
684:

Line 685: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN

681: ,x_return_status => x_return_status
682: ,x_msg_count => x_msg_count
683: ,x_msg_data => x_msg_data );
684:
685: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
686: Close l_staff_assn_exists_csr;
687: RAISE FND_API.G_EXC_ERROR;
688: END IF;
689:

Line 687: RAISE FND_API.G_EXC_ERROR;

683: ,x_msg_data => x_msg_data );
684:
685: IF (x_return_status <> FND_API.G_RET_STS_SUCCESS) THEN
686: Close l_staff_assn_exists_csr;
687: RAISE FND_API.G_EXC_ERROR;
688: END IF;
689:
690:
691: END IF;

Line 706: if x_return_status = FND_API.G_RET_STS_SUCCESS and l_grant_id > 0 then

702:
703: /* FP-L status-based security
704: l_grant_id := pa_project_parties_utils.get_grant_id(p_project_party_id => p_project_party_id);
705:
706: if x_return_status = FND_API.G_RET_STS_SUCCESS and l_grant_id > 0 then
707: -- call fnd_grants
708: IF p_resource_type_id = 112 THEN
709: l_source_type := 'HZ_PARTY';
710: END IF;

Line 731: if x_return_status = FND_API.G_RET_STS_SUCCESS then

727: end if;
728:
729: */
730:
731: if x_return_status = FND_API.G_RET_STS_SUCCESS then
732: l_grant_id := null;
733:
734: ----dbms_output.put_line('calling update api');
735: pa_debug.g_err_stage := 'Calling Update_row';

Line 752: x_return_status := FND_API.G_RET_STS_ERROR;

748: X_LAST_UPDATED_BY => FND_GLOBAL.USER_ID,
749: X_LAST_UPDATE_LOGIN => FND_GLOBAL.LOGIN_ID,
750: X_RETURN_STATUS => x_return_status);
751: if (x_return_status = 'N') then
752: x_return_status := FND_API.G_RET_STS_ERROR;
753: if p_calling_module = 'FORM' then
754: fnd_message.set_name('FND','FORM_RECORD_CHANGED');
755: --fnd_message.set_token('PKG_NAME','PA_PROJECT_PARTIES_PKG');
756: --fnd_message.set_token('PROCEDURE_NAME','UPDATE_ROW');

Line 772: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN

768:
769: end if;
770:
771: --Bug 5856712
772: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
773: RAISE FND_API.G_EXC_ERROR;
774: END IF;
775:
776:

Line 773: RAISE FND_API.G_EXC_ERROR;

769: end if;
770:
771: --Bug 5856712
772: IF x_return_status<>FND_API.G_RET_STS_SUCCESS THEN
773: RAISE FND_API.G_EXC_ERROR;
774: END IF;
775:
776:
777: /* Start of code for bug #2111806:

Line 805: x_return_status := FND_API.G_RET_STS_ERROR;

801: ,p_token2 => 'END_DATE'
802: ,p_value2 => l_end_no_mgr_date
803: );
804: END IF;
805: x_return_status := FND_API.G_RET_STS_ERROR;
806: RETURN;
807: END IF;
808:
809: /* Throw an error if there are no Project Managers assigned.

Line 818: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

814: ,x_return_status => x_return_status
815: ,x_msg_count => x_msg_count
816: ,x_msg_data => x_msg_data );
817:
818: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
819: x_return_status := FND_API.G_RET_STS_ERROR;
820: RETURN;
821: END IF;
822: END IF;

Line 819: x_return_status := FND_API.G_RET_STS_ERROR;

815: ,x_msg_count => x_msg_count
816: ,x_msg_data => x_msg_data );
817:
818: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
819: x_return_status := FND_API.G_RET_STS_ERROR;
820: RETURN;
821: END IF;
822: END IF;
823: END IF;

Line 826: if fnd_api.to_boolean(nvl(p_commit,fnd_api.G_FALSE)) and x_return_status = FND_API.G_RET_STS_SUCCESS then

822: END IF;
823: END IF;
824: /* End of code for bug #2111806 */
825:
826: if fnd_api.to_boolean(nvl(p_commit,fnd_api.G_FALSE)) and x_return_status = FND_API.G_RET_STS_SUCCESS then
827: if (p_debug_mode = 'Y') then
828: IF P_DEBUG_MODE = 'Y' THEN
829: pa_debug.debug('Update_project_party: Commiting data.');
830: END IF;

Line 842: WHEN FND_API.G_EXC_ERROR THEN

838:
839: EXCEPTION
840:
841: -- bug 5856712
842: WHEN FND_API.G_EXC_ERROR THEN
843:
844: l_msg_count := FND_MSG_PUB.count_msg;
845:
846: IF l_msg_count = 1 THEN

Line 848: (p_encoded => FND_API.G_TRUE

844: l_msg_count := FND_MSG_PUB.count_msg;
845:
846: IF l_msg_count = 1 THEN
847: PA_INTERFACE_UTILS_PUB.get_messages
848: (p_encoded => FND_API.G_TRUE
849: ,p_msg_index => 1
850: ,p_msg_count => l_msg_count
851: ,p_msg_data => l_msg_data
852: ,p_data => l_data

Line 859: x_return_status := FND_API.G_RET_STS_ERROR;

855: x_msg_count := l_msg_count;
856: ELSE
857: x_msg_count := l_msg_count;
858: END IF;
859: x_return_status := FND_API.G_RET_STS_ERROR;
860: pa_debug.reset_err_stack;
861:
862: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
863: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

Line 862: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

858: END IF;
859: x_return_status := FND_API.G_RET_STS_ERROR;
860: pa_debug.reset_err_stack;
861:
862: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
863: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
864: fnd_message.set_name('PA','PA_UNEXPECTED_ERROR');
865: fnd_message.set_token('PKG_NAME','PA_PROJECT_PARTIES_PUB');
866: fnd_message.set_token('PROCEDURE_NAME','UPDATE_PROJECT_PARTY');

Line 863: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

859: x_return_status := FND_API.G_RET_STS_ERROR;
860: pa_debug.reset_err_stack;
861:
862: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
863: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
864: fnd_message.set_name('PA','PA_UNEXPECTED_ERROR');
865: fnd_message.set_token('PKG_NAME','PA_PROJECT_PARTIES_PUB');
866: fnd_message.set_token('PROCEDURE_NAME','UPDATE_PROJECT_PARTY');
867: fnd_msg_pub.add();

Line 874: if p_commit = fnd_api.G_TRUE then

870: raise;
871:
872:
873: WHEN OTHERS THEN
874: if p_commit = fnd_api.G_TRUE then
875: rollback to project_parties;
876: end if;
877: x_return_status := fnd_api.g_ret_sts_unexp_error;
878: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_PARTIES_PUB',

Line 877: x_return_status := fnd_api.g_ret_sts_unexp_error;

873: WHEN OTHERS THEN
874: if p_commit = fnd_api.G_TRUE then
875: rollback to project_parties;
876: end if;
877: x_return_status := fnd_api.g_ret_sts_unexp_error;
878: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_PARTIES_PUB',
879: p_procedure_name => pa_debug.g_err_stack,
880: p_error_text => SUBSTRB(SQLERRM,1,240));
881: fnd_msg_pub.count_and_get(p_count => x_msg_count,

Line 889: PROCEDURE DELETE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,

885:
886: end update_project_party;
887:
888:
889: PROCEDURE DELETE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
890: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
891: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
892: p_debug_mode IN VARCHAR2 default 'N',
893: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,

Line 890: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,

886: end update_project_party;
887:
888:
889: PROCEDURE DELETE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
890: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
891: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
892: p_debug_mode IN VARCHAR2 default 'N',
893: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
894: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,

Line 891: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,

887:
888:
889: PROCEDURE DELETE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
890: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
891: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
892: p_debug_mode IN VARCHAR2 default 'N',
893: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
894: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,
895: p_project_id IN NUMBER := FND_API.G_MISS_NUM,

Line 893: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,

889: PROCEDURE DELETE_PROJECT_PARTY( p_commit IN VARCHAR2 := FND_API.G_FALSE,
890: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
891: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
892: p_debug_mode IN VARCHAR2 default 'N',
893: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
894: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,
895: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
896: p_project_party_id IN NUMBER := FND_API.G_MISS_NUM,
897: p_scheduled_flag IN VARCHAR2 := 'N',

Line 894: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,

890: p_validate_only IN VARCHAR2 := FND_API.G_TRUE,
891: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
892: p_debug_mode IN VARCHAR2 default 'N',
893: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
894: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,
895: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
896: p_project_party_id IN NUMBER := FND_API.G_MISS_NUM,
897: p_scheduled_flag IN VARCHAR2 := 'N',
898: /* code commented for the bug#1851096, starts here */

Line 895: p_project_id IN NUMBER := FND_API.G_MISS_NUM,

891: p_validation_level IN NUMBER := FND_API.G_VALID_LEVEL_FULL,
892: p_debug_mode IN VARCHAR2 default 'N',
893: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
894: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,
895: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
896: p_project_party_id IN NUMBER := FND_API.G_MISS_NUM,
897: p_scheduled_flag IN VARCHAR2 := 'N',
898: /* code commented for the bug#1851096, starts here */
899: /* p_assignment_id IN NUMBER := FND_API.G_MISS_NUM,

Line 896: p_project_party_id IN NUMBER := FND_API.G_MISS_NUM,

892: p_debug_mode IN VARCHAR2 default 'N',
893: p_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
894: p_calling_module IN VARCHAR2 := FND_API.G_MISS_CHAR,
895: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
896: p_project_party_id IN NUMBER := FND_API.G_MISS_NUM,
897: p_scheduled_flag IN VARCHAR2 := 'N',
898: /* code commented for the bug#1851096, starts here */
899: /* p_assignment_id IN NUMBER := FND_API.G_MISS_NUM,
900: p_assign_record_version_number IN NUMBER := FND_API.G_MISS_NUM,

Line 899: /* p_assignment_id IN NUMBER := FND_API.G_MISS_NUM,

895: p_project_id IN NUMBER := FND_API.G_MISS_NUM,
896: p_project_party_id IN NUMBER := FND_API.G_MISS_NUM,
897: p_scheduled_flag IN VARCHAR2 := 'N',
898: /* code commented for the bug#1851096, starts here */
899: /* p_assignment_id IN NUMBER := FND_API.G_MISS_NUM,
900: p_assign_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
901: */
902: /* code commented for the bug#1851096, end here */
903: /* code added for the bug#1851096, starts here */

Line 900: p_assign_record_version_number IN NUMBER := FND_API.G_MISS_NUM,

896: p_project_party_id IN NUMBER := FND_API.G_MISS_NUM,
897: p_scheduled_flag IN VARCHAR2 := 'N',
898: /* code commented for the bug#1851096, starts here */
899: /* p_assignment_id IN NUMBER := FND_API.G_MISS_NUM,
900: p_assign_record_version_number IN NUMBER := FND_API.G_MISS_NUM,
901: */
902: /* code commented for the bug#1851096, end here */
903: /* code added for the bug#1851096, starts here */
904: p_assignment_id IN NUMBER := 0,

Line 907: p_mgr_validation_type IN VARCHAR2 := FND_API.G_MISS_CHAR,/Added for bug 2111806/

903: /* code added for the bug#1851096, starts here */
904: p_assignment_id IN NUMBER := 0,
905: p_assign_record_version_number IN NUMBER := 0,
906: /* code added for the bug#1851096, end here */
907: p_mgr_validation_type IN VARCHAR2 := FND_API.G_MISS_CHAR,/*Added for bug 2111806*/
908: x_return_status OUT NOCOPY VARCHAR2, --File.Sql.39 bug 4440895
909: x_msg_count OUT NOCOPY NUMBER, --File.Sql.39 bug 4440895
910: x_msg_data OUT NOCOPY VARCHAR2) IS --File.Sql.39 bug 4440895
911:

Line 973: if p_commit = FND_API.G_TRUE then

969: l_return_status VARCHAR2(1000);
970: /* End of code for bug #2111806 */
971:
972: BEGIN
973: if p_commit = FND_API.G_TRUE then
974: savepoint project_parties;
975: end if;
976:
977: x_return_status := FND_API.G_RET_STS_SUCCESS;

Line 977: x_return_status := FND_API.G_RET_STS_SUCCESS;

973: if p_commit = FND_API.G_TRUE then
974: savepoint project_parties;
975: end if;
976:
977: x_return_status := FND_API.G_RET_STS_SUCCESS;
978:
979: if (p_debug_mode = 'Y') then
980: IF P_DEBUG_MODE = 'Y' THEN
981: pa_debug.debug('Delete_project_party : Lock Key Members ');

Line 1000: IF (( p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM) AND

996: So, fetching the p_project_id based on the p_project_party_id. */
997:
998: l_project_id := p_project_id; -- Added for bug 4483205
999:
1000: IF (( p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM) AND
1001: ( nvl(p_project_party_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM )) THEN
1002:
1003: SELECT project_id
1004: INTO l_project_id

Line 1001: ( nvl(p_project_party_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM )) THEN

997:
998: l_project_id := p_project_id; -- Added for bug 4483205
999:
1000: IF (( p_project_id IS NULL OR p_project_id = FND_API.G_MISS_NUM) AND
1001: ( nvl(p_project_party_id,FND_API.G_MISS_NUM) <> FND_API.G_MISS_NUM )) THEN
1002:
1003: SELECT project_id
1004: INTO l_project_id
1005: FROM pa_project_parties

Line 1028: EXIT WHEN x_return_status <> FND_API.G_RET_STS_SUCCESS;

1024: p_project_party_id => rec.project_party_id,
1025: x_return_status => x_return_status,
1026: x_msg_count => x_msg_count,
1027: x_msg_data => x_msg_data);
1028: EXIT WHEN x_return_status <> FND_API.G_RET_STS_SUCCESS;
1029: END LOOP;
1030:
1031: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1032: RETURN;

Line 1031: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1027: x_msg_data => x_msg_data);
1028: EXIT WHEN x_return_status <> FND_API.G_RET_STS_SUCCESS;
1029: END LOOP;
1030:
1031: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1032: RETURN;
1033: END IF;
1034:
1035: FOR rec In c_billing_accounts LOOP

Line 1047: EXIT WHEN x_return_status <> FND_API.G_RET_STS_SUCCESS;

1043: p_record_version_number => rec.record_version_number,
1044: x_return_status => x_return_status,
1045: x_msg_count => x_msg_count,
1046: x_msg_data => x_msg_data);
1047: EXIT WHEN x_return_status <> FND_API.G_RET_STS_SUCCESS;
1048: END LOOP;
1049:
1050: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1051: RETURN;

Line 1050: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1046: x_msg_data => x_msg_data);
1047: EXIT WHEN x_return_status <> FND_API.G_RET_STS_SUCCESS;
1048: END LOOP;
1049:
1050: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1051: RETURN;
1052: END IF;
1053:
1054: l_grant_id := pa_project_parties_utils.get_grant_id(p_project_party_id => p_project_party_id);

Line 1062: ----- if x_return_status = FND_API.G_RET_STS_SUCCESS and pa_install.is_prm_licensed() = 'Y' and l_grant_id > 0 then

1058: x_record_version_number => p_record_version_number);
1059: end if;
1060:
1061: /* FP-L status-based security
1062: ----- if x_return_status = FND_API.G_RET_STS_SUCCESS and pa_install.is_prm_licensed() = 'Y' and l_grant_id > 0 then
1063: if x_return_status = FND_API.G_RET_STS_SUCCESS and l_grant_id > 0 then
1064: pa_security_pvt.revoke_grant(p_grant_guid => l_grant_id,
1065: x_return_status => x_return_status,
1066: x_msg_count => x_msg_count,

Line 1063: if x_return_status = FND_API.G_RET_STS_SUCCESS and l_grant_id > 0 then

1059: end if;
1060:
1061: /* FP-L status-based security
1062: ----- if x_return_status = FND_API.G_RET_STS_SUCCESS and pa_install.is_prm_licensed() = 'Y' and l_grant_id > 0 then
1063: if x_return_status = FND_API.G_RET_STS_SUCCESS and l_grant_id > 0 then
1064: pa_security_pvt.revoke_grant(p_grant_guid => l_grant_id,
1065: x_return_status => x_return_status,
1066: x_msg_count => x_msg_count,
1067: x_msg_data => x_msg_data

Line 1101: x_return_status := FND_API.G_RET_STS_ERROR;

1097: ,p_token2 => 'END_DATE'
1098: ,p_value2 => l_end_no_mgr_date
1099: );
1100: END IF;
1101: x_return_status := FND_API.G_RET_STS_ERROR;
1102: RETURN;
1103: END IF;
1104:
1105: /* Throw an error if there are no Project Managers assigned.

Line 1114: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN

1110: ,x_return_status => x_return_status
1111: ,x_msg_count => x_msg_count
1112: ,x_msg_data => x_msg_data );
1113:
1114: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1115: x_return_status := FND_API.G_RET_STS_ERROR;
1116: RETURN;
1117: END IF;
1118: END IF;

Line 1115: x_return_status := FND_API.G_RET_STS_ERROR;

1111: ,x_msg_count => x_msg_count
1112: ,x_msg_data => x_msg_data );
1113:
1114: IF x_return_status <> FND_API.G_RET_STS_SUCCESS THEN
1115: x_return_status := FND_API.G_RET_STS_ERROR;
1116: RETURN;
1117: END IF;
1118: END IF;
1119:

Line 1123: if fnd_api.to_boolean(nvl(p_commit,fnd_api.G_FALSE)) and x_return_status = FND_API.G_RET_STS_SUCCESS then

1119:
1120: END IF;
1121: /* End of code for bug #2111806 */
1122:
1123: if fnd_api.to_boolean(nvl(p_commit,fnd_api.G_FALSE)) and x_return_status = FND_API.G_RET_STS_SUCCESS then
1124: if (p_debug_mode = 'Y') then
1125: IF P_DEBUG_MODE = 'Y' THEN
1126: pa_debug.debug('Delete_project_party: Commiting data.');
1127: END IF;

Line 1140: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN

1136: pa_debug.reset_err_stack;
1137:
1138: EXCEPTION
1139:
1140: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1142: fnd_message.set_name('PA','PA_UNEXPECTED_ERROR');
1143: fnd_message.set_token('PKG_NAME','PA_PROJECT_PARTIES_PVT');
1144: fnd_message.set_token('PROCEDURE_NAME','DELETE_PROJECT_PARTY');

Line 1141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;

1137:
1138: EXCEPTION
1139:
1140: WHEN FND_API.G_EXC_UNEXPECTED_ERROR THEN
1141: x_return_status := FND_API.G_RET_STS_UNEXP_ERROR;
1142: fnd_message.set_name('PA','PA_UNEXPECTED_ERROR');
1143: fnd_message.set_token('PKG_NAME','PA_PROJECT_PARTIES_PVT');
1144: fnd_message.set_token('PROCEDURE_NAME','DELETE_PROJECT_PARTY');
1145: fnd_msg_pub.add();

Line 1159: x_return_status := FND_API.G_RET_STS_ERROR;

1155: END IF;
1156: end if;
1157:
1158: --fnd_message.set_name('PA', 'PA_XC_NO_DATA_FOUND');
1159: x_return_status := FND_API.G_RET_STS_ERROR;
1160:
1161: WHEN TIMEOUT_ON_RESOURCE THEN
1162:
1163: if (p_debug_mode = 'Y') then

Line 1170: x_return_status := FND_API.G_RET_STS_ERROR;

1166: END IF;
1167: end if;
1168:
1169: fnd_message.set_name('PA', 'PA_XC_ROW_ALREADY_LOCKED');
1170: x_return_status := FND_API.G_RET_STS_ERROR;
1171: return;
1172:
1173: WHEN OTHERS then
1174: if p_commit = fnd_api.G_TRUE then

Line 1174: if p_commit = fnd_api.G_TRUE then

1170: x_return_status := FND_API.G_RET_STS_ERROR;
1171: return;
1172:
1173: WHEN OTHERS then
1174: if p_commit = fnd_api.G_TRUE then
1175: rollback to project_parties;
1176: end if;
1177:
1178: if (p_debug_mode = 'Y') then

Line 1187: x_return_status := FND_API.G_RET_STS_ERROR;

1183:
1184: if(SQLCODE = -54) then
1185: FND_MESSAGE.Set_Name('PA', 'PA_XC_ROW_ALREADY_LOCKED');
1186: x_msg_data := FND_MESSAGE.get;
1187: x_return_status := FND_API.G_RET_STS_ERROR;
1188: else
1189: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_PARTIES_PUB',
1190: p_procedure_name => pa_debug.g_err_stack,
1191: p_error_text => SUBSTRB(SQLERRM,1,240));

Line 1192: x_return_status := FND_API.G_RET_STS_ERROR;

1188: else
1189: fnd_msg_pub.add_exc_msg(p_pkg_name => 'PA_PROJECT_PARTIES_PUB',
1190: p_procedure_name => pa_debug.g_err_stack,
1191: p_error_text => SUBSTRB(SQLERRM,1,240));
1192: x_return_status := FND_API.G_RET_STS_ERROR;
1193: end if;
1194:
1195: END DELETE_PROJECT_PARTY;
1196: